Skip to content

Instantly share code, notes, and snippets.

@ekaitz-zarraga

ekaitz-zarraga/infinite_seq.clj

Created April 27, 2017 19:13
Show Gist options
  • Save ekaitz-zarraga/f7907b40ce6c64d908fa0bdf47b594a2 to your computer and use it in GitHub Desktop.
Save ekaitz-zarraga/f7907b40ce6c64d908fa0bdf47b594a2 to your computer and use it in GitHub Desktop.
Download ZIP
Clojure Infinite sequence example
Raw
infinite_seq.clj
(defn lista
([] (lista 1))
([one] (lazy-seq (cons one (lista (+ one 1))))))
(defn fibo
([] (fibo 0 1))
([one two] (lazy-seq (cons one (fibo two (+ one two ))))))
(defn -main
[& args]
(println (take 10 (lista)))
(println (take 10 (fibo))))
(-main)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment