Advertisement
Guest User

Untitled

a guest
Aug 25th, 2011
177
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. (defn generate-infinite-seq
  2.   ([]  (concat [1] (generate-infinite-seq 1)))
  3.   ([a] (concat a (generate-infinite-seq (+ a 1)))))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement