gfredericks · August 29, 2012 20:57
diff --git a/4bo.clj b/4bo.clj
 (defn loud-numbers
  []
  (take 10 (iterate (fn [x] (println "I'm adding to " x) (inc x)) 0)))

 (defn less-lazy
  [coll]
  (lazy-seq
   (future (second coll))
   (cons (first coll) (less-lazy (rest coll)))))
	(defn loud-numbers
	[]
	(take 10 (iterate (fn [x] (println "I'm adding to " x) (inc x)) 0)))

	(defn less-lazy
	[coll]
	(lazy-seq
	(future (second coll))
	(cons (first coll) (less-lazy (rest coll)))))