print $ unique [4, 5, 4, 2, 3, 3, 4]

[4,5,2,3]