7 lines
95 B
Hy
7 lines
95 B
Hy
(defn ! [n]
|
|
(reduce *
|
|
(range 1 (inc n))
|
|
1))
|
|
|
|
(print (! 6)) ; 720
|
|
(print (! 0)) ; 1
|