Пример 1
likes(bill, cider).
likes(dick, beer).
likes(harry, beer).
likes(jan, cider).
likes(tom, beer).
likes(tom, cider).
| ?- findall(X,likes(X,Y),S).
S = [bill,dick,harry,jan,tom,tom]
Previous slide
Next slide
Back to first slide
View graphic version