module T9323 where

broken :: [Int]
broken = ()

ambiguous :: a -> String
ambiguous _ = show 0