2.- Prefijo, Sufijo,Sublista
DESCRIPCION:
Definir los predicados prefijos,sufijo,sublista de forma recursiva sin la ayuda del predicado concat
PROGRAMA
concat([],Ys,Ys).
concat([X|Xs],Ys,[X|Zs]):-concat(Xs,Ys,Zs).
prefijo(Xs,Ys):-concat(Xs,Bs,Ys).
sufijo(Xs,Ys):-concat(As,Xs,Ys).
sublista(Xs,Ys):-concat(AsXs,Bs,Ys),concat(As,Xs,AsXs).
EJEMPLOS