Skip to content

Instantly share code, notes, and snippets.

@kitofr
Created June 15, 2011 09:24
Show Gist options
  • Save kitofr/1026782 to your computer and use it in GitHub Desktop.
Save kitofr/1026782 to your computer and use it in GitHub Desktop.
;http://4clojure.com/problem/32
#(loop [col % c ()]
(if (empty? col)
(reverse c)
(recur (rest col)
(cons (first col) (cons (first col) c)))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment