[Comp] Two Dozens Short Lessons in Haskell
13章まで読んだ。
iterateなど、これまでの知識を生かして作成したフィボナッチ数列を生成するプログラム。
fibs :: Int -> [Integer]
fibs n = take n $ [y | (x, y) <- iterate f (0, 1)]
where
f (n, m) = (m, n + m)
なんかほとんど数学みたい。
| 固定リンク
この記事へのコメントは終了しました。
コメント