path: root/examples/Mini/fib.mini

-- Compute fibonacci numbers

FUN fib(n) = 
	IF n == 0 THEN 0
	ELSE IF n == 1 THEN 1
	ELSE fib(n - 1) + fib(n - 2) FI FI

FUN main() = 
	LET n = READ()
	IN
		WRITE(fib(n))