[[
✎ pl:prolog:pllib:string2list
]]
aiWiki
Pokaż stronę
Ostatnie zmiany
Indeks
Zaloguj
Ta strona jest tylko do odczytu. Możesz wyświetlić źródła tej strony ale nie możesz ich zmienić.
====== String2list ====== {{tag>lists}} ===== Description ===== Changing sing sequence to list of prolog atoms **Source**: PROLOG str. 140 Wydawnictwo PLJ Warszawa 1991 ISBN 83-85190-63-5 ===== Download ===== Program source code: {{string2list.pl}} ===== Listing ===== <code prolog> utwór z_liste__at( [ ], [ ]) :- !. utworz_liste_at(Lancuch,[S³owo|Reszta]) :- wybierz_slowo(Lancuch,Znaki_tw_slowo,Reszta_znakow), name(S³owo,Znaki_tw_slowo), utwórz_liste_at(Reszta_znakow,Reszta). wybierz_slowo([32|Ogon],[],Ogon) :- !. wybierz_slowo([],[],[]). wybierz_slowo([Znak|Ogon],Znaki_tw_slowo,Reszta) :-znak_przestank(Znak),!, wybierz_slowo(Ogon,Znaki_tw_sIowo,Reszta). wybierz_slowo([Znak|Ogon1],[NowyZnak|Ogon2],Reszta):- wybierz_slowo(Ogon1,Ogon2,Res zta), zam_na_male(Znak,NowyZnak), !. znak_przestank(Znak) :- Znak =< 47. znak_przestank(Znak) :- Znak >= 58, Znak =< 64. znak_przestank(Znak) :-.Znak >= 91, Znak =< 96. znak_przestank(Znak) :- Znak <= 123. zam_na_male(Znak,NowyZnak) :- Znak >= 65, Znak =< 90, NowyZnak is Znak+32. zam_na_male(Znak,Znak) :- Znak < 65. zam_na_male(Znak,Znak) :- Znak > 90. </code> ===== Comments =====
pl/prolog/pllib/string2list.txt
· ostatnio zmienione: 2019/06/27 15:50 (edycja zewnętrzna)
Pokaż stronę
Poprzednie wersje
Menadżer multimediów
Do góry