chibi-scheme/tests/snow/repo2/leonardo/fibonacci-test.scm

(import (scheme base) (chibi test) (leonardo fibonacci))

(test-begin "fibonacci")

(test 1 (fib 0))
(test 1 (fib 1))
(test 2 (fib 2))
(test 3 (fib 3))
(test 5 (fib 4))
(test 8 (fib 5))
(test 13 (fib 6))

(test-end)
(test-exit)