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

Chi Tst Verify Sub
Math Statistics Class

Private Sub ChiTstVerify()
    ' Test the ChiTst function.

    Dim avarActual(), avarExpected()

    Array2D avarActual, 2, 3, True, Array(58, 35, 11, 25, 10, 23)
    Array2D avarExpected, 2, 3, True, Array(45.35, 47.65, 17.56, 18.44, 16.09, 16.91)

    Debug.Print ChiTst(avarActual, avarExpected)
End Sub

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