2 lines
56 B
Text
2 lines
56 B
Text
|
fact2(n) := block([r: 1], for i thru n do r: r * i, r)$
|