funcons-simple-0.1.0.3: tests/Advanced/Advanced4.smp

function fib_aux(i,m,n) {
	if (i == 1) {
		return n;
	} else {
		return fib_aux(i-1,n,m+n);
	}
}

function fib(n) {
	if (n == 0 ) {
		return 0;
	} else {
		return fib_aux(n,0,1);
	}
}

function main() {
	for (var i = 1 ; i < 8 ; ++i) {
		print(fib(i));
	}
}