-- !! cg001: main = -42 -- take 1

main = print ( f () )
     where
       f :: a -> Int
       f x = -42