Re: negotiation by failure- list operations




Nameless wrote:
> Isn't this just a question of supplying a 'catch-all'
> clause to delete1/3?
>
> delete1(X,L1,L2) :-
> delete(X,L1,L2).
> delete1(_,_,_).
>

On the right track, but:

delete1(X,L1,L2) :-
delete(X,L1,L2),!. % necessary (red) cut
delete1(_,L,L). % Preserve original list in this case

.



Relevant Pages