fork download
  1. father_of(joe, paul).
  2. father_of(joe, mary).
  3. father_of(joe, hope).
  4. mother_of(jane, paul).
  5. mother_of(jane, mary).
  6. mother_of(jane, hope).
  7. male(paul).
  8. male(joe).
  9. male(ralph).
  10. male(X):-father_of(X, Y).
  11. female(mary).
  12. female(jane).
  13. female(hope).
  14. female(X):-mother_of(X, Y).
  15. son_of(X, Y) :- father_of(Y, X), male(X).
  16. son_of(X, Y) :- mother_of(Y, X), male(X).
  17. daughter_of(X, Y) :- father_of(Y, X), female(X).
  18. daughter_of(X, Y) :- mother_of(Y, X), female(X).
  19. sibling_of(X, Y):-father_of(Z, X), father_of(Z, Y),X\=Y.
  20. sibling_of(X, Y):-mother_of(Z, X), mother_of(Z, Y),X\=Y.
  21.  
Success #stdin #stdout #stderr 0.02s 7028KB
stdin
Standard input is empty
stdout
Standard output is empty
stderr
Warning: /home/GdSG0Q/prog:10:
	Singleton variables: [Y]
Warning: /home/GdSG0Q/prog:14:
	Singleton variables: [Y]
ERROR: '$runtoplevel'/0: Undefined procedure: program/0
   Exception: (3) program ? EOF: exit