Skip to content

Instantly share code, notes, and snippets.

@robertpfeiffer

robertpfeiffer/gist:68199

Created February 21, 2009 21:45
Show Gist options
  • Save robertpfeiffer/68199 to your computer and use it in GitHub Desktop.
Save robertpfeiffer/68199 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.txt
(defn circulate [dir coll]
(let [[a b] (split-at (or ({:left 1} dir) (dec (count coll))) coll)]
(concat b a)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment