Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- minus([H|T1],L2,[H|L3]):-
- not(member(H,L2)),
- minus(T1,L2,L3).
- minus([H|T1],L2,L3):-
- member(H,L2),
- minus(T1,L2,L3).
- minus([],_,[]).
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement