Greatest common divisor in Clojure

gistfile1.clj

(defn gcd [a b]
  (let [min (min a b)
        max (max a b)
        rem (mod max min)]
    (if (zero? rem)
      min
      (recur min rem))))

(defn gcd2 [a b]
  (let [quotient (/ a b)]
    (if (ratio? quotient)
      (numerator quotient)
      quotient)))