Dada uma lista, com um elemento X, devo subdvidi-la em duas sublistas L1 e L2, com membros antes de X e depois de X.
Meu programa:
dividir(_,[],[],[]).
dividir(M,[H|T],[H|U1],U2) :- H =< M, dividir(M,T,U1,U2).
dividir(M,[H|T],U1,[H|U2]) :- H > M, dividir(M,T,U1,U2).
?- dividir(f, [a,b,c,d,f,g,x,i,j],L1,L2).
L1= [a,b,c,d,e,f]
L2=[g,x,i,j]
Só que quando vou interpretar da erro.
Alguém para me ajudar.
Desde já agradeço!!
Meu programa:
dividir(_,[],[],[]).
dividir(M,[H|T],[H|U1],U2) :- H =< M, dividir(M,T,U1,U2).
dividir(M,[H|T],U1,[H|U2]) :- H > M, dividir(M,T,U1,U2).
?- dividir(f, [a,b,c,d,f,g,x,i,j],L1,L2).
L1= [a,b,c,d,e,f]
L2=[g,x,i,j]
Só que quando vou interpretar da erro.
Alguém para me ajudar.
Desde já agradeço!!