1TEST OF ALOG(X) VS T.S. EXPANSION OF ALOG(1+Y)


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (1-EPS,1+EPS), WHERE EPS =     0.3906e-02


 ALOG(X) WAS LARGER     1 TIMES,
             AGREED  1999 TIMES, AND
        WAS SMALLER     0 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.7532e-07 =    2 ** -23.66
    OCCURRED FOR X =     0.100310e+01
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.34


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.1684e-08 =    2 ** -29.15
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1TEST OF ALOG(X) VS ALOG(17X/16)-ALOG(17/16)


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.7071e+00,     0.9375e+00)


 ALOG(X) WAS LARGER     0 TIMES,
             AGREED  1305 TIMES, AND
        WAS SMALLER   695 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.1192e-06 =    2 ** -23.00
    OCCURRED FOR X =     0.778760e+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.5267e-07 =    2 ** -24.18
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1TEST OF ALOG10(X) VS ALOG10(11X/10)-ALOG10(11/10)


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.3162e+00,     0.9000e+00)


 ALOG10(X) WAS LARGER     0 TIMES,
               AGREED   916 TIMES, AND
          WAS SMALLER  1084 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.2609e-06 =    2 ** -21.87
    OCCURRED FOR X =     0.876774e+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   2.13


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.7781e-07 =    2 ** -23.62
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.38


1TEST OF ALOG(X*X) VS 2 * LOG(X)


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.1600e+02,     0.2400e+03)


 ALOG(X) WAS LARGER    41 TIMES,
             AGREED  1959 TIMES, AND
        WAS SMALLER     0 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.1161e-06 =    2 ** -23.04
    OCCURRED FOR X =     0.608175e+02
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.96


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.1255e-07 =    2 ** -26.25
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1SPECIAL TESTS


 THE IDENTITY  ALOG(X) = -ALOG(1/X)  WILL BE TESTED.

        X         F(X) + F(1/X)

  0.1511114e+02 -0.2384186e-06

  0.1689214e+02  0.0000000e+00

  0.1551779e+02  0.0000000e+00

  0.1572357e+02  0.0000000e+00

  0.1544667e+02  0.0000000e+00



 TEST OF SPECIAL ARGUMENTS


 ALOG(1.0) =   0.0000000e+00


 ALOG(XMIN) = ALOG(  0.2938736e-38) =  -0.8872284e+02


 ALOG(XMAX) = ALOG(  0.1701412e+39) =   0.8802969e+02


1TEST OF ERROR RETURNS


 ALOG WILL BE CALLED WITH THE ARGUMENT    -0.2000e+01
 THIS SHOULD TRIGGER AN ERROR MESSAGE


 ALOG RETURNED THE VALUE     0.1701e+39



 ALOG WILL BE CALLED WITH THE ARGUMENT     0.0000e+00
 THIS SHOULD TRIGGER AN ERROR MESSAGE


 ALOG RETURNED THE VALUE    -0.1701e+39



 THIS CONCLUDES THE TESTS
1TEST OF ASIN(X) VS TAYLOR SERIES


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (    -0.1250e+00,     0.1250e+00)


 ASIN(X) WAS LARGER     0 TIMES,
             AGREED  2000 TIMES, AND
        WAS SMALLER     0 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.0000e+00 =    2 **-999.00
    OCCURRED FOR X =     0.000000e+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.0000e+00 =    2 **-999.00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1TEST OF ACOS(X) VS TAYLOR SERIES


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (    -0.1250e+00,     0.1250e+00)


 ACOS(X) WAS LARGER     0 TIMES,
             AGREED  1960 TIMES, AND
        WAS SMALLER    40 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.8225e-07 =    2 ** -23.54
    OCCURRED FOR X =     0.121213e+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.46


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.1067e-07 =    2 ** -26.48
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1TEST OF ASIN(X) VS TAYLOR SERIES


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.7500e+00,     0.1000e+01)


 ASIN(X) WAS LARGER   103 TIMES,
             AGREED  1627 TIMES, AND
        WAS SMALLER   270 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.1192e-06 =    2 ** -23.00
    OCCURRED FOR X =     0.841481e+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.3799e-07 =    2 ** -24.65
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1TEST OF ACOS(X) VS TAYLOR SERIES


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.7500e+00,     0.1000e+01)


 ACOS(X) WAS LARGER   236 TIMES,
             AGREED  1505 TIMES, AND
        WAS SMALLER   259 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.1190e-06 =    2 ** -23.00
    OCCURRED FOR X =     0.877246e+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.4441e-07 =    2 ** -24.42
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1TEST OF ACOS(X) VS TAYLOR SERIES


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (    -0.1000e+01,    -0.7500e+00)


 ACOS(X) WAS LARGER     0 TIMES,
             AGREED  1839 TIMES, AND
        WAS SMALLER   161 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.9851e-07 =    2 ** -23.28
    OCCURRED FOR X =    -0.750973e+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.72


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.2599e-07 =    2 ** -25.20
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1SPECIAL TESTS


 THE IDENTITY  ASIN(-X) = -ASIN(X)  WILL BE TESTED.

        X         F(X) + F(-X)

 -0.3638713e+00  0.0000000e+00

 -0.4839116e+00  0.0000000e+00

 -0.4889470e+00  0.0000000e+00

 -0.1183719e+00  0.0000000e+00

 -0.7964936e+00  0.0000000e+00

 THE IDENTITY ASIN(X) = X , X SMALL, WILL BE TESTED.

        X         X - F(X)

  0.3348048e-07  0.0000000e+00

  0.1674024e-07  0.0000000e+00

  0.8370120e-08  0.0000000e+00

  0.4185060e-08  0.0000000e+00

  0.2092530e-08  0.0000000e+00

 TEST OF UNDERFLOW FOR VERY SMALL ARGUMENT.

       ASIN( 0.126218e-28) = 0.126218e-28

1TEST OF ERROR RETURNS


 ASIN WILL BE CALLED WITH THE ARGUMENT     0.1200e+01
 THIS SHOULD TRIGGER AN ERROR MESSAGE


 ASIN RETURNED THE VALUE     0.7053e-38



 THIS CONCLUDES THE TESTS
1TEST OF ATAN(X) VS TRUNCATED TAYLOR SERIES


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (    -0.6250e-01,     0.6250e-01)


 ATAN(X) WAS LARGER     0 TIMES,
             AGREED  2000 TIMES, AND
        WAS SMALLER     0 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.0000e+00 =    2 **-999.00
    OCCURRED FOR X =     0.000000e+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.0000e+00 =    2 **-999.00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1TEST OF ATAN(X) VS ATAN(1/16) + ATAN((X-1/16)/(1+X/16))    


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.6250e-01,     0.2679e+00)


 ATAN(X) WAS LARGER   266 TIMES,
             AGREED  1319 TIMES, AND
        WAS SMALLER   415 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.1191e-06 =    2 ** -23.00
    OCCURRED FOR X =     0.125805e+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.4884e-07 =    2 ** -24.29
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1TEST OF 2*ATAN(X) VS ATAN(2X/(1-X*X))  


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.2679e+00,     0.4142e+00)


 ATAN(X) WAS LARGER   608 TIMES,
             AGREED  1317 TIMES, AND
        WAS SMALLER    75 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.1137e-06 =    2 ** -23.07
    OCCURRED FOR X =     0.268375e+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.93


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.5353e-07 =    2 ** -24.16
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1TEST OF 2*ATAN(X) VS ATAN(2X/(1-X*X))  


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.4142e+00,     0.1000e+01)


 ATAN(X) WAS LARGER   216 TIMES,
             AGREED  1723 TIMES, AND
        WAS SMALLER    61 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.1513e-06 =    2 ** -22.66
    OCCURRED FOR X =     0.415665e+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.34


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.3137e-07 =    2 ** -24.93
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1SPECIAL TESTS


 THE IDENTITY   ATAN(-X) = -ATAN(X)   WILL BE TESTED.

        X         F(X) + F(-X)

  0.3617411e+01  0.0000000e+00

  0.2176353e+01  0.0000000e+00

  0.2044134e+01  0.0000000e+00

  0.5168115e+00  0.0000000e+00

  0.4601443e+01  0.0000000e+00

 THE IDENTITY ATAN(X) = X , X SMALL, WILL BE TESTED.

        X         X - F(X)

  0.2150919e-08  0.0000000e+00

  0.1075460e-08  0.0000000e+00

  0.5377298e-09  0.0000000e+00

  0.2688649e-09  0.0000000e+00

  0.1344325e-09  0.0000000e+00

 THE IDENTITY ATAN(X/Y) = ATAN2(X,Y) WILL BE TESTED
 THE FIRST COLUMN OF RESULTS SHOULD BE 0, THE SECOND +-PI

        X             Y     F1(X/Y)-F2(X,Y)F1(X/Y)-F2(X/(-Y))

  0.4321790e-01  0.8505591e+00  0.0000000e+00 -0.3141593e+01

 -0.7204334e+00  0.9864566e+00  0.0000000e+00  0.3141593e+01

 -0.7716829e+00  0.3849098e+00  0.0000000e+00  0.3141593e+01

 -0.1545089e+01  0.2159743e+00  0.0000000e+00  0.3141593e+01

  0.1987153e+01  0.5985181e+00  0.0000000e+00 -0.3141593e+01

 TEST OF UNDERFLOW FOR VERY SMALL ARGUMENT.

       ATAN( 0.126218e-28) = 0.126218e-28

1TEST OF ERROR RETURNS


 ATAN WILL BE CALLED WITH THE ARGUMENT  0.1701412e+39
 THIS SHOULD NOT TRIGGER AN ERROR MESSAGE

       ATAN( 0.170141e+39) = 0.157080e+01

 ATAN2 WILL BE CALLED WITH THE ARGUMENTS
  0.1000000e+01  0.0000000e+00
 THIS SHOULD NOT TRIGGER AN ERROR MESSAGE

       ATAN2( 0.100000e+01 0.000000e+00) = 0.157080e+01

 ATAN2 WILL BE CALLED WITH THE ARGUMENTS
  0.2938736e-38  0.1701412e+39
 THIS SHOULD NOT TRIGGER AN ERROR MESSAGE

       ATAN2( 0.293874e-38 0.170141e+39) = 0.000000e+00

 ATAN2 WILL BE CALLED WITH THE ARGUMENTS
  0.1701412e+39  0.2938736e-38
 THIS SHOULD NOT TRIGGER AN ERROR MESSAGE

       ATAN2( 0.170141e+39 0.293874e-38) = 0.157080e+01

 ATAN2 WILL BE CALLED WITH THE ARGUMENTS
  0.0000000e+00  0.0000000e+00
 THIS SHOULD TRIGGER AN ERROR MESSAGE


       ATAN2( 0.000000e+00 0.000000e+00) = 0.000000e+00

 THIS CONCLUDES THE TESTS
1TEST OF EXP(X- 0.0625) VS EXP(X)/EXP( 0.0625)


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (    -0.2841e+00,     0.3466e+00)


 EXP(X-V) WAS LARGER   226 TIMES,
              AGREED  1505 TIMES, AND
         WAS SMALLER   269 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.1189e-06 =    2 ** -23.00
    OCCURRED FOR X =     0.652217e-01
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.4276e-07 =    2 ** -24.48
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1TEST OF EXP(X- 2.8125) VS EXP(X)/EXP( 2.8125)


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (    -0.3466e+01,    -0.7070e+02)


 EXP(X-V) WAS LARGER   195 TIMES,
              AGREED  1517 TIMES, AND
         WAS SMALLER   288 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.1192e-06 =    2 ** -23.00
    OCCURRED FOR X =    -0.897065e+01
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.4305e-07 =    2 ** -24.47
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1TEST OF EXP(X- 2.8125) VS EXP(X)/EXP( 2.8125)


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.6931e+01,     0.8792e+02)


 EXP(X-V) WAS LARGER   221 TIMES,
              AGREED  1487 TIMES, AND
         WAS SMALLER   292 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.1191e-06 =    2 ** -23.00
    OCCURRED FOR X =     0.665826e+02
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.4357e-07 =    2 ** -24.45
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1SPECIAL TESTS


 THE IDENTITY  EXP(X)*EXP(-X) = 1.0  WILL BE TESTED.

        X         F(X)*F(-X) - 1

  0.4172930e+00  0.0000000e+00

  0.1616278e+00  0.0000000e+00

  0.2034688e+00 -0.5960464e-07

  0.1433597e+01  0.0000000e+00

  0.1199615e+01 -0.5960464e-07



 TEST OF SPECIAL ARGUMENTS


 EXP(0.0) - 1.0E0 =   0.0000000e+00

 EXP(-0.880000e+02) = 0.605460e-38

 EXP( 0.880000e+02) = 0.165164e+39

0IF EXP( 0.440000e+02) =  0.128516e+20 IS NOT ABOUT
 EXP( 0.220000e+02)**2 =  0.128516e+20 THERE IS AN ARG RED ERROR
1TEST OF ERROR RETURNS


0EXP WILL BE CALLED WITH THE ARGUMENT    -0.1845e+20
 THIS SHOULD TRIGGER AN ERROR MESSAGE


 EXP RETURNED THE VALUE     0.0000e+00



0EXP WILL BE CALLED WITH THE ARGUMENT     0.1845e+20
 THIS SHOULD TRIGGER AN ERROR MESSAGE


 EXP RETURNED THE VALUE     0.1701e+39



 THIS CONCLUDES THE TESTS
1TEST OF X**1.0 VS X


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.5000e+00,     0.1000e+01)


 X**1.0 WAS LARGER     0 TIMES,
            AGREED  2000 TIMES, AND
       WAS SMALLER     0 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.0000e+00 =    2 **-999.00
    OCCURRED FOR X =     0.000000e+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.0000e+00 =    2 **-999.00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1TEST OF XSQ**1.5 VS XSQ*X


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.5000e+00,     0.1000e+01)


 X**1.5 WAS LARGER     0 TIMES,
            AGREED  2000 TIMES, AND
       WAS SMALLER     0 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.0000e+00 =    2 **-999.00
    OCCURRED FOR X =     0.000000e+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.0000e+00 =    2 **-999.00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1TEST OF XSQ**1.5 VS XSQ*X


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.1000e+01,     0.5541e+13)


 X**1.5 WAS LARGER     0 TIMES,
            AGREED  2000 TIMES, AND
       WAS SMALLER     0 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.0000e+00 =    2 **-999.00
    OCCURRED FOR X =     0.000000e+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.0000e+00 =    2 **-999.00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1TEST OF X**Y VS XSQ**(Y/2)


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE REGION
      X IN (     0.1000e-01,     0.1000e+02), Y IN (    -0.1927e+02,     0.1927e+02)


  X**Y  WAS LARGER     0 TIMES,
            AGREED  2000 TIMES, AND
       WAS SMALLER     0 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.0000e+00 =    2 **-999.00
    OCCURRED FOR X =     0.000000e+00 Y =     0.000000e+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.0000e+00 =    2 **-999.00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1SPECIAL TESTS


 THE IDENTITY  X ** Y = (1/X) ** (-Y)  WILL BE TESTED.

        X              Y         (X**Y-(1/X)**(-Y) / X**Y

  0.3429194e+01  0.4649271e+01        0.9915104e-07

  0.7158762e+01  0.1084530e+02        0.4115128e-06

  0.1663064e+01  0.3882931e+01        0.0000000e+00

  0.1366361e+01  0.6795137e+01        0.2286883e-06

  0.5392149e+01  0.1001862e+02        0.0000000e+00

1TEST OF ERROR RETURNS


 ( 0.2000000e+01 ) ** (-0.1280000e+03 ) WILL BE COMPUTED.
 THIS SHOULD NOT TRIGGER AN ERROR MESSAGE


 THE VALUE RETURNED IS     0.2939e-38



 ( 0.2000000e+01 ) ** ( 0.1260000e+03 ) WILL BE COMPUTED.
 THIS SHOULD NOT TRIGGER AN ERROR MESSAGE


 THE VALUE RETURNED IS     0.8507e+38



 ( 0.0000000e+00 ) ** ( 0.2000000e+01 ) WILL BE COMPUTED.
 THIS SHOULD NOT TRIGGER AN ERROR MESSAGE


 THE VALUE RETURNED IS     0.0000e+00



 (-0.2000000e+01 ) ** ( 0.0000000e+00 ) WILL BE COMPUTED.
 THIS SHOULD TRIGGER AN ERROR MESSAGE


 THE VALUE RETURNED IS     0.1000e+01



 (-0.2000000e+01 ) ** ( 0.2000000e+01 ) WILL BE COMPUTED.
 THIS SHOULD TRIGGER AN ERROR MESSAGE


 THE VALUE RETURNED IS     0.4000e+01



 ( 0.0000000e+00 ) ** ( 0.0000000e+00 ) WILL BE COMPUTED.
 THIS SHOULD TRIGGER AN ERROR MESSAGE


 THE VALUE RETURNED IS     0.1000e+01



 THIS CONCLUDES THE TESTS
1TEST OF SIN(X) VS 3*SIN(X/3)-4*SIN(X/3)**3


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.0000e+00,     0.1571e+01)


 SIN(X) WAS LARGER   292 TIMES,
            AGREED  1237 TIMES, AND
       WAS SMALLER   471 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.1281e-06 =    2 ** -22.90
    OCCURRED FOR X =     0.116629e+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.10


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.4700e-07 =    2 ** -24.34
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1TEST OF SIN(X) VS 3*SIN(X/3)-4*SIN(X/3)**3


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.1885e+02,     0.2042e+02)


 SIN(X) WAS LARGER   268 TIMES,
            AGREED  1288 TIMES, AND
       WAS SMALLER   444 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.1337e-06 =    2 ** -22.83
    OCCURRED FOR X =     0.189612e+02
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.17


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.4576e-07 =    2 ** -24.38
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1TEST OF COS(X) VS 4*COS(X/3)**3-3*COS(X/3)


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.2199e+02,     0.2356e+02)


 COS(X) WAS LARGER   287 TIMES,
            AGREED  1243 TIMES, AND
       WAS SMALLER   470 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.1517e-06 =    2 ** -22.65
    OCCURRED FOR X =     0.231581e+02
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.35


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.4690e-07 =    2 ** -24.35
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1SPECIAL TESTS


 IF  0.100000e+01 IS NOT ALMOST 1.0E0,    SIN HAS THE WRONG PERIOD.


 THE IDENTITY   SIN(-X) = -SIN(X)   WILL BE TESTED.

        X         F(X) + F(-X)

  0.7988396e+01  0.0000000e+00

  0.1837256e+02  0.0000000e+00

  0.1577381e+02  0.0000000e+00

  0.1137237e+02  0.0000000e+00

  0.7829143e+01  0.0000000e+00

 THE IDENTITY SIN(X) = X , X SMALL, WILL BE TESTED.

        X         X - F(X)

  0.5475400e-07  0.0000000e+00

  0.2737700e-07  0.0000000e+00

  0.1368850e-07  0.0000000e+00

  0.6844250e-08  0.0000000e+00

  0.3422125e-08  0.0000000e+00

 THE IDENTITY   COS(-X) = COS(X)   WILL BE TESTED.

        X         F(X) - F(-X)

  0.1559717e+02  0.0000000e+00

  0.8141365e+01  0.0000000e+00

  0.1864421e+02  0.0000000e+00

  0.1203059e+02  0.0000000e+00

  0.1470889e+02  0.0000000e+00

 TEST OF UNDERFLOW FOR VERY SMALL ARGUMENT.

       SIN( 0.126218e-28) = 0.126218e-28
 THE FOLLOWING THREE LINES ILLUSTRATE THE LOSS IN SIGNIFICANCE
 FOR LARGE ARGUMENTS.  THE ARGUMENTS ARE CONSECUTIVE.

       SIN( 0.409600e+04) =-0.594838e+00

       SIN( 0.409600e+04) =-0.594642e+00

       SIN( 0.409600e+04) =-0.594249e+00
1TEST OF ERROR RETURNS


 SIN WILL BE CALLED WITH THE ARGUMENT     0.1678e+08
 THIS SHOULD TRIGGER AN ERROR MESSAGE


 SIN RETURNED THE VALUE    -0.7796e+00



 THIS CONCLUDES THE TESTS
1TEST OF SINH(X) VS T.S. EXPANSION OF SINH(X)


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.0000e+00,     0.5000e+00)


 SINH(X) WAS LARGER     2 TIMES,
             AGREED  1985 TIMES, AND
        WAS SMALLER    13 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.1188e-06 =    2 ** -23.01
    OCCURRED FOR X =     0.482886e+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.99


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.6977e-08 =    2 ** -27.09
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1TEST OF COSH(X) VS T.S. EXPANSION OF COSH(X)


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.0000e+00,     0.5000e+00)


 COSH(X) WAS LARGER     4 TIMES,
             AGREED  1962 TIMES, AND
        WAS SMALLER    34 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.1188e-06 =    2 ** -23.01
    OCCURRED FOR X =     0.872198e-01
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.99


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.1545e-07 =    2 ** -25.95
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1TEST OF SINH(X) VS C*(SINH(X+1)+SINH(X-1))


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.3000e+01,     0.8803e+02)


 SINH(X) WAS LARGER    29 TIMES,
             AGREED   880 TIMES, AND
        WAS SMALLER  1091 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.1829e-06 =    2 ** -22.38
    OCCURRED FOR X =     0.453199e+02
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.62


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.6852e-07 =    2 ** -23.80
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.20


1TEST OF COSH(X) VS C*(COSH(X+1)+COSH(X-1))


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.3000e+01,     0.8803e+02)


 COSH(X) WAS LARGER    20 TIMES,
             AGREED   870 TIMES, AND
        WAS SMALLER  1110 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.1837e-06 =    2 ** -22.38
    OCCURRED FOR X =     0.758136e+02
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.62


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.6973e-07 =    2 ** -23.77
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.23


1SPECIAL TESTS


 THE IDENTITY  SINH(-X) = -SINH(X)  WILL BE TESTED.

        X         F(X) + F(-X)

  0.4758721e+00  0.0000000e+00

  0.2484013e+01  0.0000000e+00

  0.1501598e+01  0.0000000e+00

  0.1699758e+01  0.0000000e+00

  0.2469687e+01  0.0000000e+00

 THE IDENTITY SINH(X) = X , X SMALL, WILL BE TESTED.

        X         X - F(X)

  0.5385918e-07  0.0000000e+00

  0.2692959e-07  0.0000000e+00

  0.1346480e-07  0.0000000e+00

  0.6732398e-08  0.0000000e+00

  0.3366199e-08  0.0000000e+00

 THE IDENTITY  COSH(-X) = COSH(X)  WILL BE TESTED.

        X         F(X) - F(-X)

  0.2852678e+01  0.0000000e+00

  0.2584760e+01  0.0000000e+00

  0.2094970e+01  0.0000000e+00

  0.8712769e+00  0.0000000e+00

  0.9096089e+00  0.0000000e+00

 TEST OF UNDERFLOW FOR VERY SMALL ARGUMENT.

       SINH( 0.126218e-28) = 0.126218e-28

1TEST OF ERROR RETURNS


 SINH WILL BE CALLED WITH THE ARGUMENT     0.8815e+02
 THIS SHOULD NOT TRIGGER AN ERROR MESSAGE


 SINH RETURNED THE VALUE     0.9640e+38



0SINH WILL BE CALLED WITH THE ARGUMENT     0.1678e+08
 THIS SHOULD TRIGGER AN ERROR MESSAGE


 SINH RETURNED THE VALUE     0.1701e+39



 THIS CONCLUDES THE TESTS
1TEST OF SQRT(X*X) - X


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.7071e+00,     0.1000e+01)


 SQRT(X) WAS LARGER     0 TIMES,
             AGREED  2000 TIMES, AND
        WAS SMALLER     0 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.0000e+00 =    2 **-999.00
    OCCURRED FOR X =     0.000000e+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.0000e+00 =    2 **-999.00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1TEST OF SQRT(X*X) - X


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.1000e+01,     0.1414e+01)


 SQRT(X) WAS LARGER     0 TIMES,
             AGREED  2000 TIMES, AND
        WAS SMALLER     0 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.0000e+00 =    2 **-999.00
    OCCURRED FOR X =     0.000000e+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.0000e+00 =    2 **-999.00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1TEST OF SPECIAL ARGUMENTS


 SQRT(XMIN) = SQRT(  0.2938736e-38) =   0.5421011e-19


 SQRT(1-EPSNEG) = SQRT(1-  0.5960464e-07) =   0.9999999e+00


 SQRT(1.0) = SQRT(  0.1000000e+01) =   0.1000000e+01


 SQRT(1+EPS) = SQRT(1+  0.5960464e-07) =   0.1000000e+01


 SQRT(XMAX) = SQRT(  0.1701412e+39) =   0.1304382e+20


1TEST OF ERROR RETURNS


 SQRT WILL BE CALLED WITH THE ARGUMENT     0.0000e+00
 THIS SHOULD NOT TRIGGER AN ERROR MESSAGE


 SQRT RETURNED THE VALUE     0.0000e+00



0SQRT WILL BE CALLED WITH THE ARGUMENT    -0.1000e+01
 THIS SHOULD TRIGGER AN ERROR MESSAGE


 SQRT RETURNED THE VALUE     0.1701e+39



 THIS CONCLUDES THE TESTS
1TEST OF TAN(X) VS 2*TAN(X/2)/(1-TAN(X/2)**2)


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.0000e+00,     0.7854e+00)


 TAN(X) WAS LARGER  1157 TIMES,
            AGREED   747 TIMES, AND
       WAS SMALLER    96 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.2493e-06 =    2 ** -21.94
    OCCURRED FOR X =     0.622304e+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   2.06


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.8501e-07 =    2 ** -23.49
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.51


1TEST OF TAN(X) VS 2*TAN(X/2)/(1-TAN(X/2)**2)


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.2749e+01,     0.3534e+01)


 TAN(X) WAS LARGER   393 TIMES,
            AGREED  1275 TIMES, AND
       WAS SMALLER   332 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.1487e-06 =    2 ** -22.68
    OCCURRED FOR X =     0.276026e+01
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.32


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.5119e-07 =    2 ** -24.22
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1TEST OF TAN(X) VS 2*TAN(X/2)/(1-TAN(X/2)**2)


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.1885e+02,     0.1963e+02)


 TAN(X) WAS LARGER  1137 TIMES,
            AGREED   754 TIMES, AND
       WAS SMALLER   109 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.2657e-06 =    2 ** -21.84
    OCCURRED FOR X =     0.194419e+02
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   2.16


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.8212e-07 =    2 ** -23.54
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.46


1TEST OF COT(X) VS (COT(X/2)**2-1)/(2*COT(X/2))


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.1885e+02,     0.1963e+02)


 COT(X) WAS LARGER   422 TIMES,
            AGREED  1006 TIMES, AND
       WAS SMALLER   572 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.2516e-06 =    2 ** -21.92
    OCCURRED FOR X =     0.194626e+02
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   2.08


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.6907e-07 =    2 ** -23.79
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.21


1SPECIAL TESTS


 THE IDENTITY  TAN(-X) = -TAN(X)  WILL BE TESTED.

        X         F(X) + F(-X)

  0.1583949e+02  0.0000000e+00

  0.7335019e+00  0.0000000e+00

  0.1628951e+02  0.0000000e+00

  0.4370002e+00  0.0000000e+00

  0.1692591e+02  0.0000000e+00

 THE IDENTITY TAN(X) = X , X SMALL, WILL BE TESTED.

        X         X - F(X)

  0.1451136e-07  0.0000000e+00

  0.7255678e-08  0.0000000e+00

  0.3627839e-08  0.0000000e+00

  0.1813919e-08  0.0000000e+00

  0.9069597e-09  0.0000000e+00

 TEST OF UNDERFLOW FOR VERY SMALL ARGUMENT.

       TAN( 0.126218e-28) = 0.126218e-28

 THE RELATIVE ERROR IN TAN(11) IS -0.2215876e-07 =    2 ** -25.43 WHERE

       TAN( 0.110000e+02) =-0.225951e+03

 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1TEST OF ERROR RETURNS


 TAN WILL BE CALLED WITH THE ARGUMENT     0.4096e+04
 THIS SHOULD NOT TRIGGER AN ERROR MESSAGE


 TAN RETURNED THE VALUE    -0.7396e+00



0TAN WILL BE CALLED WITH THE ARGUMENT     0.1678e+08
 THIS SHOULD TRIGGER AN ERROR MESSAGE


 TAN RETURNED THE VALUE    -0.1245e+01



 THIS CONCLUDES THE TESTS
1TEST OF TANH(X) VS (TANH(X-1/8)+TANH(1/8))/(1+TANH(X-1/8)TANH(1/8))  


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.1250e+00,     0.5493e+00)


 TANH(X) WAS LARGER   594 TIMES,
             AGREED  1073 TIMES, AND
        WAS SMALLER   333 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.1624e-06 =    2 ** -22.55
    OCCURRED FOR X =     0.185613e+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.45


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.5662e-07 =    2 ** -24.07
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1TEST OF TANH(X) VS (TANH(X-1/8)+TANH(1/8))/(1+TANH(X-1/8)TANH(1/8))  


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.6743e+00,     0.9357e+01)


 TANH(X) WAS LARGER   411 TIMES,
             AGREED   854 TIMES, AND
        WAS SMALLER   735 TIMES.


 THERE ARE  24 BASE   2 SIGNIFICANT DIGITS IN A FLOATING-POINT NUMBER


 THE MAXIMUM RELATIVE ERROR OF     0.1453e-06 =    2 ** -22.71
    OCCURRED FOR X =     0.115813e+01
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.29


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.5530e-07 =    2 ** -24.11
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.  


1SPECIAL TESTS


 THE IDENTITY   TANH(-X) = -TANH(X)   WILL BE TESTED.

        X         F(X) + F(-X)

  0.8272786e+00  0.0000000e+00

  0.4098293e+00  0.0000000e+00

  0.2286662e+00  0.0000000e+00

  0.5832699e+00  0.0000000e+00

  0.9087355e+00  0.0000000e+00

 THE IDENTITY TANH(X) = X , X SMALL, WILL BE TESTED.

        X         X - F(X)

  0.3528241e-07  0.0000000e+00

  0.1764120e-07  0.0000000e+00

  0.8820602e-08  0.0000000e+00

  0.4410301e-08  0.0000000e+00

  0.2205151e-08  0.0000000e+00

 THE IDENTITY TANH(X) = 1 , X LARGE, WILL BE TESTED.

        X         1 - F(X)

  0.9357488e+01  0.0000000e+00

  0.1335749e+02  0.0000000e+00

  0.1735749e+02  0.0000000e+00

  0.2135749e+02  0.0000000e+00

  0.2535749e+02  0.0000000e+00

 TEST OF UNDERFLOW FOR VERY SMALL ARGUMENT.

       TANH( 0.126218e-28) = 0.126218e-28

 THE FUNCTION TANH WILL BE CALLED WITH THE ARGUMENT  0.1701412e+39
       TANH( 0.170141e+39) = 0.100000e+01

 THE FUNCTION TANH WILL BE CALLED WITH THE ARGUMENT  0.2938736e-38
       TANH( 0.293874e-38) = 0.293874e-38

 THE FUNCTION TANH WILL BE CALLED WITH THE ARGUMENT  0.0000000e+00
       TANH( 0.000000e+00) = 0.000000e+00

 THIS CONCLUDES THE TESTS
