;; Functions to calculate factorial

;; Recursive version, not tail call optimized
(def recFact (fn (n) (if (< n 2) 1 (* n (recFact (dec n))))))

;; Apply version
(def applyFact (fn (n) (if (< n 2) 1 (apply * (range 1 (inc n))))))