TAREA 7




9.- Inserta

DESCRIPCION:

Inserta(X,Xs,Ys):-Ys es el resultado de insertar X en la posición adecuada de la lista ordenada Xs de forma que Ys se mantega ordenada.

PROGRAMA

inserta(X,[],[X]).
inserta(X,[Y|Ys],[X,Y|Ys]):-X<Y.
inserta(X,[Y|Ys],[Y|Zs]) :-X >= Y,
inserta(X,Ys,Zs).

EJEMPLOS