test/fib.t


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

fun fib[a]
	if a < 2
		@1
	end
	@( call fib[a-1] + call fib[a-2] )
end

# main function
fun main[num]
	sum = 0
	i = 0
	while (i < num)
		sum = sum + call fib[i]
		i = i + 1
	end
	print sum
	@0
end