Private Sub RadiansToDegreesVerify()
    ' Test the RadiansToDegrees function.

    Debug.Assert Approx(RadiansToDegrees(-10), -572.957795130823)
    Debug.Assert Approx(RadiansToDegrees(-6.28318530717959), -360)
    Debug.Assert Approx(RadiansToDegrees(-2), -114.591559026165)
    Debug.Assert Approx(RadiansToDegrees(-1), -57.2957795130823)
    Debug.Assert RadiansToDegrees(0) = 0
    Debug.Assert Approx(RadiansToDegrees(1), 57.2957795130823)
    Debug.Assert Approx(RadiansToDegrees(2), 114.591559026165)
    Debug.Assert Approx(RadiansToDegrees(6.28318530717959), 360)
    Debug.Assert Approx(RadiansToDegrees(10), 572.957795130823)

    Debug.Assert IsNull(RadiansToDegrees(Null))
    Debug.Assert IsNull(RadiansToDegrees("Joe"))

End Sub