5 February  2008  12:09:09.719 PM      
 
ASA091_PRB:
  FORTRAN77 version
 
  Tests for Applied Statistics Algorithm 91.
 
TEST01:
  Perform a simple sample calculation using
  PPCHI2 to invert the Chi-Squared CDF.
 
  P =                    0.1752300000000000E-01
  V =                     4.000000000000000    
  G Log(Gamma(V/2)) =     0.000000000000000    
  VALUE =                0.3999988241105069    
  VALUE (correct) =      0.4000000000000000    
 
  Error flag IFAULT =        0
 
TEST02:
  Compare tabulated values of the Chi-Squared
  Cumulative Density Function against values
  computed by PPCHI2.
 
         N        CDF       X                         X2                      DIFF
                          (tabulated)                (PPCHI2)
 
         1      0.0797    0.1000000000000000E-01    0.9999999999567905E-02  0.4321E-12
         2      0.0050    0.1000000000000000E-01    0.1000000000000101E-01  0.1006E-14
         1      0.1125    0.2000000000000000E-01    0.1999999999911529E-01  0.8847E-12
         2      0.0100    0.2000000000000000E-01    0.2000000000000399E-01  0.3993E-14
         1      0.4729    0.4000000000000000        0.3999999999845615      0.1544E-10
         2      0.1813    0.4000000000000000        0.4000000000015109      0.1511E-11
         3      0.0598    0.4000000000000000        0.4000000000743913      0.7439E-10
         4      0.0175    0.4000000000000000        0.4000000004011919      0.4012E-09
         1      0.6827    1.0000000000000000        0.9999999999419344      0.5807E-10
         2      0.3935    1.0000000000000000        0.9999999999992277      0.7723E-12
         3      0.1987    1.0000000000000000        0.9999999999665969      0.3340E-10
         4      0.0902    1.0000000000000000         1.000000000066364      0.6636E-10
         5      0.0374    1.0000000000000000        0.9999999999121670      0.8783E-10
         3      0.4276     2.000000000000000         1.999999999916729      0.8327E-10
         3      0.6084     3.000000000000000         3.000000000053088      0.5309E-10
         3      0.7385     4.000000000000000         4.000000000051578      0.5158E-10
         3      0.8282     5.000000000000000         5.000000000050925      0.5093E-10
         3      0.8884     6.000000000000000         6.000000000050505      0.5051E-10
        10      0.0002    1.0000000000000000         1.000020461888895      0.2046E-04
        10      0.0037     2.000000000000000         2.000000008541654      0.8542E-08
        10      0.0186     3.000000000000000         2.999999996729284      0.3271E-08
 
ASA091_PRB:
  Normal end of execution.
 
 5 February  2008  12:09:09.722 PM