Skip to content

Instantly share code, notes, and snippets.

@minikomi

minikomi/62.clj

Created January 20, 2012 07:16
Show Gist options
  • Save minikomi/1645950 to your computer and use it in GitHub Desktop.
Save minikomi/1645950 to your computer and use it in GitHub Desktop.
Download ZIP
Solution #62
Raw
62.clj
(fn [f i]
(cons i
(map #((apply comp (repeat (inc %) f)) i) (range))))
(fn f
[func init]
(lazy-seq
(cons init (f func (func init)))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment