Prolog in Pulp Fiction
Tuesday, August 21, 2007 10:34:14 PM
Ker sem pridno hodil na predavanja in na vaje in ker sem vse zapiske že enkrat predelal (žal to ni zadostovalo, da bi opravil izpit), sem se odločil, da tokrat znanje osvežim s tem odličnim tutorialom, ki vsebuje tudi sledeče programčke:
loves(vincent,mia).
loves(marcellus,mia).
loves(pumpkin,honey_bunny).
loves(honey_bunny,pumpkin).
jealous(X,Y) :- loves(X,Z),loves(Y,Z).
kills(vincent,X) :- loves(X,mia),X\==vincent.
word(article,a).
word(article,every).
word(noun,criminal).
word(noun,'big kahuna burger').
word(verb,eats).
word(verb,likes).
sentence(Word1,Word2,Word3,Word4,Word5) :-
word(article,Word1),
word(noun,Word2),
word(verb,Word3),
word(article,Word4),
word(noun,Word5).
Po kosilu sem si zaželel malo sprostitve, zato sem se odločil, da si pogledam en film. Odločil sem se za odlični Pulp Fiction
, že po nekaj minutah pa mi je postalo jasno, kaj je vplivalo na mojo odločitev. Iz povedanega lahko sklepamo:zeli_gledati_pulp_fiction(X) :- se_uci_prolog(X).











