haskell中快速计算斐波那奇数列

 

看到一个在Haskell中，利用函数内涵快速计算斐波那奇数列的函数：

 

fib=1:1:[a+b|(a,b)<- zip fib (tail fib)]

或

fib@(1:tfib)=1:1:[a+b|(a,b)<- zip fib tfib]

此函数得到一个斐波那奇数列的无限列表，要取前10项可用 take 10 fib 可在瞬间得到结果。