progs/fun/fa0.fun
changeset 903 2f86ebda3629
parent 814 1fbaa5f05516
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/progs/fun/fa0.fun	Fri Dec 09 11:00:05 2022 +0000
@@ -0,0 +1,5 @@
+def fact(n) =
+  (if n == 0 then 1 else n * fact(n - 1));
+
+
+write(fact(6))