f :: [Int] -> [Int] f x = 0:(map (+1) x) g :: [Int] -> [Int] g x = map (*2) x a = f b b = g a main = print $ take 5 a
Standard input is empty
[0,1,3,7,15]
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!