chlopak(zenek).
chlopak(wojtek).
chlopak(jozek).
chlopak(jarek).
dziewczyna(zosia).
dziewczyna(marysia).
dziewczyna(ola).
dziewczyna(ala).
dziewczyna(kasia).
rodzic(wojtek,zenek).
rodzic(zosia,zenek).
rodzic(wojtek,marysia).
rodzic(zosia,marysia).
rodzic(zenek,jarek).
rodzic(ola,jozek).
rodzic(jarek,ala).
rodzic(kasia,ala).
lubi(wojtek,zosia).
lubi(marysia,piwo).
lubi(zenek,X):-lubi(X,piwo).
ojciec(X,Y):-rodzic(X,Y),chlopak(X).
matka(X,Y):-rodzic(X,Y),dziewczyna(X).
babcia(X,Z):-matka(X,Y),rodzic(Y,Z).
dziadek(X,Z):-rodzic(X,Y),rodzic(Y,Z),chlopak(X).
ciocia(Y,A):-rodzic(X,Y),rodzic(X,Z),rodzic(Z,A),dziewczyna(Y).
siostra(X,Y):-rodzic(Z,X),rodzic(Z,Y),dziewczyna(X).
przodek(A,B):-rodzic(A,B).
przodek(A,B):-rodzic(A,X),przodek(X,B).