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