diff options
Diffstat (limited to 'examples/factorial.imp')
| -rw-r--r-- | examples/factorial.imp | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/examples/factorial.imp b/examples/factorial.imp index 0ab74cd..4cb47ed 100644 --- a/examples/factorial.imp +++ b/examples/factorial.imp @@ -1,3 +1,4 @@ +/* computes n!, result is stored in r. */ procedure factorial(n;r) begin if n <= 0 then r := 1; |