1 2 3 4 5 6 7 8 9 10 11 12 13 14
module Mod139_A where data Foo = Bar class C a where m1 :: a -> Int instance C Int where m1 _ = 2 x = 'x'