fib = (fibs !!) where fibs = 0 : 1 : zipWith (+) fibs (tail fibs) main = putStrLn $ show $ fib 1000
[0] : https://stackoverflow.com/questions/33923/what-is-tail-recur...
[0] : https://stackoverflow.com/questions/33923/what-is-tail-recur...