Adds arithmetic specs

torbjornvatn · Feb 26, 2012 · 3d7dec1 · 3d7dec1
1 parent c326517
commit 3d7dec1
Show file tree

Hide file tree

Showing 3 changed files with 16 additions and 1 deletion.
diff --git a/src/midje99/arithmetic_solutions.clj b/src/midje99/arithmetic_solutions.clj
@@ -0,0 +1,7 @@
+(ns midje99.arithmetic-solutions)
+
+(defn is-prime [number]
+  "todo")
+
+(defn gcd [list]
+  "todo")
diff --git a/test/midje99/test/arithmetic_spec.clj b/test/midje99/test/arithmetic_spec.clj
@@ -0,0 +1,9 @@
+(ns midje99.test.arithmetic-spec
+  (:use midje.sweet)
+  (:use midje99.arithmetic-solutions))
+
+(future-fact "P31 - Determine whether a given integer number is prime"
+  (is-prime 7) => true)
+
+(future-fact "P32 - Determine the greatest common divisor of two positive integer numbers. Use Euclid's algorithm"
+  (gcd '(36, 63) => 9))
diff --git a/test/midje99/test/list_spec.clj b/test/midje99/test/list_spec.clj
@@ -1,5 +1,4 @@
 (ns midje99.test.list-spec
-  (:use clojure.test)
   (:use midje.sweet)
   (:use midje99.lists-solutions))