children(liz,phil,[chuck,anne,andy,ed]).
children(di,chuck,[bill,hank]).
children(queenie,rex,[liz,meg]).
children(sally,andy,[bea]).
children(fifi,rex,[igor]).

female(liz).
female(anne).
female(di).
female(queenie).
female(sally).
female(meg).
female(bea).
female(fifi).

male(phil).
male(chuck).
male(andy).
male(ed).
male(bill).
male(hank).
male(rex).
male(igor).

member(H,[H|_]).
member(H,[_|T]):-member(H,T).

append([],L,L).
append([H|T],L,[H|Y]):-append(T,L,Y).