30 January   2008   8:21:23.295 AM      
 
BETA_NC_PRB:
  FORTRAN77 version
 
  Test routines in the BETA_NC library.
 
TEST01:
  Compare tabulated values of the noncentral
  incomplete Beta Function against values
  computed by BETA_NONCENTRAL_CDF.
 
      A        B     LAMBDA        X        CDF                         CDF                    DIFF
                                           (tabulated)                 (BETA_NC)
 
      5.0      5.0     54.0      0.8640              0.456302                  0.456303      0.5193E-06
      5.0      5.0    140.0      0.9000              0.104134                  0.104133      0.2070E-06
      5.0      5.0    170.0      0.9560              0.602235                  0.602242      0.6865E-05
     10.0     10.0     54.0      0.8686              0.918777                  0.918779      0.2111E-05
     10.0     10.0    140.0      0.9000              0.600811                  0.600807      0.3493E-05
     10.0     10.0    250.0      0.9000              0.902850E-01              0.902899E-01  0.4916E-05
     20.0     20.0     54.0      0.8787              0.999865                  0.999868      0.2157E-05
     20.0     20.0    140.0      0.9000              0.992600                  0.992598      0.2195E-05
     20.0     20.0    250.0      0.9220              0.964111                  0.964119      0.7873E-05
     10.0     20.0    150.0      0.8680              0.937663                  0.937663      0.8329E-06
     10.0     10.0    120.0      0.9000              0.730682                  0.730682      0.5848E-06
     15.0      5.0     80.0      0.8800              0.160426                  0.160426      0.3640E-07
     20.0     10.0    110.0      0.8500              0.186749                  0.186749      0.1608E-07
     20.0     30.0     65.0      0.6600              0.655939                  0.655939      0.1132E-06
     20.0     50.0    130.0      0.7200              0.979688                  0.979689      0.9699E-06
     30.0     20.0     80.0      0.7200              0.116239                  0.116239      0.3170E-08
     30.0     40.0    130.0      0.8000              0.993043                  0.993044      0.1493E-05
     10.0      5.0     20.0      0.6440              0.506899E-01              0.506899E-01  0.6494E-09
     10.0     10.0     54.0      0.7000              0.103096                  0.103096      0.3086E-08
     10.0     30.0     80.0      0.7800              0.997842                  0.997845      0.2902E-05
     15.0     20.0    120.0      0.7600              0.255555                  0.255555      0.9401E-08
     10.0      5.0     55.0      0.7950              0.668307E-01              0.668307E-01  0.1614E-08
     12.0     17.0     64.0      0.5600              0.113601E-01              0.113601E-01  0.1774E-12
     30.0     30.0    140.0      0.8000              0.781337                  0.781337      0.3990E-06
     35.0     30.0     20.0      0.6700              0.886713                  0.886713      0.3276E-10
 
BETA_NC_PRB:
  Normal end of execution.
 
30 January   2008   8:21:23.299 AM