Clojure Koans - Factorial

recursions.clj

;; Earlier attempt
(defn factorial [n]
  (loop [n n
	 result n]
    (if (<= n 1)
      1
      result)
    (recur (dec n) (* result (dec n)))))

;; Working so far
(defn factorial [n]
  (if (<= n 1)
    1
    1))

;; Causes StackOverflow
(defn factorial [n]
  (if (<= n 1)
    1
    (* n (factorial (dec n)))))

;; Works!
(defn factorial [n]
  (loop [n n
	 result n]
    (if (<= n 1)
      result
      (recur (dec n) (* result (dec n))))))