main = print (f 10) f :: Int -> Int -- f :: Integer -> Integer f 0 = 1; f n = f (n-1) + f (n-1)