| author | Christian Urban <christian.urban@kcl.ac.uk> |
| Fri, 09 Dec 2022 11:00:05 +0000 | |
| changeset 903 | 5d8df2afec51 |
| parent 814 | progs/fun/fact.fun@0db5961fe39f |
| permissions | -rw-r--r-- |
| 655 | 1 |
def fact(n) = |
|
735
0426cd1336f7
updatd
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
702
diff
changeset
|
2 |
(if n == 0 then 1 else n * fact(n - 1)); |
|
224
70198792c2aa
added
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff
changeset
|
3 |
|
| 655 | 4 |
|
| 903 | 5 |
write(fact(6)) |