compiler_version: pgf90 16.3-0 compiler_options: fun.f90 -c -Minform=warn -g -Kieee 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)=( -1.797693134862316E+308, +0.000000000000000E+000 ) LOG(z)=( +7.097827128933840E+002, +3.141592653589793E+000 ) PASS z=(-1,+0)=( -1.000000000000000E+000, +0.000000000000000E+000 ) LOG(z)=( +0.000000000000000E+000, +3.141592653589793E+000 ) PASS z=(-TINY,+0)=( -2.225073858507201E-308, +0.000000000000000E+000 ) LOG(z)=( -7.083964185322641E+002, +3.141592653589793E+000 ) PASS z=(-TINY,-0)=( -2.225073858507201E-308, -0.000000000000000E+000 ) LOG(z)=( -7.083964185322641E+002, -3.141592653589793E+000 ) PASS z=(-1,-0)=( -1.000000000000000E+000, -0.000000000000000E+000 ) LOG(z)=( +0.000000000000000E+000, -3.141592653589793E+000 ) PASS z=(-HUGE,-0)=( -1.797693134862316E+308, -0.000000000000000E+000 ) LOG(z)=( +7.097827128933840E+002, -3.141592653589793E+000 ) PASS ******* LOG, passed 6 out of 6 ***** SQRT ****** z=(-HUGE,+0)=( -1.797693134862316E+308, +0.000000000000000E+000 ) SQRT(z)=( +0.000000000000000E+000, +Inf ) FAIL z=(-1,+0)=( -1.000000000000000E+000, +0.000000000000000E+000 ) SQRT(z)=( +0.000000000000000E+000, +1.000000000000000E+000 ) PASS z=(-TINY,+0)=( -2.225073858507201E-308, +0.000000000000000E+000 ) SQRT(z)=( +0.000000000000000E+000, +1.491668146240041E-154 ) PASS z=(0,+0)=( +0.000000000000000E+000, +0.000000000000000E+000 ) SQRT(z)=( +0.000000000000000E+000, +0.000000000000000E+000 ) PASS z=(0,-0)=( +0.000000000000000E+000, -0.000000000000000E+000 ) SQRT(z)=( +0.000000000000000E+000, +0.000000000000000E+000 ) FAIL z=(-TINY,-0)=( -2.225073858507201E-308, -0.000000000000000E+000 ) SQRT(z)=( -0.000000000000000E+000, +1.491668146240041E-154 ) FAIL z=(-1,-0)=( -1.000000000000000E+000, -0.000000000000000E+000 ) SQRT(z)=( -0.000000000000000E+000, +1.000000000000000E+000 ) FAIL z=(-HUGE,-0)=( -1.797693134862316E+308, -0.000000000000000E+000 ) SQRT(z)=( -0.000000000000000E+000, +Inf ) FAIL ****** SQRT, passed 3 out of 8 ****** ASIN ****** z=(-HUGE,+0)=( -1.797693134862316E+308, +0.000000000000000E+000 ) ASIN(z)=( +1.570796326794897E+000, -Inf ) FAIL z=(-1,+0)=( -1.000000000000000E+000, +0.000000000000000E+000 ) ASIN(z)=( -1.570796326794897E+000, -0.000000000000000E+000 ) FAIL z=(-1,-0)=( -1.000000000000000E+000, -0.000000000000000E+000 ) ASIN(z)=( -1.570796326794897E+000, -0.000000000000000E+000 ) PASS z=(-HUGE,-0)=( -1.797693134862316E+308, -0.000000000000000E+000 ) ASIN(z)=( +1.570796326794897E+000, -Inf ) FAIL z=(+HUGE,+0)=( +1.797693134862316E+308, +0.000000000000000E+000 ) ASIN(z)=( -1.570796326794897E+000, -Inf ) FAIL z=(1,+0)=( +1.000000000000000E+000, +0.000000000000000E+000 ) ASIN(z)=( +1.570796326794897E+000, -0.000000000000000E+000 ) FAIL z=(1,-0)=( +1.000000000000000E+000, -0.000000000000000E+000 ) ASIN(z)=( +1.570796326794897E+000, -0.000000000000000E+000 ) PASS z=(+HUGE,-0)=( +1.797693134862316E+308, -0.000000000000000E+000 ) ASIN(z)=( -1.570796326794897E+000, -Inf ) FAIL ****** ASIN, passed 2 out of 8 ****** ACOS ****** z=(-HUGE,+0)=( -1.797693134862316E+308, +0.000000000000000E+000 ) ACOS(z)=( +0.000000000000000E+000, +Inf ) FAIL z=(-1,+0)=( -1.000000000000000E+000, +0.000000000000000E+000 ) ACOS(z)=( +3.141592653589793E+000, +0.000000000000000E+000 ) FAIL z=(-1,-0)=( -1.000000000000000E+000, -0.000000000000000E+000 ) ACOS(z)=( +3.141592653589793E+000, +0.000000000000000E+000 ) PASS z=(-HUGE,-0)=( -1.797693134862316E+308, -0.000000000000000E+000 ) ACOS(z)=( +0.000000000000000E+000, +Inf ) FAIL z=(+HUGE,+0)=( +1.797693134862316E+308, +0.000000000000000E+000 ) ACOS(z)=( +3.141592653589793E+000, +Inf ) FAIL z=(1,+0)=( +1.000000000000000E+000, +0.000000000000000E+000 ) ACOS(z)=( +0.000000000000000E+000, +0.000000000000000E+000 ) FAIL z=(1,-0)=( +1.000000000000000E+000, -0.000000000000000E+000 ) ACOS(z)=( +0.000000000000000E+000, +0.000000000000000E+000 ) PASS z=(+HUGE,-0)=( +1.797693134862316E+308, -0.000000000000000E+000 ) ACOS(z)=( +3.141592653589793E+000, +Inf ) FAIL ****** ACOS, passed 2 out of 8 ****** ATAN ****** z=(+0,+HUGE)=( +0.000000000000000E+000, +1.797693134862316E+308 ) ATAN(z)=( +1.570796326794897E+000, +NaN ) FAIL z=(+0,+1+EPS)=( +0.000000000000000E+000, +1.000000000000000E+000 ) ATAN(z)=( +1.570796326794897E+000, +1.836840028483855E+001 ) PASS z=(+0,+1)=( +0.000000000000000E+000, +1.000000000000000E+000 ) ATAN(z)=( +0.000000000000000E+000, +Inf ) PASS z=(-0,+1)=( -0.000000000000000E+000, +1.000000000000000E+000 ) ATAN(z)=( +0.000000000000000E+000, +Inf ) PASS z=(-0,+1+EPS)=( -0.000000000000000E+000, +1.000000000000000E+000 ) ATAN(z)=( +1.570796326794897E+000, +1.836840028483855E+001 ) FAIL z=(-0,+HUGE)=( -0.000000000000000E+000, +1.797693134862316E+308 ) ATAN(z)=( +1.570796326794897E+000, +NaN ) FAIL z=(-0,-HUGE)=( -0.000000000000000E+000, -1.797693134862316E+308 ) ATAN(z)=( -1.570796326794897E+000, +NaN ) FAIL z=(-0,-1-EPS)=( -0.000000000000000E+000, -1.000000000000000E+000 ) ATAN(z)=( -1.570796326794897E+000, -1.836840028483855E+001 ) PASS z=(-0,-1)=( -0.000000000000000E+000, -1.000000000000000E+000 ) ATAN(z)=( -0.000000000000000E+000, -Inf ) PASS z=(+0,-1)=( +0.000000000000000E+000, -1.000000000000000E+000 ) ATAN(z)=( +0.000000000000000E+000, -Inf ) PASS z=(+0,-1-EPS)=( +0.000000000000000E+000, -1.000000000000000E+000 ) ATAN(z)=( +1.570796326794897E+000, -1.836840028483855E+001 ) PASS z=(+0,-HUGE)=( +0.000000000000000E+000, -1.797693134862316E+308 ) ATAN(z)=( +1.570796326794897E+000, +NaN ) FAIL ****** ATAN, passed 7 out of 12 ***** TOTAL, passed 20 out of 42 **** CRACK1 ***** z=(+0,+0)=( +0.000000000000000E+000, +0.000000000000000E+000 ) crack1(z)=( +0.000000000000000E+000, +1.000000000000000E+000 ) PASS z=(-0,+0)=( -0.000000000000000E+000, +0.000000000000000E+000 ) crack1(z)=( -0.000000000000000E+000, +1.000000000000000E+000 ) PASS z=(+0,-0)=( +0.000000000000000E+000, -0.000000000000000E+000 ) crack1(z)=( +0.000000000000000E+000, +1.000000000000000E+000 ) FAIL z=(-0,-0)=( -0.000000000000000E+000, -0.000000000000000E+000 ) crack1(z)=( +0.000000000000000E+000, +1.000000000000000E+000 ) FAIL ****** CRACK1, passe 2 out of 4