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