15 August 2022   9:25:21.994 PM
 
asa111_test():
  FORTRAN90 version
  Test asa111().
 
test01():
  ppnd() computes percentage points of normal distribution.
 
      CDF              X                         X2                     DIFF
                      (tabulated)               (PPND)
 
    0.500000         0.000000000000000         0.000000000000000       0.000    
    0.539828        0.1000000000000000        0.9999999893589846E-01  0.1064E-08
    0.579260        0.2000000000000000        0.1999999994279050      0.5721E-09
    0.617911        0.3000000000000000        0.3000000008067494      0.8067E-09
    0.655422        0.4000000000000000        0.4000000010087952      0.1009E-08
    0.691462        0.5000000000000000        0.4999999995758233      0.4242E-09
    0.725747        0.6000000000000000        0.5999999986743081      0.1326E-08
    0.758036        0.7000000000000000        0.6999999999980279      0.1972E-11
    0.788145        0.8000000000000000        0.8000000015087398      0.1509E-08
    0.815940        0.9000000000000000        0.9000000001395408      0.1395E-09
    0.841345         1.000000000000000        0.9999999981838064      0.1816E-08
    0.933193         1.500000000000000         1.499999998999888      0.1000E-08
    0.977250         2.000000000000000         1.999999997622199      0.2378E-08
    0.993790         2.500000000000000         2.500000001708647      0.1709E-08
    0.998650         3.000000000000000         2.999999943515105      0.5648E-07
    0.999767         3.500000000000000         3.500000218679510      0.2187E-06
    0.999968         4.000000000000000         4.000002334412086      0.2334E-05
 
asa111_test():
  Normal end of execution.
 
15 August 2022   9:25:21.994 PM