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