Skip to content

Instantly share code, notes, and snippets.

@bjeanes

bjeanes/4bo.clj

Forked from gfredericks/4bo.clj
Created August 29, 2012 21:03
Show Gist options
  • Save bjeanes/3518938 to your computer and use it in GitHub Desktop.
Save bjeanes/3518938 to your computer and use it in GitHub Desktop.
Download ZIP
4Bo
Raw
4bo.clj
(defn loud-numbers
[]
(take 10 (iterate (fn [x] (println "I'm adding to " x) (inc x)) 0)))
(defn less-lazy
([coll] (less-lazy coll 1)
([coll how-far]
(lazy-seq
(future (nth coll how-far))
(cons (first coll) (less-lazy (rest coll))))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment