如何找到具有相同數字的哈斯克爾中的元組

Question

如何過濾Haskell中具有雙倍數的元組，如（1,1）和（2,2），但不刪除它們只是爲了找到它們？

So far all i have is the start line 
FilterDoubles. 

Answer 1

讓

> let xs = [(1, 2), (3, 3), (4, 3)] 

到filter（僅限）

> filter (uncurry (==)) xs 
[(3,3)] 

標記與

> [(a == b, t) | t@(a, b) <- xs] 
[(False,(1,2)),(True,(3,3)),(False,(4,3))] 

發揮和理解這個表達式自己！