1 2 3 4 5 6 7 8 9 10 11 12
-- !!! Hiding an abstract (Prelude) class module M where import Prelude hiding ( Eq ) class Eq a where equ :: a -> Bool f :: Eq a => a -> Bool f x = equ x