aboutsummaryrefslogtreecommitdiff
path: root/examples/fib.lyn
blob: b24f18b6272d0e533f6aa956fe392c9c15572ed1 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
define (fib n) {
	if (< n 2) {
		get 1
	} {
		define f1 (fib (- n 1))
		define f2 (fib (- n 2))
		+ f1 f2
	}
}

display (fib 42)
newline