Advertisement
Guest User

Untitled

a guest
Jan 17th, 2017
68
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Erlang 0.21 KB | None | 0 0
  1. unique([]) -> [];
  2. unique([H|T]) -> unique([H|T],[uniquelist]).
  3.  
  4. unique([H|T],[uniquelist]) when member(H,[uniquelist]) ->
  5.   unique(T,[uniquelist]);
  6.   true ->
  7.   [uniquelist] ++ H,
  8.   unique(T,[uniquelist]).
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement