Skip to content

Instantly share code, notes, and snippets.

@nahuel

nahuel/gist:eb7073d02c0aec6256d2

Created July 23, 2014 04:49
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save nahuel/eb7073d02c0aec6256d2 to your computer and use it in GitHub Desktop.
Save nahuel/eb7073d02c0aec6256d2 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.clj
(defn remove-first [e [x & rest :as col]]
(lazy-seq
(cond (empty? col) []
(= x e) rest
:default (cons x (remove-first e rest))
)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment