diff options
Diffstat (limited to 'src/clojure/contrib/lazy_seqs.clj')
| -rw-r--r-- | src/clojure/contrib/lazy_seqs.clj | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/src/clojure/contrib/lazy_seqs.clj b/src/clojure/contrib/lazy_seqs.clj index 5736e20f..1f886085 100644 --- a/src/clojure/contrib/lazy_seqs.clj +++ b/src/clojure/contrib/lazy_seqs.clj @@ -50,12 +50,7 @@ "A lazy sequence of all the prime numbers.") (defvar fibs - (lazy-cat [0 1] - (let [rest-fn - (fn rest-fn [a b] - (let [next (+ a b)] - (lazy-cons next (rest-fn b next))))] - (rest-fn 0 1))) + (lazy-cat [0 1] (map + fibs (rest fibs))) "A lazy sequence of all the fibonacci numbers.") (defvar powers-of-2 |