ojciec(edward,halina).
ojciec(jan,adam).
ojciec(piotr,krzysztof).
ojciec(jan,maria).
ojciec(adam,monika).
ojciec(adam,norbert).

matka(halina,monika).
matka(monika,maciej).
matka(halina, norbert).
matka(ewa,maria).
matka(ewa,adam).
matka(maria,krzysztof).

plec(maciej,m).
plec(norbert,m).
plec(piotr,m).
plec(krzysztof,m).
plec(X,m):- ojciec(X,_).

rodzic(X,Y):-
    ojciec(X,Y);
    matka(X,Y).

dziadek(X,Z):-
    ojciec(X,Y),
    rodzic(Y,Z).

babcia(X,Z):-
    matka(X,Y),
    rodzic(Y,Z).

dziecko(X,Y):-
    rodzic(Y,X).

brat(X,Y):-
    plec(X,m),
    rodzic(Z,X),
    rodzic(Z,Y).