module DosLineEndings.Fib where -- | Calculate Fibonacci numbers. -- -- >>> fib 10 -- 55 fib :: Integer -> Integer fib :: Integer -> Integer fib Integer 0 = Integer 0 fib Integer 1 = Integer 1 fib Integer n = Integer -> Integer fib (Integer n Integer -> Integer -> Integer forall a. Num a => a -> a -> a - Integer 1) Integer -> Integer -> Integer forall a. Num a => a -> a -> a + Integer -> Integer fib (Integer n Integer -> Integer -> Integer forall a. Num a => a -> a -> a - Integer 2)