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