Commit 187c4a9c authored by nimrod's avatar nimrod
Browse files

Small corrections to the Clojure version.

parent 815d5c9e

prime.clj/src/prime/clj.clj

+2 −2
Original line number Diff line number Diff line
@@ -5,10 +5,10 @@ 


(defn prime? [x]

  (cond

    (integer? (clojure.math.numeric-tower/sqrt x)) false

    (integer? (math/sqrt x)) false

    :else (every?

            (fn [y] (not= (mod x y) 0))

            (range 2 (math/sqrt (math/ceil x))))))

            (range 2 (math/ceil (math/sqrt x))))))





(defn -main