\insert 'FibIterative.oz' % {SetReporter BothReporter} {StartTesting 'FibIterativeTest $Revision: 1.2 $'} {Test {Fib 0} '==' 1} {Test {Fib 1} '==' 1} {Test {Fib 2} '==' 2} {Test {Fib 3} '==' 3} {Test {Fib 4} '==' 5} {Test {Fib 5} '==' 8} {Test {Fib 6} '==' 13} {Test {Fib 7} '==' 21} {Test {Fib 8} '==' 34} {Test {Fib 20} '==' 10946} {Test {Fib 50} '==' 20365011074} {Test {Fib 100} '==' 573147844013817084101} {Test {Fib 1000} '==' 70330367711422815821835254877183549770181269836358732742604905087154537118196933579742249494562611733487750449241765991088186363265450223647106012053374121273867339111198139373125598767690091902245245323403501} {DoneTesting}