aocla/examples/fib.aocla

mirror of https://github.com/antirez/aocla synced 2024-12-27 09:58:32 +01:00
// Fibonacci example

[(n)
    [$n 1 <=]
    [
        $n
    ]
    [
        $n 1 - fib
        $n 2 - fib
        +
    ] ifelse
] 'fib def

10 fib
printnl
Fibonacci example. 2023-01-30 22:33:15 +01:00			`// Fibonacci example`

			`[(n)`
			`[$n 1 <=]`
			`[`
			`$n`
			`]`
			`[`
			`$n 1 - fib`
			`$n 2 - fib`
			`+`
			`] ifelse`
			`] 'fib def`

			`10 fib`
			`printnl`