1 2 3 4 5 6 7 8 9
module Foo where import qualified Prelude import Prelude hiding( Maybe ) data Maybe a = Foo f :: Prelude.Maybe a -> Int f Foo = 3