4 lines
130 B
Text
4 lines
130 B
Text
define('rfact(n)') :(rfact_end)
|
|
rfact rfact = le(n,0) 1 :s(return)
|
|
rfact = n * rfact(n - 1) :(return)
|
|
rfact_end
|