From f6c2f9b09700eafae66cd45dae0f6bf1dca5068e Mon Sep 17 00:00:00 2001
From: Adar Nimrod <nimrod@shore.co.il>
Date: Sun, 14 Feb 2016 08:37:54 +0200
Subject: [PATCH] Replace cond with if for shorter, clearer code.
---
prime.clj/src/prime/clj.clj | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/prime.clj/src/prime/clj.clj b/prime.clj/src/prime/clj.clj
index e1ccbc2..50ccf66 100644
--- a/prime.clj/src/prime/clj.clj
+++ b/prime.clj/src/prime/clj.clj
@@ -4,11 +4,11 @@
(require '[clojure.math.numeric-tower :as math])
(defn prime? [x]
- (cond
+ (if
(integer? (math/sqrt x)) false
- :else (every?
- (fn [y] (not= (mod x y) 0))
- (range 2 (math/ceil (math/sqrt x))))))
+ (every?
+ (fn [y] (not= (mod x y) 0))
+ (range 2 (math/ceil (math/sqrt x))))))
(defn -main
--
GitLab