4 lines
65 B
Text
4 lines
65 B
Text
|
(define factorial
|
||
|
|
0 -> 1
|
||
|
|
X -> (* X (factorial (- X 1))))
|