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     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.00


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


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  1434 TIMES, AND
        WAS SMALLER   566 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.4578E-07 =    2 ** -24.38
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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   922 TIMES, AND
          WAS SMALLER  1078 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.7765E-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.00


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.1175494E-37) =  -0.8733655E+02


 ALOG(XMAX) = ALOG(            Inf) =             NaN


1TEST OF ERROR RETURNS


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


 ALOG RETURNED THE VALUE            NaN



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


 ALOG RETURNED THE VALUE           -Inf



 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   494 TIMES,
             AGREED   997 TIMES, AND
        WAS SMALLER   509 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.781244E-02
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.5936E-07 =    2 ** -24.01
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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   482 TIMES,
             AGREED  1016 TIMES, AND
        WAS SMALLER   502 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.8246E-07 =    2 ** -23.53
    OCCURRED FOR X =     0.124868E+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.47


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.5346E-07 =    2 ** -24.16
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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   319 TIMES,
             AGREED  1359 TIMES, AND
        WAS SMALLER   322 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.1188E-06 =    2 ** -23.00
    OCCURRED FOR X =     0.843106E+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.5178E-07 =    2 ** -24.20
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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   385 TIMES,
             AGREED  1242 TIMES, AND
        WAS SMALLER   373 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.1186E-06 =    2 ** -23.01
    OCCURRED FOR X =     0.876389E+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.99


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.5536E-07 =    2 ** -24.11
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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   413 TIMES,
             AGREED  1211 TIMES, AND
        WAS SMALLER   376 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.9856E-07 =    2 ** -23.27
    OCCURRED FOR X =    -0.750104E+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.73


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.5630E-07 =    2 ** -24.08
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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.356998E-28) = 0.356998E-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            NaN



 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   522 TIMES,
             AGREED   987 TIMES, AND
        WAS SMALLER   491 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.312933E-01
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.5969E-07 =    2 ** -24.00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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   412 TIMES,
             AGREED  1405 TIMES, AND
        WAS SMALLER   183 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.255558E+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.4647E-07 =    2 ** -24.36
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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   259 TIMES,
             AGREED  1460 TIMES, AND
        WAS SMALLER   281 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.1135E-06 =    2 ** -23.07
    OCCURRED FOR X =     0.268896E+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.93


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.4756E-07 =    2 ** -24.33
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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   131 TIMES,
             AGREED  1739 TIMES, AND
        WAS SMALLER   130 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.547340E+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.3042E-07 =    2 ** -24.97
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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.356998E-28) = 0.356998E-28

1TEST OF ERROR RETURNS


 ATAN WILL BE CALLED WITH THE ARGUMENT            Inf
 THIS SHOULD NOT TRIGGER AN ERROR MESSAGE

       ATAN(          Inf) = 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.1175494E-37            Inf
 THIS SHOULD NOT TRIGGER AN ERROR MESSAGE

       ATAN2( 0.117549E-37          Inf) = 0.000000E+00

 ATAN2 WILL BE CALLED WITH THE ARGUMENTS
            Inf  0.1175494E-37
 THIS SHOULD NOT TRIGGER AN ERROR MESSAGE

       ATAN2(          Inf 0.117549E-37) = 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   255 TIMES,
              AGREED  1512 TIMES, AND
         WAS SMALLER   233 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.4262E-07 =    2 ** -24.48
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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


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


 EXP(X-V) WAS LARGER   243 TIMES,
              AGREED  1488 TIMES, AND
         WAS SMALLER   269 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.318433E+02
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.4387E-07 =    2 ** -24.44
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.6931E+01,            NaN)


 EXP(X-V) WAS LARGER  2000 TIMES,
              AGREED -2000 TIMES, AND
         WAS SMALLER  2000 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF            NaN =    2 **    NaN
    OCCURRED FOR X =              NaN
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS            NaN =    2 **    NaN
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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.870000E+02) = 0.164581E-37

 EXP(          NaN) =          Inf

0IF EXP(          NaN) =           Inf IS NOT ABOUT
 EXP(          NaN)**2 =           Inf THERE IS AN ARG RED ERROR
1TEST OF ERROR RETURNS


0EXP WILL BE CALLED WITH THE ARGUMENT    -0.9223E+19
 THIS SHOULD TRIGGER AN ERROR MESSAGE


 EXP RETURNED THE VALUE     0.0000E+00



0EXP WILL BE CALLED WITH THE ARGUMENT     0.9223E+19
 THIS SHOULD TRIGGER AN ERROR MESSAGE


 EXP RETURNED THE VALUE            Inf



 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.00


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


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     3 TIMES,
            AGREED  1994 TIMES, AND
       WAS SMALLER     3 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.9209E-07 =    2 ** -23.37
    OCCURRED FOR X =     0.544922E+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.63


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.4210E-08 =    2 ** -27.82
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


1TEST OF XSQ**1.5 VS XSQ*X


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.1000E+01,            Inf)


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


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


 THE MAXIMUM RELATIVE ERROR OF            NaN =    2 **    NaN
    OCCURRED FOR X =              NaN
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS            NaN =    2 **    NaN
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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.1896E+02,     0.1896E+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.00


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


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.4649270E+01        0.9915110E-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.1260000E+03 ) WILL BE COMPUTED.
 THIS SHOULD NOT TRIGGER AN ERROR MESSAGE


 THE VALUE RETURNED IS     0.1175E-37



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


 THE VALUE RETURNED IS            Inf



 ( 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   371 TIMES,
            AGREED  1250 TIMES, AND
       WAS SMALLER   379 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.4668E-07 =    2 ** -24.35
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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   360 TIMES,
            AGREED  1283 TIMES, AND
       WAS SMALLER   357 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.1551E-06 =    2 ** -22.62
    OCCURRED FOR X =     0.197259E+02
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.38


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.4619E-07 =    2 ** -24.37
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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   379 TIMES,
            AGREED  1247 TIMES, AND
       WAS SMALLER   374 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.00


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.356998E-28) = 0.356998E-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   496 TIMES,
             AGREED   986 TIMES, AND
        WAS SMALLER   518 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.481326E+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.6082E-07 =    2 ** -23.97
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.03


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   502 TIMES,
             AGREED  1054 TIMES, AND
        WAS SMALLER   444 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.261001E-03
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.7895E-07 =    2 ** -23.59
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.41


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


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.3000E+01,            NaN)


 SINH(X) WAS LARGER  2000 TIMES,
             AGREED -2000 TIMES, AND
        WAS SMALLER  2000 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF            NaN =    2 **    NaN
    OCCURRED FOR X =              NaN
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS            NaN =    2 **    NaN
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.3000E+01,            NaN)


 COSH(X) WAS LARGER  2000 TIMES,
             AGREED -2000 TIMES, AND
        WAS SMALLER  2000 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF            NaN =    2 **    NaN
    OCCURRED FOR X =              NaN
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS            NaN =    2 **    NaN
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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.9096088E+00  0.0000000E+00

 TEST OF UNDERFLOW FOR VERY SMALL ARGUMENT.

       SINH( 0.356998E-28) = 0.356998E-28

1TEST OF ERROR RETURNS


 SINH WILL BE CALLED WITH THE ARGUMENT            NaN
 THIS SHOULD NOT TRIGGER AN ERROR MESSAGE


 SINH RETURNED THE VALUE            NaN



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


 SINH RETURNED THE VALUE            Inf



 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.00


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


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.00


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


1TEST OF SPECIAL ARGUMENTS


 SQRT(XMIN) = SQRT(  0.1175494E-37) =   0.1084202E-18


 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.1192093E-06) =   0.1000000E+01


 SQRT(XMAX) = SQRT(            Inf) =             Inf


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            NaN



 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   458 TIMES,
            AGREED  1066 TIMES, AND
       WAS SMALLER   476 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.2306E-06 =    2 ** -22.05
    OCCURRED FOR X =     0.322932E-01
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.95


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.6148E-07 =    2 ** -23.96
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.04


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   358 TIMES,
            AGREED  1275 TIMES, AND
       WAS SMALLER   367 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.00


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   425 TIMES,
            AGREED  1116 TIMES, AND
       WAS SMALLER   459 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.2086E-06 =    2 ** -22.19
    OCCURRED FOR X =     0.193687E+02
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.81


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.6004E-07 =    2 ** -23.99
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.01


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   505 TIMES,
            AGREED  1002 TIMES, AND
       WAS SMALLER   493 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.2244E-06 =    2 ** -22.09
    OCCURRED FOR X =     0.196046E+02
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.91


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.6821E-07 =    2 ** -23.81
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.19


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.356998E-28) = 0.356998E-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.00


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   634 TIMES,
             AGREED  1067 TIMES, AND
        WAS SMALLER   299 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.2099E-06 =    2 ** -22.18
    OCCURRED FOR X =     0.142935E+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.82


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.5736E-07 =    2 ** -24.06
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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   256 TIMES,
             AGREED   879 TIMES, AND
        WAS SMALLER   865 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.5373E-07 =    2 ** -24.15
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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.9357487E+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.356998E-28) = 0.356998E-28

 THE FUNCTION TANH WILL BE CALLED WITH THE ARGUMENT            Inf
       TANH(          Inf) = 0.100000E+01

 THE FUNCTION TANH WILL BE CALLED WITH THE ARGUMENT  0.1175494E-37
       TANH( 0.117549E-37) = 0.117549E-37

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

 THIS CONCLUDES THE TESTS
