Skip to content

Instantly share code, notes, and snippets.

Created May 2, 2011 13:35
Show Gist options
  • Save anonymous/951616 to your computer and use it in GitHub Desktop.
Save anonymous/951616 to your computer and use it in GitHub Desktop.
;; chrisvest's solution to http://4clojure.com/problem/38
(fn [& xs] (reduce (fn [a b] (if (> a b) a b)) 0 xs))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment