on fab9f15 help sign in
9 lines 157 B history raw
1instance Eq a => Eq [a] where
2 (==) _ _ = False
4instance ( Ord a
5 , Ord b
6 )
7 => Ord
8 (a, b) where
9 compare _ _ = GT