zena('Radojka').   
zena('Ana').
zena('Marija').
zena('Stanislava').
zena('Jovana').
zena('Rada').
zena('Tatjana').
zena('Ljiljana').
zena('Olga').
zena('Vera').
zena('Djurdjija').
zena('Vera').
zena('Katarina').
zena('Lucija').
zena('Dragana').
zena('Snezana').
zena('Ivana').
zena('Ana').
zena('Violeta').
zena('Ruzica').
zena('Lela').
zena('Vlajka').
zena('Gordana').
zena('Vera').
zena('Jelena').
zena('Mirjana').
zena('Zorica').

muskarac('Vojislav').
muskarac('Aleksa').
muskarac('Dusan').
muskarac('Leka').
muskarac('Stojan').
muskarac('Paun').
muskarac('Sredoje').
muskarac('Srdjan').
muskarac('Nedja').
muskarac('Toma').
muskarac('Dragan').
muskarac('Milos').
muskarac('Radovan').
muskarac('Ole').
muskarac('Ivan').
muskarac('Voja').
muskarac('Stefan').
muskarac('Milan').
muskarac('Rados').
muskarac('Stojan R.').
muskarac('Oliver Prodanovic').
muskarac('Petar').
muskarac('Ljubisa').
muskarac('Dragan').
muskarac('Marko').
muskarac('Stevan').
muskarac('Marko').
muskarac('Milos Prodanovic').
muskarac('Vukasin Prodanovic').

majka('Ana','Ljiljana').
majka('Ana','Olga').
majka('Ana','Vera').
majka('Ana','Tatjana').
majka('Marija','Ana').
majka('Marija','Jovana').
majka('Radojka','Vojislav').
majka('Ana','Paun').
majka('Stanislava','Djurdjija').
majka('Stanislava','Ole').
majka('Stanislava','Petar').
majka('Stanislava','Rados').
majka('Stanislava','Ljubisa').
majka('Rada','Voja').
majka('Rada','Ruzica').
majka('Gordana','Milos Prodanovic').
majka('Gordana','Vukasin Prodanovic').
majka('Tatjana','Srdjan').
majka('Tatjana','Violeta').
majka('Vera','Dragan').
majka('Ljiljana','Katarina').
majka('Ljiljana','Lucija').
majka('Olga','Ana').
majka('Mirjana Stosic','Dragan').
majka('Mirjana Stosic','Vera'). 
majka('Vera','Snezana').
majka('Vera','Ivana').
majka('Lela','Stefan').
majka('Vlajka','Gordana').
majka('Vlajka', 'Stojan R.'  ).                  
majka('Jelena','Zorica'  ).
majka('Zorica'  ,'Stevan').
majka('Djurdjija','Radovan').

otac('Vojislav','Ljiljana').
otac('Vojislav','Olga').
otac('Vojislav','Vera').
otac('Vojislav','Tatjana').
otac('Dusan','Ana').
otac('Dusan','Jovana').
otac('Aleksa','Vojislav').
otac('Vojislav','Paun').
otac('Stojan','Djurdjija').
otac('Stojan','Ole').
otac('Stojan','Petar').
otac('Stojan','Rados').
otac('Stojan','Ljubisa').
otac('Paun','Voja').
otac('Paun','Ruzica').
otac('Sredoje','Srdjan').
otac('Sredoje','Violeta').
otac('Toma','Dragan').
otac('Ole','Katarina').
otac('Ole','Lucija').
otac('Nedja','Ana').
otac('Ljubisa','Dragan').
otac('Ljubisa','Vera'). 
otac('Ivan','Snezana').
otac('Ivan','Ivana').
otac('Voja','Stefan').
otac('Rados','Gordana').
otac('Rados','Stojan R.').
otac('Oliver Prodanovic','Milos Prodanovic').
otac('Oliver Prodanovic','Vukasin Prodanovic').
otac('Marko','Stevan').
otac('Petar','Zorica').
otac('Milos','Radovan').
otac('Leka','Stanislava').

brat(X,Y):- muskarac(X),otac(Z,X),otac(Z,Y),
		 majka(A,X),majka(A,Y),X\=Y.

sestra(X,Y):- zena(X),otac(Z,X),otac(Z,Y),
			majka(A,X),majka(A,Y),X\=Y.    

mama_tata(X,Y,Z):- majka(X,Z),otac(Y,Z).

baba(X,Y):- zena(X),majka(X,Z),(otac(Z,Y);majka(Z,Y)).

deda(X,Y):- muskarac(X),otac(X,Z),(otac(Z,Y);majka(Z,Y)).

unuk(X,Y):- muskarac(X),(otac(Y,Z);majka(Y,Z)),(otac(Z,X);majka(Z,X)).

unuka(X,Y):- zena(X),(otac(Y,Z);majka(Y,Z)),(otac(Z,X);majka(Z,X)).

tetka(X,Y):- zena(X),(otac(Z,Y);majka(Z,Y)),sestra(X,Z).

ujak(X,Y):- muskarac(X),majka(Z,Y),brat(X,Z).

stric(X,Y):- muskarac(X),otac(Z,Y),brat(X,Z).

cica(X,Y):- stric(X,Y).

brat_od_tetke(X,Y):- muskarac(X),majka(Z,X),tetka(Z,Y).

sestra_od_tetke(X,Y):- zena(X),majka(Z,X),tetka(Z,Y).

brat_od_ujaka(X,Y):- muskarac(X),otac(Z,X),ujak(Z,Y).

sestra_od_ujaka(X,Y):- zena(X),otac(Z,X),ujak(Z,Y).

brat_od_strica(X,Y):- muskarac(X),otac(Z,X),stric(Z,Y).

sestra_od_strica(X,Y):- zena(X),otac(Z,X),stric(Z,Y).

predak(X,Y):- (otac(X,Y);majka(X,Y)).
predak(X,Y):- (otac(Z,Y);majka(Z,Y)),predak(X,Z).