Support for IEEE INF: T
 Support for IEEE NaN: T
 Support for IEEE subnormals: T
 IEEE support for chosen real kind: T
***** LOG *******
  z=(-HUGE,+0)=( -3.402823E+38, +0.000000E+00 ) 
        LOG(z)=( +8.872284E+01, +3.141593E+00 ) PASS
     z=(-1,+0)=( -1.000000E+00, +0.000000E+00 ) 
        LOG(z)=( +0.000000E+00, +3.141593E+00 ) PASS
  z=(-TINY,+0)=( -1.175494E-38, +0.000000E+00 ) 
        LOG(z)=( -8.733655E+01, +3.141593E+00 ) PASS
  z=(-TINY,-0)=( -1.175494E-38, +0.000000E+00 ) 
        LOG(z)=( -8.733655E+01, -3.141593E+00 ) PASS
     z=(-1,-0)=( -1.000000E+00, +0.000000E+00 ) 
        LOG(z)=( +0.000000E+00, -3.141593E+00 ) PASS
  z=(-HUGE,-0)=( -3.402823E+38, +0.000000E+00 ) 
        LOG(z)=( +8.872284E+01, -3.141593E+00 ) PASS
***** LOG,   passed  6 out of  6
***** SQRT ******
  z=(-HUGE,+0)=( -3.402823E+38, +0.000000E+00 ) 
       SQRT(z)=( +0.000000E+00, +1.844674E+19 ) PASS
     z=(-1,+0)=( -1.000000E+00, +0.000000E+00 ) 
       SQRT(z)=( +0.000000E+00, +1.000000E+00 ) PASS
  z=(-TINY,+0)=( -1.175494E-38, +0.000000E+00 ) 
       SQRT(z)=( +0.000000E+00, +1.084202E-19 ) PASS
      z=(0,+0)=( +0.000000E+00, +0.000000E+00 ) 
       SQRT(z)=( +0.000000E+00, +0.000000E+00 ) FAIL
      z=(0,-0)=( +0.000000E+00, +0.000000E+00 ) 
       SQRT(z)=( +0.000000E+00, +0.000000E+00 ) FAIL
  z=(-TINY,-0)=( -1.175494E-38, +0.000000E+00 ) 
       SQRT(z)=( +0.000000E+00, -1.084202E-19 ) PASS
     z=(-1,-0)=( -1.000000E+00, +0.000000E+00 ) 
       SQRT(z)=( +0.000000E+00, -1.000000E+00 ) PASS
  z=(-HUGE,-0)=( -3.402823E+38, +0.000000E+00 ) 
       SQRT(z)=( +0.000000E+00, -1.844674E+19 ) PASS
***** SQRT,  passed  6 out of  8
***** ASINH *****
  z=(+0,+HUGE)=( +0.000000E+00, +3.402823E+38 ) 
      ASINH(z)=(     +Infinity, +1.570796E+00 ) FAIL
     z=(+0,+1)=( +0.000000E+00, +1.000000E+00 ) 
      ASINH(z)=( +0.000000E+00, +1.570796E+00 ) PASS
     z=(-0,+1)=( +0.000000E+00, +1.000000E+00 ) 
      ASINH(z)=( +0.000000E+00, +1.570796E+00 ) FAIL
  z=(-0,+HUGE)=( +0.000000E+00, +3.402823E+38 ) 
      ASINH(z)=(     +Infinity, -1.570796E+00 ) FAIL
  z=(+0,-HUGE)=( +0.000000E+00, -3.402823E+38 ) 
      ASINH(z)=(     +Infinity, -1.570796E+00 ) FAIL
     z=(+0,-1)=( +0.000000E+00, -1.000000E+00 ) 
      ASINH(z)=( +0.000000E+00, -1.570796E+00 ) PASS
     z=(-0,-1)=( +0.000000E+00, -1.000000E+00 ) 
      ASINH(z)=( +0.000000E+00, -1.570796E+00 ) FAIL
  z=(-0,-HUGE)=( +0.000000E+00, -3.402823E+38 ) 
      ASINH(z)=(     +Infinity, +1.570796E+00 ) FAIL
***** ASINH, passed  2 out of  8
***** ACOSH *****
  z=(-HUGE,+0)=( -3.402823E+38, +0.000000E+00 ) 
      ACOSH(z)=(     +Infinity, +3.141593E+00 ) FAIL
     z=(-1,+0)=( -1.000000E+00, +0.000000E+00 ) 
      ACOSH(z)=( +0.000000E+00, +3.141593E+00 ) PASS
     z=(+0,+0)=( +0.000000E+00, +0.000000E+00 ) 
      ACOSH(z)=( +0.000000E+00, +1.570796E+00 ) PASS
     z=(+1,+0)=( +1.000000E+00, +0.000000E+00 ) 
      ACOSH(z)=( +0.000000E+00, +0.000000E+00 ) PASS
     z=(+1,-0)=( +1.000000E+00, +0.000000E+00 ) 
      ACOSH(z)=( +0.000000E+00, +0.000000E+00 ) PASS
     z=(+0,-0)=( +0.000000E+00, +0.000000E+00 ) 
      ACOSH(z)=( +0.000000E+00, -1.570796E+00 ) PASS
     z=(-1,-0)=( -1.000000E+00, +0.000000E+00 ) 
      ACOSH(z)=( +0.000000E+00, -3.141593E+00 ) PASS
  z=(-HUGE,-0)=( -3.402823E+38, +0.000000E+00 ) 
      ACOSH(z)=(     +Infinity, -3.141593E+00 ) FAIL
***** ACOSH, passed  6 out of  8
***** ATANH *****
  z=(+HUGE,+0)=( +3.402823E+38, +0.000000E+00 ) 
      ATANH(z)=(          -NaN, +1.570796E+00 ) FAIL
 z=(+1+EPS,+0)=( +1.000000E+00, +0.000000E+00 ) 
      ATANH(z)=( +8.317766E+00, +1.570796E+00 ) PASS
     z=(+1,+0)=( +1.000000E+00, +0.000000E+00 ) 
      ATANH(z)=(     +Infinity, +0.000000E+00 ) PASS
     z=(+1,-0)=( +1.000000E+00, +0.000000E+00 ) 
      ATANH(z)=(     +Infinity, +0.000000E+00 ) PASS
 z=(+1+EPS,-0)=( +1.000000E+00, +0.000000E+00 ) 
      ATANH(z)=( +8.317766E+00, -1.570796E+00 ) PASS
  z=(+HUGE,-0)=( +3.402823E+38, +0.000000E+00 ) 
      ATANH(z)=(          -NaN, -1.570796E+00 ) FAIL
  z=(-HUGE,+0)=( -3.402823E+38, +0.000000E+00 ) 
      ATANH(z)=(          -NaN, +1.570796E+00 ) FAIL
 z=(-1-EPS,+0)=( -1.000000E+00, +0.000000E+00 ) 
      ATANH(z)=( -8.317766E+00, +1.570796E+00 ) PASS
     z=(-1,+0)=( -1.000000E+00, +0.000000E+00 ) 
      ATANH(z)=(     -Infinity, +0.000000E+00 ) PASS
     z=(-1,-0)=( -1.000000E+00, +0.000000E+00 ) 
      ATANH(z)=(     -Infinity, +0.000000E+00 ) PASS
 z=(-1-EPS,-0)=( -1.000000E+00, +0.000000E+00 ) 
      ATANH(z)=( -8.317766E+00, -1.570796E+00 ) PASS
  z=(-HUGE,-0)=( -3.402823E+38, +0.000000E+00 ) 
      ATANH(z)=(          -NaN, -1.570796E+00 ) FAIL
***** ATANH, passed  8 out of 12
***** TOTAL, passed 28 out of 42
**** CRACK1 *****
     z=(+0,+0)=( +0.000000E+00, +0.000000E+00 ) 
     crack1(z)=( +0.000000E+00, +1.000000E+00 ) PASS
     z=(-0,+0)=( +0.000000E+00, +0.000000E+00 ) 
     crack1(z)=( +0.000000E+00, +1.000000E+00 ) PASS
     z=(+0,-0)=( +0.000000E+00, +0.000000E+00 ) 
     crack1(z)=( +0.000000E+00, -1.000000E+00 ) PASS
     z=(-0,-0)=( +0.000000E+00, +0.000000E+00 ) 
     crack1(z)=( +0.000000E+00, -1.000000E+00 ) PASS
**** CRACK1, passed  4 out of  4