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). :- write(hello), nl. :- write(hello2).