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