1 /*-
2  * Copyright (c) 2008-2011 David Schultz <das@FreeBSD.org>
38 #include "test-utils.h"
70  * Test within a given tolerance.  The tolerance indicates relative error
91 	test_tol(func, -(z), -(result), tol);				\
95 	test_tol(func, -(z), result, tol);				\
105 	testall(func, -x, -result, exceptmask, excepts, checksign);	\
109 	testall(func, -x, result, exceptmask, excepts, checksign);	\
143 	testall_even(ccos, zero, CMPLXL(1.0, -0.0), ALL_STD_EXCEPT, 0, CS_BOTH);  in ATF_TC_BODY()
164 	 * Inf,NaN	+-Inf,NaN	Inf,NaN		1,+-0  in ATF_TC_BODY()
165 	 * 0,NaN	+-0,NaN		NaN,+-0		+-0,NaN  in ATF_TC_BODY()
166 	 * NaN,0	NaN,0		NaN,+-0		NaN,+-0  in ATF_TC_BODY()
244 	 * Inf,Inf	+-Inf,NaN inval	+-Inf,NaN inval	1,+-0  in ATF_TC_BODY()
246 	 * 0,Inf	+-0,NaN	inval	NaN,+-0 inval	+-0,NaN  in ATF_TC_BODY()
272 		testall_even(ccos, z, CMPLXL(c, -s), OPT_INEXACT, 0, CS_BOTH);  in ATF_TC_BODY()
313 		/* Real axis */  in ATF_TC_BODY()
321 		    -copysign(0, sin(nums[i]))), DBL_ULP());  in ATF_TC_BODY()
334 		    -copysign(0, sinf(nums[i]))), 2 * FLT_ULP());  in ATF_TC_BODY()
337 		/* Imaginary axis */  in ATF_TC_BODY()
345 		test_even_tol(ccos, z, CMPLXL(cosh(nums[i]), -0.0), DBL_ULP());  in ATF_TC_BODY()
354 		test_even_tol(ccosf, z, CMPLXL(coshf(nums[i]), -0.0),  in ATF_TC_BODY()
372 	 *     tanh(z) = (2cosh(0.5)sinh(0.5) + i) / (2 cosh(0.5)**2 - 1)  in ATF_TC_BODY()
373 	 * z = -0.5 + i Pi/2  in ATF_TC_BODY()
375 	 *     cosh(z) = -i sinh(0.5)  in ATF_TC_BODY()
376 	 *     tanh(z) = -coth(0.5)  in ATF_TC_BODY()
378 	 *     sinh(z) = (-sinh(1) + i cosh(1)) * sqrt(2)/2  in ATF_TC_BODY()
379 	 *     cosh(z) = (-cosh(1) + i sinh(1)) * sqrt(2)/2  in ATF_TC_BODY()
380 	 *     tanh(z) = (2cosh(1)sinh(1) - i) / (2cosh(1)**2 - 1)  in ATF_TC_BODY()
396 		{ -0.5L,  in ATF_TC_BODY()
401 		  -0.52109530549374736162242562641149156L,  in ATF_TC_BODY()
402 		  -2.16395341373865284877000401021802312L,  in ATF_TC_BODY()
406 		  -0.83099273328405698212637979852748608L,  in ATF_TC_BODY()
408 		  -1.09112278079550143030545602018565236L,  in ATF_TC_BODY()
411 		  -0.26580222883407969212086273981988897L }  in ATF_TC_BODY()
440 	    CMPLXL(1.0, 1.14990445285871196133287617611468468e-18L), 1.2);  in ATF_TC_BODY()
443 	    CMPLXL(1.0, 1.55622644822675930314266334585597964e-19L), 1);  in ATF_TC_BODY()
447 		     CMPLXL(1.0, 8.95257245135025991216632140458264468e-309L),  in ATF_TC_BODY()
451 		     CMPLXL(1.0, -1.62994325413993477997492170229268382e-26L),  in ATF_TC_BODY()
456 			    -0.225462792499754505792678258169527424L),  in ATF_TC_BODY()