blob: ad10e20be466c470eecb43183cf04368329fff16 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
// The worst implementation of Fibonacci calculations
// possible. FYI, it can be done in constant time.
fib :: fn a:int -> int {
if a < 2 {
ret a
}
ret fib(a - 1) + fib(a - 2)
}
// 23 is around where things start getting slow.
start :: fn {
fib(23) <=> 28657
}
// flags: no_print
|
