14 June 2018 03:13:27 PM

ASA241_TEST:
  C version
  Test the ASA241 library.

TEST01:
  Let FX = NormalCDF ( X ).

  NORMAL_01_CDF_VALUES returns some values of ( X, FX ).

  R4_NORMAL_01_CDF_INVERSE takes the value of FX, and computes an
    estimate X2, of the corresponding input argument,
    accurate to about 7 decimal places.

          FX                        X                        X2          DIFF

        0.5000000000000000        0.0000000000000000        0.0000000000000000           0
        0.5398278372770290        0.1000000000000000        0.0999999642372131  3.57628e-08
        0.5792597094391030        0.2000000000000000        0.1999999582767487  4.17233e-08
        0.6179114221889526        0.3000000000000000        0.2999999225139618  7.7486e-08
        0.6554217416103242        0.4000000000000000        0.3999999761581421  2.38419e-08
        0.6914624612740131        0.5000000000000000        0.5000000000000000           0
        0.7257468822499270        0.6000000000000000        0.5999999046325684  9.53674e-08
        0.7580363477769270        0.7000000000000000        0.7000000476837158  4.76837e-08
        0.7881446014166033        0.8000000000000000        0.7999999523162842  4.76837e-08
        0.8159398746532405        0.9000000000000000        0.9000000357627869  3.57628e-08
        0.8413447460685429        1.0000000000000000        1.0000000000000000           0
        0.9331927987311419        1.5000000000000000        1.4999997615814209  2.38419e-07
        0.9772498680518208        2.0000000000000000        2.0000000000000000           0
        0.9937903346742240        2.5000000000000000        2.4999992847442627  7.15256e-07
        0.9986501019683699        3.0000000000000000        2.9999928474426270  7.15256e-06
        0.9997673709209645        3.5000000000000000        3.4999909400939941  9.05991e-06
        0.9999683287581669        4.0000000000000000        4.0001583099365234  0.00015831

TEST02:
  Let FX = NormalCDF ( X ).

  NORMAL_01_CDF_VALUES returns some values of ( X, FX ).

  R8_NORMAL_01_CDF_INVERSE takes the value of FX, and computes an
    estimate X2, of the corresponding input argument,
    accurate to about 16 decimal places.

          FX                        X                        X2          DIFF

        0.5000000000000000        0.0000000000000000        0.0000000000000000           0
        0.5398278372770290        0.1000000000000000        0.1000000000000000  1.38778e-17
        0.5792597094391030        0.2000000000000000        0.1999999999999999  1.11022e-16
        0.6179114221889526        0.3000000000000000        0.2999999999999998  2.22045e-16
        0.6554217416103242        0.4000000000000000        0.4000000000000000  5.55112e-17
        0.6914624612740131        0.5000000000000000        0.4999999999999998  1.66533e-16
        0.7257468822499270        0.6000000000000000        0.6000000000000016  1.66533e-15
        0.7580363477769270        0.7000000000000000        0.6999999999999998  1.11022e-16
        0.7881446014166033        0.8000000000000000        0.7999999999999998  2.22045e-16
        0.8159398746532405        0.9000000000000000        0.9000000000000000           0
        0.8413447460685429        1.0000000000000000        1.0000000000000000           0
        0.9331927987311419        1.5000000000000000        1.4999999999999998  2.22045e-16
        0.9772498680518208        2.0000000000000000        2.0000000000000000           0
        0.9937903346742240        2.5000000000000000        2.5000000000000040  3.9968e-15
        0.9986501019683699        3.0000000000000000        2.9999999999999969  3.10862e-15
        0.9997673709209645        3.5000000000000000        3.4999999999999831  1.68754e-14
        0.9999683287581669        4.0000000000000000        3.9999999999999996  4.44089e-16

ASA241_TEST:
  Normal end of execution.

14 June 2018 03:13:27 PM