[tutor] Update assignment
This commit is contained in:
parent
39c3af4ba5
commit
ca687c0136
18 changed files with 438 additions and 14 deletions
10
examples/dcg/palimdrome.pl
Normal file
10
examples/dcg/palimdrome.pl
Normal file
|
@ -0,0 +1,10 @@
|
|||
palindrome --> [].
|
||||
palindrome --> [_].
|
||||
palindrome --> [X], palindrome, [X].
|
||||
|
||||
:- initialization(main).
|
||||
|
||||
main :-
|
||||
string_chars("hellolleh", Chars),
|
||||
phrase(palindrome, Chars).
|
||||
|
Reference in a new issue