6.5.6 Weitere Anfragesprachen
statt
SELECT SName
FROM Studenten, Pruefer, Pruefungen
WHERE Studenten.Matrnr = Pruefungen.Matrnr
AND Pruefungen.Pruefernr = Pruefer.Pruefernr
AND Pruefer.PName = 'Schreiner';
nur kurz
SELECT SName
WHERE PName = 'Schreiner';
Weitere Anfragesprachen
Eltern(Kain,Adam).
Eltern(Kain,Eva).
Eltern(Abel,Adam).
Eltern(Abel,Eva).
Eltern(Muth,Kain).
Eltern(Joseph,Kain).
Eltern(Maria,Muth).
Eltern(Magda,Muth).
Eltern(Magdalena, Joseph).
Eltern(Jacob,Joseph).
Geschwister(X,Y) :- Eltern(X,Z), Eltern(Y,Z), X <> Y.
Cousin(X,Y) :- Eltern(X,A), Eltern(Y,B), Geschwister(A,B).
Cousin(X,Y) :-Eltern(X,A), Eltern(Y,B), Cousin(A,B).
Verwandt(X,Y) :- Geschwister(X,Y).
Verwandt(X,Y) :- Verwandt(X,Z), Eltern(Y,Z).
Verwandt(X,Y) :- Verwandt(Z,Y), Eltern(X,Z).