Fibonacci example.

This commit is contained in:
antirez 2023-01-30 22:33:15 +01:00
parent d4d5b59bca
commit 33f28950a0

16
examples/fib.aocla Normal file
View file

@ -0,0 +1,16 @@
// Fibonacci example
[(n)
[$n 1 <=]
[
$n
]
[
$n 1 - fib
$n 2 - fib
+
] ifelse
] 'fib def
10 fib
printnl