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


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (1-EPS,1+EPS), WHERE EPS =     0.7629D-05


 DLOG(X) WAS LARGER   489 TIMES,
             AGREED  1213 TIMES, AND
        WAS SMALLER   298 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.3591D-15 =    2 ** -51.31
    OCCURRED FOR X =     0.100000D+01
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.69


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.1017D-15 =    2 ** -53.13
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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


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


 DLOG(X) WAS LARGER     0 TIMES,
             AGREED  1253 TIMES, AND
        WAS SMALLER   747 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.3599D-15 =    2 ** -51.30
    OCCURRED FOR X =     0.734574D+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.70


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.1032D-15 =    2 ** -53.11
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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


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


 DLOG10(X) WAS LARGER     0 TIMES,
               AGREED   793 TIMES, AND
          WAS SMALLER  1207 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.5844D-15 =    2 ** -50.60
    OCCURRED FOR X =     0.896416D+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   2.40


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.1654D-15 =    2 ** -52.43
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.57


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


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


 DLOG(X) WAS LARGER    74 TIMES,
             AGREED  1926 TIMES, AND
        WAS SMALLER     0 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.2212D-15 =    2 ** -52.01
    OCCURRED FOR X =     0.554489D+02
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.99


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.3261D-16 =    2 ** -54.77
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


1SPECIAL TESTS


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

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

  0.1598332D+02  0.44408920985006262D-15

  0.1533961D+02  0.00000000000000000D+00

  0.1534757D+02  0.44408920985006262D-15

  0.1581323D+02  0.00000000000000000D+00

  0.1574018D+02  0.00000000000000000D+00



 TEST OF SPECIAL ARGUMENTS


 DLOG(1.0) =   0.00000000000000000D+00


 DLOG(XMIN) = DLOG(  0.49406564584124654-323) = Infinity                 


 DLOG(XMAX) = DLOG(Infinity                 ) = Infinity                 


1TEST OF ERROR RETURNS


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


 DLOG RETURNED THE VALUENaN            



 DLOG WILL BE CALLED WITH THE ARGUMENT     0.0000D+00
 THIS SHOULD TRIGGER AN ERROR MESSAGE


 DLOG RETURNED THE VALUEInfi000000000000000000000000000000000000000000000000



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


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


 DASIN(X) WAS LARGER   528 TIMES,
              AGREED   992 TIMES, AND
         WAS SMALLER   480 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.2220D-15 =    2 ** -52.00
    OCCURRED FOR X =    -0.124676D+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.1121D-15 =    2 ** -52.99
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.01


1TEST OF DACOS(X) VS TAYLOR SERIES 


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


 DACOS(X) WAS LARGER     0 TIMES,
             AGREED  1433 TIMES, AND
        WAS SMALLER   567 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.1536D-15 =    2 ** -52.53
    OCCURRED FOR X =     0.124894D+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.47


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.7551D-16 =    2 ** -53.56
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


1TEST OF DASIN(X) VS TAYLOR SERIES 


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


 DASIN(X) WAS LARGER    30 TIMES,
              AGREED  1168 TIMES, AND
         WAS SMALLER   802 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.2218D-15 =    2 ** -52.00
    OCCURRED FOR X =     0.841981D+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.1042D-15 =    2 ** -53.09
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


1TEST OF DACOS(X) VS TAYLOR SERIES 


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


 DACOS(X) WAS LARGER   504 TIMES,
             AGREED  1023 TIMES, AND
        WAS SMALLER   473 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.2220D-15 =    2 ** -52.00
    OCCURRED FOR X =     0.877500D+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.1173D-15 =    2 ** -52.92
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.08


1TEST OF DACOS(X) VS TAYLOR SERIES 


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


 DACOS(X) WAS LARGER     0 TIMES,
             AGREED  1457 TIMES, AND
        WAS SMALLER   543 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.1835D-15 =    2 ** -52.27
    OCCURRED FOR X =    -0.750416D+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.73


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.8771D-16 =    2 ** -53.34
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


1SPECIAL TESTS


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

        X         F(X) + F(-X)

 -0.8570483D+00  0.00000000000000000D+00

 -0.3795332D+00  0.00000000000000000D+00

 -0.2069628D+00  0.00000000000000000D+00

 -0.7937374D+00  0.00000000000000000D+00

 -0.1474389D+00  0.00000000000000000D+00

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

        X         X - F(X)

  0.8129991D-16  0.00000000000000000D+00

  0.4064995D-16  0.00000000000000000D+00

  0.2032498D-16  0.00000000000000000D+00

  0.1016249D-16  0.00000000000000000D+00

  0.5081244D-17  0.00000000000000000D+00

 TEST OF UNDERFLOW FOR VERY SMALL ARGUMENT.

       DASIN( 0.331389-242) = 0.331389-242

1TEST OF ERROR RETURNS


 DASIN WILL BE CALLED WITH THE ARGUMENT     0.1200D+01
 THIS SHOULD TRIGGER AN ERROR MESSAGE


 DASIN RETURNED THE VALUEInfi           



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


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


 DATAN(X) WAS LARGER   359 TIMES,
              AGREED  1162 TIMES, AND
         WAS SMALLER   479 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.2220D-15 =    2 ** -52.00
    OCCURRED FOR X =     0.312732D-01
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.1030D-15 =    2 ** -53.11
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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


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


 DATAN(X) WAS LARGER   286 TIMES,
              AGREED  1349 TIMES, AND
         WAS SMALLER   365 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.2218D-15 =    2 ** -52.00
    OCCURRED FOR X =     0.255618D+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.8811D-16 =    2 ** -53.33
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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


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


 DATAN(X) WAS LARGER   300 TIMES,
              AGREED  1449 TIMES, AND
         WAS SMALLER   251 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.2119D-15 =    2 ** -52.07
    OCCURRED FOR X =     0.268087D+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.93


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.9079D-16 =    2 ** -53.29
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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


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


 DATAN(X) WAS LARGER   139 TIMES,
              AGREED  1727 TIMES, AND
         WAS SMALLER   134 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.2714D-15 =    2 ** -51.71
    OCCURRED FOR X =     0.433570D+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.29


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.5817D-16 =    2 ** -53.93
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


1SPECIAL TESTS


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

        X         F(X) + F(-X)

  0.3786934D+01  0.00000000000000000D+00

  0.8369797D+00  0.00000000000000000D+00

  0.2806985D+01  0.00000000000000000D+00

  0.4141307D+01  0.00000000000000000D+00

  0.2921555D+01  0.00000000000000000D+00

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

        X         X - F(X)

  0.9530362D-16  0.00000000000000000D+00

  0.4765181D-16  0.00000000000000000D+00

  0.2382591D-16  0.00000000000000000D+00

  0.1191295D-16  0.00000000000000000D+00

  0.5956476D-17  0.00000000000000000D+00

 THE IDENTITY DATAN(X/Y) = DATAN2(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.1169997D+01  0.8020087D+00  0.00000000000000000D+00 -0.31415926535897931D+01

 -0.4592220D+00  0.6639704D+00  0.00000000000000000D+00  0.31415926535897931D+01

  0.1494548D+00  0.3078682D+00  0.00000000000000000D+00 -0.31415926535897931D+01

 -0.2371523D+00  0.1237900D+00  0.00000000000000000D+00  0.31415926535897931D+01

 -0.1124315D+01  0.6431007D+00  0.00000000000000000D+00  0.31415926535897931D+01

 TEST OF UNDERFLOW FOR VERY SMALL ARGUMENT.

       DATAN( 0.331389-242) = 0.331389-242

1TEST OF ERROR RETURNS


 DATAN WILL BE CALLED WITH THE ARGUMENTInfinit6535897931
 THIS SHOULD NOT TRIGGER AN ERROR MESSAGE

       DATAN(Infinit6535897931) = 0.157080D+01

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

       DATAN2( 0.100000D+01 0.000000D+00) = 0.157080D+01

 DATAN2 WILL BE CALLED WITH THE ARGUMENTS
  0.4940656-323Infinit        
 THIS SHOULD NOT TRIGGER AN ERROR MESSAGE

       DATAN2( 0.494066-323Infini       ) = 0.000000D+00

 DATAN2 WILL BE CALLED WITH THE ARGUMENTS
Infinit00000000000000000000000000000000000000000000000  0.4940656-323
 THIS SHOULD NOT TRIGGER AN ERROR MESSAGE

       DATAN2(Infini6       0.494066-323) = 0.157080D+01

 DATAN2 WILL BE CALLED WITH THE ARGUMENTS
  0.0000000D+00  0.0000000D+00
 THIS SHOULD TRIGGER AN ERROR MESSAGE


       DATAN2( 0.000000D+00 0.000000D+00) =NaN          

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


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


 DEXP(X-V) WAS LARGER   303 TIMES,
              AGREED  1363 TIMES, AND
         WAS SMALLER   334 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.3132D-15 =    2 ** -51.50
    OCCURRED FOR X =    -0.281317D+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.50


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.9027D-16 =    2 ** -53.30
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (    -0.3466D+01,    -0.7063D+03)


 DEXP(X-V) WAS LARGER   314 TIMES,
              AGREED  1332 TIMES, AND
         WAS SMALLER   354 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.3121D-15 =    2 ** -51.51
    OCCURRED FOR X =    -0.486197D+03
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.49


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.9419D-16 =    2 ** -53.24
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.6931D+01,Infi           )


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


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


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


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


1SPECIAL TESTS


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

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

  0.4969983D+00  0.00000000000000000D+00

  0.1597669D+01  0.00000000000000000D+00

  0.1584547D+01  0.00000000000000000D+00

  0.5408677D+00  0.00000000000000000D+00

  0.1058453D+01 -0.22204460492503131D-15



 TEST OF SPECIAL ARGUMENTS


 DEXP(0.0) - 1.0D+00 =   0.0000000D+00

 DEXP(Infini0000000000000000000000000000000000000000000000000) = 0.494066-323

 DEXP(Infini       ) =Infini       

0IF DEXP(Infini       ) = Infinity                IS NOT ABOUT
 DEXP(Infinity     )**2 = Infinity                THERE IS AN ARG RED ERROR
1TEST OF ERROR RETURNS


0EXP WILL BE CALLED WITH THE ARGUMENT    -0.4499+162
 THIS SHOULD TRIGGER AN ERROR MESSAGE


 DEXP RETURNED THE VALUE     0.4941-323



0EXP WILL BE CALLED WITH THE ARGUMENT     0.4499+162
 THIS SHOULD TRIGGER AN ERROR MESSAGE


 DEXP RETURNED THE VALUEInfi           



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


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


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


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


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


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.0000D+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.5000D+00,     0.1000D+01)


 X**1.5 WAS LARGER    86 TIMES,
            AGREED  1802 TIMES, AND
       WAS SMALLER   112 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.2056D-15 =    2 ** -52.11
    OCCURRED FOR X =     0.814353D+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.89


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.4776D-16 =    2 ** -54.22
 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.1000D+01,Infi           )


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


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


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


 THE ROOT MEAN SQUARE RELATIVE ERROR WASNaN             =    2 **   0.00
 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.1000D-01,     0.1000D+02), Y IN (Infi           ,NaN            )


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


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


 THE MAXIMUM RELATIVE ERROR OFNaN             =    2 **   0.00
    OCCURRED FOR X =     0.999767D+01 Y =NaN              
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WASNaN             =    2 **   0.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.9376345D+01  0.1384936D+01        0.1600868D-15

  0.5629481D+01  0.6648109D+01       -0.4475541D-15

  0.2706868D+01  0.1081573D+02        0.3058252D-15

  0.1760724D+01  0.7319591D+01       -0.2260787D-15

  0.4613214D+01  0.7469720D+01       -0.1595876D-15

1TEST OF ERROR RETURNS


 ( 0.2000000D+01 ) ** (-0.1074000D+04 ) WILL BE COMPUTED.
 THIS SHOULD NOT TRIGGER AN ERROR MESSAGE


 THE VALUE RETURNED IS     0.4941-323



 ( 0.2000000D+01 ) ** ( 0.3020000D+04 ) WILL BE COMPUTED.
 THIS SHOULD NOT TRIGGER AN ERROR MESSAGE


 THE VALUE RETURNED ISInfi000        



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


 THE VALUE RETURNED IS     0.0000D+00



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


 THE VALUE RETURNED IS     0.1000D+01



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


 THE VALUE RETURNED IS     0.4000D+01



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


 THE VALUE RETURNED IS     0.1000D+01



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


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


 DSIN(X) WAS LARGER   342 TIMES,
            AGREED  1228 TIMES, AND
       WAS SMALLER   430 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.2873D-15 =    2 ** -51.63
    OCCURRED FOR X =     0.967701D-01
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.37


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.8891D-16 =    2 ** -53.32
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


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


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


 DSIN(X) WAS LARGER   430 TIMES,
            AGREED  1004 TIMES, AND
       WAS SMALLER   566 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.3209D-15 =    2 ** -51.47
    OCCURRED FOR X =     0.196138D+02
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.53


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.1129D-15 =    2 ** -52.98
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.02


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


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


 DCOS(X) WAS LARGER   302 TIMES,
            AGREED  1010 TIMES, AND
       WAS SMALLER   688 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.4242D-15 =    2 ** -51.07
    OCCURRED FOR X =     0.235538D+02
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.93


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.1085D-15 =    2 ** -53.03
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


1SPECIAL TESTS


 IF  0.100000D+01 IS NOT ALMOST 1.0D+00,    DSIN HAS THE WRONG PERIOD.  


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

        X         F(X) + F(-X)

  0.1357806D+02  0.00000000000000000D+00

  0.5377632D+01  0.00000000000000000D+00

  0.1302793D+02  0.00000000000000000D+00

  0.4997217D+01  0.00000000000000000D+00

  0.6650451D+01  0.00000000000000000D+00

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

        X         X - F(X)

  0.8565047D-16  0.00000000000000000D+00

  0.4282523D-16  0.00000000000000000D+00

  0.2141262D-16  0.00000000000000000D+00

  0.1070631D-16  0.00000000000000000D+00

  0.5353154D-17  0.00000000000000000D+00

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

        X         F(X) - F(-X)

  0.4362607D+01  0.00000000000000000D+00

  0.5742273D+01  0.00000000000000000D+00

  0.1797722D+02  0.00000000000000000D+00

  0.1683830D+02  0.00000000000000000D+00

  0.1519520D+02  0.00000000000000000D+00

 TEST OF UNDERFLOW FOR VERY SMALL ARGUMENT.

       DSIN( 0.3313893083842063-242) = 0.3313893083842063-242
 THE FOLLOWING THREE LINES ILLUSTRATE THE LOSS IN SIGNIFICANCE
 FOR LARGE ARGUMENTS.  THE ARGUMENTS ARE CONSECUTIVE.

       DSIN( 0.9490626562425154D+08) = 0.9419570571788557D+00

       DSIN( 0.9490626562425156D+08) = 0.9419570521760383D+00

       DSIN( 0.9490626562425157D+08) = 0.9419570471732208D+00
1TEST OF ERROR RETURNS


 DSIN WILL BE CALLED WITH THE ARGUMENT     0.9007D+16
 THIS SHOULD TRIGGER AN ERROR MESSAGE


 DSIN RETURNED THE VALUE     0.0000D+00



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


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


 DSINH(X) WAS LARGER   539 TIMES,
              AGREED   934 TIMES, AND
         WAS SMALLER   527 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.4419D-15 =    2 ** -51.01
    OCCURRED FOR X =     0.313999D-01
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.99


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.1276D-15 =    2 ** -52.80
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.20


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


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


 DCOSH(X) WAS LARGER   392 TIMES,
             AGREED  1258 TIMES, AND
        WAS SMALLER   350 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.2220D-15 =    2 ** -52.00
    OCCURRED FOR X =     0.820749D-03
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.00


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.1300D-15 =    2 ** -52.77
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.23


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


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.3000D+01,Infi           )


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


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


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


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


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


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.3000D+01,Infi           )


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


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


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


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


1SPECIAL TESTS


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

        X         F(X) + F(-X)

  0.2799016D+01  0.00000000000000000D+00

  0.6197683D+00  0.00000000000000000D+00

  0.2879801D+01  0.00000000000000000D+00

  0.2883944D+01  0.00000000000000000D+00

  0.1625756D+01  0.00000000000000000D+00

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

        X         X - F(X)

  0.5344542D-16  0.00000000000000000D+00

  0.2672271D-16  0.00000000000000000D+00

  0.1336135D-16  0.00000000000000000D+00

  0.6680677D-17  0.00000000000000000D+00

  0.3340339D-17  0.00000000000000000D+00

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

        X         F(X) - F(-X)

  0.2321169D+01  0.00000000000000000D+00

  0.1272770D+01  0.00000000000000000D+00

  0.3520453D-01  0.00000000000000000D+00

  0.1070712D+01  0.00000000000000000D+00

  0.1874405D+01  0.00000000000000000D+00

 TEST OF UNDERFLOW FOR VERY SMALL ARGUMENT.

       DSINH( 0.331389-242) = 0.331389-242

1TEST OF ERROR RETURNS


 DSINH WILL BE CALLED WITH THE ARGUMENTInfi89         
 THIS SHOULD NOT TRIGGER AN ERROR MESSAGE


 DSINH RETURNED THE VALUEInfi89         



0DSINH WILL BE CALLED WITH THE ARGUMENT     0.9007D+16
 THIS SHOULD TRIGGER AN ERROR MESSAGE


 DSINH RETURNED THE VALUEInfi           



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


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


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


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


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


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


1TEST OF DSQRT(X*X) - X 


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


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


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


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


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


1TEST OF SPECIAL ARGUMENTS


 DSQRT(XMIN) = DSQRT(  0.49406564584124654-323) =   0.22227587494850775-161


 DSQRT(1-EPSNEG) = DSQRT(1-  0.1110223D-15) =   0.99999999999999989D+00


 DSQRT(1.0) = DSQRT(  0.10000000000000000D+01) =   0.10000000000000000D+01


 DSQRT(1+EPS) = DSQRT(1+  0.2220446D-15) =   0.10000000000000000D+01


 DSQRT(XMAX) = DSQRT(Infinity                 ) = Infinity                 


1TEST OF ERROR RETURNS


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


 DSQRT RETURNED THE VALUE     0.0000D+00



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


 DSQRT RETURNED THE VALUENaN            



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


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


 DTAN(X) WAS LARGER   583 TIMES,
             AGREED   880 TIMES, AND
        WAS SMALLER   537 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.5802D-15 =    2 ** -50.61
    OCCURRED FOR X =     0.279504D+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   2.39


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.1465D-15 =    2 ** -52.60
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.40


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


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


 DTAN(X) WAS LARGER   479 TIMES,
             AGREED  1016 TIMES, AND
        WAS SMALLER   505 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.4279D-15 =    2 ** -51.05
    OCCURRED FOR X =     0.339544D+01
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   1.95


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.1241D-15 =    2 ** -52.84
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.16


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


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


 DTAN(X) WAS LARGER   570 TIMES,
             AGREED   880 TIMES, AND
        WAS SMALLER   550 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.4757D-15 =    2 ** -50.90
    OCCURRED FOR X =     0.190788D+02
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   2.10


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.1428D-15 =    2 ** -52.64
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.36


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


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


 DCOT(X) WAS LARGER   579 TIMES,
             AGREED   853 TIMES, AND
        WAS SMALLER   568 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.5043D-15 =    2 ** -50.82
    OCCURRED FOR X =     0.193659D+02
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   2.18


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.1571D-15 =    2 ** -52.50
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.50


1SPECIAL TESTS


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

        X         F(X) + F(-X)

  0.1544204D+02  0.00000000000000000D+00

  0.7636684D+01  0.00000000000000000D+00

  0.5502511D+01  0.00000000000000000D+00

  0.3914012D+01  0.00000000000000000D+00

  0.8480963D+01  0.00000000000000000D+00

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

        X         X - F(X)

  0.1572444D-16  0.00000000000000000D+00

  0.7862219D-17  0.00000000000000000D+00

  0.3931109D-17  0.00000000000000000D+00

  0.1965555D-17  0.00000000000000000D+00

  0.9827773D-18  0.00000000000000000D+00

 TEST OF UNDERFLOW FOR VERY SMALL ARGUMENT.

       DTAN( 0.3313893083842063-242) = 0.3313893083842063-242

 THE RELATIVE ERROR IN DTAN(11) IS  -0.7173797D-16 =    2 ** -53.63 WHERE

       DTAN( 0.1100000000000000D+02) =-0.2259508464541952D+03

 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.00


1TEST OF ERROR RETURNS


 DTAN WILL BE CALLED WITH THE ARGUMENT     0.6711D+08
 THIS SHOULD NOT TRIGGER AN ERROR MESSAGE


 DTAN RETURNED THE VALUE    -0.4638D+00



0DTAN WILL BE CALLED WITH THE ARGUMENT     0.9007D+16
 THIS SHOULD TRIGGER AN ERROR MESSAGE


 DTAN RETURNED THE VALUE     0.0000D+00



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


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


 DTANH(X) WAS LARGER   832 TIMES,
              AGREED   624 TIMES, AND
         WAS SMALLER   544 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.6803D-15 =    2 ** -50.38
    OCCURRED FOR X =     0.338793D+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   2.62


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.1880D-15 =    2 ** -52.24
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.76


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


   2000 RANDOM ARGUMENTS WERE TESTED FROM THE INTERVAL
      (     0.6743D+00,     0.1941D+02)


 DTANH(X) WAS LARGER   695 TIMES,
              AGREED   626 TIMES, AND
         WAS SMALLER   679 TIMES.


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


 THE MAXIMUM RELATIVE ERROR OF     0.4830D-15 =    2 ** -50.88
    OCCURRED FOR X =     0.847257D+00
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   2.12


 THE ROOT MEAN SQUARE RELATIVE ERROR WAS     0.1489D-15 =    2 ** -52.58
 THE ESTIMATED LOSS OF BASE   2 SIGNIFICANT DIGITS IS   0.42


1SPECIAL TESTS


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

        X         F(X) + F(-X)

  0.5017279D+00  0.00000000000000000D+00

  0.4981069D+00  0.00000000000000000D+00

  0.9202672D+00  0.00000000000000000D+00

  0.1755284D+00  0.00000000000000000D+00

  0.6310339D+00  0.00000000000000000D+00

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

        X         X - F(X)

  0.1005123D-15  0.12325951644078309D-31

  0.5025614D-16  0.61629758220391547D-32

  0.2512807D-16  0.30814879110195774D-32

  0.1256403D-16  0.15407439555097887D-32

  0.6282017D-17  0.77037197775489434D-33

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

        X         1 - F(X)

  0.1940812D+02  0.00000000000000000D+00

  0.2340812D+02  0.00000000000000000D+00

  0.2740812D+02  0.00000000000000000D+00

  0.3140812D+02  0.00000000000000000D+00

  0.3540812D+02  0.00000000000000000D+00

 TEST OF UNDERFLOW FOR VERY SMALL ARGUMENT.

       DTANH( 0.331389-242) = 0.331389-242

 THE FUNCTION DTANH WILL BE CALLED WITH THE ARGUMENTInfinit0000000000000000000000000000000000000000000000000000000000
       DTANH(Infinit0000000000000000000000000000000000000000000000000000000000) = 0.100000D+01

 THE FUNCTION DTANH WILL BE CALLED WITH THE ARGUMENT  0.4940656-323
       DTANH( 0.494066-323) = 0.494066-323

 THE FUNCTION DTANH WILL BE CALLED WITH THE ARGUMENT  0.0000000D+00
       DTANH( 0.000000D+00) = 0.000000D+00

 THIS CONCLUDES THE TESTS
