Examples of lazy sequences in Clojure

lazy-examples.clj

(def fib-seq
     (lazy-cat [0 1] (map + (rest fib-seq) fib-seq)))

(def primes (lazy-cat [2] (filter (fn[candidate]
                                    (not-any? #(zero? (mod candidate %1))
                                              (take-while (partial > (Math/sqrt candidate))
                                                          primes)))
                                  (iterate (partial + 2) 3))))