Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (defun factorial (x)
- (if (zerop x)
- 1
- (* x (factorial (- x 1)))))
- defun factorial (x)
- if (zerop x)
- 1
- x * (factorial (x-1))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement