第一种写法:
第二种写法:
fib 0 = 0
fib 1 = 1
fib n = fib (n-1) + fib (n-2)
第二种写法:
let fibs = 0 : 1 : zipWith (+) fibs (tail fibs)