factorial.ngc
1 ; recursive function example 2 ; factorial 3 o<factorial> sub 4 o<factorialif> if [[#1] EQ 0] 5 o<factorial> return [1] 6 o<factorialif> else 7 o<factorial> call [[#1] - 1] 8 o<factorial> return [#<_value> * #1] 9 o<factorialif> endif 10 o<factorial> endsub 11 m2