3 lines
79 B
Clojure
3 lines
79 B
Clojure
|
(defn fac [n] (apply * (range 1 (inc n))))
|
||
|
|
(defmacro ct-factorial [n] (fac n))
|