Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- remdupes([], _).
- remdupes([X|Rest], List) :-
- member(X, Rest), !,
- remdupes(Rest, List).
- remdupes([X|Rest], List) :-
- remdupes(Rest, [X|List]).
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
