[tutor] Update assignment
This commit is contained in:
parent
39c3af4ba5
commit
ca687c0136
18 changed files with 438 additions and 14 deletions
9
examples/basics/backtracking.pl
Normal file
9
examples/basics/backtracking.pl
Normal file
|
@ -0,0 +1,9 @@
|
|||
leq(0, _).
|
||||
leq(s(X), s(Y)) :- leq(X, Y).
|
||||
|
||||
:- initialization(main).
|
||||
|
||||
main :-
|
||||
leq(X, s(s(s(0)))),
|
||||
write(X), nl,
|
||||
fail.
|
Reference in a new issue