f1 :: (Num a, Show a) => a -> IO()f1 = print f2 :: (Num a, Show a) => a -> IO()f2 x = print $ x + 1 main = let y = 1 in dof1 yf2 y
Standard input is empty
1 2
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!