<span style='font-family:Verdana'><span style='font-size:12px'>unique :: [Integer] -> [Integer]<br />
unique [] = []<br />
unique (x:xs) | elem x xs = (unique . filter (/= x)) xs<br />
| otherwise = x : unique xs<br />
<br />
-- This is a simpler to read version (albeit inefficient?)<br />
unique :: [Integer] -> [Integer]<br />
unique [] = []<br />
unique (x:xs) | elem x xs = unique xs<br />
| otherwise = x : unique xs</span></span>