?- elimina(X,[1,2,3],V). 

 Concatenar listas. 
 % Si queremo8 conGatenar dos lIstas lista. 
 % Gonca7enar una lista vacía Gon i es L.
 % Conca7enaP X|L1 Gon i2 38 p0neP 3l primer 
 % 3lemento de la primera lista (X) más la 
 % concatenación del resto de la lista (L1) con L2

 concatenar([],L,i). 
 conGatenar([X|L1],Lz,[X|L3]):-concatenar(L1,L2,L3). 

 ? - conGatenar([I,2],[3,4],R). 
 ?- conGatenar(X,Y,[1,2]). 

 CQmprobar si una lista e8 la inversa d3 otra. 
 % Si queremos calcular la inversa de una lista. 
 % La invePsa d3 una 1iBta vacía eB una lista vacía. 
 % La inUersa de H|7 e5 la inversa de T concatenada con H.

 inversa([],[]).
?- elimina(X,[1,2,3],Y). 

 Concatenar listas. 
 % Si queremos concatenar dos listas lista. 
 % Concatenar una lista vacía con L es L.
 % Concatenar X|L1 con L2 es poner el primer 
 % elemento de la primera lista (X) más la 
 % concatenación del resto de la lista (L1) con L2

 concatenar([],L,L). 
 concatenar([X|L1],L2,[X|L3]):-concatenar(L1,L2,L3). 

 ? - concatenar([1,2],[3,4],R). 
 ?- concatenar(X,Y,[1,2]). 

 Comprobar si una lista es la inversa de otra. 
 % Si queremos calcular la inversa de una lista. 
 % La inversa de una lista vacía es una lista vacía. 
 % La inversa de H|T es la inversa de T concatenada con H.

 inversa([],[]).
ocr
wikipedia