diff options
Diffstat (limited to 'example.pl')
-rw-r--r-- | example.pl | 11 |
1 files changed, 10 insertions, 1 deletions
@@ -2,4 +2,13 @@ math(A,B,C,D) :- D is A + B + C * A. -true.
\ No newline at end of file +true. + +likes(bob, ice). +likes(sam, text). +likes(sam, ice). + +could_be_friends(Person1, Person2) :- + likes(Person1, Thing1), + likes(Person2, Thing2), + Thing1 = Thing2.
\ No newline at end of file |