7 lines
91 B
Text
7 lines
91 B
Text
factorial := {
|
|
local 'acc = 1.
|
|
1 upto ($1 + 1) do {
|
|
acc = acc * $1.
|
|
}.
|
|
acc.
|
|
}.
|