[[
✎ pl:prolog:pllib:palindrome
]]
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ć.
====== Palindrome ====== {{tag>lists}} ===== Description ===== A program accepting palindromes **Source**: The Art of Prolog ===== Download ===== Program source code: {{palindrome.pl}} ===== Listing ===== <code prolog> /* palindrome(Xs) :- The string represented by the list Xs is a palindrome. */ palindrome(Xs) :- palindrome(Xs,push,[]). palindrome([X|Xs],push,S) :- palindrome(Xs,push,[X|S]). palindrome([X|Xs],push,S) :- palindrome(Xs,pop,[X|S]). palindrome([X|Xs],push,S) :- palindrome(Xs,pop,S). palindrome([X|Xs],pop,[X|S]) :- palindrome(Xs,pop,S). palindrome([],pop,[]). % Program 18.1 : A program accepting palindromes </code> ===== Comments =====
pl/prolog/pllib/palindrome.txt
· ostatnio zmienione: 2019/06/27 15:50 (edycja zewnętrzna)
Pokaż stronę
Poprzednie wersje
Menadżer multimediów
Do góry