71页第三个代码段 ``` haskell fastFib = fst $ fibPair ``` 应该是 ``` haskell fastFib = snd $ fibPair ``` 同理下面的`fibs'`也有这个问题 应改为 ``` hasell fibs' n = take n (map snd (iterate fiboStep (0,1))) ```
71页第三个代码段
应该是
同理下面的
fibs'也有这个问题应改为