从Haskell中的列表列表中删除重复项

给定列表列表

重复项=[[1,1,1]，[2]，[1,1,1]]

如何删除重复项以使结果为

[[2]]

？

如下所示：

Data.MultiSet> [a | (a, 1) <- toOccurList (fromList [[1,1,1],[2],[1,1,1]])]
[[2]]

---

Data.MultiSet>[a |（a，1）对于Haskell来说是非常新的，实际上根本没有理由不尝试至少某个时候。