% Datum: 25-Oct-15

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% UEBUNGSSITZUNG 02                                                          %%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%% AUFGABE 05 (AUFGABE 2.3 LPN)
%% Die nachfolgende Wissensbasis enthält Wörter und eine Grammatik. Die Grammatik
%% definiert, dass ein Satz aus 5 Wörtern besteht und diese in folgender Reihen-
%% folge vorkommen müssen: ein Determinant, ein Nomen, ein Verb, ein Determinan
%% und ein Nomen.

word(determiner,a).
word(determiner,every).
word(noun,criminal).
word(noun,’big  kahuna  burger’).
word(verb,eats).
word(verb,likes).

sentence(Word1,Word2,Word3,Word4,Word5):-
  word(determiner,Word1),
  word(noun,Word2),
  word(verb,Word3),
  word(determiner,Word4),
  word(noun,Word5).

%% Welche Anfrage muss an den Interpreter gestellt werden um herauszufinden
%% welche Sätze diese Grammatik generieren kann? Nennen Sie alle Sätze in der
%% Reihenfolge in der Prolog die Sätze generiert.




%% AUFGABE 07 (AUFGABE 2.4 LPN)
%% Gegeben sind folgende 6 italienische Wörter: astante , astoria , baratto ,
%% cobalto ,pistola , statale.

word(astante,  a,s,t,a,n,t,e).
word(astoria,  a,s,t,o,r,i,a).
word(baratto,  b,a,r,a,t,t,o).
word(cobalto,  c,o,b,a,l,t,o).
word(pistola,  p,i,s,t,o,l,a).
word(statale,  s,t,a,t,a,l,e).

%% Schreiben Sie ein Prädikat crossword/6, welches diese 6 Wörter in dem
%% dargestellten Gitternetz anordnet.
