<-- Previous || Up || Next -->

Deg Verify Sub
Math Reals Class

Private Sub DegVerify()
    'Test the Deg property.

    Debug.Assert Approx(Deg, PI / 180)
    Debug.Assert Approx(Deg, Atn(1#) / 45)
    Debug.Assert Approx(Deg, 1.74532925199433E-02)
End Sub

Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.