7 lines
No EOL
160 B
Prolog
7 lines
No EOL
160 B
Prolog
male(john).
|
|
male(jimmy).
|
|
female(mary).
|
|
parent(john, jimmy).
|
|
parent(mary, jimmy).
|
|
father(X, Y) :- parent(X, Y), male(X).
|
|
mother(X, Y) :- parent(X, Y), female(X). |