8 lines
106 B
Text
8 lines
106 B
Text
factorial := {
|
|
takes '[n].
|
|
if { n == 0. } then {
|
|
1.
|
|
} else {
|
|
n * factorial (n - 1).
|
|
}.
|
|
}.
|