diff --git a/src/koans/14_recursion.clj b/src/koans/14_recursion.clj index 0f35a4c..7faee78 100644 --- a/src/koans/14_recursion.clj +++ b/src/koans/14_recursion.clj @@ -3,25 +3,32 @@ (defn is-even? [n] (if (= n 0) - __ - (___ (is-even? (dec n))))) + true + (not (is-even? (dec n))))) (defn is-even-bigint? [n] (loop [n n acc true] (if (= n 0) - __ + acc (recur (dec n) (not acc))))) (defn recursive-reverse [coll] - __) + (if (empty? coll) + [] + (conj (recursive-reverse (rest coll)) (first coll))) + ) (defn factorial [n] - __) + (if (zero? n) + 1 + (if (false? (= c 1)) + ) + )) (meditations "Recursion ends with a base case" - (= true (is-even? 0)) + (= true (is-even? 4)) "And starts by moving toward that base case" (= false (is-even? 1))