diff options
Diffstat (limited to 'example.pl')
-rw-r--r-- | example.pl | 5 |
1 files changed, 3 insertions, 2 deletions
@@ -5,8 +5,6 @@ parentest :- parentest :- (0 * (1 + 2) * 3) * 3 + 4. -true. - likes(bob, ice). likes(sam, text). likes(sam, ice). @@ -21,6 +19,9 @@ list2(A) :- A = [a,b|c]. curly(A) :- A = {one,two,three}. +tester(A, B) :- !, A = B. +tester(A, B) :- true. + =(A,A). length([], zero). |