Permalink
Browse files

Add first clojure solution

  • Loading branch information...
kevinclark committed Sep 8, 2010
1 parent 5510c37 commit c923f1fc76ef7e8f3ae9b5074213ca3fd785e6e3
Showing with 5 additions and 0 deletions.
  1. +5 −0 clojure/1.clj
View
@@ -0,0 +1,5 @@
+(defn mul-3-or-5? [x] (some zero? [(mod x 5) (mod x 3)]))
+
+
+(println
+ (apply + (for [x (range 1000) :when (mul-3-or-5? x)] x)))

0 comments on commit c923f1f

Please sign in to comment.