Duda con listas, ¿En que falla este codigo?
Publicado por Luis (2 intervenciones) el 24/01/2009 18:36:39
Tengo las siguientes reglas y lo que trato de hacer es que separe una lista con todos los objetos mezclados en dos listas.
comida(pescado).
comida(carne).
comida(pasta).
bebida(agua).
bebida(vino).
bebida(zumo).
separar([],[],[]).
separar([X|L],Comida,Bebida):-comida(X),separar(L,[X|Comida],Bebida).
separar([X|L],Comida,Bebida):-bebida(X),separar(L,Comida,[X|Bebida]).
comida(pescado).
comida(carne).
comida(pasta).
bebida(agua).
bebida(vino).
bebida(zumo).
separar([],[],[]).
separar([X|L],Comida,Bebida):-comida(X),separar(L,[X|Comida],Bebida).
separar([X|L],Comida,Bebida):-bebida(X),separar(L,Comida,[X|Bebida]).
Valora esta pregunta
0