:- dynamic(woman/1).
:- dynamic(man/1).
:- dynamic(mother/2).
:- dynamic(father/2).

woman(basia).
woman(beata).
woman(monika).
woman(magda).
woman(marzena).
woman(asia).
woman(gosia).
woman(ola).
woman(jola).
woman(agnieszka).
woman(celina).

man(dariusz).
man(damian).
man(tomasz).
man(tadeusz).
man(tymoteusz).
man(tobiasz).
man(jurek).
man(szymon).
man(grzesiek).

mother(basia, monika).
mother(basia, magda).
mother(basia, tomasz).
mother(basia, tymoteusz).
mother(beata, marzena).
mother(beata, tadeusz).
mother(beata, tobiasz).
mother(monika, asia).
mother(monika, gosia).
mother(magda, ola).
mother(magda, jurek).
mother(magda, szymon).
mother(marzena, jola).
mother(marzena, agnieszka).
mother(marzena, grzesiek).

father(dariusz, tomasz).
father(dariusz, tymoteusz).
father(dariusz, magda).
father(dariusz, monika).
father(damian, tadeusz).
father(damian, marzena).
father(damian, tobiasz).
father(tomasz, asia).
father(tomasz, gosia).
father(tadeusz, ola).
father(tadeusz, jurek).
father(tadeusz, szymon).
father(tymoteusz, jola).
father(tymoteusz, agnieszka).
father(tymoteusz, grzesiek).
father(tobiasz, celina).

child(X, Y) :-
  parent(Y, X).