module Main (main) where main = print $ fib 10 fib n | n < 2 = 1 | otherwise = fib (n - 1) + fib (n - 2)