Skip to content

Instantly share code, notes, and snippets.

@sanatgersappa

sanatgersappa/euler1.clj

Created February 6, 2015 16:36
Show Gist options
  • Save sanatgersappa/e2c7f19c5461cbf4452b to your computer and use it in GitHub Desktop.
Save sanatgersappa/e2c7f19c5461cbf4452b to your computer and use it in GitHub Desktop.
Download ZIP
Raw
euler1.clj
(defn relevant? [n]
"returns true if n is divisible by 3 or 5"
(or (= 0 (rem n 3)) (= 0 (rem n 5))))
(reduce + (filter relevant? (range 1000)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment