stehau

2022-05-15 12:54:29 +02:00
parent 383332077b
commit ba22cff91f
222 changed files with 23320 additions and 0 deletions
--- a/W2/fasto/tests/fib.fo
+++ b/W2/fasto/tests/fib.fo
@ -0,0 +1,8 @@
+fun int fibo(int n) =
+  if n == 0 then 0
+  else if n == 1 then 1
+  else fibo(n - 1) + fibo(n - 2)
+
+fun int main() =
+  let n = read(int) in
+  write(fibo(n))