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

Nominal Verify Sub
Math Financial Class

Private Sub NominalVerify()
    'Verify that the Nominal function works correctly.

    Debug.Assert Approx(Nominal(0.1, 1), 0.1)
    Debug.Assert Approx(Nominal(0.1, 2), 9.76176963403033E-02)
    Debug.Assert Approx(Nominal(0.1, 4), 9.64547563377804E-02)
    Debug.Assert Approx(Nominal(0.1, 6), 9.60712066403242E-02)
    Debug.Assert Approx(Nominal(0.1, 12), 9.56896851468452E-02)
    Debug.Assert Approx(Nominal(0.1, 24), 9.54996812070394E-02)
    Debug.Assert Approx(Nominal(0.1, 360), 9.53227976266913E-02)
    Debug.Assert Approx(Nominal(0.1, 365), 9.53226247647621E-02)

End Sub

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