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)