% In Prolog compiler do the following:
% ['likes2.pl'].
% Based on and extends sebesta book example
% control c, then e, to exit
% likes(Y,chocolate).
% likes(Y,icecream).
% likes(Y,chocolate_icecream).
% likes(jake,Y).

likes(jake,chocolate).
likes(jake,apricots).
likes(jake,bananas).
likes(jake,icecream).
likes(darcie,chocolate).
likes(darcie,licorice).
likes(darcie,apricots).
likes(darcie,bananas).

likes(X,chocolate_icecream) :- likes(X,chocolate), likes(X,icecream).