3 lines
66 B
Common Lisp
3 lines
66 B
Common Lisp
|
(defun factorial (n)
|
||
|
|
(if (zerop n) 1 (* n (factorial (1- n)))))
|