(define (ffib n)
	(if (fx< n 2)
	    (breakpoint)
	    (fx+ (future (ffib (fx- n 1))) (future (ffib (fx- n 2))))))

(define (fib n)
	(if (fx< n 2)
	    (breakpoint)
	    (fx+ (fib (fx- n 1)) (fib (fx- n 2)))))