1 2 3 4 5 6 7 8 9
-- #8806 module T8806 where f :: Int => Int f x = x + 1 g :: (Int => Show a) => Int g = undefined