8 lines
122 B
Clojure
8 lines
122 B
Clojure
|
(defn fib []
|
||
|
|
(map first
|
||
|
|
(iterate
|
||
|
|
(fn [[a b]] [b (+ a b)])
|
||
|
|
[0 1])))
|
||
|
|
|
||
|
|
(time (take 100 (fib)))
|