% $Id: SqrtTest.oz,v 1.2 2011/10/22 01:12:58 leavens Exp leavens $ \insert 'TestingNoStop.oz' \insert 'FloatTesting.oz' \insert 'Sqrt.oz' {StartTesting 'SqrtTest $Revision: 1.2 $'} {WithinTest {Sqrt 4.0} '~==~' 2.0} {WithinTest {Sqrt 9.0} '~==~' 3.0} {WithinTest {Sqrt 100.0} '~==~' 10.0} {WithinTest {Sqrt 2.0} '~==~' 1.4142} {WithinTest {Sqrt 25.0} '~==~' 5.0} {WithinTest {Sqrt 0.25} '~==~' 0.5} {DoneTesting}