（ダメ出し援募） 僕の考えたuniq in Haskell ref: http://qiita.com/katoken0215/items/41a89eec80a03ecf986a