3.-FiltraHombres
PROGRAMA
hombre(juan).
hombre(luis).
hombre(miguel).
hombre(jose).
hombre(tomas).
mujer(pilar).
mujer(laura).
mujer(ana).
mujer(maria).
mujer(gloria).
filtrahombres([],[]).
filtrahombres([X|Xs],[X|Ys]):-hombre(X),
filtrahombres(Xs,Ys).
filtrahombres([X|Xs],Ys):-mujer(X),
filtrahombres(Xs,Ys).
EJEMPLOS
