import "Prelude" data Foo = Foo Integer Long Double Float deriving instance Show Foo main = show (Foo (-1) (-1) (-1) (-1)) -- Foo (-1) (-1) (-1.0) (-1.0)