]> git.ipfire.org Git - thirdparty/glibc.git/blob - math/libm-test.inc
Convert TEST_if_f tests from code to data.
[thirdparty/glibc.git] / math / libm-test.inc
1 /* Copyright (C) 1997-2013 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3 Contributed by Andreas Jaeger <aj@suse.de>, 1997.
4
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
9
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
14
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <http://www.gnu.org/licenses/>. */
18
19 /* Part of testsuite for libm.
20
21 This file is processed by a perl script. The resulting file has to
22 be included by a master file that defines:
23
24 Macros:
25 FUNC(function): converts general function name (like cos) to
26 name with correct suffix (e.g. cosl or cosf)
27 MATHCONST(x): like FUNC but for constants (e.g convert 0.0 to 0.0L)
28 FLOAT: floating point type to test
29 - TEST_MSG: informal message to be displayed
30 CHOOSE(Clongdouble,Cdouble,Cfloat,Cinlinelongdouble,Cinlinedouble,Cinlinefloat):
31 chooses one of the parameters as delta for testing
32 equality
33 PRINTF_EXPR Floating point conversion specification to print a variable
34 of type FLOAT with printf. PRINTF_EXPR just contains
35 the specifier, not the percent and width arguments,
36 e.g. "f".
37 PRINTF_XEXPR Like PRINTF_EXPR, but print in hexadecimal format.
38 PRINTF_NEXPR Like PRINTF_EXPR, but print nice. */
39
40 /* This testsuite has currently tests for:
41 acos, acosh, asin, asinh, atan, atan2, atanh,
42 cbrt, ceil, copysign, cos, cosh, erf, erfc, exp, exp10, exp2, expm1,
43 fabs, fdim, finite, floor, fma, fmax, fmin, fmod, fpclassify,
44 frexp, gamma, hypot,
45 ilogb, isfinite, isinf, isnan, isnormal, issignaling,
46 isless, islessequal, isgreater, isgreaterequal, islessgreater, isunordered,
47 j0, j1, jn,
48 ldexp, lgamma, log, log10, log1p, log2, logb,
49 modf, nearbyint, nextafter, nexttoward,
50 pow, remainder, remquo, rint, lrint, llrint,
51 round, lround, llround,
52 scalb, scalbn, scalbln, signbit, sin, sincos, sinh, sqrt, tan, tanh, tgamma, trunc,
53 y0, y1, yn, significand
54
55 and for the following complex math functions:
56 cabs, cacos, cacosh, carg, casin, casinh, catan, catanh,
57 ccos, ccosh, cexp, cimag, clog, clog10, conj, cpow, cproj, creal,
58 csin, csinh, csqrt, ctan, ctanh.
59
60 At the moment the following functions and macros aren't tested:
61 drem (alias for remainder),
62 lgamma_r,
63 nan,
64 pow10 (alias for exp10).
65
66 Parameter handling is primitive in the moment:
67 --verbose=[0..3] for different levels of output:
68 0: only error count
69 1: basic report on failed tests (default)
70 2: full report on all tests
71 -v for full output (equals --verbose=3)
72 -u for generation of an ULPs file
73 */
74
75 /* "Philosophy":
76
77 This suite tests some aspects of the correct implementation of
78 mathematical functions in libm. Some simple, specific parameters
79 are tested for correctness but there's no exhaustive
80 testing. Handling of specific inputs (e.g. infinity, not-a-number)
81 is also tested. Correct handling of exceptions is checked
82 against. These implemented tests should check all cases that are
83 specified in ISO C99.
84
85 Exception testing: At the moment only divide-by-zero, invalid,
86 overflow and underflow exceptions are tested. Inexact exceptions
87 aren't checked at the moment.
88
89 NaN values: There exist signalling and quiet NaNs. This implementation
90 only uses quiet NaN as parameter. Where the sign of a NaN is
91 significant, this is not tested. The payload of NaNs is not examined.
92
93 Inline functions: Inlining functions should give an improvement in
94 speed - but not in precission. The inlined functions return
95 reasonable values for a reasonable range of input values. The
96 result is not necessarily correct for all values and exceptions are
97 not correctly raised in all cases. Problematic input and return
98 values are infinity, not-a-number and minus zero. This suite
99 therefore does not check these specific inputs and the exception
100 handling for inlined mathematical functions - just the "reasonable"
101 values are checked.
102
103 Beware: The tests might fail for any of the following reasons:
104 - Tests are wrong
105 - Functions are wrong
106 - Floating Point Unit not working properly
107 - Compiler has errors
108
109 With e.g. gcc 2.7.2.2 the test for cexp fails because of a compiler error.
110
111
112 To Do: All parameter should be numbers that can be represented as
113 exact floating point values. Currently some values cannot be
114 represented exactly and therefore the result is not the expected
115 result. For this we will use 36 digits so that numbers can be
116 represented exactly. */
117
118 #ifndef _GNU_SOURCE
119 # define _GNU_SOURCE
120 #endif
121
122 #include "libm-test-ulps.h"
123 #include <complex.h>
124 #include <math.h>
125 #include <float.h>
126 #include <fenv.h>
127 #include <limits.h>
128
129 #include <errno.h>
130 #include <stdlib.h>
131 #include <stdio.h>
132 #include <string.h>
133 #include <argp.h>
134 #include <tininess.h>
135
136 /* Allow platforms without all rounding modes to test properly,
137 assuming they provide an __FE_UNDEFINED in <bits/fenv.h> which
138 causes fesetround() to return failure. */
139 #ifndef FE_TONEAREST
140 # define FE_TONEAREST __FE_UNDEFINED
141 #endif
142 #ifndef FE_TOWARDZERO
143 # define FE_TOWARDZERO __FE_UNDEFINED
144 #endif
145 #ifndef FE_UPWARD
146 # define FE_UPWARD __FE_UNDEFINED
147 #endif
148 #ifndef FE_DOWNWARD
149 # define FE_DOWNWARD __FE_UNDEFINED
150 #endif
151
152 /* Possible exceptions */
153 #define NO_EXCEPTION 0x0
154 #define INVALID_EXCEPTION 0x1
155 #define DIVIDE_BY_ZERO_EXCEPTION 0x2
156 #define OVERFLOW_EXCEPTION 0x4
157 #define UNDERFLOW_EXCEPTION 0x8
158 /* The next flags signals that those exceptions are allowed but not required. */
159 #define INVALID_EXCEPTION_OK 0x10
160 #define DIVIDE_BY_ZERO_EXCEPTION_OK 0x20
161 #define OVERFLOW_EXCEPTION_OK 0x40
162 #define UNDERFLOW_EXCEPTION_OK 0x80
163 #define EXCEPTIONS_OK INVALID_EXCEPTION_OK+DIVIDE_BY_ZERO_EXCEPTION_OK
164 /* Some special test flags, passed together with exceptions. */
165 #define IGNORE_ZERO_INF_SIGN 0x100
166 /* Indicate errno settings required or disallowed. */
167 #define ERRNO_UNCHANGED 0x200
168 #define ERRNO_EDOM 0x400
169 #define ERRNO_ERANGE 0x800
170
171 /* Values underflowing only for float. */
172 #ifdef TEST_FLOAT
173 # define UNDERFLOW_EXCEPTION_FLOAT UNDERFLOW_EXCEPTION
174 # define UNDERFLOW_EXCEPTION_OK_FLOAT UNDERFLOW_EXCEPTION_OK
175 #else
176 # define UNDERFLOW_EXCEPTION_FLOAT 0
177 # define UNDERFLOW_EXCEPTION_OK_FLOAT 0
178 #endif
179 /* Values underflowing only for double or types with a larger least
180 positive normal value. */
181 #if defined TEST_FLOAT || defined TEST_DOUBLE \
182 || (defined TEST_LDOUBLE && LDBL_MIN_EXP >= DBL_MIN_EXP)
183 # define UNDERFLOW_EXCEPTION_DOUBLE UNDERFLOW_EXCEPTION
184 # define UNDERFLOW_EXCEPTION_OK_DOUBLE UNDERFLOW_EXCEPTION_OK
185 #else
186 # define UNDERFLOW_EXCEPTION_DOUBLE 0
187 # define UNDERFLOW_EXCEPTION_OK_DOUBLE 0
188 #endif
189 /* Values underflowing only for IBM long double or types with a larger least
190 positive normal value. */
191 #if defined TEST_FLOAT || (defined TEST_LDOUBLE && LDBL_MIN_EXP > DBL_MIN_EXP)
192 # define UNDERFLOW_EXCEPTION_LDOUBLE_IBM UNDERFLOW_EXCEPTION
193 #else
194 # define UNDERFLOW_EXCEPTION_LDOUBLE_IBM 0
195 #endif
196 /* Values underflowing on architectures detecting tininess before
197 rounding, but not on those detecting tininess after rounding. */
198 #define UNDERFLOW_EXCEPTION_BEFORE_ROUNDING (TININESS_AFTER_ROUNDING \
199 ? 0 \
200 : UNDERFLOW_EXCEPTION)
201
202 /* Various constants (we must supply them precalculated for accuracy). */
203 #define M_PI_6l .52359877559829887307710723054658383L
204 #define M_E2l 7.389056098930650227230427460575008L
205 #define M_E3l 20.085536923187667740928529654581719L
206 #define M_2_SQRT_PIl 3.5449077018110320545963349666822903L /* 2 sqrt (M_PIl) */
207 #define M_SQRT_PIl 1.7724538509055160272981674833411451L /* sqrt (M_PIl) */
208 #define M_LOG_SQRT_PIl 0.57236494292470008707171367567652933L /* log(sqrt(M_PIl)) */
209 #define M_LOG_2_SQRT_PIl 1.265512123484645396488945797134706L /* log(2*sqrt(M_PIl)) */
210 #define M_PI_34l 2.356194490192344928846982537459627163L /* 3*pi/4 */
211 #define M_PI_34_LOG10El 1.023282265381381010614337719073516828L
212 #define M_PI2_LOG10El 0.682188176920920673742891812715677885L
213 #define M_PI4_LOG10El 0.341094088460460336871445906357838943L
214 #define M_PI_LOG10El 1.364376353841841347485783625431355770L
215 #define M_1_DIV_El 0.367879441171442321595523770161460867L /* 1 div e */
216
217 #define ulps_file_name "ULPs" /* Name of the ULPs file. */
218 static FILE *ulps_file; /* File to document difference. */
219 static int output_ulps; /* Should ulps printed? */
220 static char *output_dir; /* Directory where generated files will be written. */
221
222 static int noErrors; /* number of errors */
223 static int noTests; /* number of tests (without testing exceptions) */
224 static int noExcTests; /* number of tests for exception flags */
225 static int noErrnoTests;/* number of tests for errno values */
226
227 static int verbose;
228 static int output_max_error; /* Should the maximal errors printed? */
229 static int output_points; /* Should the single function results printed? */
230 static int ignore_max_ulp; /* Should we ignore max_ulp? */
231
232 #define PLUS_ZERO_INIT CHOOSE (0.0L, 0.0, 0.0f, \
233 0.0L, 0.0, 0.0f)
234 #define MINUS_ZERO_INIT CHOOSE (-0.0L, -0.0, -0.0f, \
235 -0.0L, -0.0, -0.0f)
236 #define PLUS_INFTY_INIT CHOOSE (HUGE_VALL, HUGE_VAL, HUGE_VALF, \
237 HUGE_VALL, HUGE_VAL, HUGE_VALF)
238 #define MINUS_INFTY_INIT CHOOSE (-HUGE_VALL, -HUGE_VAL, -HUGE_VALF, \
239 -HUGE_VALL, -HUGE_VAL, -HUGE_VALF)
240 #define QNAN_VALUE_INIT FUNC (__builtin_nan) ("")
241 #define MAX_VALUE_INIT CHOOSE (LDBL_MAX, DBL_MAX, FLT_MAX, \
242 LDBL_MAX, DBL_MAX, FLT_MAX)
243 #define MIN_VALUE_INIT CHOOSE (LDBL_MIN, DBL_MIN, FLT_MIN, \
244 LDBL_MIN, DBL_MIN, FLT_MIN)
245 #define MIN_SUBNORM_VALUE_INIT CHOOSE (__LDBL_DENORM_MIN__, \
246 __DBL_DENORM_MIN__, \
247 __FLT_DENORM_MIN__, \
248 __LDBL_DENORM_MIN__, \
249 __DBL_DENORM_MIN__, \
250 __FLT_DENORM_MIN__)
251
252 static const FLOAT plus_zero = PLUS_ZERO_INIT;
253 static const FLOAT minus_zero = MINUS_ZERO_INIT;
254 static const FLOAT plus_infty = PLUS_INFTY_INIT;
255 static const FLOAT minus_infty = MINUS_INFTY_INIT;
256 static const FLOAT qnan_value = QNAN_VALUE_INIT;
257 static const FLOAT max_value = MAX_VALUE_INIT;
258 static const FLOAT min_value = MIN_VALUE_INIT;
259 static const FLOAT min_subnorm_value = MIN_SUBNORM_VALUE_INIT;
260
261 static FLOAT max_error, real_max_error, imag_max_error;
262
263
264 #define BUILD_COMPLEX(real, imag) \
265 ({ __complex__ FLOAT __retval; \
266 __real__ __retval = (real); \
267 __imag__ __retval = (imag); \
268 __retval; })
269 #define BUILD_COMPLEX_ULP(real, imag) ((real) + I * (imag))
270
271 #define MANT_DIG CHOOSE ((LDBL_MANT_DIG-1), (DBL_MANT_DIG-1), (FLT_MANT_DIG-1), \
272 (LDBL_MANT_DIG-1), (DBL_MANT_DIG-1), (FLT_MANT_DIG-1))
273
274 static void
275 init_max_error (void)
276 {
277 max_error = 0;
278 real_max_error = 0;
279 imag_max_error = 0;
280 feclearexcept (FE_ALL_EXCEPT);
281 errno = 0;
282 }
283
284 static void
285 set_max_error (FLOAT current, FLOAT *curr_max_error)
286 {
287 if (current > *curr_max_error)
288 *curr_max_error = current;
289 }
290
291
292 /* Print a FLOAT. */
293 static void
294 print_float (FLOAT f)
295 {
296 /* As printf doesn't differ between a sNaN and a qNaN, do this manually. */
297 if (issignaling (f))
298 printf ("sNaN\n");
299 else if (isnan (f))
300 printf ("qNaN\n");
301 else
302 printf ("% .20" PRINTF_EXPR " % .20" PRINTF_XEXPR "\n", f, f);
303 }
304
305 /* Should the message print to screen? This depends on the verbose flag,
306 and the test status. */
307 static int
308 print_screen (int ok)
309 {
310 if (output_points
311 && (verbose > 1
312 || (verbose == 1 && ok == 0)))
313 return 1;
314 return 0;
315 }
316
317
318 /* Should the message print to screen? This depends on the verbose flag,
319 and the test status. */
320 static int
321 print_screen_max_error (int ok)
322 {
323 if (output_max_error
324 && (verbose > 1
325 || ((verbose == 1) && (ok == 0))))
326 return 1;
327 return 0;
328 }
329
330 /* Update statistic counters. */
331 static void
332 update_stats (int ok)
333 {
334 ++noTests;
335 if (!ok)
336 ++noErrors;
337 }
338
339 static void
340 print_ulps (const char *test_name, FLOAT ulp)
341 {
342 if (output_ulps)
343 {
344 fprintf (ulps_file, "Test \"%s\":\n", test_name);
345 fprintf (ulps_file, "%s: %.0" PRINTF_NEXPR "\n",
346 CHOOSE("ldouble", "double", "float",
347 "ildouble", "idouble", "ifloat"),
348 FUNC(ceil) (ulp));
349 }
350 }
351
352 static void
353 print_function_ulps (const char *function_name, FLOAT ulp)
354 {
355 if (output_ulps)
356 {
357 fprintf (ulps_file, "Function: \"%s\":\n", function_name);
358 fprintf (ulps_file, "%s: %.0" PRINTF_NEXPR "\n",
359 CHOOSE("ldouble", "double", "float",
360 "ildouble", "idouble", "ifloat"),
361 FUNC(ceil) (ulp));
362 }
363 }
364
365
366 static void
367 print_complex_function_ulps (const char *function_name, FLOAT real_ulp,
368 FLOAT imag_ulp)
369 {
370 if (output_ulps)
371 {
372 if (real_ulp != 0.0)
373 {
374 fprintf (ulps_file, "Function: Real part of \"%s\":\n", function_name);
375 fprintf (ulps_file, "%s: %.0" PRINTF_NEXPR "\n",
376 CHOOSE("ldouble", "double", "float",
377 "ildouble", "idouble", "ifloat"),
378 FUNC(ceil) (real_ulp));
379 }
380 if (imag_ulp != 0.0)
381 {
382 fprintf (ulps_file, "Function: Imaginary part of \"%s\":\n", function_name);
383 fprintf (ulps_file, "%s: %.0" PRINTF_NEXPR "\n",
384 CHOOSE("ldouble", "double", "float",
385 "ildouble", "idouble", "ifloat"),
386 FUNC(ceil) (imag_ulp));
387 }
388
389
390 }
391 }
392
393
394
395 /* Test if Floating-Point stack hasn't changed */
396 static void
397 fpstack_test (const char *test_name)
398 {
399 #if defined (__i386__) || defined (__x86_64__)
400 static int old_stack;
401 int sw;
402
403 asm ("fnstsw" : "=a" (sw));
404 sw >>= 11;
405 sw &= 7;
406
407 if (sw != old_stack)
408 {
409 printf ("FP-Stack wrong after test %s (%d, should be %d)\n",
410 test_name, sw, old_stack);
411 ++noErrors;
412 old_stack = sw;
413 }
414 #endif
415 }
416
417
418 static void
419 print_max_error (const char *func_name, FLOAT allowed)
420 {
421 int ok = 0;
422
423 if (max_error == 0.0 || (max_error <= allowed && !ignore_max_ulp))
424 {
425 ok = 1;
426 }
427
428 if (!ok)
429 print_function_ulps (func_name, max_error);
430
431
432 if (print_screen_max_error (ok))
433 {
434 printf ("Maximal error of `%s'\n", func_name);
435 printf (" is : %.0" PRINTF_NEXPR " ulp\n", FUNC(ceil) (max_error));
436 printf (" accepted: %.0" PRINTF_NEXPR " ulp\n", FUNC(ceil) (allowed));
437 }
438
439 update_stats (ok);
440 }
441
442
443 static void
444 print_complex_max_error (const char *func_name, __complex__ FLOAT allowed)
445 {
446 int ok = 0;
447
448 if ((real_max_error == 0 && imag_max_error == 0)
449 || (real_max_error <= __real__ allowed
450 && imag_max_error <= __imag__ allowed
451 && !ignore_max_ulp))
452 {
453 ok = 1;
454 }
455
456 if (!ok)
457 print_complex_function_ulps (func_name, real_max_error, imag_max_error);
458
459
460 if (print_screen_max_error (ok))
461 {
462 printf ("Maximal error of real part of: %s\n", func_name);
463 printf (" is : %.0" PRINTF_NEXPR " ulp\n",
464 FUNC(ceil) (real_max_error));
465 printf (" accepted: %.0" PRINTF_NEXPR " ulp\n",
466 FUNC(ceil) (__real__ allowed));
467 printf ("Maximal error of imaginary part of: %s\n", func_name);
468 printf (" is : %.0" PRINTF_NEXPR " ulp\n",
469 FUNC(ceil) (imag_max_error));
470 printf (" accepted: %.0" PRINTF_NEXPR " ulp\n",
471 FUNC(ceil) (__imag__ allowed));
472 }
473
474 update_stats (ok);
475 }
476
477
478 /* Test whether a given exception was raised. */
479 static void
480 test_single_exception (const char *test_name,
481 int exception,
482 int exc_flag,
483 int fe_flag,
484 const char *flag_name)
485 {
486 #ifndef TEST_INLINE
487 int ok = 1;
488 if (exception & exc_flag)
489 {
490 if (fetestexcept (fe_flag))
491 {
492 if (print_screen (1))
493 printf ("Pass: %s: Exception \"%s\" set\n", test_name, flag_name);
494 }
495 else
496 {
497 ok = 0;
498 if (print_screen (0))
499 printf ("Failure: %s: Exception \"%s\" not set\n",
500 test_name, flag_name);
501 }
502 }
503 else
504 {
505 if (fetestexcept (fe_flag))
506 {
507 ok = 0;
508 if (print_screen (0))
509 printf ("Failure: %s: Exception \"%s\" set\n",
510 test_name, flag_name);
511 }
512 else
513 {
514 if (print_screen (1))
515 printf ("%s: Exception \"%s\" not set\n", test_name,
516 flag_name);
517 }
518 }
519 if (!ok)
520 ++noErrors;
521
522 #endif
523 }
524
525
526 /* Test whether exceptions given by EXCEPTION are raised. Ignore thereby
527 allowed but not required exceptions.
528 */
529 static void
530 test_exceptions (const char *test_name, int exception)
531 {
532 ++noExcTests;
533 #ifdef FE_DIVBYZERO
534 if ((exception & DIVIDE_BY_ZERO_EXCEPTION_OK) == 0)
535 test_single_exception (test_name, exception,
536 DIVIDE_BY_ZERO_EXCEPTION, FE_DIVBYZERO,
537 "Divide by zero");
538 #endif
539 #ifdef FE_INVALID
540 if ((exception & INVALID_EXCEPTION_OK) == 0)
541 test_single_exception (test_name, exception, INVALID_EXCEPTION, FE_INVALID,
542 "Invalid operation");
543 #endif
544 #ifdef FE_OVERFLOW
545 if ((exception & OVERFLOW_EXCEPTION_OK) == 0)
546 test_single_exception (test_name, exception, OVERFLOW_EXCEPTION,
547 FE_OVERFLOW, "Overflow");
548 #endif
549 #ifdef FE_UNDERFLOW
550 if ((exception & UNDERFLOW_EXCEPTION_OK) == 0)
551 test_single_exception (test_name, exception, UNDERFLOW_EXCEPTION,
552 FE_UNDERFLOW, "Underflow");
553 #endif
554 feclearexcept (FE_ALL_EXCEPT);
555 }
556
557 /* Test whether errno for TEST_NAME, set to ERRNO_VALUE, has value
558 EXPECTED_VALUE (description EXPECTED_NAME). */
559 static void
560 test_single_errno (const char *test_name, int errno_value,
561 int expected_value, const char *expected_name)
562 {
563 if (errno_value == expected_value)
564 {
565 if (print_screen (1))
566 printf ("Pass: %s: errno set to %d (%s)\n", test_name, errno_value,
567 expected_name);
568 }
569 else
570 {
571 ++noErrors;
572 if (print_screen (0))
573 printf ("Failure: %s: errno set to %d, expected %d (%s)\n",
574 test_name, errno_value, expected_value, expected_name);
575 }
576 }
577
578 /* Test whether errno (value ERRNO_VALUE) has been for TEST_NAME set
579 as required by EXCEPTIONS. */
580 static void
581 test_errno (const char *test_name, int errno_value, int exceptions)
582 {
583 ++noErrnoTests;
584 if (exceptions & ERRNO_UNCHANGED)
585 test_single_errno (test_name, errno_value, 0, "unchanged");
586 if (exceptions & ERRNO_EDOM)
587 test_single_errno (test_name, errno_value, EDOM, "EDOM");
588 if (exceptions & ERRNO_ERANGE)
589 test_single_errno (test_name, errno_value, ERANGE, "ERANGE");
590 }
591
592 static void
593 check_float_internal (const char *test_name, FLOAT computed, FLOAT expected,
594 FLOAT max_ulp, int exceptions,
595 FLOAT *curr_max_error)
596 {
597 int ok = 0;
598 int print_diff = 0;
599 FLOAT diff = 0;
600 FLOAT ulp = 0;
601 int errno_value = errno;
602
603 test_exceptions (test_name, exceptions);
604 test_errno (test_name, errno_value, exceptions);
605 if (issignaling (computed) && issignaling (expected))
606 ok = 1;
607 else if (issignaling (computed) || issignaling (expected))
608 ok = 0;
609 else if (isnan (computed) && isnan (expected))
610 ok = 1;
611 else if (isinf (computed) && isinf (expected))
612 {
613 /* Test for sign of infinities. */
614 if ((exceptions & IGNORE_ZERO_INF_SIGN) == 0
615 && signbit (computed) != signbit (expected))
616 {
617 ok = 0;
618 printf ("infinity has wrong sign.\n");
619 }
620 else
621 ok = 1;
622 }
623 /* Don't calculate ULPs for infinities or any kind of NaNs. */
624 else if (isinf (computed) || isnan (computed)
625 || isinf (expected) || isnan (expected))
626 ok = 0;
627 else
628 {
629 diff = FUNC(fabs) (computed - expected);
630 switch (fpclassify (expected))
631 {
632 case FP_ZERO:
633 /* ilogb (0) isn't allowed. */
634 ulp = diff / FUNC(ldexp) (1.0, - MANT_DIG);
635 break;
636 case FP_NORMAL:
637 ulp = diff / FUNC(ldexp) (1.0, FUNC(ilogb) (expected) - MANT_DIG);
638 break;
639 case FP_SUBNORMAL:
640 /* 1ulp for a subnormal value, shifted by MANT_DIG, is the
641 least normal value. */
642 ulp = (FUNC(ldexp) (diff, MANT_DIG) / min_value);
643 break;
644 default:
645 /* It should never happen. */
646 abort ();
647 break;
648 }
649 set_max_error (ulp, curr_max_error);
650 print_diff = 1;
651 if ((exceptions & IGNORE_ZERO_INF_SIGN) == 0
652 && computed == 0.0 && expected == 0.0
653 && signbit(computed) != signbit (expected))
654 ok = 0;
655 else if (ulp <= 0.5 || (ulp <= max_ulp && !ignore_max_ulp))
656 ok = 1;
657 else
658 {
659 ok = 0;
660 print_ulps (test_name, ulp);
661 }
662
663 }
664 if (print_screen (ok))
665 {
666 if (!ok)
667 printf ("Failure: ");
668 printf ("Test: %s\n", test_name);
669 printf ("Result:\n");
670 printf (" is: ");
671 print_float (computed);
672 printf (" should be: ");
673 print_float (expected);
674 if (print_diff)
675 {
676 printf (" difference: % .20" PRINTF_EXPR " % .20" PRINTF_XEXPR
677 "\n", diff, diff);
678 printf (" ulp : % .4" PRINTF_NEXPR "\n", ulp);
679 printf (" max.ulp : % .4" PRINTF_NEXPR "\n", max_ulp);
680 }
681 }
682 update_stats (ok);
683
684 fpstack_test (test_name);
685 errno = 0;
686 }
687
688
689 static void
690 check_float (const char *test_name, FLOAT computed, FLOAT expected,
691 FLOAT max_ulp, int exceptions)
692 {
693 check_float_internal (test_name, computed, expected, max_ulp,
694 exceptions, &max_error);
695 }
696
697
698 static void
699 check_complex (const char *test_name, __complex__ FLOAT computed,
700 __complex__ FLOAT expected,
701 __complex__ FLOAT max_ulp,
702 int exception)
703 {
704 FLOAT part_comp, part_exp, part_max_ulp;
705 char *str;
706
707 if (asprintf (&str, "Real part of: %s", test_name) == -1)
708 abort ();
709
710 part_comp = __real__ computed;
711 part_exp = __real__ expected;
712 part_max_ulp = __real__ max_ulp;
713
714 check_float_internal (str, part_comp, part_exp, part_max_ulp,
715 exception, &real_max_error);
716 free (str);
717
718 if (asprintf (&str, "Imaginary part of: %s", test_name) == -1)
719 abort ();
720
721 part_comp = __imag__ computed;
722 part_exp = __imag__ expected;
723 part_max_ulp = __imag__ max_ulp;
724
725 /* Don't check again for exceptions or errno, just pass through the
726 zero/inf sign test. */
727 check_float_internal (str, part_comp, part_exp, part_max_ulp,
728 exception & IGNORE_ZERO_INF_SIGN,
729 &imag_max_error);
730 free (str);
731 }
732
733
734 /* Check that computed and expected values are equal (int values). */
735 static void
736 check_int (const char *test_name, int computed, int expected, int max_ulp,
737 int exceptions)
738 {
739 int diff = computed - expected;
740 int ok = 0;
741 int errno_value = errno;
742
743 test_exceptions (test_name, exceptions);
744 test_errno (test_name, errno_value, exceptions);
745 noTests++;
746 if (abs (diff) <= max_ulp)
747 ok = 1;
748
749 if (!ok)
750 print_ulps (test_name, diff);
751
752 if (print_screen (ok))
753 {
754 if (!ok)
755 printf ("Failure: ");
756 printf ("Test: %s\n", test_name);
757 printf ("Result:\n");
758 printf (" is: %d\n", computed);
759 printf (" should be: %d\n", expected);
760 }
761
762 update_stats (ok);
763 fpstack_test (test_name);
764 errno = 0;
765 }
766
767
768 /* Check that computed and expected values are equal (long int values). */
769 static void
770 check_long (const char *test_name, long int computed, long int expected,
771 long int max_ulp, int exceptions)
772 {
773 long int diff = computed - expected;
774 int ok = 0;
775 int errno_value = errno;
776
777 test_exceptions (test_name, exceptions);
778 test_errno (test_name, errno_value, exceptions);
779 noTests++;
780 if (labs (diff) <= max_ulp)
781 ok = 1;
782
783 if (!ok)
784 print_ulps (test_name, diff);
785
786 if (print_screen (ok))
787 {
788 if (!ok)
789 printf ("Failure: ");
790 printf ("Test: %s\n", test_name);
791 printf ("Result:\n");
792 printf (" is: %ld\n", computed);
793 printf (" should be: %ld\n", expected);
794 }
795
796 update_stats (ok);
797 fpstack_test (test_name);
798 errno = 0;
799 }
800
801
802 /* Check that computed value is true/false. */
803 static void
804 check_bool (const char *test_name, int computed, int expected,
805 long int max_ulp, int exceptions)
806 {
807 int ok = 0;
808 int errno_value = errno;
809
810 test_exceptions (test_name, exceptions);
811 test_errno (test_name, errno_value, exceptions);
812 noTests++;
813 if ((computed == 0) == (expected == 0))
814 ok = 1;
815
816 if (print_screen (ok))
817 {
818 if (!ok)
819 printf ("Failure: ");
820 printf ("Test: %s\n", test_name);
821 printf ("Result:\n");
822 printf (" is: %d\n", computed);
823 printf (" should be: %d\n", expected);
824 }
825
826 update_stats (ok);
827 fpstack_test (test_name);
828 errno = 0;
829 }
830
831
832 /* check that computed and expected values are equal (long int values) */
833 static void
834 check_longlong (const char *test_name, long long int computed,
835 long long int expected,
836 long long int max_ulp,
837 int exceptions)
838 {
839 long long int diff = computed - expected;
840 int ok = 0;
841 int errno_value = errno;
842
843 test_exceptions (test_name, exceptions);
844 test_errno (test_name, errno_value, exceptions);
845 noTests++;
846 if (llabs (diff) <= max_ulp)
847 ok = 1;
848
849 if (!ok)
850 print_ulps (test_name, diff);
851
852 if (print_screen (ok))
853 {
854 if (!ok)
855 printf ("Failure:");
856 printf ("Test: %s\n", test_name);
857 printf ("Result:\n");
858 printf (" is: %lld\n", computed);
859 printf (" should be: %lld\n", expected);
860 }
861
862 update_stats (ok);
863 fpstack_test (test_name);
864 errno = 0;
865 }
866
867 /* Structures for each kind of test. */
868 struct test_f_f_data
869 {
870 const char *test_name;
871 FLOAT arg;
872 FLOAT expected;
873 FLOAT max_ulp;
874 int exceptions;
875 };
876 struct test_ff_f_data
877 {
878 const char *test_name;
879 FLOAT arg1, arg2;
880 FLOAT expected;
881 FLOAT max_ulp;
882 int exceptions;
883 };
884 struct test_ff_f_data_nexttoward
885 {
886 const char *test_name;
887 FLOAT arg1;
888 long double arg2;
889 FLOAT expected;
890 FLOAT max_ulp;
891 int exceptions;
892 };
893 struct test_if_f_data
894 {
895 const char *test_name;
896 int arg1;
897 FLOAT arg2;
898 FLOAT expected;
899 FLOAT max_ulp;
900 int exceptions;
901 };
902 struct test_fff_f_data
903 {
904 const char *test_name;
905 FLOAT arg1, arg2, arg3;
906 FLOAT expected;
907 FLOAT max_ulp;
908 int exceptions;
909 };
910 struct test_c_c_data
911 {
912 const char *test_name;
913 FLOAT argr, argc;
914 FLOAT expr, expc;
915 __complex__ FLOAT max_ulp;
916 int exceptions;
917 };
918
919 /* Set the rounding mode, or restore the saved value. */
920 #define IF_ROUND_INIT_ /* Empty. */
921 #define IF_ROUND_INIT_FE_DOWNWARD \
922 int save_round_mode = fegetround (); \
923 if (fesetround (FE_DOWNWARD) == 0)
924 #define IF_ROUND_INIT_FE_TONEAREST \
925 int save_round_mode = fegetround (); \
926 if (fesetround (FE_TONEAREST) == 0)
927 #define IF_ROUND_INIT_FE_TOWARDZERO \
928 int save_round_mode = fegetround (); \
929 if (fesetround (FE_TOWARDZERO) == 0)
930 #define IF_ROUND_INIT_FE_UPWARD \
931 int save_round_mode = fegetround (); \
932 if (fesetround (FE_UPWARD) == 0)
933 #define ROUND_RESTORE_ /* Empty. */
934 #define ROUND_RESTORE_FE_DOWNWARD \
935 fesetround (save_round_mode)
936 #define ROUND_RESTORE_FE_TONEAREST \
937 fesetround (save_round_mode)
938 #define ROUND_RESTORE_FE_TOWARDZERO \
939 fesetround (save_round_mode)
940 #define ROUND_RESTORE_FE_UPWARD \
941 fesetround (save_round_mode)
942
943 /* Run an individual test, including any required setup and checking
944 of results, or loop over all tests in an array. */
945 #define RUN_TEST_f_f(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
946 MAX_ULP, EXCEPTIONS) \
947 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
948 MAX_ULP, EXCEPTIONS)
949 #define RUN_TEST_LOOP_f_f(FUNC_NAME, ARRAY, ROUNDING_MODE) \
950 IF_ROUND_INIT_ ## ROUNDING_MODE \
951 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
952 RUN_TEST_f_f ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg, \
953 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
954 (ARRAY)[i].exceptions); \
955 ROUND_RESTORE_ ## ROUNDING_MODE
956 #define RUN_TEST_2_f(TEST_NAME, FUNC_NAME, ARG1, ARG2, EXPECTED, \
957 MAX_ULP, EXCEPTIONS) \
958 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG1, ARG2), EXPECTED, \
959 MAX_ULP, EXCEPTIONS)
960 #define RUN_TEST_LOOP_2_f(FUNC_NAME, ARRAY, ROUNDING_MODE) \
961 IF_ROUND_INIT_ ## ROUNDING_MODE \
962 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
963 RUN_TEST_2_f ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg1, \
964 (ARRAY)[i].arg2, (ARRAY)[i].expected, \
965 (ARRAY)[i].max_ulp, (ARRAY)[i].exceptions); \
966 ROUND_RESTORE_ ## ROUNDING_MODE
967 #define RUN_TEST_ff_f RUN_TEST_2_f
968 #define RUN_TEST_LOOP_ff_f RUN_TEST_LOOP_2_f
969 #define RUN_TEST_fi_f RUN_TEST_2_f
970 #define RUN_TEST_fl_f RUN_TEST_2_f
971 #define RUN_TEST_if_f RUN_TEST_2_f
972 #define RUN_TEST_LOOP_if_f RUN_TEST_LOOP_2_f
973 #define RUN_TEST_fff_f(TEST_NAME, FUNC_NAME, ARG1, ARG2, ARG3, \
974 EXPECTED, MAX_ULP, EXCEPTIONS) \
975 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG1, ARG2, ARG3), \
976 EXPECTED, MAX_ULP, EXCEPTIONS)
977 #define RUN_TEST_LOOP_fff_f(FUNC_NAME, ARRAY, ROUNDING_MODE) \
978 IF_ROUND_INIT_ ## ROUNDING_MODE \
979 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
980 RUN_TEST_fff_f ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg1, \
981 (ARRAY)[i].arg2, (ARRAY)[i].arg3, \
982 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
983 (ARRAY)[i].exceptions); \
984 ROUND_RESTORE_ ## ROUNDING_MODE
985 #define RUN_TEST_c_f(TEST_NAME, FUNC_NAME, ARG1, ARG2, EXPECTED, \
986 MAX_ULP, EXCEPTIONS) \
987 check_float (TEST_NAME, \
988 FUNC (FUNC_NAME) (BUILD_COMPLEX (ARG1, ARG2)), \
989 EXPECTED, MAX_ULP, EXCEPTIONS)
990 #define RUN_TEST_f_f1(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
991 MAX_ULP, EXCEPTIONS, \
992 EXTRA_NAME, EXTRA_VAR, EXTRA_INIT, EXTRA_TEST, \
993 EXTRA_EXPECTED, EXTRA_ULP) \
994 do \
995 { \
996 (EXTRA_VAR) = (EXTRA_INIT); \
997 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
998 MAX_ULP, EXCEPTIONS); \
999 if (EXTRA_TEST) \
1000 check_int (EXTRA_NAME, EXTRA_VAR, EXTRA_EXPECTED, \
1001 EXTRA_ULP, 0); \
1002 } \
1003 while (0)
1004 #define RUN_TEST_fF_f1(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1005 MAX_ULP, EXCEPTIONS, \
1006 EXTRA_NAME, EXTRA_VAR, EXTRA_INIT, EXTRA_TEST, \
1007 EXTRA_EXPECTED, EXTRA_ULP) \
1008 do \
1009 { \
1010 (EXTRA_VAR) = (EXTRA_INIT); \
1011 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG, &(EXTRA_VAR)), \
1012 EXPECTED, MAX_ULP, EXCEPTIONS); \
1013 if (EXTRA_TEST) \
1014 check_float (EXTRA_NAME, EXTRA_VAR, EXTRA_EXPECTED, \
1015 EXTRA_ULP, 0); \
1016 } \
1017 while (0)
1018 #define RUN_TEST_fI_f1(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1019 MAX_ULP, EXCEPTIONS, \
1020 EXTRA_NAME, EXTRA_VAR, EXTRA_INIT, EXTRA_TEST, \
1021 EXTRA_EXPECTED, EXTRA_ULP) \
1022 do \
1023 { \
1024 (EXTRA_VAR) = (EXTRA_INIT); \
1025 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG, &(EXTRA_VAR)), \
1026 EXPECTED, MAX_ULP, EXCEPTIONS); \
1027 if (EXTRA_TEST) \
1028 check_int (EXTRA_NAME, EXTRA_VAR, EXTRA_EXPECTED, \
1029 EXTRA_ULP, 0); \
1030 } \
1031 while (0)
1032 #define RUN_TEST_ffI_f1(TEST_NAME, FUNC_NAME, ARG1, ARG2, EXPECTED, \
1033 MAX_ULP, EXCEPTIONS, \
1034 EXTRA_NAME, EXTRA_VAR, EXTRA_INIT, EXTRA_TEST, \
1035 EXTRA_EXPECTED, EXTRA_ULP) \
1036 do \
1037 { \
1038 (EXTRA_VAR) = (EXTRA_INIT); \
1039 check_float (TEST_NAME, \
1040 FUNC (FUNC_NAME) (ARG1, ARG2, &(EXTRA_VAR)), \
1041 EXPECTED, MAX_ULP, EXCEPTIONS); \
1042 if (EXTRA_TEST) \
1043 check_int (EXTRA_NAME, EXTRA_VAR, EXTRA_EXPECTED, \
1044 EXTRA_ULP, 0); \
1045 } \
1046 while (0)
1047 #define RUN_TEST_c_c(TEST_NAME, FUNC_NAME, ARGR, ARGC, EXPR, EXPC, \
1048 MAX_ULP, EXCEPTIONS) \
1049 check_complex (TEST_NAME, \
1050 FUNC (FUNC_NAME) (BUILD_COMPLEX (ARGR, ARGC)), \
1051 BUILD_COMPLEX (EXPR, EXPC), \
1052 MAX_ULP, EXCEPTIONS)
1053 #define RUN_TEST_LOOP_c_c(FUNC_NAME, ARRAY, ROUNDING_MODE) \
1054 IF_ROUND_INIT_ ## ROUNDING_MODE \
1055 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1056 RUN_TEST_c_c ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].argr, \
1057 (ARRAY)[i].argc, (ARRAY)[i].expr, (ARRAY)[i].expc, \
1058 (ARRAY)[i].max_ulp, (ARRAY)[i].exceptions); \
1059 ROUND_RESTORE_ ## ROUNDING_MODE
1060 #define RUN_TEST_cc_c(TEST_NAME, FUNC_NAME, ARG1R, ARG1C, ARG2R, ARG2C, \
1061 EXPR, EXPC, MAX_ULP, EXCEPTIONS) \
1062 check_complex (TEST_NAME, \
1063 FUNC (FUNC_NAME) (BUILD_COMPLEX (ARG1R, ARG1C), \
1064 BUILD_COMPLEX (ARG2R, ARG2C)), \
1065 BUILD_COMPLEX (EXPR, EXPC), \
1066 MAX_ULP, EXCEPTIONS)
1067 #define RUN_TEST_f_i(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1068 MAX_ULP, EXCEPTIONS) \
1069 check_int (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1070 MAX_ULP, EXCEPTIONS)
1071 #define RUN_TEST_f_i_tg(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1072 MAX_ULP, EXCEPTIONS) \
1073 check_int (TEST_NAME, FUNC_NAME (ARG), EXPECTED, \
1074 MAX_ULP, EXCEPTIONS)
1075 #define RUN_TEST_ff_i_tg(TEST_NAME, FUNC_NAME, ARG1, ARG2, EXPECTED, \
1076 MAX_ULP, EXCEPTIONS) \
1077 check_int (TEST_NAME, FUNC_NAME (ARG1, ARG2), EXPECTED, \
1078 MAX_ULP, EXCEPTIONS)
1079 #define RUN_TEST_f_b(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1080 MAX_ULP, EXCEPTIONS) \
1081 check_bool (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1082 MAX_ULP, EXCEPTIONS)
1083 #define RUN_TEST_f_b_tg(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1084 MAX_ULP, EXCEPTIONS) \
1085 check_bool (TEST_NAME, FUNC_NAME (ARG), EXPECTED, \
1086 MAX_ULP, EXCEPTIONS)
1087 #define RUN_TEST_f_l(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1088 MAX_ULP, EXCEPTIONS) \
1089 check_long (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1090 MAX_ULP, EXCEPTIONS)
1091 #define RUN_TEST_f_L(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1092 MAX_ULP, EXCEPTIONS) \
1093 check_longlong (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1094 MAX_ULP, EXCEPTIONS)
1095 #define RUN_TEST_sincos(ARG, TEST_NAME_SIN, SIN_RES_VAR, EXPECTED_SIN, \
1096 MAX_ULP_SIN, TEST_NAME_COS, COS_RES_VAR, \
1097 EXPECTED_COS, MAX_ULP_COS, EXCEPTIONS) \
1098 do \
1099 { \
1100 FUNC (sincos) (ARG, &(SIN_RES_VAR), &(COS_RES_VAR)); \
1101 check_float (TEST_NAME_SIN, SIN_RES_VAR, \
1102 EXPECTED_SIN, MAX_ULP_SIN, EXCEPTIONS); \
1103 check_float (TEST_NAME_COS, COS_RES_VAR, \
1104 EXPECTED_COS, MAX_ULP_COS, 0); \
1105 } \
1106 while (0)
1107
1108
1109
1110 /* This is to prevent messages from the SVID libm emulation. */
1111 int
1112 matherr (struct exception *x __attribute__ ((unused)))
1113 {
1114 return 1;
1115 }
1116
1117
1118 /****************************************************************************
1119 Tests for single functions of libm.
1120 Please keep them alphabetically sorted!
1121 ****************************************************************************/
1122
1123 static const struct test_f_f_data acos_test_data[] =
1124 {
1125 START_DATA (acos),
1126 TEST_f_f (acos, plus_infty, qnan_value, INVALID_EXCEPTION),
1127 TEST_f_f (acos, minus_infty, qnan_value, INVALID_EXCEPTION),
1128 TEST_f_f (acos, qnan_value, qnan_value),
1129
1130 /* |x| > 1: */
1131 TEST_f_f (acos, 1.125L, qnan_value, INVALID_EXCEPTION),
1132 TEST_f_f (acos, -1.125L, qnan_value, INVALID_EXCEPTION),
1133 TEST_f_f (acos, max_value, qnan_value, INVALID_EXCEPTION),
1134 TEST_f_f (acos, -max_value, qnan_value, INVALID_EXCEPTION),
1135
1136 TEST_f_f (acos, 0, M_PI_2l),
1137 TEST_f_f (acos, minus_zero, M_PI_2l),
1138 TEST_f_f (acos, 1, 0),
1139 TEST_f_f (acos, -1, M_PIl),
1140 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1141 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1142 TEST_f_f (acos, 0.75L, 0.722734247813415611178377352641333362L),
1143 TEST_f_f (acos, 2e-17L, 1.57079632679489659923132169163975144L),
1144 TEST_f_f (acos, 0.0625L, 1.50825556499840522843072005474337068L),
1145 TEST_f_f (acos, 0x0.ffffffp0L, 3.4526698471620358760324948263873649728491e-4L),
1146 TEST_f_f (acos, -0x0.ffffffp0L, 3.1412473866050770348750401337968641476999L),
1147 #ifndef TEST_FLOAT
1148 TEST_f_f (acos, 0x0.ffffffff8p0L, 1.5258789062648029736620564947844627548516e-5L),
1149 TEST_f_f (acos, -0x0.ffffffff8p0L, 3.1415773948007305904329067627145550395696L),
1150 TEST_f_f (acos, 0x0.ffffffffffffp0L, 8.4293697021788088529885473244391795127130e-8L),
1151 TEST_f_f (acos, -0x0.ffffffffffffp0L, 3.1415925692960962166745548533940296398054L),
1152 #endif
1153 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
1154 TEST_f_f (acos, 0x0.ffffffffffffffffp0L, 3.2927225399135962333718255320079907245059e-10L),
1155 TEST_f_f (acos, -0x0.ffffffffffffffffp0L, 3.1415926532605209844712837599423203309964L),
1156 #endif
1157 END_DATA (acos)
1158 };
1159
1160 static void
1161 acos_test (void)
1162 {
1163 errno = 0;
1164 FUNC(acos) (0);
1165 if (errno == ENOSYS)
1166 /* Function not implemented. */
1167 return;
1168
1169 START (acos);
1170 RUN_TEST_LOOP_f_f (acos, acos_test_data, );
1171 END (acos);
1172 }
1173
1174
1175 static const struct test_f_f_data acos_tonearest_test_data[] =
1176 {
1177 START_DATA (acos_tonearest),
1178 TEST_f_f (acos, 0, M_PI_2l),
1179 TEST_f_f (acos, minus_zero, M_PI_2l),
1180 TEST_f_f (acos, 1, 0),
1181 TEST_f_f (acos, -1, M_PIl),
1182 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1183 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1184 END_DATA (acos_tonearest)
1185 };
1186
1187 static void
1188 acos_test_tonearest (void)
1189 {
1190 errno = 0;
1191 FUNC(acos) (0);
1192 if (errno == ENOSYS)
1193 /* Function not implemented. */
1194 return;
1195
1196 START (acos_tonearest);
1197 RUN_TEST_LOOP_f_f (acos, acos_tonearest_test_data, FE_TONEAREST);
1198 END (acos_tonearest);
1199 }
1200
1201
1202 static const struct test_f_f_data acos_towardzero_test_data[] =
1203 {
1204 START_DATA (acos_towardzero),
1205 TEST_f_f (acos, 0, M_PI_2l),
1206 TEST_f_f (acos, minus_zero, M_PI_2l),
1207 TEST_f_f (acos, 1, 0),
1208 TEST_f_f (acos, -1, M_PIl),
1209 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1210 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1211 END_DATA (acos_towardzero)
1212 };
1213
1214 static void
1215 acos_test_towardzero (void)
1216 {
1217 errno = 0;
1218 FUNC(acos) (0);
1219 if (errno == ENOSYS)
1220 /* Function not implemented. */
1221 return;
1222
1223 START (acos_towardzero);
1224 RUN_TEST_LOOP_f_f (acos, acos_towardzero_test_data, FE_TOWARDZERO);
1225 END (acos_towardzero);
1226 }
1227
1228
1229 static const struct test_f_f_data acos_downward_test_data[] =
1230 {
1231 START_DATA (acos_downward),
1232 TEST_f_f (acos, 0, M_PI_2l),
1233 TEST_f_f (acos, minus_zero, M_PI_2l),
1234 TEST_f_f (acos, 1, 0),
1235 TEST_f_f (acos, -1, M_PIl),
1236 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1237 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1238 END_DATA (acos_downward)
1239 };
1240
1241 static void
1242 acos_test_downward (void)
1243 {
1244 errno = 0;
1245 FUNC(acos) (0);
1246 if (errno == ENOSYS)
1247 /* Function not implemented. */
1248 return;
1249
1250 START (acos_downward);
1251 RUN_TEST_LOOP_f_f (acos, acos_downward_test_data, FE_DOWNWARD);
1252 END (acos_downward);
1253 }
1254
1255
1256 static const struct test_f_f_data acos_upward_test_data[] =
1257 {
1258 START_DATA (acos_upward),
1259 TEST_f_f (acos, 0, M_PI_2l),
1260 TEST_f_f (acos, minus_zero, M_PI_2l),
1261 TEST_f_f (acos, 1, 0),
1262 TEST_f_f (acos, -1, M_PIl),
1263 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1264 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1265 END_DATA (acos_upward)
1266 };
1267
1268 static void
1269 acos_test_upward (void)
1270 {
1271 errno = 0;
1272 FUNC(acos) (0);
1273 if (errno == ENOSYS)
1274 /* Function not implemented. */
1275 return;
1276
1277 START (acos_upward);
1278 RUN_TEST_LOOP_f_f (acos, acos_upward_test_data, FE_UPWARD);
1279 END (acos_upward);
1280 }
1281
1282 static const struct test_f_f_data acosh_test_data[] =
1283 {
1284 START_DATA (acosh),
1285 TEST_f_f (acosh, plus_infty, plus_infty),
1286 TEST_f_f (acosh, minus_infty, qnan_value, INVALID_EXCEPTION),
1287 TEST_f_f (acosh, qnan_value, qnan_value),
1288
1289 /* x < 1: */
1290 TEST_f_f (acosh, -1.125L, qnan_value, INVALID_EXCEPTION),
1291 TEST_f_f (acosh, -max_value, qnan_value, INVALID_EXCEPTION),
1292
1293 TEST_f_f (acosh, 1, 0),
1294 TEST_f_f (acosh, 7, 2.63391579384963341725009269461593689L),
1295 END_DATA (acosh)
1296 };
1297
1298 static void
1299 acosh_test (void)
1300 {
1301 errno = 0;
1302 FUNC(acosh) (7);
1303 if (errno == ENOSYS)
1304 /* Function not implemented. */
1305 return;
1306
1307 START (acosh);
1308 RUN_TEST_LOOP_f_f (acosh, acosh_test_data, );
1309 END (acosh);
1310 }
1311
1312 static const struct test_f_f_data asin_test_data[] =
1313 {
1314 START_DATA (asin),
1315 TEST_f_f (asin, plus_infty, qnan_value, INVALID_EXCEPTION),
1316 TEST_f_f (asin, minus_infty, qnan_value, INVALID_EXCEPTION),
1317 TEST_f_f (asin, qnan_value, qnan_value),
1318
1319 /* asin x == qNaN plus invalid exception for |x| > 1. */
1320 TEST_f_f (asin, 1.125L, qnan_value, INVALID_EXCEPTION),
1321 TEST_f_f (asin, -1.125L, qnan_value, INVALID_EXCEPTION),
1322 TEST_f_f (asin, max_value, qnan_value, INVALID_EXCEPTION),
1323 TEST_f_f (asin, -max_value, qnan_value, INVALID_EXCEPTION),
1324
1325 TEST_f_f (asin, 0, 0),
1326 TEST_f_f (asin, minus_zero, minus_zero),
1327 TEST_f_f (asin, 0.5, M_PI_6l),
1328 TEST_f_f (asin, -0.5, -M_PI_6l),
1329 TEST_f_f (asin, 1.0, M_PI_2l),
1330 TEST_f_f (asin, -1.0, -M_PI_2l),
1331 TEST_f_f (asin, 0.75L, 0.848062078981481008052944338998418080L),
1332 TEST_f_f (asin, 0x0.ffffffp0L, 1.5704510598101804156437184421571127056013L),
1333 TEST_f_f (asin, -0x0.ffffffp0L, -1.5704510598101804156437184421571127056013L),
1334 #ifndef TEST_FLOAT
1335 TEST_f_f (asin, 0x0.ffffffff8p0L, 1.5707810680058339712015850710748035974710L),
1336 TEST_f_f (asin, -0x0.ffffffff8p0L, -1.5707810680058339712015850710748035974710L),
1337 TEST_f_f (asin, 0x0.ffffffffffffp0L, 1.5707962425011995974432331617542781977068L),
1338 TEST_f_f (asin, -0x0.ffffffffffffp0L, -1.5707962425011995974432331617542781977068L),
1339 #endif
1340 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
1341 TEST_f_f (asin, 0x0.ffffffffffffffffp0L, 1.5707963264656243652399620683025688888978L),
1342 TEST_f_f (asin, -0x0.ffffffffffffffffp0L, -1.5707963264656243652399620683025688888978L),
1343 #endif
1344 END_DATA (asin)
1345 };
1346
1347 static void
1348 asin_test (void)
1349 {
1350 errno = 0;
1351 FUNC(asin) (0);
1352 if (errno == ENOSYS)
1353 /* Function not implemented. */
1354 return;
1355
1356 START (asin);
1357 RUN_TEST_LOOP_f_f (asin, asin_test_data, );
1358 END (asin);
1359 }
1360
1361
1362 static const struct test_f_f_data asin_tonearest_test_data[] =
1363 {
1364 START_DATA (asin_tonearest),
1365 TEST_f_f (asin, 0, 0),
1366 TEST_f_f (asin, minus_zero, minus_zero),
1367 TEST_f_f (asin, 0.5, M_PI_6l),
1368 TEST_f_f (asin, -0.5, -M_PI_6l),
1369 TEST_f_f (asin, 1.0, M_PI_2l),
1370 TEST_f_f (asin, -1.0, -M_PI_2l),
1371 END_DATA (asin_tonearest)
1372 };
1373
1374 static void
1375 asin_test_tonearest (void)
1376 {
1377 errno = 0;
1378 FUNC(asin) (0);
1379 if (errno == ENOSYS)
1380 /* Function not implemented. */
1381 return;
1382
1383 START (asin_tonearest);
1384 RUN_TEST_LOOP_f_f (asin, asin_tonearest_test_data, FE_TONEAREST);
1385 END (asin_tonearest);
1386 }
1387
1388
1389 static const struct test_f_f_data asin_towardzero_test_data[] =
1390 {
1391 START_DATA (asin_towardzero),
1392 TEST_f_f (asin, 0, 0),
1393 TEST_f_f (asin, minus_zero, minus_zero),
1394 TEST_f_f (asin, 0.5, M_PI_6l),
1395 TEST_f_f (asin, -0.5, -M_PI_6l),
1396 TEST_f_f (asin, 1.0, M_PI_2l),
1397 TEST_f_f (asin, -1.0, -M_PI_2l),
1398 END_DATA (asin_towardzero)
1399 };
1400
1401 static void
1402 asin_test_towardzero (void)
1403 {
1404 errno = 0;
1405 FUNC(asin) (0);
1406 if (errno == ENOSYS)
1407 /* Function not implemented. */
1408 return;
1409
1410 START (asin_towardzero);
1411 RUN_TEST_LOOP_f_f (asin, asin_towardzero_test_data, FE_TOWARDZERO);
1412 END (asin_towardzero);
1413 }
1414
1415
1416 static const struct test_f_f_data asin_downward_test_data[] =
1417 {
1418 START_DATA (asin_downward),
1419 TEST_f_f (asin, 0, 0),
1420 TEST_f_f (asin, minus_zero, minus_zero),
1421 TEST_f_f (asin, 0.5, M_PI_6l),
1422 TEST_f_f (asin, -0.5, -M_PI_6l),
1423 TEST_f_f (asin, 1.0, M_PI_2l),
1424 TEST_f_f (asin, -1.0, -M_PI_2l),
1425 END_DATA (asin_downward)
1426 };
1427
1428 static void
1429 asin_test_downward (void)
1430 {
1431 errno = 0;
1432 FUNC(asin) (0);
1433 if (errno == ENOSYS)
1434 /* Function not implemented. */
1435 return;
1436
1437 START (asin_downward);
1438 RUN_TEST_LOOP_f_f (asin, asin_downward_test_data, FE_DOWNWARD);
1439 END (asin_downward);
1440 }
1441
1442
1443 static const struct test_f_f_data asin_upward_test_data[] =
1444 {
1445 START_DATA (asin_upward),
1446 TEST_f_f (asin, 0, 0),
1447 TEST_f_f (asin, minus_zero, minus_zero),
1448 TEST_f_f (asin, 0.5, M_PI_6l),
1449 TEST_f_f (asin, -0.5, -M_PI_6l),
1450 TEST_f_f (asin, 1.0, M_PI_2l),
1451 TEST_f_f (asin, -1.0, -M_PI_2l),
1452 END_DATA (asin_upward)
1453 };
1454
1455 static void
1456 asin_test_upward (void)
1457 {
1458 errno = 0;
1459 FUNC(asin) (0);
1460 if (errno == ENOSYS)
1461 /* Function not implemented. */
1462 return;
1463
1464 START (asin_upward);
1465 RUN_TEST_LOOP_f_f (asin, asin_upward_test_data, FE_UPWARD);
1466 END (asin_upward);
1467 }
1468
1469 static const struct test_f_f_data asinh_test_data[] =
1470 {
1471 START_DATA (asinh),
1472 TEST_f_f (asinh, 0, 0),
1473 TEST_f_f (asinh, minus_zero, minus_zero),
1474 #ifndef TEST_INLINE
1475 TEST_f_f (asinh, plus_infty, plus_infty),
1476 TEST_f_f (asinh, minus_infty, minus_infty),
1477 #endif
1478 TEST_f_f (asinh, qnan_value, qnan_value),
1479 TEST_f_f (asinh, 0.75L, 0.693147180559945309417232121458176568L),
1480 END_DATA (asinh)
1481 };
1482
1483 static void
1484 asinh_test (void)
1485 {
1486 errno = 0;
1487 FUNC(asinh) (0.7L);
1488 if (errno == ENOSYS)
1489 /* Function not implemented. */
1490 return;
1491
1492 START (asinh);
1493 RUN_TEST_LOOP_f_f (asinh, asinh_test_data, );
1494 END (asinh);
1495 }
1496
1497 static const struct test_f_f_data atan_test_data[] =
1498 {
1499 START_DATA (atan),
1500 TEST_f_f (atan, 0, 0),
1501 TEST_f_f (atan, minus_zero, minus_zero),
1502
1503 TEST_f_f (atan, plus_infty, M_PI_2l),
1504 TEST_f_f (atan, minus_infty, -M_PI_2l),
1505 TEST_f_f (atan, qnan_value, qnan_value),
1506 TEST_f_f (atan, max_value, M_PI_2l),
1507 TEST_f_f (atan, -max_value, -M_PI_2l),
1508
1509 TEST_f_f (atan, 1, M_PI_4l),
1510 TEST_f_f (atan, -1, -M_PI_4l),
1511
1512 TEST_f_f (atan, 0.75L, 0.643501108793284386802809228717322638L),
1513
1514 TEST_f_f (atan, 0x1p-100L, 0x1p-100L),
1515 #ifndef TEST_FLOAT
1516 TEST_f_f (atan, 0x1p-600L, 0x1p-600L),
1517 #endif
1518 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
1519 TEST_f_f (atan, 0x1p-10000L, 0x1p-10000L),
1520 #endif
1521 END_DATA (atan)
1522 };
1523
1524 static void
1525 atan_test (void)
1526 {
1527 errno = 0;
1528 FUNC(atan) (0);
1529 if (errno == ENOSYS)
1530 /* Function not implemented. */
1531 return;
1532
1533 START (atan);
1534 RUN_TEST_LOOP_f_f (atan, atan_test_data, );
1535 END (atan);
1536 }
1537
1538
1539
1540 static const struct test_f_f_data atanh_test_data[] =
1541 {
1542 START_DATA (atanh),
1543 TEST_f_f (atanh, 0, 0),
1544 TEST_f_f (atanh, minus_zero, minus_zero),
1545
1546 TEST_f_f (atanh, 1, plus_infty, DIVIDE_BY_ZERO_EXCEPTION),
1547 TEST_f_f (atanh, -1, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
1548 TEST_f_f (atanh, qnan_value, qnan_value),
1549
1550 /* atanh (x) == qNaN plus invalid exception if |x| > 1. */
1551 TEST_f_f (atanh, 1.125L, qnan_value, INVALID_EXCEPTION),
1552 TEST_f_f (atanh, -1.125L, qnan_value, INVALID_EXCEPTION),
1553 TEST_f_f (atanh, max_value, qnan_value, INVALID_EXCEPTION),
1554 TEST_f_f (atanh, -max_value, qnan_value, INVALID_EXCEPTION),
1555
1556 TEST_f_f (atanh, 0.75L, 0.972955074527656652552676371721589865L),
1557 END_DATA (atanh)
1558 };
1559
1560 static void
1561 atanh_test (void)
1562 {
1563 errno = 0;
1564 FUNC(atanh) (0.7L);
1565 if (errno == ENOSYS)
1566 /* Function not implemented. */
1567 return;
1568
1569 START (atanh);
1570 RUN_TEST_LOOP_f_f (atanh, atanh_test_data, );
1571 END (atanh);
1572 }
1573
1574 static const struct test_ff_f_data atan2_test_data[] =
1575 {
1576 START_DATA (atan2),
1577 /* atan2 (0,x) == 0 for x > 0. */
1578 TEST_ff_f (atan2, 0, 1, 0),
1579
1580 /* atan2 (-0,x) == -0 for x > 0. */
1581 TEST_ff_f (atan2, minus_zero, 1, minus_zero),
1582
1583 TEST_ff_f (atan2, 0, 0, 0),
1584 TEST_ff_f (atan2, minus_zero, 0, minus_zero),
1585
1586 /* atan2 (+0,x) == +pi for x < 0. */
1587 TEST_ff_f (atan2, 0, -1, M_PIl),
1588
1589 /* atan2 (-0,x) == -pi for x < 0. */
1590 TEST_ff_f (atan2, minus_zero, -1, -M_PIl),
1591
1592 TEST_ff_f (atan2, 0, minus_zero, M_PIl),
1593 TEST_ff_f (atan2, minus_zero, minus_zero, -M_PIl),
1594
1595 /* atan2 (y,+0) == pi/2 for y > 0. */
1596 TEST_ff_f (atan2, 1, 0, M_PI_2l),
1597
1598 /* atan2 (y,-0) == pi/2 for y > 0. */
1599 TEST_ff_f (atan2, 1, minus_zero, M_PI_2l),
1600
1601 /* atan2 (y,+0) == -pi/2 for y < 0. */
1602 TEST_ff_f (atan2, -1, 0, -M_PI_2l),
1603
1604 /* atan2 (y,-0) == -pi/2 for y < 0. */
1605 TEST_ff_f (atan2, -1, minus_zero, -M_PI_2l),
1606
1607 /* atan2 (y,inf) == +0 for finite y > 0. */
1608 TEST_ff_f (atan2, 1, plus_infty, 0),
1609
1610 /* atan2 (y,inf) == -0 for finite y < 0. */
1611 TEST_ff_f (atan2, -1, plus_infty, minus_zero),
1612
1613 /* atan2(+inf, x) == pi/2 for finite x. */
1614 TEST_ff_f (atan2, plus_infty, -1, M_PI_2l),
1615
1616 /* atan2(-inf, x) == -pi/2 for finite x. */
1617 TEST_ff_f (atan2, minus_infty, 1, -M_PI_2l),
1618
1619 /* atan2 (y,-inf) == +pi for finite y > 0. */
1620 TEST_ff_f (atan2, 1, minus_infty, M_PIl),
1621
1622 /* atan2 (y,-inf) == -pi for finite y < 0. */
1623 TEST_ff_f (atan2, -1, minus_infty, -M_PIl),
1624
1625 TEST_ff_f (atan2, plus_infty, plus_infty, M_PI_4l),
1626 TEST_ff_f (atan2, minus_infty, plus_infty, -M_PI_4l),
1627 TEST_ff_f (atan2, plus_infty, minus_infty, M_PI_34l),
1628 TEST_ff_f (atan2, minus_infty, minus_infty, -M_PI_34l),
1629 TEST_ff_f (atan2, qnan_value, qnan_value, qnan_value),
1630
1631 TEST_ff_f (atan2, max_value, max_value, M_PI_4l),
1632
1633 TEST_ff_f (atan2, max_value, min_value, M_PI_2l),
1634 TEST_ff_f (atan2, -max_value, -min_value, -M_PI_2l),
1635
1636 TEST_ff_f (atan2, 0.75L, 1, 0.643501108793284386802809228717322638L),
1637 TEST_ff_f (atan2, -0.75L, 1.0L, -0.643501108793284386802809228717322638L),
1638 TEST_ff_f (atan2, 0.75L, -1.0L, 2.49809154479650885165983415456218025L),
1639 TEST_ff_f (atan2, -0.75L, -1.0L, -2.49809154479650885165983415456218025L),
1640 TEST_ff_f (atan2, 0.390625L, .00029L, 1.57005392693128974780151246612928941L),
1641 TEST_ff_f (atan2, 1.390625L, 0.9296875L, 0.981498387184244311516296577615519772L),
1642
1643 TEST_ff_f (atan2, -0.00756827042671106339L, -.001792735857538728036L, -1.80338464113663849327153994379639112L),
1644 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
1645 TEST_ff_f (atan2, 0x1.00000000000001p0L, 0x1.00000000000001p0L, M_PI_4l),
1646 #endif
1647 END_DATA (atan2)
1648 };
1649
1650 static void
1651 atan2_test (void)
1652 {
1653 errno = 0;
1654 FUNC(atan2) (-0, 1);
1655 if (errno == ENOSYS)
1656 /* Function not implemented. */
1657 return;
1658
1659 START (atan2);
1660 RUN_TEST_LOOP_ff_f (atan2, atan2_test_data, );
1661 END (atan2);
1662 }
1663
1664 static void
1665 cabs_test (void)
1666 {
1667 errno = 0;
1668 FUNC(cabs) (BUILD_COMPLEX (0.7L, 12.4L));
1669 if (errno == ENOSYS)
1670 /* Function not implemented. */
1671 return;
1672
1673 START (cabs);
1674
1675 /* cabs (x + iy) is specified as hypot (x,y) */
1676
1677 /* cabs (+inf + i x) == +inf. */
1678 TEST_c_f (cabs, plus_infty, 1.0, plus_infty);
1679 /* cabs (-inf + i x) == +inf. */
1680 TEST_c_f (cabs, minus_infty, 1.0, plus_infty);
1681
1682 TEST_c_f (cabs, minus_infty, qnan_value, plus_infty);
1683 TEST_c_f (cabs, minus_infty, qnan_value, plus_infty);
1684
1685 TEST_c_f (cabs, qnan_value, qnan_value, qnan_value);
1686
1687 /* cabs (x,y) == cabs (y,x). */
1688 TEST_c_f (cabs, 0.75L, 12.390625L, 12.4133028598606664302388810868156657L);
1689 /* cabs (x,y) == cabs (-x,y). */
1690 TEST_c_f (cabs, -12.390625L, 0.75L, 12.4133028598606664302388810868156657L);
1691 /* cabs (x,y) == cabs (-y,x). */
1692 TEST_c_f (cabs, -0.75L, 12.390625L, 12.4133028598606664302388810868156657L);
1693 /* cabs (x,y) == cabs (-x,-y). */
1694 TEST_c_f (cabs, -12.390625L, -0.75L, 12.4133028598606664302388810868156657L);
1695 /* cabs (x,y) == cabs (-y,-x). */
1696 TEST_c_f (cabs, -0.75L, -12.390625L, 12.4133028598606664302388810868156657L);
1697 /* cabs (x,0) == fabs (x). */
1698 TEST_c_f (cabs, -0.75L, 0, 0.75L);
1699 TEST_c_f (cabs, 0.75L, 0, 0.75L);
1700 TEST_c_f (cabs, -1.0L, 0, 1.0L);
1701 TEST_c_f (cabs, 1.0L, 0, 1.0L);
1702 TEST_c_f (cabs, -5.7e7L, 0, 5.7e7L);
1703 TEST_c_f (cabs, 5.7e7L, 0, 5.7e7L);
1704
1705 TEST_c_f (cabs, 0.75L, 1.25L, 1.45773797371132511771853821938639577L);
1706
1707 END (cabs);
1708 }
1709
1710
1711 static const struct test_c_c_data cacos_test_data[] =
1712 {
1713 START_DATA (cacos),
1714 TEST_c_c (cacos, 0, 0, M_PI_2l, minus_zero),
1715 TEST_c_c (cacos, minus_zero, 0, M_PI_2l, minus_zero),
1716 TEST_c_c (cacos, minus_zero, minus_zero, M_PI_2l, 0.0),
1717 TEST_c_c (cacos, 0, minus_zero, M_PI_2l, 0.0),
1718
1719 TEST_c_c (cacos, minus_infty, plus_infty, M_PI_34l, minus_infty),
1720 TEST_c_c (cacos, minus_infty, minus_infty, M_PI_34l, plus_infty),
1721
1722 TEST_c_c (cacos, plus_infty, plus_infty, M_PI_4l, minus_infty),
1723 TEST_c_c (cacos, plus_infty, minus_infty, M_PI_4l, plus_infty),
1724
1725 TEST_c_c (cacos, -10.0, plus_infty, M_PI_2l, minus_infty),
1726 TEST_c_c (cacos, -10.0, minus_infty, M_PI_2l, plus_infty),
1727 TEST_c_c (cacos, 0, plus_infty, M_PI_2l, minus_infty),
1728 TEST_c_c (cacos, 0, minus_infty, M_PI_2l, plus_infty),
1729 TEST_c_c (cacos, 0.1L, plus_infty, M_PI_2l, minus_infty),
1730 TEST_c_c (cacos, 0.1L, minus_infty, M_PI_2l, plus_infty),
1731
1732 TEST_c_c (cacos, minus_infty, 0, M_PIl, minus_infty),
1733 TEST_c_c (cacos, minus_infty, minus_zero, M_PIl, plus_infty),
1734 TEST_c_c (cacos, minus_infty, 100, M_PIl, minus_infty),
1735 TEST_c_c (cacos, minus_infty, -100, M_PIl, plus_infty),
1736
1737 TEST_c_c (cacos, plus_infty, 0, 0.0, minus_infty),
1738 TEST_c_c (cacos, plus_infty, minus_zero, 0.0, plus_infty),
1739 TEST_c_c (cacos, plus_infty, 0.5, 0.0, minus_infty),
1740 TEST_c_c (cacos, plus_infty, -0.5, 0.0, plus_infty),
1741
1742 TEST_c_c (cacos, plus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
1743 TEST_c_c (cacos, minus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
1744
1745 TEST_c_c (cacos, 0, qnan_value, M_PI_2l, qnan_value),
1746 TEST_c_c (cacos, minus_zero, qnan_value, M_PI_2l, qnan_value),
1747
1748 TEST_c_c (cacos, qnan_value, plus_infty, qnan_value, minus_infty),
1749 TEST_c_c (cacos, qnan_value, minus_infty, qnan_value, plus_infty),
1750
1751 TEST_c_c (cacos, 10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
1752 TEST_c_c (cacos, -10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
1753
1754 TEST_c_c (cacos, qnan_value, 0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
1755 TEST_c_c (cacos, qnan_value, -0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
1756
1757 TEST_c_c (cacos, qnan_value, qnan_value, qnan_value, qnan_value),
1758
1759 TEST_c_c (cacos, plus_zero, -1.5L, M_PI_2l, 1.194763217287109304111930828519090523536L),
1760 TEST_c_c (cacos, minus_zero, -1.5L, M_PI_2l, 1.194763217287109304111930828519090523536L),
1761 TEST_c_c (cacos, plus_zero, -1.0L, M_PI_2l, 0.8813735870195430252326093249797923090282L),
1762 TEST_c_c (cacos, minus_zero, -1.0L, M_PI_2l, 0.8813735870195430252326093249797923090282L),
1763 TEST_c_c (cacos, plus_zero, -0.5L, M_PI_2l, 0.4812118250596034474977589134243684231352L),
1764 TEST_c_c (cacos, minus_zero, -0.5L, M_PI_2l, 0.4812118250596034474977589134243684231352L),
1765 TEST_c_c (cacos, plus_zero, 0.5L, M_PI_2l, -0.4812118250596034474977589134243684231352L),
1766 TEST_c_c (cacos, minus_zero, 0.5L, M_PI_2l, -0.4812118250596034474977589134243684231352L),
1767 TEST_c_c (cacos, plus_zero, 1.0L, M_PI_2l, -0.8813735870195430252326093249797923090282L),
1768 TEST_c_c (cacos, minus_zero, 1.0L, M_PI_2l, -0.8813735870195430252326093249797923090282L),
1769 TEST_c_c (cacos, plus_zero, 1.5L, M_PI_2l, -1.194763217287109304111930828519090523536L),
1770 TEST_c_c (cacos, minus_zero, 1.5L, M_PI_2l, -1.194763217287109304111930828519090523536L),
1771
1772 TEST_c_c (cacos, -1.5L, plus_zero, M_PIl, -0.9624236501192068949955178268487368462704L),
1773 TEST_c_c (cacos, -1.5L, minus_zero, M_PIl, 0.9624236501192068949955178268487368462704L),
1774 TEST_c_c (cacos, -1.0L, plus_zero, M_PIl, minus_zero),
1775 TEST_c_c (cacos, -1.0L, minus_zero, M_PIl, plus_zero),
1776 TEST_c_c (cacos, -0.5L, plus_zero, 2.094395102393195492308428922186335256131L, minus_zero),
1777 TEST_c_c (cacos, -0.5L, minus_zero, 2.094395102393195492308428922186335256131L, plus_zero),
1778 TEST_c_c (cacos, 0.5L, plus_zero, 1.047197551196597746154214461093167628066L, minus_zero),
1779 TEST_c_c (cacos, 0.5L, minus_zero, 1.047197551196597746154214461093167628066L, plus_zero),
1780 TEST_c_c (cacos, 1.0L, plus_zero, plus_zero, minus_zero),
1781 TEST_c_c (cacos, 1.0L, minus_zero, plus_zero, plus_zero),
1782 TEST_c_c (cacos, 1.5L, plus_zero, plus_zero, -0.9624236501192068949955178268487368462704L),
1783 TEST_c_c (cacos, 1.5L, minus_zero, plus_zero, 0.9624236501192068949955178268487368462704L),
1784
1785 TEST_c_c (cacos, 0x1p50L, 1.0L, 8.881784197001252323389053344727730248720e-16L, -3.535050620855721078027883819436720218708e1L),
1786 TEST_c_c (cacos, 0x1p50L, -1.0L, 8.881784197001252323389053344727730248720e-16L, 3.535050620855721078027883819436720218708e1L),
1787 TEST_c_c (cacos, -0x1p50L, 1.0L, 3.141592653589792350284223683154270545292L, -3.535050620855721078027883819436720218708e1L),
1788 TEST_c_c (cacos, -0x1p50L, -1.0L, 3.141592653589792350284223683154270545292L, 3.535050620855721078027883819436720218708e1L),
1789 TEST_c_c (cacos, 1.0L, 0x1p50L, 1.570796326794895731052901991514519103193L, -3.535050620855721078027883819436759661753e1L),
1790 TEST_c_c (cacos, -1.0L, 0x1p50L, 1.570796326794897507409741391764983781004L, -3.535050620855721078027883819436759661753e1L),
1791 TEST_c_c (cacos, 1.0L, -0x1p50L, 1.570796326794895731052901991514519103193L, 3.535050620855721078027883819436759661753e1L),
1792 TEST_c_c (cacos, -1.0L, -0x1p50L, 1.570796326794897507409741391764983781004L, 3.535050620855721078027883819436759661753e1L),
1793 #ifndef TEST_FLOAT
1794 TEST_c_c (cacos, 0x1p500L, 1.0L, 3.054936363499604682051979393213617699789e-151L, -3.472667374605326000180332928505464606058e2L),
1795 TEST_c_c (cacos, 0x1p500L, -1.0L, 3.054936363499604682051979393213617699789e-151L, 3.472667374605326000180332928505464606058e2L),
1796 TEST_c_c (cacos, -0x1p500L, 1.0L, 3.141592653589793238462643383279502884197L, -3.472667374605326000180332928505464606058e2L),
1797 TEST_c_c (cacos, -0x1p500L, -1.0L, 3.141592653589793238462643383279502884197L, 3.472667374605326000180332928505464606058e2L),
1798 TEST_c_c (cacos, 1.0L, 0x1p500L, 1.570796326794896619231321691639751442099L, -3.472667374605326000180332928505464606058e2L),
1799 TEST_c_c (cacos, -1.0L, 0x1p500L, 1.570796326794896619231321691639751442099L, -3.472667374605326000180332928505464606058e2L),
1800 TEST_c_c (cacos, 1.0L, -0x1p500L, 1.570796326794896619231321691639751442099L, 3.472667374605326000180332928505464606058e2L),
1801 TEST_c_c (cacos, -1.0L, -0x1p500L, 1.570796326794896619231321691639751442099L, 3.472667374605326000180332928505464606058e2L),
1802 #endif
1803 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
1804 TEST_c_c (cacos, 0x1p5000L, 1.0L, 7.079811261048172892385615158694057552948e-1506L, -3.466429049980286492395577839412341016946e3L),
1805 TEST_c_c (cacos, 0x1p5000L, -1.0L, 7.079811261048172892385615158694057552948e-1506L, 3.466429049980286492395577839412341016946e3L),
1806 TEST_c_c (cacos, -0x1p5000L, 1.0L, 3.141592653589793238462643383279502884197L, -3.466429049980286492395577839412341016946e3L),
1807 TEST_c_c (cacos, -0x1p5000L, -1.0L, 3.141592653589793238462643383279502884197L, 3.466429049980286492395577839412341016946e3L),
1808 TEST_c_c (cacos, 1.0L, 0x1p5000L, 1.570796326794896619231321691639751442099L, -3.466429049980286492395577839412341016946e3L),
1809 TEST_c_c (cacos, -1.0L, 0x1p5000L, 1.570796326794896619231321691639751442099L, -3.466429049980286492395577839412341016946e3L),
1810 TEST_c_c (cacos, 1.0L, -0x1p5000L, 1.570796326794896619231321691639751442099L, 3.466429049980286492395577839412341016946e3L),
1811 TEST_c_c (cacos, -1.0L, -0x1p5000L, 1.570796326794896619231321691639751442099L, 3.466429049980286492395577839412341016946e3L),
1812 #endif
1813
1814 TEST_c_c (cacos, 0x1.fp127L, 0x1.fp127L, 7.853981633974483096156608458198757210493e-1L, -8.973081118419833726837456344608533993585e1L),
1815 #ifndef TEST_FLOAT
1816 TEST_c_c (cacos, 0x1.fp1023L, 0x1.fp1023L, 7.853981633974483096156608458198757210493e-1L, -7.107906849659093345062145442726115449315e2L),
1817 #endif
1818 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
1819 TEST_c_c (cacos, 0x1.fp16383L, 0x1.fp16383L, 7.853981633974483096156608458198757210493e-1L, -1.135753137836666928715489992987020363057e4L),
1820 #endif
1821
1822 TEST_c_c (cacos, 0x1.fp-129L, 1.5L, 1.570796326794896619231321691639751442097L, -1.194763217287109304111930828519090523536L),
1823 TEST_c_c (cacos, 0x1.fp-129L, -1.5L, 1.570796326794896619231321691639751442097L, 1.194763217287109304111930828519090523536L),
1824 TEST_c_c (cacos, -0x1.fp-129L, 1.5L, 1.570796326794896619231321691639751442100L, -1.194763217287109304111930828519090523536L),
1825 TEST_c_c (cacos, -0x1.fp-129L, -1.5L, 1.570796326794896619231321691639751442100L, 1.194763217287109304111930828519090523536L),
1826 TEST_c_c (cacos, 1.5L, 0x1.fp-129L, 2.546345110742945032959687790021055102355e-39L, -9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION_FLOAT),
1827 TEST_c_c (cacos, -1.5L, 0x1.fp-129L, 3.141592653589793238462643383279502884195L, -9.624236501192068949955178268487368462704e-1L),
1828 TEST_c_c (cacos, 1.5L, -0x1.fp-129L, 2.546345110742945032959687790021055102355e-39L, 9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION_FLOAT),
1829 TEST_c_c (cacos, -1.5L, -0x1.fp-129L, 3.141592653589793238462643383279502884195L, 9.624236501192068949955178268487368462704e-1L),
1830 #ifndef TEST_FLOAT
1831 TEST_c_c (cacos, 0x1.fp-1025L, 1.5L, 1.570796326794896619231321691639751442099L, -1.194763217287109304111930828519090523536L),
1832 TEST_c_c (cacos, 0x1.fp-1025L, -1.5L, 1.570796326794896619231321691639751442099L, 1.194763217287109304111930828519090523536L),
1833 TEST_c_c (cacos, -0x1.fp-1025L, 1.5L, 1.570796326794896619231321691639751442099L, -1.194763217287109304111930828519090523536L),
1834 TEST_c_c (cacos, -0x1.fp-1025L, -1.5L, 1.570796326794896619231321691639751442099L, 1.194763217287109304111930828519090523536L),
1835 TEST_c_c (cacos, 1.5L, 0x1.fp-1025L, 4.819934639999230680322935210539402497827e-309L, -9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
1836 TEST_c_c (cacos, -1.5L, 0x1.fp-1025L, 3.141592653589793238462643383279502884197L, -9.624236501192068949955178268487368462704e-1L),
1837 TEST_c_c (cacos, 1.5L, -0x1.fp-1025L, 4.819934639999230680322935210539402497827e-309L, 9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
1838 TEST_c_c (cacos, -1.5L, -0x1.fp-1025L, 3.141592653589793238462643383279502884197L, 9.624236501192068949955178268487368462704e-1L),
1839 #endif
1840 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
1841 TEST_c_c (cacos, 0x1.fp-16385L, 1.5L, 1.570796326794896619231321691639751442099L, -1.194763217287109304111930828519090523536L),
1842 TEST_c_c (cacos, 0x1.fp-16385L, -1.5L, 1.570796326794896619231321691639751442099L, 1.194763217287109304111930828519090523536L),
1843 TEST_c_c (cacos, -0x1.fp-16385L, 1.5L, 1.570796326794896619231321691639751442099L, -1.194763217287109304111930828519090523536L),
1844 TEST_c_c (cacos, -0x1.fp-16385L, -1.5L, 1.570796326794896619231321691639751442099L, 1.194763217287109304111930828519090523536L),
1845 TEST_c_c (cacos, 1.5L, 0x1.fp-16385L, 7.282957076134209141226696333885150260319e-4933L, -9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION),
1846 TEST_c_c (cacos, -1.5L, 0x1.fp-16385L, 3.141592653589793238462643383279502884197L, -9.624236501192068949955178268487368462704e-1L),
1847 TEST_c_c (cacos, 1.5L, -0x1.fp-16385L, 7.282957076134209141226696333885150260319e-4933L, 9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION),
1848 TEST_c_c (cacos, -1.5L, -0x1.fp-16385L, 3.141592653589793238462643383279502884197L, 9.624236501192068949955178268487368462704e-1L),
1849 #endif
1850
1851 TEST_c_c (cacos, 0.5L, 1.0L, 1.221357263937683325603909865564381489366L, -9.261330313501824245501244453057873152694e-1L),
1852 TEST_c_c (cacos, 0.5L, -1.0L, 1.221357263937683325603909865564381489366L, 9.261330313501824245501244453057873152694e-1L),
1853 TEST_c_c (cacos, -0.5L, 1.0L, 1.920235389652109912858733517715121394831L, -9.261330313501824245501244453057873152694e-1L),
1854 TEST_c_c (cacos, -0.5L, -1.0L, 1.920235389652109912858733517715121394831L, 9.261330313501824245501244453057873152694e-1L),
1855 TEST_c_c (cacos, 1.0L, 0.5L, 6.748888455860063801646649673121744318756e-1L, -7.328576759736452608886724437653071523305e-1L),
1856 TEST_c_c (cacos, -1.0L, 0.5L, 2.466703808003786858297978415967328452322L, -7.328576759736452608886724437653071523305e-1L),
1857 TEST_c_c (cacos, 1.0L, -0.5L, 6.748888455860063801646649673121744318756e-1L, 7.328576759736452608886724437653071523305e-1L),
1858 TEST_c_c (cacos, -1.0L, -0.5L, 2.466703808003786858297978415967328452322L, 7.328576759736452608886724437653071523305e-1L),
1859 TEST_c_c (cacos, 0.25L, 1.0L, 1.394493894017929688812643125003661339452L, -8.924633639033482359562124741744951972772e-1L),
1860 TEST_c_c (cacos, 0.25L, -1.0L, 1.394493894017929688812643125003661339452L, 8.924633639033482359562124741744951972772e-1L),
1861 TEST_c_c (cacos, -0.25L, 1.0L, 1.747098759571863549650000258275841544745L, -8.924633639033482359562124741744951972772e-1L),
1862 TEST_c_c (cacos, -0.25L, -1.0L, 1.747098759571863549650000258275841544745L, 8.924633639033482359562124741744951972772e-1L),
1863 TEST_c_c (cacos, 1.0L, 0.25L, 4.890443302710802929202843732146540079124e-1L, -5.097911466811016354623559941115413499164e-1L),
1864 TEST_c_c (cacos, -1.0L, 0.25L, 2.652548323318712945542359010064848876285L, -5.097911466811016354623559941115413499164e-1L),
1865 TEST_c_c (cacos, 1.0L, -0.25L, 4.890443302710802929202843732146540079124e-1L, 5.097911466811016354623559941115413499164e-1L),
1866 TEST_c_c (cacos, -1.0L, -0.25L, 2.652548323318712945542359010064848876285L, 5.097911466811016354623559941115413499164e-1L),
1867 TEST_c_c (cacos, 0x1.fp-10L, 1.0L, 1.569458417435338878318763342108699202986L, -8.813742198809567991336704287826445879025e-1L),
1868 TEST_c_c (cacos, 0x1.fp-10L, -1.0L, 1.569458417435338878318763342108699202986L, 8.813742198809567991336704287826445879025e-1L),
1869 TEST_c_c (cacos, -0x1.fp-10L, 1.0L, 1.572134236154454360143880041170803681211L, -8.813742198809567991336704287826445879025e-1L),
1870 TEST_c_c (cacos, -0x1.fp-10L, -1.0L, 1.572134236154454360143880041170803681211L, 8.813742198809567991336704287826445879025e-1L),
1871 TEST_c_c (cacos, 1.0L, 0x1.fp-10L, 4.349129763101882771258049954181971959031e-2L, -4.350501469856803800217957402220976497152e-2L),
1872 TEST_c_c (cacos, -1.0L, 0x1.fp-10L, 3.098101355958774410750062883737683164607L, -4.350501469856803800217957402220976497152e-2L),
1873 TEST_c_c (cacos, 1.0L, -0x1.fp-10L, 4.349129763101882771258049954181971959031e-2L, 4.350501469856803800217957402220976497152e-2L),
1874 TEST_c_c (cacos, -1.0L, -0x1.fp-10L, 3.098101355958774410750062883737683164607L, 4.350501469856803800217957402220976497152e-2L),
1875 TEST_c_c (cacos, 0x1.fp-30L, 1.0L, 1.570796325518966635014803151387033957091L, -8.813735870195430258081932989769495326854e-1L),
1876 TEST_c_c (cacos, 0x1.fp-30L, -1.0L, 1.570796325518966635014803151387033957091L, 8.813735870195430258081932989769495326854e-1L),
1877 TEST_c_c (cacos, -0x1.fp-30L, 1.0L, 1.570796328070826603447840231892468927106L, -8.813735870195430258081932989769495326854e-1L),
1878 TEST_c_c (cacos, -0x1.fp-30L, -1.0L, 1.570796328070826603447840231892468927106L, 8.813735870195430258081932989769495326854e-1L),
1879 TEST_c_c (cacos, 1.0L, 0x1.fp-30L, 4.247867097467650115899790787875186617316e-5L, -4.247867098745151888768727039216644758847e-5L),
1880 TEST_c_c (cacos, -1.0L, 0x1.fp-30L, 3.141550174918818561961484385371624132331L, -4.247867098745151888768727039216644758847e-5L),
1881 TEST_c_c (cacos, 1.0L, -0x1.fp-30L, 4.247867097467650115899790787875186617316e-5L, 4.247867098745151888768727039216644758847e-5L),
1882 TEST_c_c (cacos, -1.0L, -0x1.fp-30L, 3.141550174918818561961484385371624132331L, 4.247867098745151888768727039216644758847e-5L),
1883 TEST_c_c (cacos, 0x1.fp-100L, 1.0L, 1.570796326794896619231321691638670687364L, -8.813735870195430252326093249797923090282e-1L),
1884 TEST_c_c (cacos, 0x1.fp-100L, -1.0L, 1.570796326794896619231321691638670687364L, 8.813735870195430252326093249797923090282e-1L),
1885 TEST_c_c (cacos, -0x1.fp-100L, 1.0L, 1.570796326794896619231321691640832196834L, -8.813735870195430252326093249797923090282e-1L),
1886 TEST_c_c (cacos, -0x1.fp-100L, -1.0L, 1.570796326794896619231321691640832196834L, 8.813735870195430252326093249797923090282e-1L),
1887 TEST_c_c (cacos, 1.0L, 0x1.fp-100L, 1.236292038260260888664514866456887257525e-15L, -1.236292038260260888664514866457202186027e-15L),
1888 TEST_c_c (cacos, -1.0L, 0x1.fp-100L, 3.141592653589792002170605123018614219682L, -1.236292038260260888664514866457202186027e-15L),
1889 TEST_c_c (cacos, 1.0L, -0x1.fp-100L, 1.236292038260260888664514866456887257525e-15L, 1.236292038260260888664514866457202186027e-15L),
1890 TEST_c_c (cacos, -1.0L, -0x1.fp-100L, 3.141592653589792002170605123018614219682L, 1.236292038260260888664514866457202186027e-15L),
1891 TEST_c_c (cacos, 0x1.fp-129L, 1.0L, 1.570796326794896619231321691639751442097L, -8.813735870195430252326093249797923090282e-1L),
1892 TEST_c_c (cacos, 0x1.fp-129L, -1.0L, 1.570796326794896619231321691639751442097L, 8.813735870195430252326093249797923090282e-1L),
1893 TEST_c_c (cacos, -0x1.fp-129L, 1.0L, 1.570796326794896619231321691639751442101L, -8.813735870195430252326093249797923090282e-1L),
1894 TEST_c_c (cacos, -0x1.fp-129L, -1.0L, 1.570796326794896619231321691639751442101L, 8.813735870195430252326093249797923090282e-1L),
1895 TEST_c_c (cacos, 1.0L, 0x1.fp-129L, 5.335635276982233498398987585285818977930e-20L, -5.335635276982233498398987585285818977933e-20L),
1896 TEST_c_c (cacos, -1.0L, 0x1.fp-129L, 3.141592653589793238409287030509680549213L, -5.335635276982233498398987585285818977933e-20L),
1897 TEST_c_c (cacos, 1.0L, -0x1.fp-129L, 5.335635276982233498398987585285818977930e-20L, 5.335635276982233498398987585285818977933e-20L),
1898 TEST_c_c (cacos, -1.0L, -0x1.fp-129L, 3.141592653589793238409287030509680549213L, 5.335635276982233498398987585285818977933e-20L),
1899 #ifndef TEST_FLOAT
1900 TEST_c_c (cacos, 0x1.fp-1000L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1901 TEST_c_c (cacos, 0x1.fp-1000L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1902 TEST_c_c (cacos, -0x1.fp-1000L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1903 TEST_c_c (cacos, -0x1.fp-1000L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1904 TEST_c_c (cacos, 1.0L, 0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, -4.252291453851660175550490409247739011867e-151L),
1905 TEST_c_c (cacos, -1.0L, 0x1.fp-1000L, 3.141592653589793238462643383279502884197L, -4.252291453851660175550490409247739011867e-151L),
1906 TEST_c_c (cacos, 1.0L, -0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, 4.252291453851660175550490409247739011867e-151L),
1907 TEST_c_c (cacos, -1.0L, -0x1.fp-1000L, 3.141592653589793238462643383279502884197L, 4.252291453851660175550490409247739011867e-151L),
1908 TEST_c_c (cacos, 0x1.fp-1025L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1909 TEST_c_c (cacos, 0x1.fp-1025L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1910 TEST_c_c (cacos, -0x1.fp-1025L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1911 TEST_c_c (cacos, -0x1.fp-1025L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1912 TEST_c_c (cacos, 1.0L, 0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, -7.340879205566679497036857179189356754017e-155L),
1913 TEST_c_c (cacos, -1.0L, 0x1.fp-1025L, 3.141592653589793238462643383279502884197L, -7.340879205566679497036857179189356754017e-155L),
1914 TEST_c_c (cacos, 1.0L, -0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, 7.340879205566679497036857179189356754017e-155L),
1915 TEST_c_c (cacos, -1.0L, -0x1.fp-1025L, 3.141592653589793238462643383279502884197L, 7.340879205566679497036857179189356754017e-155L),
1916 #endif
1917 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
1918 TEST_c_c (cacos, 0x1.fp-10000L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1919 TEST_c_c (cacos, 0x1.fp-10000L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1920 TEST_c_c (cacos, -0x1.fp-10000L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1921 TEST_c_c (cacos, -0x1.fp-10000L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1922 TEST_c_c (cacos, 1.0L, 0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, -9.854680208706673586644342922051388714633e-1506L),
1923 TEST_c_c (cacos, -1.0L, 0x1.fp-10000L, 3.141592653589793238462643383279502884197L, -9.854680208706673586644342922051388714633e-1506L),
1924 TEST_c_c (cacos, 1.0L, -0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, 9.854680208706673586644342922051388714633e-1506L),
1925 TEST_c_c (cacos, -1.0L, -0x1.fp-10000L, 3.141592653589793238462643383279502884197L, 9.854680208706673586644342922051388714633e-1506L),
1926 TEST_c_c (cacos, 0x1.fp-16385L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1927 TEST_c_c (cacos, 0x1.fp-16385L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1928 TEST_c_c (cacos, -0x1.fp-16385L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1929 TEST_c_c (cacos, -0x1.fp-16385L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1930 TEST_c_c (cacos, 1.0L, 0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, -9.023632056840860275214893047597614177639e-2467L),
1931 TEST_c_c (cacos, -1.0L, 0x1.fp-16385L, 3.141592653589793238462643383279502884197L, -9.023632056840860275214893047597614177639e-2467L),
1932 TEST_c_c (cacos, 1.0L, -0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, 9.023632056840860275214893047597614177639e-2467L),
1933 TEST_c_c (cacos, -1.0L, -0x1.fp-16385L, 3.141592653589793238462643383279502884197L, 9.023632056840860275214893047597614177639e-2467L),
1934 #endif
1935
1936 TEST_c_c (cacos, 0x1p-23L, 0x1.000002p0L, 1.570796242501204621739026081991856762292L, -8.813736713132400470205730751186547909968e-1L),
1937 TEST_c_c (cacos, 0x1p-23L, -0x1.000002p0L, 1.570796242501204621739026081991856762292L, 8.813736713132400470205730751186547909968e-1L),
1938 TEST_c_c (cacos, -0x1p-23L, 0x1.000002p0L, 1.570796411088588616723617301287646121905L, -8.813736713132400470205730751186547909968e-1L),
1939 TEST_c_c (cacos, -0x1p-23L, -0x1.000002p0L, 1.570796411088588616723617301287646121905L, 8.813736713132400470205730751186547909968e-1L),
1940 TEST_c_c (cacos, 0x1.000002p0L, 0x1p-23L, 2.222118384408546368406374049167636760903e-4L, -5.364668491573609633134147164031476452679e-4L),
1941 TEST_c_c (cacos, -0x1.000002p0L, 0x1p-23L, 3.141370441751352383825802745874586120521L, -5.364668491573609633134147164031476452679e-4L),
1942 TEST_c_c (cacos, 0x1.000002p0L, -0x1p-23L, 2.222118384408546368406374049167636760903e-4L, 5.364668491573609633134147164031476452679e-4L),
1943 TEST_c_c (cacos, -0x1.000002p0L, -0x1p-23L, 3.141370441751352383825802745874586120521L, 5.364668491573609633134147164031476452679e-4L),
1944 TEST_c_c (cacos, 0x1.fp-129L, 0x1.000002p0L, 1.570796326794896619231321691639751442097L, -8.813736713132375348727889167749389235161e-1L),
1945 TEST_c_c (cacos, 0x1.fp-129L, -0x1.000002p0L, 1.570796326794896619231321691639751442097L, 8.813736713132375348727889167749389235161e-1L),
1946 TEST_c_c (cacos, -0x1.fp-129L, 0x1.000002p0L, 1.570796326794896619231321691639751442101L, -8.813736713132375348727889167749389235161e-1L),
1947 TEST_c_c (cacos, -0x1.fp-129L, -0x1.000002p0L, 1.570796326794896619231321691639751442101L, 8.813736713132375348727889167749389235161e-1L),
1948 TEST_c_c (cacos, 0x1.000002p0L, 0x1.fp-129L, 5.830451806317544230969669308596361881467e-36L, -4.882812451493617206486388134172712975070e-4L),
1949 TEST_c_c (cacos, -0x1.000002p0L, 0x1.fp-129L, 3.141592653589793238462643383279502878367L, -4.882812451493617206486388134172712975070e-4L),
1950 TEST_c_c (cacos, 0x1.000002p0L, -0x1.fp-129L, 5.830451806317544230969669308596361881467e-36L, 4.882812451493617206486388134172712975070e-4L),
1951 TEST_c_c (cacos, -0x1.000002p0L, -0x1.fp-129L, 3.141592653589793238462643383279502878367L, 4.882812451493617206486388134172712975070e-4L),
1952 TEST_c_c (cacos, 0.0L, 0x1.000002p0L, 1.570796326794896619231321691639751442099L, -8.813736713132375348727889167749389235161e-1L),
1953 TEST_c_c (cacos, 0.0L, -0x1.000002p0L, 1.570796326794896619231321691639751442099L, 8.813736713132375348727889167749389235161e-1L),
1954 TEST_c_c (cacos, -0.0L, 0x1.000002p0L, 1.570796326794896619231321691639751442099L, -8.813736713132375348727889167749389235161e-1L),
1955 TEST_c_c (cacos, -0.0L, -0x1.000002p0L, 1.570796326794896619231321691639751442099L, 8.813736713132375348727889167749389235161e-1L),
1956 TEST_c_c (cacos, 0x1.000002p0L, 0.0L, 0.0L, -4.882812451493617206486388134172712975070e-4L),
1957 TEST_c_c (cacos, -0x1.000002p0L, 0.0L, 3.141592653589793238462643383279502884197L, -4.882812451493617206486388134172712975070e-4L),
1958 TEST_c_c (cacos, 0x1.000002p0L, -0.0L, 0.0L, 4.882812451493617206486388134172712975070e-4L),
1959 TEST_c_c (cacos, -0x1.000002p0L, -0.0L, 3.141592653589793238462643383279502884197L, 4.882812451493617206486388134172712975070e-4L),
1960 #ifndef TEST_FLOAT
1961 TEST_c_c (cacos, 0x1p-52L, 0x1.0000000000001p0L, 1.570796326794896462222075823262262934288L, -8.813735870195431822418551933572982483664e-1L),
1962 TEST_c_c (cacos, 0x1p-52L, -0x1.0000000000001p0L, 1.570796326794896462222075823262262934288L, 8.813735870195431822418551933572982483664e-1L),
1963 TEST_c_c (cacos, -0x1p-52L, 0x1.0000000000001p0L, 1.570796326794896776240567560017239949909L, -8.813735870195431822418551933572982483664e-1L),
1964 TEST_c_c (cacos, -0x1p-52L, -0x1.0000000000001p0L, 1.570796326794896776240567560017239949909L, 8.813735870195431822418551933572982483664e-1L),
1965 TEST_c_c (cacos, 0x1.0000000000001p0L, 0x1p-52L, 9.590301705980041385828904092662391018164e-9L, -2.315303644582684770975188768022139415020e-8L),
1966 TEST_c_c (cacos, -0x1.0000000000001p0L, 0x1p-52L, 3.141592643999491532482601997450598791535L, -2.315303644582684770975188768022139415020e-8L),
1967 TEST_c_c (cacos, 0x1.0000000000001p0L, -0x1p-52L, 9.590301705980041385828904092662391018164e-9L, 2.315303644582684770975188768022139415020e-8L),
1968 TEST_c_c (cacos, -0x1.0000000000001p0L, -0x1p-52L, 3.141592643999491532482601997450598791535L, 2.315303644582684770975188768022139415020e-8L),
1969 TEST_c_c (cacos, 0x1.fp-1025L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195431822418551933572895326024e-1L),
1970 TEST_c_c (cacos, 0x1.fp-1025L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195431822418551933572895326024e-1L),
1971 TEST_c_c (cacos, -0x1.fp-1025L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195431822418551933572895326024e-1L),
1972 TEST_c_c (cacos, -0x1.fp-1025L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195431822418551933572895326024e-1L),
1973 TEST_c_c (cacos, 0x1.0000000000001p0L, 0x1.fp-1025L, 2.557178503953494342609835913586108008322e-301L, -2.107342425544701550354780375182800088393e-8L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
1974 TEST_c_c (cacos, -0x1.0000000000001p0L, 0x1.fp-1025L, 3.141592653589793238462643383279502884197L, -2.107342425544701550354780375182800088393e-8L),
1975 TEST_c_c (cacos, 0x1.0000000000001p0L, -0x1.fp-1025L, 2.557178503953494342609835913586108008322e-301L, 2.107342425544701550354780375182800088393e-8L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
1976 TEST_c_c (cacos, -0x1.0000000000001p0L, -0x1.fp-1025L, 3.141592653589793238462643383279502884197L, 2.107342425544701550354780375182800088393e-8L),
1977 TEST_c_c (cacos, 0.0L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195431822418551933572895326024e-1L),
1978 TEST_c_c (cacos, 0.0L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195431822418551933572895326024e-1L),
1979 TEST_c_c (cacos, -0.0L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195431822418551933572895326024e-1L),
1980 TEST_c_c (cacos, -0.0L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195431822418551933572895326024e-1L),
1981 TEST_c_c (cacos, 0x1.0000000000001p0L, 0.0L, 0.0L, -2.107342425544701550354780375182800088393e-8L),
1982 TEST_c_c (cacos, -0x1.0000000000001p0L, 0.0L, 3.141592653589793238462643383279502884197L, -2.107342425544701550354780375182800088393e-8L),
1983 TEST_c_c (cacos, 0x1.0000000000001p0L, -0.0L, 0.0L, 2.107342425544701550354780375182800088393e-8L),
1984 TEST_c_c (cacos, -0x1.0000000000001p0L, -0.0L, 3.141592653589793238462643383279502884197L, 2.107342425544701550354780375182800088393e-8L),
1985 #endif
1986 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
1987 TEST_c_c (cacos, 0x1p-63L, 0x1.0000000000000002p0L, 1.570796326794896619154657020805582738031L, -8.813735870195430253092739958139610131001e-1L),
1988 TEST_c_c (cacos, 0x1p-63L, -0x1.0000000000000002p0L, 1.570796326794896619154657020805582738031L, 8.813735870195430253092739958139610131001e-1L),
1989 TEST_c_c (cacos, -0x1p-63L, 0x1.0000000000000002p0L, 1.570796326794896619307986362473920146166L, -8.813735870195430253092739958139610131001e-1L),
1990 TEST_c_c (cacos, -0x1p-63L, -0x1.0000000000000002p0L, 1.570796326794896619307986362473920146166L, 8.813735870195430253092739958139610131001e-1L),
1991 TEST_c_c (cacos, 0x1.0000000000000002p0L, 0x1p-63L, 2.119177303101063432592523199680782317447e-10L, -5.116146586219826555037807251857670783420e-10L),
1992 TEST_c_c (cacos, -0x1.0000000000000002p0L, 0x1p-63L, 3.141592653377875508152537040020250564229L, -5.116146586219826555037807251857670783420e-10L),
1993 TEST_c_c (cacos, 0x1.0000000000000002p0L, -0x1p-63L, 2.119177303101063432592523199680782317447e-10L, 5.116146586219826555037807251857670783420e-10L),
1994 TEST_c_c (cacos, -0x1.0000000000000002p0L, -0x1p-63L, 3.141592653377875508152537040020250564229L, 5.116146586219826555037807251857670783420e-10L),
1995 # if LDBL_MIN_EXP <= -16381
1996 TEST_c_c (cacos, 0x1.fp-16385L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430253092739958139610130980e-1L),
1997 TEST_c_c (cacos, 0x1.fp-16385L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430253092739958139610130980e-1L),
1998 TEST_c_c (cacos, -0x1.fp-16385L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430253092739958139610130980e-1L),
1999 TEST_c_c (cacos, -0x1.fp-16385L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430253092739958139610130980e-1L),
2000 TEST_c_c (cacos, 0x1.0000000000000002p0L, 0x1.fp-16385L, 1.748608650034385653922359120438227480943e-4923L, -4.656612873077392578082927418388212703712e-10L),
2001 TEST_c_c (cacos, -0x1.0000000000000002p0L, 0x1.fp-16385L, 3.141592653589793238462643383279502884197L, -4.656612873077392578082927418388212703712e-10L),
2002 TEST_c_c (cacos, 0x1.0000000000000002p0L, -0x1.fp-16385L, 1.748608650034385653922359120438227480943e-4923L, 4.656612873077392578082927418388212703712e-10L),
2003 TEST_c_c (cacos, -0x1.0000000000000002p0L, -0x1.fp-16385L, 3.141592653589793238462643383279502884197L, 4.656612873077392578082927418388212703712e-10L),
2004 # endif
2005 TEST_c_c (cacos, 0.0L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430253092739958139610130980e-1L),
2006 TEST_c_c (cacos, 0.0L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430253092739958139610130980e-1L),
2007 TEST_c_c (cacos, -0.0L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430253092739958139610130980e-1L),
2008 TEST_c_c (cacos, -0.0L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430253092739958139610130980e-1L),
2009 TEST_c_c (cacos, 0x1.0000000000000002p0L, 0.0L, 0.0L, -4.656612873077392578082927418388212703712e-10L),
2010 TEST_c_c (cacos, -0x1.0000000000000002p0L, 0.0L, 3.141592653589793238462643383279502884197L, -4.656612873077392578082927418388212703712e-10L),
2011 TEST_c_c (cacos, 0x1.0000000000000002p0L, -0.0L, 0.0L, 4.656612873077392578082927418388212703712e-10L),
2012 TEST_c_c (cacos, -0x1.0000000000000002p0L, -0.0L, 3.141592653589793238462643383279502884197L, 4.656612873077392578082927418388212703712e-10L),
2013 #endif
2014 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
2015 TEST_c_c (cacos, 0x1p-106L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639742726335L, -8.813735870195430252326093249798097405561e-1L),
2016 TEST_c_c (cacos, 0x1p-106L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639742726335L, 8.813735870195430252326093249798097405561e-1L),
2017 TEST_c_c (cacos, -0x1p-106L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639760157863L, -8.813735870195430252326093249798097405561e-1L),
2018 TEST_c_c (cacos, -0x1p-106L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639760157863L, 8.813735870195430252326093249798097405561e-1L),
2019 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, 0x1p-106L, 5.394221422390606848017034778914096659726e-17L, -2.285028863093221674154232933662774454211e-16L),
2020 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, 0x1p-106L, 3.141592653589793184520429159373434404027L, -2.285028863093221674154232933662774454211e-16L),
2021 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, -0x1p-106L, 5.394221422390606848017034778914096659726e-17L, 2.285028863093221674154232933662774454211e-16L),
2022 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, -0x1p-106L, 3.141592653589793184520429159373434404027L, 2.285028863093221674154232933662774454211e-16L),
2023 TEST_c_c (cacos, 0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249798097405561e-1L),
2024 TEST_c_c (cacos, 0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249798097405561e-1L),
2025 TEST_c_c (cacos, -0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249798097405561e-1L),
2026 TEST_c_c (cacos, -0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249798097405561e-1L),
2027 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 2.426922623448365473354662093431821897807e-293L, -2.220446049250313080847263336181636063482e-16L),
2028 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 3.141592653589793238462643383279502884197L, -2.220446049250313080847263336181636063482e-16L),
2029 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 2.426922623448365473354662093431821897807e-293L, 2.220446049250313080847263336181636063482e-16L),
2030 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 3.141592653589793238462643383279502884197L, 2.220446049250313080847263336181636063482e-16L),
2031 TEST_c_c (cacos, 0.0L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249798097405561e-1L),
2032 TEST_c_c (cacos, 0.0L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249798097405561e-1L),
2033 TEST_c_c (cacos, -0.0L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249798097405561e-1L),
2034 TEST_c_c (cacos, -0.0L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249798097405561e-1L),
2035 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, 0.0L, 0.0L, -2.220446049250313080847263336181636063482e-16L),
2036 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, 0.0L, 3.141592653589793238462643383279502884197L, -2.220446049250313080847263336181636063482e-16L),
2037 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, -0.0L, 0.0L, 2.220446049250313080847263336181636063482e-16L),
2038 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, -0.0L, 3.141592653589793238462643383279502884197L, 2.220446049250313080847263336181636063482e-16L),
2039 #endif
2040 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
2041 TEST_c_c (cacos, 0x1p-113L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751374007L, -8.813735870195430252326093249797924452120e-1L),
2042 TEST_c_c (cacos, 0x1p-113L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751374007L, 8.813735870195430252326093249797924452120e-1L),
2043 TEST_c_c (cacos, -0x1p-113L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751510190L, -8.813735870195430252326093249797924452120e-1L),
2044 TEST_c_c (cacos, -0x1p-113L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751510190L, 8.813735870195430252326093249797924452120e-1L),
2045 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, 0x1p-113L, 4.767863183742677481693563511435642755521e-18L, -2.019699255375255198156433710951064632386e-17L),
2046 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, 0x1p-113L, 3.141592653589793233694780199536825402504L, -2.019699255375255198156433710951064632386e-17L),
2047 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, -0x1p-113L, 4.767863183742677481693563511435642755521e-18L, 2.019699255375255198156433710951064632386e-17L),
2048 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, -0x1p-113L, 3.141592653589793233694780199536825402504L, 2.019699255375255198156433710951064632386e-17L),
2049 TEST_c_c (cacos, 0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797924452120e-1L),
2050 TEST_c_c (cacos, 0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797924452120e-1L),
2051 TEST_c_c (cacos, -0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797924452120e-1L),
2052 TEST_c_c (cacos, -0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797924452120e-1L),
2053 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 4.148847925325683229178506116378864361396e-4916L, -1.962615573354718824241727964954454332780e-17L),
2054 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 3.141592653589793238462643383279502884197L, -1.962615573354718824241727964954454332780e-17L),
2055 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 4.148847925325683229178506116378864361396e-4916L, 1.962615573354718824241727964954454332780e-17L),
2056 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 3.141592653589793238462643383279502884197L, 1.962615573354718824241727964954454332780e-17L),
2057 TEST_c_c (cacos, 0.0L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797924452120e-1L),
2058 TEST_c_c (cacos, 0.0L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797924452120e-1L),
2059 TEST_c_c (cacos, -0.0L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797924452120e-1L),
2060 TEST_c_c (cacos, -0.0L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797924452120e-1L),
2061 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, 0.0L, 0.0L, -1.962615573354718824241727964954454332780e-17L),
2062 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, 0.0L, 3.141592653589793238462643383279502884197L, -1.962615573354718824241727964954454332780e-17L),
2063 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, -0.0L, 0.0L, 1.962615573354718824241727964954454332780e-17L),
2064 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, -0.0L, 3.141592653589793238462643383279502884197L, 1.962615573354718824241727964954454332780e-17L),
2065 #endif
2066
2067 TEST_c_c (cacos, 0x1p-23L, 0x0.ffffffp0L, 1.570796242501197085295336701632142060969L, -8.813735448726963984495965873956465777250e-1L),
2068 TEST_c_c (cacos, 0x1p-23L, -0x0.ffffffp0L, 1.570796242501197085295336701632142060969L, 8.813735448726963984495965873956465777250e-1L),
2069 TEST_c_c (cacos, -0x1p-23L, 0x0.ffffffp0L, 1.570796411088596153167306681647360823228L, -8.813735448726963984495965873956465777250e-1L),
2070 TEST_c_c (cacos, -0x1p-23L, -0x0.ffffffp0L, 1.570796411088596153167306681647360823228L, 8.813735448726963984495965873956465777250e-1L),
2071 TEST_c_c (cacos, 0x0.ffffffp0L, 0x1p-23L, 4.391863861910487109445187743978204002614e-4L, -2.714321200917194650737217746780928423385e-4L),
2072 TEST_c_c (cacos, -0x0.ffffffp0L, 0x1p-23L, 3.141153467203602189751698864505105063797L, -2.714321200917194650737217746780928423385e-4L),
2073 TEST_c_c (cacos, 0x0.ffffffp0L, -0x1p-23L, 4.391863861910487109445187743978204002614e-4L, 2.714321200917194650737217746780928423385e-4L),
2074 TEST_c_c (cacos, -0x0.ffffffp0L, -0x1p-23L, 3.141153467203602189751698864505105063797L, 2.714321200917194650737217746780928423385e-4L),
2075 TEST_c_c (cacos, 0x1.fp-129L, 0x0.ffffffp0L, 1.570796326794896619231321691639751442097L, -8.813735448726938863015878255140556727969e-1L),
2076 TEST_c_c (cacos, 0x1.fp-129L, -0x0.ffffffp0L, 1.570796326794896619231321691639751442097L, 8.813735448726938863015878255140556727969e-1L),
2077 TEST_c_c (cacos, -0x1.fp-129L, 0x0.ffffffp0L, 1.570796326794896619231321691639751442101L, -8.813735448726938863015878255140556727969e-1L),
2078 TEST_c_c (cacos, -0x1.fp-129L, -0x0.ffffffp0L, 1.570796326794896619231321691639751442101L, 8.813735448726938863015878255140556727969e-1L),
2079 TEST_c_c (cacos, 0x0.ffffffp0L, 0x1.fp-129L, 3.452669847162035876032494826387364972849e-4L, -8.245504387859737323891843603996428534945e-36L),
2080 TEST_c_c (cacos, -0x0.ffffffp0L, 0x1.fp-129L, 3.141247386605077034875040133796864147700L, -8.245504387859737323891843603996428534945e-36L),
2081 TEST_c_c (cacos, 0x0.ffffffp0L, -0x1.fp-129L, 3.452669847162035876032494826387364972849e-4L, 8.245504387859737323891843603996428534945e-36L),
2082 TEST_c_c (cacos, -0x0.ffffffp0L, -0x1.fp-129L, 3.141247386605077034875040133796864147700L, 8.245504387859737323891843603996428534945e-36L),
2083 TEST_c_c (cacos, 0.0L, 0x0.ffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735448726938863015878255140556727969e-1L),
2084 TEST_c_c (cacos, 0.0L, -0x0.ffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735448726938863015878255140556727969e-1L),
2085 TEST_c_c (cacos, -0.0L, 0x0.ffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735448726938863015878255140556727969e-1L),
2086 TEST_c_c (cacos, -0.0L, -0x0.ffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735448726938863015878255140556727969e-1L),
2087 TEST_c_c (cacos, 0x0.ffffffp0L, 0.0L, 3.452669847162035876032494826387364972849e-4L, -0.0L),
2088 TEST_c_c (cacos, -0x0.ffffffp0L, 0.0L, 3.141247386605077034875040133796864147700L, -0.0L),
2089 TEST_c_c (cacos, 0x0.ffffffp0L, -0.0L, 3.452669847162035876032494826387364972849e-4L, 0.0L),
2090 TEST_c_c (cacos, -0x0.ffffffp0L, -0.0L, 3.141247386605077034875040133796864147700L, 0.0L),
2091 TEST_c_c (cacos, 0x1p-23L, 0.5L, 1.570796220170866625230343643673321150378L, -4.812118250596059896127318386463676808798e-1L),
2092 TEST_c_c (cacos, 0x1p-23L, -0.5L, 1.570796220170866625230343643673321150378L, 4.812118250596059896127318386463676808798e-1L),
2093 TEST_c_c (cacos, -0x1p-23L, 0.5L, 1.570796433418926613232299739606181733819L, -4.812118250596059896127318386463676808798e-1L),
2094 TEST_c_c (cacos, -0x1p-23L, -0.5L, 1.570796433418926613232299739606181733819L, 4.812118250596059896127318386463676808798e-1L),
2095 TEST_c_c (cacos, 0.5L, 0x1p-23L, 1.047197551196603215914744618665204532273L, -1.376510308240943236356088341381173571841e-7L),
2096 TEST_c_c (cacos, -0.5L, 0x1p-23L, 2.094395102393190022547898764614298351924L, -1.376510308240943236356088341381173571841e-7L),
2097 TEST_c_c (cacos, 0.5L, -0x1p-23L, 1.047197551196603215914744618665204532273L, 1.376510308240943236356088341381173571841e-7L),
2098 TEST_c_c (cacos, -0.5L, -0x1p-23L, 2.094395102393190022547898764614298351924L, 1.376510308240943236356088341381173571841e-7L),
2099 TEST_c_c (cacos, 0x1.fp-129L, 0.5L, 1.570796326794896619231321691639751442096L, -4.812118250596034474977589134243684231352e-1L),
2100 TEST_c_c (cacos, 0x1.fp-129L, -0.5L, 1.570796326794896619231321691639751442096L, 4.812118250596034474977589134243684231352e-1L),
2101 TEST_c_c (cacos, -0x1.fp-129L, 0.5L, 1.570796326794896619231321691639751442101L, -4.812118250596034474977589134243684231352e-1L),
2102 TEST_c_c (cacos, -0x1.fp-129L, -0.5L, 1.570796326794896619231321691639751442101L, 4.812118250596034474977589134243684231352e-1L),
2103 TEST_c_c (cacos, 0.5L, 0x1.fp-129L, 1.047197551196597746154214461093167628066L, -3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2104 TEST_c_c (cacos, -0.5L, 0x1.fp-129L, 2.094395102393195492308428922186335256131L, -3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2105 TEST_c_c (cacos, 0.5L, -0x1.fp-129L, 1.047197551196597746154214461093167628066L, 3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2106 TEST_c_c (cacos, -0.5L, -0x1.fp-129L, 2.094395102393195492308428922186335256131L, 3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2107 TEST_c_c (cacos, 0x1p-23L, 0x1p-23L, 1.570796207585607068450636380271254316214L, -1.192092895507818146886315028596704749235e-7L),
2108 TEST_c_c (cacos, 0x1p-23L, -0x1p-23L, 1.570796207585607068450636380271254316214L, 1.192092895507818146886315028596704749235e-7L),
2109 TEST_c_c (cacos, -0x1p-23L, 0x1p-23L, 1.570796446004186170012007003008248567984L, -1.192092895507818146886315028596704749235e-7L),
2110 TEST_c_c (cacos, -0x1p-23L, -0x1p-23L, 1.570796446004186170012007003008248567984L, 1.192092895507818146886315028596704749235e-7L),
2111 TEST_c_c (cacos, 0x1.fp-129L, 0x1p-23L, 1.570796326794896619231321691639751442096L, -1.192092895507809676556842485683592032154e-7L),
2112 TEST_c_c (cacos, 0x1.fp-129L, -0x1p-23L, 1.570796326794896619231321691639751442096L, 1.192092895507809676556842485683592032154e-7L),
2113 TEST_c_c (cacos, -0x1.fp-129L, 0x1p-23L, 1.570796326794896619231321691639751442101L, -1.192092895507809676556842485683592032154e-7L),
2114 TEST_c_c (cacos, -0x1.fp-129L, -0x1p-23L, 1.570796326794896619231321691639751442101L, 1.192092895507809676556842485683592032154e-7L),
2115 TEST_c_c (cacos, 0x1p-23L, 0x1.fp-129L, 1.570796207585607068449789347324000006847L, -2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2116 TEST_c_c (cacos, -0x1p-23L, 0x1.fp-129L, 1.570796446004186170012854035955502877351L, -2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2117 TEST_c_c (cacos, 0x1p-23L, -0x1.fp-129L, 1.570796207585607068449789347324000006847L, 2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2118 TEST_c_c (cacos, -0x1p-23L, -0x1.fp-129L, 1.570796446004186170012854035955502877351L, 2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2119 TEST_c_c (cacos, 0.0L, 0x1p-23L, 1.570796326794896619231321691639751442099L, -1.192092895507809676556842485683592032154e-7L),
2120 TEST_c_c (cacos, 0.0L, -0x1p-23L, 1.570796326794896619231321691639751442099L, 1.192092895507809676556842485683592032154e-7L),
2121 TEST_c_c (cacos, -0.0L, 0x1p-23L, 1.570796326794896619231321691639751442099L, -1.192092895507809676556842485683592032154e-7L),
2122 TEST_c_c (cacos, -0.0L, -0x1p-23L, 1.570796326794896619231321691639751442099L, 1.192092895507809676556842485683592032154e-7L),
2123 TEST_c_c (cacos, 0x1p-23L, 0.0L, 1.570796207585607068449789347324000006847L, -0.0L),
2124 TEST_c_c (cacos, -0x1p-23L, 0.0L, 1.570796446004186170012854035955502877351L, -0.0L),
2125 TEST_c_c (cacos, 0x1p-23L, -0.0L, 1.570796207585607068449789347324000006847L, 0.0L),
2126 TEST_c_c (cacos, -0x1p-23L, -0.0L, 1.570796446004186170012854035955502877351L, 0.0L),
2127 TEST_c_c (cacos, 0x1.fp-129L, 0x1.fp-129L, 1.570796326794896619231321691639751442096L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2128 TEST_c_c (cacos, 0x1.fp-129L, -0x1.fp-129L, 1.570796326794896619231321691639751442096L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2129 TEST_c_c (cacos, -0x1.fp-129L, 0x1.fp-129L, 1.570796326794896619231321691639751442101L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2130 TEST_c_c (cacos, -0x1.fp-129L, -0x1.fp-129L, 1.570796326794896619231321691639751442101L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2131 #ifndef TEST_FLOAT
2132 TEST_c_c (cacos, 0x1p-52L, 0x0.fffffffffffff8p0L, 1.570796326794896462222075823262236786996L, -8.813735870195429467279863907910458761820e-1L),
2133 TEST_c_c (cacos, 0x1p-52L, -0x0.fffffffffffff8p0L, 1.570796326794896462222075823262236786996L, 8.813735870195429467279863907910458761820e-1L),
2134 TEST_c_c (cacos, -0x1p-52L, 0x0.fffffffffffff8p0L, 1.570796326794896776240567560017266097201L, -8.813735870195429467279863907910458761820e-1L),
2135 TEST_c_c (cacos, -0x1p-52L, -0x0.fffffffffffff8p0L, 1.570796326794896776240567560017266097201L, 8.813735870195429467279863907910458761820e-1L),
2136 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, 0x1p-52L, 1.895456983915074112227925127005564372844e-8L, -1.171456840272878582596796205397918831268e-8L),
2137 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, 0x1p-52L, 3.141592634635223399311902261000251614142L, -1.171456840272878582596796205397918831268e-8L),
2138 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, -0x1p-52L, 1.895456983915074112227925127005564372844e-8L, 1.171456840272878582596796205397918831268e-8L),
2139 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, -0x1p-52L, 3.141592634635223399311902261000251614142L, 1.171456840272878582596796205397918831268e-8L),
2140 TEST_c_c (cacos, 0x1.fp-1025L, 0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195429467279863907910371604180e-1L),
2141 TEST_c_c (cacos, 0x1.fp-1025L, -0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195429467279863907910371604180e-1L),
2142 TEST_c_c (cacos, -0x1.fp-1025L, 0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195429467279863907910371604180e-1L),
2143 TEST_c_c (cacos, -0x1.fp-1025L, -0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195429467279863907910371604180e-1L),
2144 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, 0x1.fp-1025L, 1.490116119384765638786343542550461592240e-8L, -3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2145 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, 0x1.fp-1025L, 3.141592638688632044614986995416067458693L, -3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2146 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, -0x1.fp-1025L, 1.490116119384765638786343542550461592240e-8L, 3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2147 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, -0x1.fp-1025L, 3.141592638688632044614986995416067458693L, 3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2148 TEST_c_c (cacos, 0.0L, 0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195429467279863907910371604180e-1L),
2149 TEST_c_c (cacos, 0.0L, -0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195429467279863907910371604180e-1L),
2150 TEST_c_c (cacos, -0.0L, 0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195429467279863907910371604180e-1L),
2151 TEST_c_c (cacos, -0.0L, -0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195429467279863907910371604180e-1L),
2152 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, 0.0L, 1.490116119384765638786343542550461592240e-8L, -0.0L),
2153 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, 0.0L, 3.141592638688632044614986995416067458693L, -0.0L),
2154 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, -0.0L, 1.490116119384765638786343542550461592240e-8L, 0.0L),
2155 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, -0.0L, 3.141592638688632044614986995416067458693L, 0.0L),
2156 #endif
2157 TEST_c_c (cacos, 0x1p-52L, 0.5L, 1.570796326794896420628589431857911675917L, -4.812118250596034474977589134243772428682e-1L),
2158 TEST_c_c (cacos, 0x1p-52L, -0.5L, 1.570796326794896420628589431857911675917L, 4.812118250596034474977589134243772428682e-1L),
2159 TEST_c_c (cacos, -0x1p-52L, 0.5L, 1.570796326794896817834053951421591208280L, -4.812118250596034474977589134243772428682e-1L),
2160 TEST_c_c (cacos, -0x1p-52L, -0.5L, 1.570796326794896817834053951421591208280L, 4.812118250596034474977589134243772428682e-1L),
2161 TEST_c_c (cacos, 0.5L, 0x1p-52L, 1.047197551196597746154214461093186605110L, -2.563950248511418570403591756798643804971e-16L),
2162 TEST_c_c (cacos, -0.5L, 0x1p-52L, 2.094395102393195492308428922186316279087L, -2.563950248511418570403591756798643804971e-16L),
2163 TEST_c_c (cacos, 0.5L, -0x1p-52L, 1.047197551196597746154214461093186605110L, 2.563950248511418570403591756798643804971e-16L),
2164 TEST_c_c (cacos, -0.5L, -0x1p-52L, 2.094395102393195492308428922186316279087L, 2.563950248511418570403591756798643804971e-16L),
2165 #ifndef TEST_FLOAT
2166 TEST_c_c (cacos, 0x1.fp-1025L, 0.5L, 1.570796326794896619231321691639751442099L, -4.812118250596034474977589134243684231352e-1L),
2167 TEST_c_c (cacos, 0x1.fp-1025L, -0.5L, 1.570796326794896619231321691639751442099L, 4.812118250596034474977589134243684231352e-1L),
2168 TEST_c_c (cacos, -0x1.fp-1025L, 0.5L, 1.570796326794896619231321691639751442099L, -4.812118250596034474977589134243684231352e-1L),
2169 TEST_c_c (cacos, -0x1.fp-1025L, -0.5L, 1.570796326794896619231321691639751442099L, 4.812118250596034474977589134243684231352e-1L),
2170 TEST_c_c (cacos, 0.5L, 0x1.fp-1025L, 1.047197551196597746154214461093167628066L, -6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2171 TEST_c_c (cacos, -0.5L, 0x1.fp-1025L, 2.094395102393195492308428922186335256131L, -6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2172 TEST_c_c (cacos, 0.5L, -0x1.fp-1025L, 1.047197551196597746154214461093167628066L, 6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2173 TEST_c_c (cacos, -0.5L, -0x1.fp-1025L, 2.094395102393195492308428922186335256131L, 6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2174 #endif
2175 TEST_c_c (cacos, 0x1p-52L, 0x1p-52L, 1.570796326794896397186716766608443357372L, -2.220446049250313080847263336181677117148e-16L),
2176 TEST_c_c (cacos, 0x1p-52L, -0x1p-52L, 1.570796326794896397186716766608443357372L, 2.220446049250313080847263336181677117148e-16L),
2177 TEST_c_c (cacos, -0x1p-52L, 0x1p-52L, 1.570796326794896841275926616671059526825L, -2.220446049250313080847263336181677117148e-16L),
2178 TEST_c_c (cacos, -0x1p-52L, -0x1p-52L, 1.570796326794896841275926616671059526825L, 2.220446049250313080847263336181677117148e-16L),
2179 #ifndef TEST_FLOAT
2180 TEST_c_c (cacos, 0x1.fp-1025L, 0x1p-52L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181622378926e-16L),
2181 TEST_c_c (cacos, 0x1.fp-1025L, -0x1p-52L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181622378926e-16L),
2182 TEST_c_c (cacos, -0x1.fp-1025L, 0x1p-52L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181622378926e-16L),
2183 TEST_c_c (cacos, -0x1.fp-1025L, -0x1p-52L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181622378926e-16L),
2184 TEST_c_c (cacos, 0x1p-52L, 0x1.fp-1025L, 1.570796326794896397186716766608443357372L, -5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2185 TEST_c_c (cacos, -0x1p-52L, 0x1.fp-1025L, 1.570796326794896841275926616671059526825L, -5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2186 TEST_c_c (cacos, 0x1p-52L, -0x1.fp-1025L, 1.570796326794896397186716766608443357372L, 5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2187 TEST_c_c (cacos, -0x1p-52L, -0x1.fp-1025L, 1.570796326794896841275926616671059526825L, 5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2188 #endif
2189 TEST_c_c (cacos, 0.0L, 0x1p-52L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181622378926e-16L),
2190 TEST_c_c (cacos, 0.0L, -0x1p-52L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181622378926e-16L),
2191 TEST_c_c (cacos, -0.0L, 0x1p-52L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181622378926e-16L),
2192 TEST_c_c (cacos, -0.0L, -0x1p-52L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181622378926e-16L),
2193 TEST_c_c (cacos, 0x1p-52L, 0.0L, 1.570796326794896397186716766608443357372L, -0.0L),
2194 TEST_c_c (cacos, -0x1p-52L, 0.0L, 1.570796326794896841275926616671059526825L, -0.0L),
2195 TEST_c_c (cacos, 0x1p-52L, -0.0L, 1.570796326794896397186716766608443357372L, 0.0L),
2196 TEST_c_c (cacos, -0x1p-52L, -0.0L, 1.570796326794896841275926616671059526825L, 0.0L),
2197 #ifndef TEST_FLOAT
2198 TEST_c_c (cacos, 0x1.fp-1025L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2199 TEST_c_c (cacos, 0x1.fp-1025L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2200 TEST_c_c (cacos, -0x1.fp-1025L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2201 TEST_c_c (cacos, -0x1.fp-1025L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2202 #endif
2203 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
2204 TEST_c_c (cacos, 0x1p-63L, 0x0.ffffffffffffffffp0L, 1.570796326794896619154657020805582738025L, -8.813735870195430251942769895627079569937e-1L),
2205 TEST_c_c (cacos, 0x1p-63L, -0x0.ffffffffffffffffp0L, 1.570796326794896619154657020805582738025L, 8.813735870195430251942769895627079569937e-1L),
2206 TEST_c_c (cacos, -0x1p-63L, 0x0.ffffffffffffffffp0L, 1.570796326794896619307986362473920146173L, -8.813735870195430251942769895627079569937e-1L),
2207 TEST_c_c (cacos, -0x1p-63L, -0x0.ffffffffffffffffp0L, 1.570796326794896619307986362473920146173L, 8.813735870195430251942769895627079569937e-1L),
2208 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, 0x1p-63L, 4.188407771167967636741951941902992986043e-10L, -2.588578361325995866221775673638805081337e-10L),
2209 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, 0x1p-63L, 3.141592653170952461345846619605307690007L, -2.588578361325995866221775673638805081337e-10L),
2210 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, -0x1p-63L, 4.188407771167967636741951941902992986043e-10L, 2.588578361325995866221775673638805081337e-10L),
2211 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, -0x1p-63L, 3.141592653170952461345846619605307690007L, 2.588578361325995866221775673638805081337e-10L),
2212 # if LDBL_MIN_EXP <= -16381
2213 TEST_c_c (cacos, 0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430251942769895627079569917e-1L),
2214 TEST_c_c (cacos, 0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430251942769895627079569917e-1L),
2215 TEST_c_c (cacos, -0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430251942769895627079569917e-1L),
2216 TEST_c_c (cacos, -0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430251942769895627079569917e-1L),
2217 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 3.292722539913596233371825532007990724506e-10L, -2.472906068161537187835415298076415423459e-4923L),
2218 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 3.141592653260520984471283759942320330996L, -2.472906068161537187835415298076415423459e-4923L),
2219 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 3.292722539913596233371825532007990724506e-10L, 2.472906068161537187835415298076415423459e-4923L),
2220 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 3.141592653260520984471283759942320330996L, 2.472906068161537187835415298076415423459e-4923L),
2221 # endif
2222 TEST_c_c (cacos, 0.0L, 0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430251942769895627079569917e-1L),
2223 TEST_c_c (cacos, 0.0L, -0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430251942769895627079569917e-1L),
2224 TEST_c_c (cacos, -0.0L, 0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430251942769895627079569917e-1L),
2225 TEST_c_c (cacos, -0.0L, -0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430251942769895627079569917e-1L),
2226 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, 0.0L, 3.292722539913596233371825532007990724506e-10L, -0.0L),
2227 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, 0.0L, 3.141592653260520984471283759942320330996L, -0.0L),
2228 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, -0.0L, 3.292722539913596233371825532007990724506e-10L, 0.0L),
2229 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, -0.0L, 3.141592653260520984471283759942320330996L, 0.0L),
2230 #endif
2231 TEST_c_c (cacos, 0x1p-63L, 0.5L, 1.570796326794896619134347701278529840650L, -4.812118250596034474977589134243684231373e-1L),
2232 TEST_c_c (cacos, 0x1p-63L, -0.5L, 1.570796326794896619134347701278529840650L, 4.812118250596034474977589134243684231373e-1L),
2233 TEST_c_c (cacos, -0x1p-63L, 0.5L, 1.570796326794896619328295682000973043547L, -4.812118250596034474977589134243684231373e-1L),
2234 TEST_c_c (cacos, -0x1p-63L, -0.5L, 1.570796326794896619328295682000973043547L, 4.812118250596034474977589134243684231373e-1L),
2235 TEST_c_c (cacos, 0.5L, 0x1p-63L, 1.047197551196597746154214461093167628070L, -1.251928832280966098829878787499365228659e-19L),
2236 TEST_c_c (cacos, -0.5L, 0x1p-63L, 2.094395102393195492308428922186335256127L, -1.251928832280966098829878787499365228659e-19L),
2237 TEST_c_c (cacos, 0.5L, -0x1p-63L, 1.047197551196597746154214461093167628070L, 1.251928832280966098829878787499365228659e-19L),
2238 TEST_c_c (cacos, -0.5L, -0x1p-63L, 2.094395102393195492308428922186335256127L, 1.251928832280966098829878787499365228659e-19L),
2239 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
2240 TEST_c_c (cacos, 0x1.fp-16385L, 0.5L, 1.570796326794896619231321691639751442099L, -4.812118250596034474977589134243684231352e-1L),
2241 TEST_c_c (cacos, 0x1.fp-16385L, -0.5L, 1.570796326794896619231321691639751442099L, 4.812118250596034474977589134243684231352e-1L),
2242 TEST_c_c (cacos, -0x1.fp-16385L, 0.5L, 1.570796326794896619231321691639751442099L, -4.812118250596034474977589134243684231352e-1L),
2243 TEST_c_c (cacos, -0x1.fp-16385L, -0.5L, 1.570796326794896619231321691639751442099L, 4.812118250596034474977589134243684231352e-1L),
2244 TEST_c_c (cacos, 0.5L, 0x1.fp-16385L, 1.047197551196597746154214461093167628066L, -9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
2245 TEST_c_c (cacos, -0.5L, 0x1.fp-16385L, 2.094395102393195492308428922186335256131L, -9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
2246 TEST_c_c (cacos, 0.5L, -0x1.fp-16385L, 1.047197551196597746154214461093167628066L, 9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
2247 TEST_c_c (cacos, -0.5L, -0x1.fp-16385L, 2.094395102393195492308428922186335256131L, 9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
2248 #endif
2249 TEST_c_c (cacos, 0x1p-63L, 0x1p-63L, 1.570796326794896619122901474391200998698L, -1.084202172485504434007452800869941711430e-19L),
2250 TEST_c_c (cacos, 0x1p-63L, -0x1p-63L, 1.570796326794896619122901474391200998698L, 1.084202172485504434007452800869941711430e-19L),
2251 TEST_c_c (cacos, -0x1p-63L, 0x1p-63L, 1.570796326794896619339741908888301885499L, -1.084202172485504434007452800869941711430e-19L),
2252 TEST_c_c (cacos, -0x1p-63L, -0x1p-63L, 1.570796326794896619339741908888301885499L, 1.084202172485504434007452800869941711430e-19L),
2253 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
2254 TEST_c_c (cacos, 0x1.fp-16385L, 0x1p-63L, 1.570796326794896619231321691639751442099L, -1.084202172485504434007452800869941711424e-19L),
2255 TEST_c_c (cacos, 0x1.fp-16385L, -0x1p-63L, 1.570796326794896619231321691639751442099L, 1.084202172485504434007452800869941711424e-19L),
2256 TEST_c_c (cacos, -0x1.fp-16385L, 0x1p-63L, 1.570796326794896619231321691639751442099L, -1.084202172485504434007452800869941711424e-19L),
2257 TEST_c_c (cacos, -0x1.fp-16385L, -0x1p-63L, 1.570796326794896619231321691639751442099L, 1.084202172485504434007452800869941711424e-19L),
2258 TEST_c_c (cacos, 0x1p-63L, 0x1.fp-16385L, 1.570796326794896619122901474391200998698L, -8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
2259 TEST_c_c (cacos, -0x1p-63L, 0x1.fp-16385L, 1.570796326794896619339741908888301885499L, -8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
2260 TEST_c_c (cacos, 0x1p-63L, -0x1.fp-16385L, 1.570796326794896619122901474391200998698L, 8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
2261 TEST_c_c (cacos, -0x1p-63L, -0x1.fp-16385L, 1.570796326794896619339741908888301885499L, 8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
2262 #endif
2263 TEST_c_c (cacos, 0.0L, 0x1p-63L, 1.570796326794896619231321691639751442099L, -1.084202172485504434007452800869941711424e-19L),
2264 TEST_c_c (cacos, 0.0L, -0x1p-63L, 1.570796326794896619231321691639751442099L, 1.084202172485504434007452800869941711424e-19L),
2265 TEST_c_c (cacos, -0.0L, 0x1p-63L, 1.570796326794896619231321691639751442099L, -1.084202172485504434007452800869941711424e-19L),
2266 TEST_c_c (cacos, -0.0L, -0x1p-63L, 1.570796326794896619231321691639751442099L, 1.084202172485504434007452800869941711424e-19L),
2267 TEST_c_c (cacos, 0x1p-63L, 0.0L, 1.570796326794896619122901474391200998698L, -0.0L),
2268 TEST_c_c (cacos, -0x1p-63L, 0.0L, 1.570796326794896619339741908888301885499L, -0.0L),
2269 TEST_c_c (cacos, 0x1p-63L, -0.0L, 1.570796326794896619122901474391200998698L, 0.0L),
2270 TEST_c_c (cacos, -0x1p-63L, -0.0L, 1.570796326794896619339741908888301885499L, 0.0L),
2271 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
2272 TEST_c_c (cacos, 0x1.fp-16385L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2273 TEST_c_c (cacos, 0x1.fp-16385L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2274 TEST_c_c (cacos, -0x1.fp-16385L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2275 TEST_c_c (cacos, -0x1.fp-16385L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2276 #endif
2277 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
2278 TEST_c_c (cacos, 0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639734010571L, -8.813735870195430252326093249797835932642e-1L),
2279 TEST_c_c (cacos, 0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639734010571L, 8.813735870195430252326093249797835932642e-1L),
2280 TEST_c_c (cacos, -0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639768873627L, -8.813735870195430252326093249797835932642e-1L),
2281 TEST_c_c (cacos, -0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639768873627L, 8.813735870195430252326093249797835932642e-1L),
2282 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 1.997188458999618357060632049675702684031e-16L, -1.234330349600789959989661887846005659983e-16L),
2283 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 3.141592653589793038743797483317667178134L, -1.234330349600789959989661887846005659983e-16L),
2284 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 1.997188458999618357060632049675702684031e-16L, 1.234330349600789959989661887846005659983e-16L),
2285 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 3.141592653589793038743797483317667178134L, 1.234330349600789959989661887846005659983e-16L),
2286 TEST_c_c (cacos, 0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797835932642e-1L),
2287 TEST_c_c (cacos, 0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797835932642e-1L),
2288 TEST_c_c (cacos, -0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797835932642e-1L),
2289 TEST_c_c (cacos, -0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797835932642e-1L),
2290 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 1.570092458683775059393382371963565104164e-16L, -3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2291 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 3.141592653589793081453397514901996944859L, -3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2292 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 1.570092458683775059393382371963565104164e-16L, 3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2293 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 3.141592653589793081453397514901996944859L, 3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2294 TEST_c_c (cacos, 0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797835932642e-1L),
2295 TEST_c_c (cacos, 0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797835932642e-1L),
2296 TEST_c_c (cacos, -0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797835932642e-1L),
2297 TEST_c_c (cacos, -0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797835932642e-1L),
2298 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 1.570092458683775059393382371963565104164e-16L, -0.0L),
2299 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 3.141592653589793081453397514901996944859L, -0.0L),
2300 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 1.570092458683775059393382371963565104164e-16L, 0.0L),
2301 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 3.141592653589793081453397514901996944859L, 0.0L),
2302 #endif
2303 TEST_c_c (cacos, 0x1p-105L, 0.5L, 1.570796326794896619231321691639729392766L, -4.812118250596034474977589134243684231352e-1L),
2304 TEST_c_c (cacos, 0x1p-105L, -0.5L, 1.570796326794896619231321691639729392766L, 4.812118250596034474977589134243684231352e-1L),
2305 TEST_c_c (cacos, -0x1p-105L, 0.5L, 1.570796326794896619231321691639773491431L, -4.812118250596034474977589134243684231352e-1L),
2306 TEST_c_c (cacos, -0x1p-105L, -0.5L, 1.570796326794896619231321691639773491431L, 4.812118250596034474977589134243684231352e-1L),
2307 TEST_c_c (cacos, 0.5L, 0x1p-105L, 1.047197551196597746154214461093167628066L, -2.846556599890768890940941645338546615370e-32L),
2308 TEST_c_c (cacos, -0.5L, 0x1p-105L, 2.094395102393195492308428922186335256131L, -2.846556599890768890940941645338546615370e-32L),
2309 TEST_c_c (cacos, 0.5L, -0x1p-105L, 1.047197551196597746154214461093167628066L, 2.846556599890768890940941645338546615370e-32L),
2310 TEST_c_c (cacos, -0.5L, -0x1p-105L, 2.094395102393195492308428922186335256131L, 2.846556599890768890940941645338546615370e-32L),
2311 TEST_c_c (cacos, 0x1p-105L, 0x1p-105L, 1.570796326794896619231321691639726790195L, -2.465190328815661891911651766508706967729e-32L),
2312 TEST_c_c (cacos, 0x1p-105L, -0x1p-105L, 1.570796326794896619231321691639726790195L, 2.465190328815661891911651766508706967729e-32L),
2313 TEST_c_c (cacos, -0x1p-105L, 0x1p-105L, 1.570796326794896619231321691639776094002L, -2.465190328815661891911651766508706967729e-32L),
2314 TEST_c_c (cacos, -0x1p-105L, -0x1p-105L, 1.570796326794896619231321691639776094002L, 2.465190328815661891911651766508706967729e-32L),
2315 #ifndef TEST_FLOAT
2316 TEST_c_c (cacos, 0x1.fp-1025L, 0x1p-105L, 1.570796326794896619231321691639751442099L, -2.465190328815661891911651766508706967729e-32L),
2317 TEST_c_c (cacos, 0x1.fp-1025L, -0x1p-105L, 1.570796326794896619231321691639751442099L, 2.465190328815661891911651766508706967729e-32L),
2318 TEST_c_c (cacos, -0x1.fp-1025L, 0x1p-105L, 1.570796326794896619231321691639751442099L, -2.465190328815661891911651766508706967729e-32L),
2319 TEST_c_c (cacos, -0x1.fp-1025L, -0x1p-105L, 1.570796326794896619231321691639751442099L, 2.465190328815661891911651766508706967729e-32L),
2320 TEST_c_c (cacos, 0x1p-105L, 0x1.fp-1025L, 1.570796326794896619231321691639726790195L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2321 TEST_c_c (cacos, -0x1p-105L, 0x1.fp-1025L, 1.570796326794896619231321691639776094002L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2322 TEST_c_c (cacos, 0x1p-105L, -0x1.fp-1025L, 1.570796326794896619231321691639726790195L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2323 TEST_c_c (cacos, -0x1p-105L, -0x1.fp-1025L, 1.570796326794896619231321691639776094002L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2324 #endif
2325 TEST_c_c (cacos, 0.0L, 0x1p-105L, 1.570796326794896619231321691639751442099L, -2.465190328815661891911651766508706967729e-32L),
2326 TEST_c_c (cacos, 0.0L, -0x1p-105L, 1.570796326794896619231321691639751442099L, 2.465190328815661891911651766508706967729e-32L),
2327 TEST_c_c (cacos, -0.0L, 0x1p-105L, 1.570796326794896619231321691639751442099L, -2.465190328815661891911651766508706967729e-32L),
2328 TEST_c_c (cacos, -0.0L, -0x1p-105L, 1.570796326794896619231321691639751442099L, 2.465190328815661891911651766508706967729e-32L),
2329 TEST_c_c (cacos, 0x1p-105L, 0.0L, 1.570796326794896619231321691639726790195L, -0.0L),
2330 TEST_c_c (cacos, -0x1p-105L, 0.0L, 1.570796326794896619231321691639776094002L, -0.0L),
2331 TEST_c_c (cacos, 0x1p-105L, -0.0L, 1.570796326794896619231321691639726790195L, 0.0L),
2332 TEST_c_c (cacos, -0x1p-105L, -0.0L, 1.570796326794896619231321691639776094002L, 0.0L),
2333 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
2334 TEST_c_c (cacos, 0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751305915L, -8.813735870195430252326093249797922409363e-1L),
2335 TEST_c_c (cacos, 0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751305915L, 8.813735870195430252326093249797922409363e-1L),
2336 TEST_c_c (cacos, -0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751578282L, -8.813735870195430252326093249797922409363e-1L),
2337 TEST_c_c (cacos, -0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751578282L, 8.813735870195430252326093249797922409363e-1L),
2338 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 1.765281878332676474347460257221369818872e-17L, -1.091004200533850618345330909857103457781e-17L),
2339 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 3.141592653589793220809824599952738140723L, -1.091004200533850618345330909857103457781e-17L),
2340 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 1.765281878332676474347460257221369818872e-17L, 1.091004200533850618345330909857103457781e-17L),
2341 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 3.141592653589793220809824599952738140723L, 1.091004200533850618345330909857103457781e-17L),
2342 TEST_c_c (cacos, 0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797922409363e-1L),
2343 TEST_c_c (cacos, 0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797922409363e-1L),
2344 TEST_c_c (cacos, -0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797922409363e-1L),
2345 TEST_c_c (cacos, -0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797922409363e-1L),
2346 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 1.387778780781445675529539585113525401762e-17L, -5.867357004219059108790368268900490184505e-4916L),
2347 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 3.141592653589793224584855575465046128902L, -5.867357004219059108790368268900490184505e-4916L),
2348 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 1.387778780781445675529539585113525401762e-17L, 5.867357004219059108790368268900490184505e-4916L),
2349 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 3.141592653589793224584855575465046128902L, 5.867357004219059108790368268900490184505e-4916L),
2350 TEST_c_c (cacos, 0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797922409363e-1L),
2351 TEST_c_c (cacos, 0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797922409363e-1L),
2352 TEST_c_c (cacos, -0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797922409363e-1L),
2353 TEST_c_c (cacos, -0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797922409363e-1L),
2354 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 1.387778780781445675529539585113525401762e-17L, -0.0L),
2355 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 3.141592653589793224584855575465046128902L, -0.0L),
2356 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 1.387778780781445675529539585113525401762e-17L, 0.0L),
2357 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 3.141592653589793224584855575465046128902L, 0.0L),
2358 #endif
2359 TEST_c_c (cacos, 0x1p-112L, 0.5L, 1.570796326794896619231321691639751269838L, -4.812118250596034474977589134243684231352e-1L),
2360 TEST_c_c (cacos, 0x1p-112L, -0.5L, 1.570796326794896619231321691639751269838L, 4.812118250596034474977589134243684231352e-1L),
2361 TEST_c_c (cacos, -0x1p-112L, 0.5L, 1.570796326794896619231321691639751614359L, -4.812118250596034474977589134243684231352e-1L),
2362 TEST_c_c (cacos, -0x1p-112L, -0.5L, 1.570796326794896619231321691639751614359L, 4.812118250596034474977589134243684231352e-1L),
2363 TEST_c_c (cacos, 0.5L, 0x1p-112L, 1.047197551196597746154214461093167628066L, -2.223872343664663196047610660420739543258e-34L),
2364 TEST_c_c (cacos, -0.5L, 0x1p-112L, 2.094395102393195492308428922186335256131L, -2.223872343664663196047610660420739543258e-34L),
2365 TEST_c_c (cacos, 0.5L, -0x1p-112L, 1.047197551196597746154214461093167628066L, 2.223872343664663196047610660420739543258e-34L),
2366 TEST_c_c (cacos, -0.5L, -0x1p-112L, 2.094395102393195492308428922186335256131L, 2.223872343664663196047610660420739543258e-34L),
2367 TEST_c_c (cacos, 0x1p-112L, 0x1p-112L, 1.570796326794896619231321691639751249506L, -1.925929944387235853055977942584927318538e-34L),
2368 TEST_c_c (cacos, 0x1p-112L, -0x1p-112L, 1.570796326794896619231321691639751249506L, 1.925929944387235853055977942584927318538e-34L),
2369 TEST_c_c (cacos, -0x1p-112L, 0x1p-112L, 1.570796326794896619231321691639751634692L, -1.925929944387235853055977942584927318538e-34L),
2370 TEST_c_c (cacos, -0x1p-112L, -0x1p-112L, 1.570796326794896619231321691639751634692L, 1.925929944387235853055977942584927318538e-34L),
2371 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
2372 TEST_c_c (cacos, 0x1.fp-16385L, 0x1p-112L, 1.570796326794896619231321691639751442099L, -1.925929944387235853055977942584927318538e-34L),
2373 TEST_c_c (cacos, 0x1.fp-16385L, -0x1p-112L, 1.570796326794896619231321691639751442099L, 1.925929944387235853055977942584927318538e-34L),
2374 TEST_c_c (cacos, -0x1.fp-16385L, 0x1p-112L, 1.570796326794896619231321691639751442099L, -1.925929944387235853055977942584927318538e-34L),
2375 TEST_c_c (cacos, -0x1.fp-16385L, -0x1p-112L, 1.570796326794896619231321691639751442099L, 1.925929944387235853055977942584927318538e-34L),
2376 TEST_c_c (cacos, 0x1p-112L, 0x1.fp-16385L, 1.570796326794896619231321691639751249506L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2377 TEST_c_c (cacos, -0x1p-112L, 0x1.fp-16385L, 1.570796326794896619231321691639751634692L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2378 TEST_c_c (cacos, 0x1p-112L, -0x1.fp-16385L, 1.570796326794896619231321691639751249506L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2379 TEST_c_c (cacos, -0x1p-112L, -0x1.fp-16385L, 1.570796326794896619231321691639751634692L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2380 #endif
2381 TEST_c_c (cacos, 0.0L, 0x1p-112L, 1.570796326794896619231321691639751442099L, -1.925929944387235853055977942584927318538e-34L),
2382 TEST_c_c (cacos, 0.0L, -0x1p-112L, 1.570796326794896619231321691639751442099L, 1.925929944387235853055977942584927318538e-34L),
2383 TEST_c_c (cacos, -0.0L, 0x1p-112L, 1.570796326794896619231321691639751442099L, -1.925929944387235853055977942584927318538e-34L),
2384 TEST_c_c (cacos, -0.0L, -0x1p-112L, 1.570796326794896619231321691639751442099L, 1.925929944387235853055977942584927318538e-34L),
2385 TEST_c_c (cacos, 0x1p-112L, 0.0L, 1.570796326794896619231321691639751249506L, -0.0L),
2386 TEST_c_c (cacos, -0x1p-112L, 0.0L, 1.570796326794896619231321691639751634692L, -0.0L),
2387 TEST_c_c (cacos, 0x1p-112L, -0.0L, 1.570796326794896619231321691639751249506L, 0.0L),
2388 TEST_c_c (cacos, -0x1p-112L, -0.0L, 1.570796326794896619231321691639751634692L, 0.0L),
2389
2390 TEST_c_c (cacos, 0.75L, 1.25L, 1.11752014915610270578240049553777969L, -1.13239363160530819522266333696834467L),
2391 TEST_c_c (cacos, -2, -3, 2.1414491111159960199416055713254211L, 1.9833870299165354323470769028940395L),
2392 END_DATA (cacos)
2393 };
2394
2395 static void
2396 cacos_test (void)
2397 {
2398 errno = 0;
2399 FUNC(cacos) (BUILD_COMPLEX (0.7L, 1.2L));
2400 if (errno == ENOSYS)
2401 /* Function not implemented. */
2402 return;
2403
2404 START (cacos);
2405 RUN_TEST_LOOP_c_c (cacos, cacos_test_data, );
2406 END (cacos, complex);
2407 }
2408
2409 static const struct test_c_c_data cacosh_test_data[] =
2410 {
2411 START_DATA (cacosh),
2412 TEST_c_c (cacosh, 0, 0, 0.0, M_PI_2l),
2413 TEST_c_c (cacosh, minus_zero, 0, 0.0, M_PI_2l),
2414 TEST_c_c (cacosh, 0, minus_zero, 0.0, -M_PI_2l),
2415 TEST_c_c (cacosh, minus_zero, minus_zero, 0.0, -M_PI_2l),
2416 TEST_c_c (cacosh, minus_infty, plus_infty, plus_infty, M_PI_34l),
2417 TEST_c_c (cacosh, minus_infty, minus_infty, plus_infty, -M_PI_34l),
2418
2419 TEST_c_c (cacosh, plus_infty, plus_infty, plus_infty, M_PI_4l),
2420 TEST_c_c (cacosh, plus_infty, minus_infty, plus_infty, -M_PI_4l),
2421
2422 TEST_c_c (cacosh, -10.0, plus_infty, plus_infty, M_PI_2l),
2423 TEST_c_c (cacosh, -10.0, minus_infty, plus_infty, -M_PI_2l),
2424 TEST_c_c (cacosh, 0, plus_infty, plus_infty, M_PI_2l),
2425 TEST_c_c (cacosh, 0, minus_infty, plus_infty, -M_PI_2l),
2426 TEST_c_c (cacosh, 0.1L, plus_infty, plus_infty, M_PI_2l),
2427 TEST_c_c (cacosh, 0.1L, minus_infty, plus_infty, -M_PI_2l),
2428
2429 TEST_c_c (cacosh, minus_infty, 0, plus_infty, M_PIl),
2430 TEST_c_c (cacosh, minus_infty, minus_zero, plus_infty, -M_PIl),
2431 TEST_c_c (cacosh, minus_infty, 100, plus_infty, M_PIl),
2432 TEST_c_c (cacosh, minus_infty, -100, plus_infty, -M_PIl),
2433
2434 TEST_c_c (cacosh, plus_infty, 0, plus_infty, 0.0),
2435 TEST_c_c (cacosh, plus_infty, minus_zero, plus_infty, minus_zero),
2436 TEST_c_c (cacosh, plus_infty, 0.5, plus_infty, 0.0),
2437 TEST_c_c (cacosh, plus_infty, -0.5, plus_infty, minus_zero),
2438
2439 TEST_c_c (cacosh, plus_infty, qnan_value, plus_infty, qnan_value),
2440 TEST_c_c (cacosh, minus_infty, qnan_value, plus_infty, qnan_value),
2441
2442 TEST_c_c (cacosh, 0, qnan_value, qnan_value, qnan_value),
2443 TEST_c_c (cacosh, minus_zero, qnan_value, qnan_value, qnan_value),
2444
2445 TEST_c_c (cacosh, qnan_value, plus_infty, plus_infty, qnan_value),
2446 TEST_c_c (cacosh, qnan_value, minus_infty, plus_infty, qnan_value),
2447
2448 TEST_c_c (cacosh, 10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
2449 TEST_c_c (cacosh, -10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
2450
2451 TEST_c_c (cacosh, qnan_value, 0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
2452 TEST_c_c (cacosh, qnan_value, -0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
2453
2454 TEST_c_c (cacosh, qnan_value, qnan_value, qnan_value, qnan_value),
2455
2456 TEST_c_c (cacosh, plus_zero, -1.5L, 1.194763217287109304111930828519090523536L, -M_PI_2l),
2457 TEST_c_c (cacosh, minus_zero, -1.5L, 1.194763217287109304111930828519090523536L, -M_PI_2l),
2458 TEST_c_c (cacosh, plus_zero, -1.0L, 0.8813735870195430252326093249797923090282L, -M_PI_2l),
2459 TEST_c_c (cacosh, minus_zero, -1.0L, 0.8813735870195430252326093249797923090282L, -M_PI_2l),
2460 TEST_c_c (cacosh, plus_zero, -0.5L, 0.4812118250596034474977589134243684231352L, -M_PI_2l),
2461 TEST_c_c (cacosh, minus_zero, -0.5L, 0.4812118250596034474977589134243684231352L, -M_PI_2l),
2462 TEST_c_c (cacosh, plus_zero, 0.5L, 0.4812118250596034474977589134243684231352L, M_PI_2l),
2463 TEST_c_c (cacosh, minus_zero, 0.5L, 0.4812118250596034474977589134243684231352L, M_PI_2l),
2464 TEST_c_c (cacosh, plus_zero, 1.0L, 0.8813735870195430252326093249797923090282L, M_PI_2l),
2465 TEST_c_c (cacosh, minus_zero, 1.0L, 0.8813735870195430252326093249797923090282L, M_PI_2l),
2466 TEST_c_c (cacosh, plus_zero, 1.5L, 1.194763217287109304111930828519090523536L, M_PI_2l),
2467 TEST_c_c (cacosh, minus_zero, 1.5L, 1.194763217287109304111930828519090523536L, M_PI_2l),
2468
2469 TEST_c_c (cacosh, -1.5L, plus_zero, 0.9624236501192068949955178268487368462704L, M_PIl),
2470 TEST_c_c (cacosh, -1.5L, minus_zero, 0.9624236501192068949955178268487368462704L, -M_PIl),
2471 TEST_c_c (cacosh, -1.0L, plus_zero, plus_zero, M_PIl),
2472 TEST_c_c (cacosh, -1.0L, minus_zero, plus_zero, -M_PIl),
2473 TEST_c_c (cacosh, -0.5L, plus_zero, plus_zero, 2.094395102393195492308428922186335256131L),
2474 TEST_c_c (cacosh, -0.5L, minus_zero, plus_zero, -2.094395102393195492308428922186335256131L),
2475 TEST_c_c (cacosh, 0.5L, plus_zero, plus_zero, 1.047197551196597746154214461093167628066L),
2476 TEST_c_c (cacosh, 0.5L, minus_zero, plus_zero, -1.047197551196597746154214461093167628066L),
2477 TEST_c_c (cacosh, 1.0L, plus_zero, plus_zero, plus_zero),
2478 TEST_c_c (cacosh, 1.0L, minus_zero, plus_zero, minus_zero),
2479 TEST_c_c (cacosh, 1.5L, plus_zero, 0.9624236501192068949955178268487368462704L, plus_zero),
2480 TEST_c_c (cacosh, 1.5L, minus_zero, 0.9624236501192068949955178268487368462704L, minus_zero),
2481
2482 TEST_c_c (cacosh, 0x1p50L, 1.0L, 3.535050620855721078027883819436720218708e1L, 8.881784197001252323389053344727730248720e-16L),
2483 TEST_c_c (cacosh, 0x1p50L, -1.0L, 3.535050620855721078027883819436720218708e1L, -8.881784197001252323389053344727730248720e-16L),
2484 TEST_c_c (cacosh, -0x1p50L, 1.0L, 3.535050620855721078027883819436720218708e1L, 3.141592653589792350284223683154270545292L),
2485 TEST_c_c (cacosh, -0x1p50L, -1.0L, 3.535050620855721078027883819436720218708e1L, -3.141592653589792350284223683154270545292L),
2486 TEST_c_c (cacosh, 1.0L, 0x1p50L, 3.535050620855721078027883819436759661753e1L, 1.570796326794895731052901991514519103193L),
2487 TEST_c_c (cacosh, -1.0L, 0x1p50L, 3.535050620855721078027883819436759661753e1L, 1.570796326794897507409741391764983781004L),
2488 TEST_c_c (cacosh, 1.0L, -0x1p50L, 3.535050620855721078027883819436759661753e1L, -1.570796326794895731052901991514519103193L),
2489 TEST_c_c (cacosh, -1.0L, -0x1p50L, 3.535050620855721078027883819436759661753e1L, -1.570796326794897507409741391764983781004L),
2490 #ifndef TEST_FLOAT
2491 TEST_c_c (cacosh, 0x1p500L, 1.0L, 3.472667374605326000180332928505464606058e2L, 3.054936363499604682051979393213617699789e-151L),
2492 TEST_c_c (cacosh, 0x1p500L, -1.0L, 3.472667374605326000180332928505464606058e2L, -3.054936363499604682051979393213617699789e-151L),
2493 TEST_c_c (cacosh, -0x1p500L, 1.0L, 3.472667374605326000180332928505464606058e2L, 3.141592653589793238462643383279502884197L),
2494 TEST_c_c (cacosh, -0x1p500L, -1.0L, 3.472667374605326000180332928505464606058e2L, -3.141592653589793238462643383279502884197L),
2495 TEST_c_c (cacosh, 1.0L, 0x1p500L, 3.472667374605326000180332928505464606058e2L, 1.570796326794896619231321691639751442099L),
2496 TEST_c_c (cacosh, -1.0L, 0x1p500L, 3.472667374605326000180332928505464606058e2L, 1.570796326794896619231321691639751442099L),
2497 TEST_c_c (cacosh, 1.0L, -0x1p500L, 3.472667374605326000180332928505464606058e2L, -1.570796326794896619231321691639751442099L),
2498 TEST_c_c (cacosh, -1.0L, -0x1p500L, 3.472667374605326000180332928505464606058e2L, -1.570796326794896619231321691639751442099L),
2499 #endif
2500 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
2501 TEST_c_c (cacosh, 0x1p5000L, 1.0L, 3.466429049980286492395577839412341016946e3L, 7.079811261048172892385615158694057552948e-1506L),
2502 TEST_c_c (cacosh, 0x1p5000L, -1.0L, 3.466429049980286492395577839412341016946e3L, -7.079811261048172892385615158694057552948e-1506L),
2503 TEST_c_c (cacosh, -0x1p5000L, 1.0L, 3.466429049980286492395577839412341016946e3L, 3.141592653589793238462643383279502884197L),
2504 TEST_c_c (cacosh, -0x1p5000L, -1.0L, 3.466429049980286492395577839412341016946e3L, -3.141592653589793238462643383279502884197L),
2505 TEST_c_c (cacosh, 1.0L, 0x1p5000L, 3.466429049980286492395577839412341016946e3L, 1.570796326794896619231321691639751442099L),
2506 TEST_c_c (cacosh, -1.0L, 0x1p5000L, 3.466429049980286492395577839412341016946e3L, 1.570796326794896619231321691639751442099L),
2507 TEST_c_c (cacosh, 1.0L, -0x1p5000L, 3.466429049980286492395577839412341016946e3L, -1.570796326794896619231321691639751442099L),
2508 TEST_c_c (cacosh, -1.0L, -0x1p5000L, 3.466429049980286492395577839412341016946e3L, -1.570796326794896619231321691639751442099L),
2509 #endif
2510 TEST_c_c (cacosh, 0x1.fp127L, 0x1.fp127L, 8.973081118419833726837456344608533993585e1L, 7.853981633974483096156608458198757210493e-1L),
2511 #ifndef TEST_FLOAT
2512 TEST_c_c (cacosh, 0x1.fp1023L, 0x1.fp1023L, 7.107906849659093345062145442726115449315e2L, 7.853981633974483096156608458198757210493e-1L),
2513 #endif
2514 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
2515 TEST_c_c (cacosh, 0x1.fp16383L, 0x1.fp16383L, 1.135753137836666928715489992987020363057e4L, 7.853981633974483096156608458198757210493e-1L),
2516 #endif
2517 TEST_c_c (cacosh, 0x1.fp-129L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442097L),
2518 TEST_c_c (cacosh, 0x1.fp-129L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442097L),
2519 TEST_c_c (cacosh, -0x1.fp-129L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442100L),
2520 TEST_c_c (cacosh, -0x1.fp-129L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442100L),
2521 TEST_c_c (cacosh, 1.5L, 0x1.fp-129L, 9.624236501192068949955178268487368462704e-1L, 2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2522 TEST_c_c (cacosh, -1.5L, 0x1.fp-129L, 9.624236501192068949955178268487368462704e-1L, 3.141592653589793238462643383279502884195L),
2523 TEST_c_c (cacosh, 1.5L, -0x1.fp-129L, 9.624236501192068949955178268487368462704e-1L, -2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2524 TEST_c_c (cacosh, -1.5L, -0x1.fp-129L, 9.624236501192068949955178268487368462704e-1L, -3.141592653589793238462643383279502884195L),
2525 #ifndef TEST_FLOAT
2526 TEST_c_c (cacosh, 0x1.fp-1025L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442099L),
2527 TEST_c_c (cacosh, 0x1.fp-1025L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442099L),
2528 TEST_c_c (cacosh, -0x1.fp-1025L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442099L),
2529 TEST_c_c (cacosh, -0x1.fp-1025L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442099L),
2530 TEST_c_c (cacosh, 1.5L, 0x1.fp-1025L, 9.624236501192068949955178268487368462704e-1L, 4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2531 TEST_c_c (cacosh, -1.5L, 0x1.fp-1025L, 9.624236501192068949955178268487368462704e-1L, 3.141592653589793238462643383279502884197L),
2532 TEST_c_c (cacosh, 1.5L, -0x1.fp-1025L, 9.624236501192068949955178268487368462704e-1L, -4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2533 TEST_c_c (cacosh, -1.5L, -0x1.fp-1025L, 9.624236501192068949955178268487368462704e-1L, -3.141592653589793238462643383279502884197L),
2534 #endif
2535 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
2536 TEST_c_c (cacosh, 0x1.fp-16385L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442099L),
2537 TEST_c_c (cacosh, 0x1.fp-16385L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442099L),
2538 TEST_c_c (cacosh, -0x1.fp-16385L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442099L),
2539 TEST_c_c (cacosh, -0x1.fp-16385L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442099L),
2540 TEST_c_c (cacosh, 1.5L, 0x1.fp-16385L, 9.624236501192068949955178268487368462704e-1L, 7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
2541 TEST_c_c (cacosh, -1.5L, 0x1.fp-16385L, 9.624236501192068949955178268487368462704e-1L, 3.141592653589793238462643383279502884197L),
2542 TEST_c_c (cacosh, 1.5L, -0x1.fp-16385L, 9.624236501192068949955178268487368462704e-1L, -7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
2543 TEST_c_c (cacosh, -1.5L, -0x1.fp-16385L, 9.624236501192068949955178268487368462704e-1L, -3.141592653589793238462643383279502884197L),
2544 #endif
2545 TEST_c_c (cacosh, 0.5L, 1.0L, 9.261330313501824245501244453057873152694e-1L, 1.221357263937683325603909865564381489366L),
2546 TEST_c_c (cacosh, 0.5L, -1.0L, 9.261330313501824245501244453057873152694e-1L, -1.221357263937683325603909865564381489366L),
2547 TEST_c_c (cacosh, -0.5L, 1.0L, 9.261330313501824245501244453057873152694e-1L, 1.920235389652109912858733517715121394831L),
2548 TEST_c_c (cacosh, -0.5L, -1.0L, 9.261330313501824245501244453057873152694e-1L, -1.920235389652109912858733517715121394831L),
2549 TEST_c_c (cacosh, 1.0L, 0.5L, 7.328576759736452608886724437653071523305e-1L, 6.748888455860063801646649673121744318756e-1L),
2550 TEST_c_c (cacosh, -1.0L, 0.5L, 7.328576759736452608886724437653071523305e-1L, 2.466703808003786858297978415967328452322L),
2551 TEST_c_c (cacosh, 1.0L, -0.5L, 7.328576759736452608886724437653071523305e-1L, -6.748888455860063801646649673121744318756e-1L),
2552 TEST_c_c (cacosh, -1.0L, -0.5L, 7.328576759736452608886724437653071523305e-1L, -2.466703808003786858297978415967328452322L),
2553 TEST_c_c (cacosh, 0.25L, 1.0L, 8.924633639033482359562124741744951972772e-1L, 1.394493894017929688812643125003661339452L),
2554 TEST_c_c (cacosh, 0.25L, -1.0L, 8.924633639033482359562124741744951972772e-1L, -1.394493894017929688812643125003661339452L),
2555 TEST_c_c (cacosh, -0.25L, 1.0L, 8.924633639033482359562124741744951972772e-1L, 1.747098759571863549650000258275841544745L),
2556 TEST_c_c (cacosh, -0.25L, -1.0L, 8.924633639033482359562124741744951972772e-1L, -1.747098759571863549650000258275841544745L),
2557 TEST_c_c (cacosh, 1.0L, 0.25L, 5.097911466811016354623559941115413499164e-1L, 4.890443302710802929202843732146540079124e-1L),
2558 TEST_c_c (cacosh, -1.0L, 0.25L, 5.097911466811016354623559941115413499164e-1L, 2.652548323318712945542359010064848876285L),
2559 TEST_c_c (cacosh, 1.0L, -0.25L, 5.097911466811016354623559941115413499164e-1L, -4.890443302710802929202843732146540079124e-1L),
2560 TEST_c_c (cacosh, -1.0L, -0.25L, 5.097911466811016354623559941115413499164e-1L, -2.652548323318712945542359010064848876285L),
2561 TEST_c_c (cacosh, 0x1.fp-10L, 1.0L, 8.813742198809567991336704287826445879025e-1L, 1.569458417435338878318763342108699202986L),
2562 TEST_c_c (cacosh, 0x1.fp-10L, -1.0L, 8.813742198809567991336704287826445879025e-1L, -1.569458417435338878318763342108699202986L),
2563 TEST_c_c (cacosh, -0x1.fp-10L, 1.0L, 8.813742198809567991336704287826445879025e-1L, 1.572134236154454360143880041170803681211L),
2564 TEST_c_c (cacosh, -0x1.fp-10L, -1.0L, 8.813742198809567991336704287826445879025e-1L, -1.572134236154454360143880041170803681211L),
2565 TEST_c_c (cacosh, 1.0L, 0x1.fp-10L, 4.350501469856803800217957402220976497152e-2L, 4.349129763101882771258049954181971959031e-2L),
2566 TEST_c_c (cacosh, -1.0L, 0x1.fp-10L, 4.350501469856803800217957402220976497152e-2L, 3.098101355958774410750062883737683164607L),
2567 TEST_c_c (cacosh, 1.0L, -0x1.fp-10L, 4.350501469856803800217957402220976497152e-2L, -4.349129763101882771258049954181971959031e-2L),
2568 TEST_c_c (cacosh, -1.0L, -0x1.fp-10L, 4.350501469856803800217957402220976497152e-2L, -3.098101355958774410750062883737683164607L),
2569 TEST_c_c (cacosh, 0x1.fp-30L, 1.0L, 8.813735870195430258081932989769495326854e-1L, 1.570796325518966635014803151387033957091L),
2570 TEST_c_c (cacosh, 0x1.fp-30L, -1.0L, 8.813735870195430258081932989769495326854e-1L, -1.570796325518966635014803151387033957091L),
2571 TEST_c_c (cacosh, -0x1.fp-30L, 1.0L, 8.813735870195430258081932989769495326854e-1L, 1.570796328070826603447840231892468927106L),
2572 TEST_c_c (cacosh, -0x1.fp-30L, -1.0L, 8.813735870195430258081932989769495326854e-1L, -1.570796328070826603447840231892468927106L),
2573 TEST_c_c (cacosh, 1.0L, 0x1.fp-30L, 4.247867098745151888768727039216644758847e-5L, 4.247867097467650115899790787875186617316e-5L),
2574 TEST_c_c (cacosh, -1.0L, 0x1.fp-30L, 4.247867098745151888768727039216644758847e-5L, 3.141550174918818561961484385371624132331L),
2575 TEST_c_c (cacosh, 1.0L, -0x1.fp-30L, 4.247867098745151888768727039216644758847e-5L, -4.247867097467650115899790787875186617316e-5L),
2576 TEST_c_c (cacosh, -1.0L, -0x1.fp-30L, 4.247867098745151888768727039216644758847e-5L, -3.141550174918818561961484385371624132331L),
2577 TEST_c_c (cacosh, 0x1.fp-100L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691638670687364L),
2578 TEST_c_c (cacosh, 0x1.fp-100L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691638670687364L),
2579 TEST_c_c (cacosh, -0x1.fp-100L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691640832196834L),
2580 TEST_c_c (cacosh, -0x1.fp-100L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691640832196834L),
2581 TEST_c_c (cacosh, 1.0L, 0x1.fp-100L, 1.236292038260260888664514866457202186027e-15L, 1.236292038260260888664514866456887257525e-15L),
2582 TEST_c_c (cacosh, -1.0L, 0x1.fp-100L, 1.236292038260260888664514866457202186027e-15L, 3.141592653589792002170605123018614219682L),
2583 TEST_c_c (cacosh, 1.0L, -0x1.fp-100L, 1.236292038260260888664514866457202186027e-15L, -1.236292038260260888664514866456887257525e-15L),
2584 TEST_c_c (cacosh, -1.0L, -0x1.fp-100L, 1.236292038260260888664514866457202186027e-15L, -3.141592653589792002170605123018614219682L),
2585 TEST_c_c (cacosh, 0x1.fp-129L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442097L),
2586 TEST_c_c (cacosh, 0x1.fp-129L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442097L),
2587 TEST_c_c (cacosh, -0x1.fp-129L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442101L),
2588 TEST_c_c (cacosh, -0x1.fp-129L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442101L),
2589 TEST_c_c (cacosh, 1.0L, 0x1.fp-129L, 5.335635276982233498398987585285818977933e-20L, 5.335635276982233498398987585285818977930e-20L),
2590 TEST_c_c (cacosh, -1.0L, 0x1.fp-129L, 5.335635276982233498398987585285818977933e-20L, 3.141592653589793238409287030509680549213L),
2591 TEST_c_c (cacosh, 1.0L, -0x1.fp-129L, 5.335635276982233498398987585285818977933e-20L, -5.335635276982233498398987585285818977930e-20L),
2592 TEST_c_c (cacosh, -1.0L, -0x1.fp-129L, 5.335635276982233498398987585285818977933e-20L, -3.141592653589793238409287030509680549213L),
2593 #ifndef TEST_FLOAT
2594 TEST_c_c (cacosh, 0x1.fp-1000L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2595 TEST_c_c (cacosh, 0x1.fp-1000L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2596 TEST_c_c (cacosh, -0x1.fp-1000L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2597 TEST_c_c (cacosh, -0x1.fp-1000L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2598 TEST_c_c (cacosh, 1.0L, 0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, 4.252291453851660175550490409247739011867e-151L),
2599 TEST_c_c (cacosh, -1.0L, 0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, 3.141592653589793238462643383279502884197L),
2600 TEST_c_c (cacosh, 1.0L, -0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, -4.252291453851660175550490409247739011867e-151L),
2601 TEST_c_c (cacosh, -1.0L, -0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, -3.141592653589793238462643383279502884197L),
2602 TEST_c_c (cacosh, 0x1.fp-1025L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2603 TEST_c_c (cacosh, 0x1.fp-1025L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2604 TEST_c_c (cacosh, -0x1.fp-1025L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2605 TEST_c_c (cacosh, -0x1.fp-1025L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2606 TEST_c_c (cacosh, 1.0L, 0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, 7.340879205566679497036857179189356754017e-155L),
2607 TEST_c_c (cacosh, -1.0L, 0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, 3.141592653589793238462643383279502884197L),
2608 TEST_c_c (cacosh, 1.0L, -0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, -7.340879205566679497036857179189356754017e-155L),
2609 TEST_c_c (cacosh, -1.0L, -0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, -3.141592653589793238462643383279502884197L),
2610 #endif
2611 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
2612 TEST_c_c (cacosh, 0x1.fp-10000L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2613 TEST_c_c (cacosh, 0x1.fp-10000L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2614 TEST_c_c (cacosh, -0x1.fp-10000L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2615 TEST_c_c (cacosh, -0x1.fp-10000L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2616 TEST_c_c (cacosh, 1.0L, 0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, 9.854680208706673586644342922051388714633e-1506L),
2617 TEST_c_c (cacosh, -1.0L, 0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, 3.141592653589793238462643383279502884197L),
2618 TEST_c_c (cacosh, 1.0L, -0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, -9.854680208706673586644342922051388714633e-1506L),
2619 TEST_c_c (cacosh, -1.0L, -0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, -3.141592653589793238462643383279502884197L),
2620 TEST_c_c (cacosh, 0x1.fp-16385L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2621 TEST_c_c (cacosh, 0x1.fp-16385L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2622 TEST_c_c (cacosh, -0x1.fp-16385L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2623 TEST_c_c (cacosh, -0x1.fp-16385L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2624 TEST_c_c (cacosh, 1.0L, 0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, 9.023632056840860275214893047597614177639e-2467L),
2625 TEST_c_c (cacosh, -1.0L, 0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, 3.141592653589793238462643383279502884197L),
2626 TEST_c_c (cacosh, 1.0L, -0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, -9.023632056840860275214893047597614177639e-2467L),
2627 TEST_c_c (cacosh, -1.0L, -0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, -3.141592653589793238462643383279502884197L),
2628 #endif
2629 TEST_c_c (cacosh, 0x1p-23L, 0x1.000002p0L, 8.813736713132400470205730751186547909968e-1L, 1.570796242501204621739026081991856762292L),
2630 TEST_c_c (cacosh, 0x1p-23L, -0x1.000002p0L, 8.813736713132400470205730751186547909968e-1L, -1.570796242501204621739026081991856762292L),
2631 TEST_c_c (cacosh, -0x1p-23L, 0x1.000002p0L, 8.813736713132400470205730751186547909968e-1L, 1.570796411088588616723617301287646121905L),
2632 TEST_c_c (cacosh, -0x1p-23L, -0x1.000002p0L, 8.813736713132400470205730751186547909968e-1L, -1.570796411088588616723617301287646121905L),
2633 TEST_c_c (cacosh, 0x1.000002p0L, 0x1p-23L, 5.364668491573609633134147164031476452679e-4L, 2.222118384408546368406374049167636760903e-4L),
2634 TEST_c_c (cacosh, -0x1.000002p0L, 0x1p-23L, 5.364668491573609633134147164031476452679e-4L, 3.141370441751352383825802745874586120521L),
2635 TEST_c_c (cacosh, 0x1.000002p0L, -0x1p-23L, 5.364668491573609633134147164031476452679e-4L, -2.222118384408546368406374049167636760903e-4L),
2636 TEST_c_c (cacosh, -0x1.000002p0L, -0x1p-23L, 5.364668491573609633134147164031476452679e-4L, -3.141370441751352383825802745874586120521L),
2637 TEST_c_c (cacosh, 0x1.fp-129L, 0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, 1.570796326794896619231321691639751442097L),
2638 TEST_c_c (cacosh, 0x1.fp-129L, -0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, -1.570796326794896619231321691639751442097L),
2639 TEST_c_c (cacosh, -0x1.fp-129L, 0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, 1.570796326794896619231321691639751442101L),
2640 TEST_c_c (cacosh, -0x1.fp-129L, -0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, -1.570796326794896619231321691639751442101L),
2641 TEST_c_c (cacosh, 0x1.000002p0L, 0x1.fp-129L, 4.882812451493617206486388134172712975070e-4L, 5.830451806317544230969669308596361881467e-36L),
2642 TEST_c_c (cacosh, -0x1.000002p0L, 0x1.fp-129L, 4.882812451493617206486388134172712975070e-4L, 3.141592653589793238462643383279502878367L),
2643 TEST_c_c (cacosh, 0x1.000002p0L, -0x1.fp-129L, 4.882812451493617206486388134172712975070e-4L, -5.830451806317544230969669308596361881467e-36L),
2644 TEST_c_c (cacosh, -0x1.000002p0L, -0x1.fp-129L, 4.882812451493617206486388134172712975070e-4L, -3.141592653589793238462643383279502878367L),
2645 TEST_c_c (cacosh, 0.0L, 0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, 1.570796326794896619231321691639751442099L),
2646 TEST_c_c (cacosh, 0.0L, -0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, -1.570796326794896619231321691639751442099L),
2647 TEST_c_c (cacosh, -0.0L, 0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, 1.570796326794896619231321691639751442099L),
2648 TEST_c_c (cacosh, -0.0L, -0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, -1.570796326794896619231321691639751442099L),
2649 TEST_c_c (cacosh, 0x1.000002p0L, 0.0L, 4.882812451493617206486388134172712975070e-4L, 0.0L),
2650 TEST_c_c (cacosh, -0x1.000002p0L, 0.0L, 4.882812451493617206486388134172712975070e-4L, 3.141592653589793238462643383279502884197L),
2651 TEST_c_c (cacosh, 0x1.000002p0L, -0.0L, 4.882812451493617206486388134172712975070e-4L, -0.0L),
2652 TEST_c_c (cacosh, -0x1.000002p0L, -0.0L, 4.882812451493617206486388134172712975070e-4L, -3.141592653589793238462643383279502884197L),
2653 #ifndef TEST_FLOAT
2654 TEST_c_c (cacosh, 0x1p-52L, 0x1.0000000000001p0L, 8.813735870195431822418551933572982483664e-1L, 1.570796326794896462222075823262262934288L),
2655 TEST_c_c (cacosh, 0x1p-52L, -0x1.0000000000001p0L, 8.813735870195431822418551933572982483664e-1L, -1.570796326794896462222075823262262934288L),
2656 TEST_c_c (cacosh, -0x1p-52L, 0x1.0000000000001p0L, 8.813735870195431822418551933572982483664e-1L, 1.570796326794896776240567560017239949909L),
2657 TEST_c_c (cacosh, -0x1p-52L, -0x1.0000000000001p0L, 8.813735870195431822418551933572982483664e-1L, -1.570796326794896776240567560017239949909L),
2658 TEST_c_c (cacosh, 0x1.0000000000001p0L, 0x1p-52L, 2.315303644582684770975188768022139415020e-8L, 9.590301705980041385828904092662391018164e-9L),
2659 TEST_c_c (cacosh, -0x1.0000000000001p0L, 0x1p-52L, 2.315303644582684770975188768022139415020e-8L, 3.141592643999491532482601997450598791535L),
2660 TEST_c_c (cacosh, 0x1.0000000000001p0L, -0x1p-52L, 2.315303644582684770975188768022139415020e-8L, -9.590301705980041385828904092662391018164e-9L),
2661 TEST_c_c (cacosh, -0x1.0000000000001p0L, -0x1p-52L, 2.315303644582684770975188768022139415020e-8L, -3.141592643999491532482601997450598791535L),
2662 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, 1.570796326794896619231321691639751442099L),
2663 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, -1.570796326794896619231321691639751442099L),
2664 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, 1.570796326794896619231321691639751442099L),
2665 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, -1.570796326794896619231321691639751442099L),
2666 TEST_c_c (cacosh, 0x1.0000000000001p0L, 0x1.fp-1025L, 2.107342425544701550354780375182800088393e-8L, 2.557178503953494342609835913586108008322e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2667 TEST_c_c (cacosh, -0x1.0000000000001p0L, 0x1.fp-1025L, 2.107342425544701550354780375182800088393e-8L, 3.141592653589793238462643383279502884197L),
2668 TEST_c_c (cacosh, 0x1.0000000000001p0L, -0x1.fp-1025L, 2.107342425544701550354780375182800088393e-8L, -2.557178503953494342609835913586108008322e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2669 TEST_c_c (cacosh, -0x1.0000000000001p0L, -0x1.fp-1025L, 2.107342425544701550354780375182800088393e-8L, -3.141592653589793238462643383279502884197L),
2670 TEST_c_c (cacosh, 0.0L, 0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, 1.570796326794896619231321691639751442099L),
2671 TEST_c_c (cacosh, 0.0L, -0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, -1.570796326794896619231321691639751442099L),
2672 TEST_c_c (cacosh, -0.0L, 0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, 1.570796326794896619231321691639751442099L),
2673 TEST_c_c (cacosh, -0.0L, -0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, -1.570796326794896619231321691639751442099L),
2674 TEST_c_c (cacosh, 0x1.0000000000001p0L, 0.0L, 2.107342425544701550354780375182800088393e-8L, 0.0L),
2675 TEST_c_c (cacosh, -0x1.0000000000001p0L, 0.0L, 2.107342425544701550354780375182800088393e-8L, 3.141592653589793238462643383279502884197L),
2676 TEST_c_c (cacosh, 0x1.0000000000001p0L, -0.0L, 2.107342425544701550354780375182800088393e-8L, -0.0L),
2677 TEST_c_c (cacosh, -0x1.0000000000001p0L, -0.0L, 2.107342425544701550354780375182800088393e-8L, -3.141592653589793238462643383279502884197L),
2678 #endif
2679 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
2680 TEST_c_c (cacosh, 0x1p-63L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610131001e-1L, 1.570796326794896619154657020805582738031L),
2681 TEST_c_c (cacosh, 0x1p-63L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610131001e-1L, -1.570796326794896619154657020805582738031L),
2682 TEST_c_c (cacosh, -0x1p-63L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610131001e-1L, 1.570796326794896619307986362473920146166L),
2683 TEST_c_c (cacosh, -0x1p-63L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610131001e-1L, -1.570796326794896619307986362473920146166L),
2684 TEST_c_c (cacosh, 0x1.0000000000000002p0L, 0x1p-63L, 5.116146586219826555037807251857670783420e-10L, 2.119177303101063432592523199680782317447e-10L),
2685 TEST_c_c (cacosh, -0x1.0000000000000002p0L, 0x1p-63L, 5.116146586219826555037807251857670783420e-10L, 3.141592653377875508152537040020250564229L),
2686 TEST_c_c (cacosh, 0x1.0000000000000002p0L, -0x1p-63L, 5.116146586219826555037807251857670783420e-10L, -2.119177303101063432592523199680782317447e-10L),
2687 TEST_c_c (cacosh, -0x1.0000000000000002p0L, -0x1p-63L, 5.116146586219826555037807251857670783420e-10L, -3.141592653377875508152537040020250564229L),
2688 # if LDBL_MIN_EXP <= -16381
2689 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, 1.570796326794896619231321691639751442099L),
2690 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, -1.570796326794896619231321691639751442099L),
2691 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, 1.570796326794896619231321691639751442099L),
2692 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, -1.570796326794896619231321691639751442099L),
2693 TEST_c_c (cacosh, 0x1.0000000000000002p0L, 0x1.fp-16385L, 4.656612873077392578082927418388212703712e-10L, 1.748608650034385653922359120438227480943e-4923L),
2694 TEST_c_c (cacosh, -0x1.0000000000000002p0L, 0x1.fp-16385L, 4.656612873077392578082927418388212703712e-10L, 3.141592653589793238462643383279502884197L),
2695 TEST_c_c (cacosh, 0x1.0000000000000002p0L, -0x1.fp-16385L, 4.656612873077392578082927418388212703712e-10L, -1.748608650034385653922359120438227480943e-4923L),
2696 TEST_c_c (cacosh, -0x1.0000000000000002p0L, -0x1.fp-16385L, 4.656612873077392578082927418388212703712e-10L, -3.141592653589793238462643383279502884197L),
2697 # endif
2698 TEST_c_c (cacosh, 0.0L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, 1.570796326794896619231321691639751442099L),
2699 TEST_c_c (cacosh, 0.0L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, -1.570796326794896619231321691639751442099L),
2700 TEST_c_c (cacosh, -0.0L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, 1.570796326794896619231321691639751442099L),
2701 TEST_c_c (cacosh, -0.0L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, -1.570796326794896619231321691639751442099L),
2702 TEST_c_c (cacosh, 0x1.0000000000000002p0L, 0.0L, 4.656612873077392578082927418388212703712e-10L, 0.0L),
2703 TEST_c_c (cacosh, -0x1.0000000000000002p0L, 0.0L, 4.656612873077392578082927418388212703712e-10L, 3.141592653589793238462643383279502884197L),
2704 TEST_c_c (cacosh, 0x1.0000000000000002p0L, -0.0L, 4.656612873077392578082927418388212703712e-10L, -0.0L),
2705 TEST_c_c (cacosh, -0x1.0000000000000002p0L, -0.0L, 4.656612873077392578082927418388212703712e-10L, -3.141592653589793238462643383279502884197L),
2706 #endif
2707 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
2708 TEST_c_c (cacosh, 0x1p-106L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639742726335L),
2709 TEST_c_c (cacosh, 0x1p-106L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639742726335L),
2710 TEST_c_c (cacosh, -0x1p-106L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639760157863L),
2711 TEST_c_c (cacosh, -0x1p-106L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639760157863L),
2712 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, 0x1p-106L, 2.285028863093221674154232933662774454211e-16L, 5.394221422390606848017034778914096659726e-17L),
2713 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, 0x1p-106L, 2.285028863093221674154232933662774454211e-16L, 3.141592653589793184520429159373434404027L),
2714 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, -0x1p-106L, 2.285028863093221674154232933662774454211e-16L, -5.394221422390606848017034778914096659726e-17L),
2715 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, -0x1p-106L, 2.285028863093221674154232933662774454211e-16L, -3.141592653589793184520429159373434404027L),
2716 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639751442099L),
2717 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639751442099L),
2718 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639751442099L),
2719 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639751442099L),
2720 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 2.220446049250313080847263336181636063482e-16L, 2.426922623448365473354662093431821897807e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2721 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 2.220446049250313080847263336181636063482e-16L, 3.141592653589793238462643383279502884197L),
2722 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 2.220446049250313080847263336181636063482e-16L, -2.426922623448365473354662093431821897807e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2723 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 2.220446049250313080847263336181636063482e-16L, -3.141592653589793238462643383279502884197L),
2724 TEST_c_c (cacosh, 0.0L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639751442099L),
2725 TEST_c_c (cacosh, 0.0L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639751442099L),
2726 TEST_c_c (cacosh, -0.0L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639751442099L),
2727 TEST_c_c (cacosh, -0.0L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639751442099L),
2728 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, 0.0L, 2.220446049250313080847263336181636063482e-16L, 0.0L),
2729 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, 0.0L, 2.220446049250313080847263336181636063482e-16L, 3.141592653589793238462643383279502884197L),
2730 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, -0.0L, 2.220446049250313080847263336181636063482e-16L, -0.0L),
2731 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, -0.0L, 2.220446049250313080847263336181636063482e-16L, -3.141592653589793238462643383279502884197L),
2732 #endif
2733 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
2734 TEST_c_c (cacosh, 0x1p-113L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751374007L),
2735 TEST_c_c (cacosh, 0x1p-113L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751374007L),
2736 TEST_c_c (cacosh, -0x1p-113L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751510190L),
2737 TEST_c_c (cacosh, -0x1p-113L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751510190L),
2738 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, 0x1p-113L, 2.019699255375255198156433710951064632386e-17L, 4.767863183742677481693563511435642755521e-18L),
2739 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, 0x1p-113L, 2.019699255375255198156433710951064632386e-17L, 3.141592653589793233694780199536825402504L),
2740 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, -0x1p-113L, 2.019699255375255198156433710951064632386e-17L, -4.767863183742677481693563511435642755521e-18L),
2741 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, -0x1p-113L, 2.019699255375255198156433710951064632386e-17L, -3.141592653589793233694780199536825402504L),
2742 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751442099L),
2743 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751442099L),
2744 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751442099L),
2745 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751442099L),
2746 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 1.962615573354718824241727964954454332780e-17L, 4.148847925325683229178506116378864361396e-4916L),
2747 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 1.962615573354718824241727964954454332780e-17L, 3.141592653589793238462643383279502884197L),
2748 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 1.962615573354718824241727964954454332780e-17L, -4.148847925325683229178506116378864361396e-4916L),
2749 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 1.962615573354718824241727964954454332780e-17L, -3.141592653589793238462643383279502884197L),
2750 TEST_c_c (cacosh, 0.0L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751442099L),
2751 TEST_c_c (cacosh, 0.0L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751442099L),
2752 TEST_c_c (cacosh, -0.0L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751442099L),
2753 TEST_c_c (cacosh, -0.0L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751442099L),
2754 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, 0.0L, 1.962615573354718824241727964954454332780e-17L, 0.0L),
2755 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, 0.0L, 1.962615573354718824241727964954454332780e-17L, 3.141592653589793238462643383279502884197L),
2756 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, -0.0L, 1.962615573354718824241727964954454332780e-17L, -0.0L),
2757 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, -0.0L, 1.962615573354718824241727964954454332780e-17L, -3.141592653589793238462643383279502884197L),
2758 #endif
2759 TEST_c_c (cacosh, 0x1p-23L, 0x0.ffffffp0L, 8.813735448726963984495965873956465777250e-1L, 1.570796242501197085295336701632142060969L),
2760 TEST_c_c (cacosh, 0x1p-23L, -0x0.ffffffp0L, 8.813735448726963984495965873956465777250e-1L, -1.570796242501197085295336701632142060969L),
2761 TEST_c_c (cacosh, -0x1p-23L, 0x0.ffffffp0L, 8.813735448726963984495965873956465777250e-1L, 1.570796411088596153167306681647360823228L),
2762 TEST_c_c (cacosh, -0x1p-23L, -0x0.ffffffp0L, 8.813735448726963984495965873956465777250e-1L, -1.570796411088596153167306681647360823228L),
2763 TEST_c_c (cacosh, 0x0.ffffffp0L, 0x1p-23L, 2.714321200917194650737217746780928423385e-4L, 4.391863861910487109445187743978204002614e-4L),
2764 TEST_c_c (cacosh, -0x0.ffffffp0L, 0x1p-23L, 2.714321200917194650737217746780928423385e-4L, 3.141153467203602189751698864505105063797L),
2765 TEST_c_c (cacosh, 0x0.ffffffp0L, -0x1p-23L, 2.714321200917194650737217746780928423385e-4L, -4.391863861910487109445187743978204002614e-4L),
2766 TEST_c_c (cacosh, -0x0.ffffffp0L, -0x1p-23L, 2.714321200917194650737217746780928423385e-4L, -3.141153467203602189751698864505105063797L),
2767 TEST_c_c (cacosh, 0x1.fp-129L, 0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, 1.570796326794896619231321691639751442097L),
2768 TEST_c_c (cacosh, 0x1.fp-129L, -0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, -1.570796326794896619231321691639751442097L),
2769 TEST_c_c (cacosh, -0x1.fp-129L, 0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, 1.570796326794896619231321691639751442101L),
2770 TEST_c_c (cacosh, -0x1.fp-129L, -0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, -1.570796326794896619231321691639751442101L),
2771 TEST_c_c (cacosh, 0x0.ffffffp0L, 0x1.fp-129L, 8.245504387859737323891843603996428534945e-36L, 3.452669847162035876032494826387364972849e-4L),
2772 TEST_c_c (cacosh, -0x0.ffffffp0L, 0x1.fp-129L, 8.245504387859737323891843603996428534945e-36L, 3.141247386605077034875040133796864147700L),
2773 TEST_c_c (cacosh, 0x0.ffffffp0L, -0x1.fp-129L, 8.245504387859737323891843603996428534945e-36L, -3.452669847162035876032494826387364972849e-4L),
2774 TEST_c_c (cacosh, -0x0.ffffffp0L, -0x1.fp-129L, 8.245504387859737323891843603996428534945e-36L, -3.141247386605077034875040133796864147700L),
2775 TEST_c_c (cacosh, 0.0L, 0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, 1.570796326794896619231321691639751442099L),
2776 TEST_c_c (cacosh, 0.0L, -0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, -1.570796326794896619231321691639751442099L),
2777 TEST_c_c (cacosh, -0.0L, 0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, 1.570796326794896619231321691639751442099L),
2778 TEST_c_c (cacosh, -0.0L, -0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, -1.570796326794896619231321691639751442099L),
2779 TEST_c_c (cacosh, 0x0.ffffffp0L, 0.0L, 0.0L, 3.452669847162035876032494826387364972849e-4L),
2780 TEST_c_c (cacosh, -0x0.ffffffp0L, 0.0L, 0.0L, 3.141247386605077034875040133796864147700L),
2781 TEST_c_c (cacosh, 0x0.ffffffp0L, -0.0L, 0.0L, -3.452669847162035876032494826387364972849e-4L),
2782 TEST_c_c (cacosh, -0x0.ffffffp0L, -0.0L, 0.0L, -3.141247386605077034875040133796864147700L),
2783 TEST_c_c (cacosh, 0x1p-23L, 0.5L, 4.812118250596059896127318386463676808798e-1L, 1.570796220170866625230343643673321150378L),
2784 TEST_c_c (cacosh, 0x1p-23L, -0.5L, 4.812118250596059896127318386463676808798e-1L, -1.570796220170866625230343643673321150378L),
2785 TEST_c_c (cacosh, -0x1p-23L, 0.5L, 4.812118250596059896127318386463676808798e-1L, 1.570796433418926613232299739606181733819L),
2786 TEST_c_c (cacosh, -0x1p-23L, -0.5L, 4.812118250596059896127318386463676808798e-1L, -1.570796433418926613232299739606181733819L),
2787 TEST_c_c (cacosh, 0.5L, 0x1p-23L, 1.376510308240943236356088341381173571841e-7L, 1.047197551196603215914744618665204532273L),
2788 TEST_c_c (cacosh, -0.5L, 0x1p-23L, 1.376510308240943236356088341381173571841e-7L, 2.094395102393190022547898764614298351924L),
2789 TEST_c_c (cacosh, 0.5L, -0x1p-23L, 1.376510308240943236356088341381173571841e-7L, -1.047197551196603215914744618665204532273L),
2790 TEST_c_c (cacosh, -0.5L, -0x1p-23L, 1.376510308240943236356088341381173571841e-7L, -2.094395102393190022547898764614298351924L),
2791 TEST_c_c (cacosh, 0x1.fp-129L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442096L),
2792 TEST_c_c (cacosh, 0x1.fp-129L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442096L),
2793 TEST_c_c (cacosh, -0x1.fp-129L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442101L),
2794 TEST_c_c (cacosh, -0x1.fp-129L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442101L),
2795 TEST_c_c (cacosh, 0.5L, 0x1.fp-129L, 3.287317402534702257036015056278368274737e-39L, 1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION_FLOAT),
2796 TEST_c_c (cacosh, -0.5L, 0x1.fp-129L, 3.287317402534702257036015056278368274737e-39L, 2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION_FLOAT),
2797 TEST_c_c (cacosh, 0.5L, -0x1.fp-129L, 3.287317402534702257036015056278368274737e-39L, -1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION_FLOAT),
2798 TEST_c_c (cacosh, -0.5L, -0x1.fp-129L, 3.287317402534702257036015056278368274737e-39L, -2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION_FLOAT),
2799 TEST_c_c (cacosh, 0x1p-23L, 0x1p-23L, 1.192092895507818146886315028596704749235e-7L, 1.570796207585607068450636380271254316214L),
2800 TEST_c_c (cacosh, 0x1p-23L, -0x1p-23L, 1.192092895507818146886315028596704749235e-7L, -1.570796207585607068450636380271254316214L),
2801 TEST_c_c (cacosh, -0x1p-23L, 0x1p-23L, 1.192092895507818146886315028596704749235e-7L, 1.570796446004186170012007003008248567984L),
2802 TEST_c_c (cacosh, -0x1p-23L, -0x1p-23L, 1.192092895507818146886315028596704749235e-7L, -1.570796446004186170012007003008248567984L),
2803 TEST_c_c (cacosh, 0x1.fp-129L, 0x1p-23L, 1.192092895507809676556842485683592032154e-7L, 1.570796326794896619231321691639751442096L),
2804 TEST_c_c (cacosh, 0x1.fp-129L, -0x1p-23L, 1.192092895507809676556842485683592032154e-7L, -1.570796326794896619231321691639751442096L),
2805 TEST_c_c (cacosh, -0x1.fp-129L, 0x1p-23L, 1.192092895507809676556842485683592032154e-7L, 1.570796326794896619231321691639751442101L),
2806 TEST_c_c (cacosh, -0x1.fp-129L, -0x1p-23L, 1.192092895507809676556842485683592032154e-7L, -1.570796326794896619231321691639751442101L),
2807 TEST_c_c (cacosh, 0x1p-23L, 0x1.fp-129L, 2.846900380897747786805634596726756660388e-39L, 1.570796207585607068449789347324000006847L, UNDERFLOW_EXCEPTION_FLOAT),
2808 TEST_c_c (cacosh, -0x1p-23L, 0x1.fp-129L, 2.846900380897747786805634596726756660388e-39L, 1.570796446004186170012854035955502877351L, UNDERFLOW_EXCEPTION_FLOAT),
2809 TEST_c_c (cacosh, 0x1p-23L, -0x1.fp-129L, 2.846900380897747786805634596726756660388e-39L, -1.570796207585607068449789347324000006847L, UNDERFLOW_EXCEPTION_FLOAT),
2810 TEST_c_c (cacosh, -0x1p-23L, -0x1.fp-129L, 2.846900380897747786805634596726756660388e-39L, -1.570796446004186170012854035955502877351L, UNDERFLOW_EXCEPTION_FLOAT),
2811 TEST_c_c (cacosh, 0.0L, 0x1p-23L, 1.192092895507809676556842485683592032154e-7L, 1.570796326794896619231321691639751442099L),
2812 TEST_c_c (cacosh, 0.0L, -0x1p-23L, 1.192092895507809676556842485683592032154e-7L, -1.570796326794896619231321691639751442099L),
2813 TEST_c_c (cacosh, -0.0L, 0x1p-23L, 1.192092895507809676556842485683592032154e-7L, 1.570796326794896619231321691639751442099L),
2814 TEST_c_c (cacosh, -0.0L, -0x1p-23L, 1.192092895507809676556842485683592032154e-7L, -1.570796326794896619231321691639751442099L),
2815 TEST_c_c (cacosh, 0x1p-23L, 0.0L, 0.0L, 1.570796207585607068449789347324000006847L),
2816 TEST_c_c (cacosh, -0x1p-23L, 0.0L, 0.0L, 1.570796446004186170012854035955502877351L),
2817 TEST_c_c (cacosh, 0x1p-23L, -0.0L, 0.0L, -1.570796207585607068449789347324000006847L),
2818 TEST_c_c (cacosh, -0x1p-23L, -0.0L, 0.0L, -1.570796446004186170012854035955502877351L),
2819 TEST_c_c (cacosh, 0x1.fp-129L, 0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, 1.570796326794896619231321691639751442096L, UNDERFLOW_EXCEPTION_FLOAT),
2820 TEST_c_c (cacosh, 0x1.fp-129L, -0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, -1.570796326794896619231321691639751442096L, UNDERFLOW_EXCEPTION_FLOAT),
2821 TEST_c_c (cacosh, -0x1.fp-129L, 0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, 1.570796326794896619231321691639751442101L, UNDERFLOW_EXCEPTION_FLOAT),
2822 TEST_c_c (cacosh, -0x1.fp-129L, -0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, -1.570796326794896619231321691639751442101L, UNDERFLOW_EXCEPTION_FLOAT),
2823 #ifndef TEST_FLOAT
2824 TEST_c_c (cacosh, 0x1p-52L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910458761820e-1L, 1.570796326794896462222075823262236786996L),
2825 TEST_c_c (cacosh, 0x1p-52L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910458761820e-1L, -1.570796326794896462222075823262236786996L),
2826 TEST_c_c (cacosh, -0x1p-52L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910458761820e-1L, 1.570796326794896776240567560017266097201L),
2827 TEST_c_c (cacosh, -0x1p-52L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910458761820e-1L, -1.570796326794896776240567560017266097201L),
2828 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, 0x1p-52L, 1.171456840272878582596796205397918831268e-8L, 1.895456983915074112227925127005564372844e-8L),
2829 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, 0x1p-52L, 1.171456840272878582596796205397918831268e-8L, 3.141592634635223399311902261000251614142L),
2830 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, -0x1p-52L, 1.171456840272878582596796205397918831268e-8L, -1.895456983915074112227925127005564372844e-8L),
2831 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, -0x1p-52L, 1.171456840272878582596796205397918831268e-8L, -3.141592634635223399311902261000251614142L),
2832 TEST_c_c (cacosh, 0x1.fp-1025L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, 1.570796326794896619231321691639751442099L),
2833 TEST_c_c (cacosh, 0x1.fp-1025L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, -1.570796326794896619231321691639751442099L),
2834 TEST_c_c (cacosh, -0x1.fp-1025L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, 1.570796326794896619231321691639751442099L),
2835 TEST_c_c (cacosh, -0x1.fp-1025L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, -1.570796326794896619231321691639751442099L),
2836 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, 0x1.fp-1025L, 3.616396521699973256461764099945789620604e-301L, 1.490116119384765638786343542550461592240e-8L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2837 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, 0x1.fp-1025L, 3.616396521699973256461764099945789620604e-301L, 3.141592638688632044614986995416067458693L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2838 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, -0x1.fp-1025L, 3.616396521699973256461764099945789620604e-301L, -1.490116119384765638786343542550461592240e-8L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2839 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, -0x1.fp-1025L, 3.616396521699973256461764099945789620604e-301L, -3.141592638688632044614986995416067458693L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2840 TEST_c_c (cacosh, 0.0L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, 1.570796326794896619231321691639751442099L),
2841 TEST_c_c (cacosh, 0.0L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, -1.570796326794896619231321691639751442099L),
2842 TEST_c_c (cacosh, -0.0L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, 1.570796326794896619231321691639751442099L),
2843 TEST_c_c (cacosh, -0.0L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, -1.570796326794896619231321691639751442099L),
2844 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, 0.0L, 0.0L, 1.490116119384765638786343542550461592240e-8L),
2845 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, 0.0L, 0.0L, 3.141592638688632044614986995416067458693L),
2846 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, -0.0L, 0.0L, -1.490116119384765638786343542550461592240e-8L),
2847 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, -0.0L, 0.0L, -3.141592638688632044614986995416067458693L),
2848 #endif
2849 TEST_c_c (cacosh, 0x1p-52L, 0.5L, 4.812118250596034474977589134243772428682e-1L, 1.570796326794896420628589431857911675917L),
2850 TEST_c_c (cacosh, 0x1p-52L, -0.5L, 4.812118250596034474977589134243772428682e-1L, -1.570796326794896420628589431857911675917L),
2851 TEST_c_c (cacosh, -0x1p-52L, 0.5L, 4.812118250596034474977589134243772428682e-1L, 1.570796326794896817834053951421591208280L),
2852 TEST_c_c (cacosh, -0x1p-52L, -0.5L, 4.812118250596034474977589134243772428682e-1L, -1.570796326794896817834053951421591208280L),
2853 TEST_c_c (cacosh, 0.5L, 0x1p-52L, 2.563950248511418570403591756798643804971e-16L, 1.047197551196597746154214461093186605110L),
2854 TEST_c_c (cacosh, -0.5L, 0x1p-52L, 2.563950248511418570403591756798643804971e-16L, 2.094395102393195492308428922186316279087L),
2855 TEST_c_c (cacosh, 0.5L, -0x1p-52L, 2.563950248511418570403591756798643804971e-16L, -1.047197551196597746154214461093186605110L),
2856 TEST_c_c (cacosh, -0.5L, -0x1p-52L, 2.563950248511418570403591756798643804971e-16L, -2.094395102393195492308428922186316279087L),
2857 #ifndef TEST_FLOAT
2858 TEST_c_c (cacosh, 0x1.fp-1025L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442099L),
2859 TEST_c_c (cacosh, 0x1.fp-1025L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442099L),
2860 TEST_c_c (cacosh, -0x1.fp-1025L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442099L),
2861 TEST_c_c (cacosh, -0x1.fp-1025L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442099L),
2862 TEST_c_c (cacosh, 0.5L, 0x1.fp-1025L, 6.222508863508420569166420770843207333493e-309L, 1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION_DOUBLE),
2863 TEST_c_c (cacosh, -0.5L, 0x1.fp-1025L, 6.222508863508420569166420770843207333493e-309L, 2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION_DOUBLE),
2864 TEST_c_c (cacosh, 0.5L, -0x1.fp-1025L, 6.222508863508420569166420770843207333493e-309L, -1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION_DOUBLE),
2865 TEST_c_c (cacosh, -0.5L, -0x1.fp-1025L, 6.222508863508420569166420770843207333493e-309L, -2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION_DOUBLE),
2866 #endif
2867 TEST_c_c (cacosh, 0x1p-52L, 0x1p-52L, 2.220446049250313080847263336181677117148e-16L, 1.570796326794896397186716766608443357372L),
2868 TEST_c_c (cacosh, 0x1p-52L, -0x1p-52L, 2.220446049250313080847263336181677117148e-16L, -1.570796326794896397186716766608443357372L),
2869 TEST_c_c (cacosh, -0x1p-52L, 0x1p-52L, 2.220446049250313080847263336181677117148e-16L, 1.570796326794896841275926616671059526825L),
2870 TEST_c_c (cacosh, -0x1p-52L, -0x1p-52L, 2.220446049250313080847263336181677117148e-16L, -1.570796326794896841275926616671059526825L),
2871 #ifndef TEST_FLOAT
2872 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1p-52L, 2.220446049250313080847263336181622378926e-16L, 1.570796326794896619231321691639751442099L),
2873 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1p-52L, 2.220446049250313080847263336181622378926e-16L, -1.570796326794896619231321691639751442099L),
2874 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1p-52L, 2.220446049250313080847263336181622378926e-16L, 1.570796326794896619231321691639751442099L),
2875 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1p-52L, 2.220446049250313080847263336181622378926e-16L, -1.570796326794896619231321691639751442099L),
2876 TEST_c_c (cacosh, 0x1p-52L, 0x1.fp-1025L, 5.388850751072128349671657362289548938458e-309L, 1.570796326794896397186716766608443357372L, UNDERFLOW_EXCEPTION_DOUBLE),
2877 TEST_c_c (cacosh, -0x1p-52L, 0x1.fp-1025L, 5.388850751072128349671657362289548938458e-309L, 1.570796326794896841275926616671059526825L, UNDERFLOW_EXCEPTION_DOUBLE),
2878 TEST_c_c (cacosh, 0x1p-52L, -0x1.fp-1025L, 5.388850751072128349671657362289548938458e-309L, -1.570796326794896397186716766608443357372L, UNDERFLOW_EXCEPTION_DOUBLE),
2879 TEST_c_c (cacosh, -0x1p-52L, -0x1.fp-1025L, 5.388850751072128349671657362289548938458e-309L, -1.570796326794896841275926616671059526825L, UNDERFLOW_EXCEPTION_DOUBLE),
2880 #endif
2881 TEST_c_c (cacosh, 0.0L, 0x1p-52L, 2.220446049250313080847263336181622378926e-16L, 1.570796326794896619231321691639751442099L),
2882 TEST_c_c (cacosh, 0.0L, -0x1p-52L, 2.220446049250313080847263336181622378926e-16L, -1.570796326794896619231321691639751442099L),
2883 TEST_c_c (cacosh, -0.0L, 0x1p-52L, 2.220446049250313080847263336181622378926e-16L, 1.570796326794896619231321691639751442099L),
2884 TEST_c_c (cacosh, -0.0L, -0x1p-52L, 2.220446049250313080847263336181622378926e-16L, -1.570796326794896619231321691639751442099L),
2885 TEST_c_c (cacosh, 0x1p-52L, 0.0L, 0.0L, 1.570796326794896397186716766608443357372L),
2886 TEST_c_c (cacosh, -0x1p-52L, 0.0L, 0.0L, 1.570796326794896841275926616671059526825L),
2887 TEST_c_c (cacosh, 0x1p-52L, -0.0L, 0.0L, -1.570796326794896397186716766608443357372L),
2888 TEST_c_c (cacosh, -0x1p-52L, -0.0L, 0.0L, -1.570796326794896841275926616671059526825L),
2889 #ifndef TEST_FLOAT
2890 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
2891 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
2892 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
2893 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
2894 #endif
2895 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
2896 TEST_c_c (cacosh, 0x1p-63L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569937e-1L, 1.570796326794896619154657020805582738025L),
2897 TEST_c_c (cacosh, 0x1p-63L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569937e-1L, -1.570796326794896619154657020805582738025L),
2898 TEST_c_c (cacosh, -0x1p-63L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569937e-1L, 1.570796326794896619307986362473920146173L),
2899 TEST_c_c (cacosh, -0x1p-63L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569937e-1L, -1.570796326794896619307986362473920146173L),
2900 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, 0x1p-63L, 2.588578361325995866221775673638805081337e-10L, 4.188407771167967636741951941902992986043e-10L),
2901 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, 0x1p-63L, 2.588578361325995866221775673638805081337e-10L, 3.141592653170952461345846619605307690007L),
2902 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, -0x1p-63L, 2.588578361325995866221775673638805081337e-10L, -4.188407771167967636741951941902992986043e-10L),
2903 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, -0x1p-63L, 2.588578361325995866221775673638805081337e-10L, -3.141592653170952461345846619605307690007L),
2904 # if LDBL_MIN_EXP <= -16381
2905 TEST_c_c (cacosh, 0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, 1.570796326794896619231321691639751442099L),
2906 TEST_c_c (cacosh, 0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, -1.570796326794896619231321691639751442099L),
2907 TEST_c_c (cacosh, -0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, 1.570796326794896619231321691639751442099L),
2908 TEST_c_c (cacosh, -0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, -1.570796326794896619231321691639751442099L),
2909 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 2.472906068161537187835415298076415423459e-4923L, 3.292722539913596233371825532007990724506e-10L),
2910 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 2.472906068161537187835415298076415423459e-4923L, 3.141592653260520984471283759942320330996L),
2911 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 2.472906068161537187835415298076415423459e-4923L, -3.292722539913596233371825532007990724506e-10L),
2912 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 2.472906068161537187835415298076415423459e-4923L, -3.141592653260520984471283759942320330996L),
2913 # endif
2914 TEST_c_c (cacosh, 0.0L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, 1.570796326794896619231321691639751442099L),
2915 TEST_c_c (cacosh, 0.0L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, -1.570796326794896619231321691639751442099L),
2916 TEST_c_c (cacosh, -0.0L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, 1.570796326794896619231321691639751442099L),
2917 TEST_c_c (cacosh, -0.0L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, -1.570796326794896619231321691639751442099L),
2918 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, 0.0L, 0.0L, 3.292722539913596233371825532007990724506e-10L),
2919 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, 0.0L, 0.0L, 3.141592653260520984471283759942320330996L),
2920 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, -0.0L, 0.0L, -3.292722539913596233371825532007990724506e-10L),
2921 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, -0.0L, 0.0L, -3.141592653260520984471283759942320330996L),
2922 #endif
2923 TEST_c_c (cacosh, 0x1p-63L, 0.5L, 4.812118250596034474977589134243684231373e-1L, 1.570796326794896619134347701278529840650L),
2924 TEST_c_c (cacosh, 0x1p-63L, -0.5L, 4.812118250596034474977589134243684231373e-1L, -1.570796326794896619134347701278529840650L),
2925 TEST_c_c (cacosh, -0x1p-63L, 0.5L, 4.812118250596034474977589134243684231373e-1L, 1.570796326794896619328295682000973043547L),
2926 TEST_c_c (cacosh, -0x1p-63L, -0.5L, 4.812118250596034474977589134243684231373e-1L, -1.570796326794896619328295682000973043547L),
2927 TEST_c_c (cacosh, 0.5L, 0x1p-63L, 1.251928832280966098829878787499365228659e-19L, 1.047197551196597746154214461093167628070L),
2928 TEST_c_c (cacosh, -0.5L, 0x1p-63L, 1.251928832280966098829878787499365228659e-19L, 2.094395102393195492308428922186335256127L),
2929 TEST_c_c (cacosh, 0.5L, -0x1p-63L, 1.251928832280966098829878787499365228659e-19L, -1.047197551196597746154214461093167628070L),
2930 TEST_c_c (cacosh, -0.5L, -0x1p-63L, 1.251928832280966098829878787499365228659e-19L, -2.094395102393195492308428922186335256127L),
2931 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
2932 TEST_c_c (cacosh, 0x1.fp-16385L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442099L),
2933 TEST_c_c (cacosh, 0x1.fp-16385L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442099L),
2934 TEST_c_c (cacosh, -0x1.fp-16385L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442099L),
2935 TEST_c_c (cacosh, -0x1.fp-16385L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442099L),
2936 TEST_c_c (cacosh, 0.5L, 0x1.fp-16385L, 9.402257155670418112159334875199821342890e-4933L, 1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION),
2937 TEST_c_c (cacosh, -0.5L, 0x1.fp-16385L, 9.402257155670418112159334875199821342890e-4933L, 2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION),
2938 TEST_c_c (cacosh, 0.5L, -0x1.fp-16385L, 9.402257155670418112159334875199821342890e-4933L, -1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION),
2939 TEST_c_c (cacosh, -0.5L, -0x1.fp-16385L, 9.402257155670418112159334875199821342890e-4933L, -2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION),
2940 #endif
2941 TEST_c_c (cacosh, 0x1p-63L, 0x1p-63L, 1.084202172485504434007452800869941711430e-19L, 1.570796326794896619122901474391200998698L),
2942 TEST_c_c (cacosh, 0x1p-63L, -0x1p-63L, 1.084202172485504434007452800869941711430e-19L, -1.570796326794896619122901474391200998698L),
2943 TEST_c_c (cacosh, -0x1p-63L, 0x1p-63L, 1.084202172485504434007452800869941711430e-19L, 1.570796326794896619339741908888301885499L),
2944 TEST_c_c (cacosh, -0x1p-63L, -0x1p-63L, 1.084202172485504434007452800869941711430e-19L, -1.570796326794896619339741908888301885499L),
2945 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
2946 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1p-63L, 1.084202172485504434007452800869941711424e-19L, 1.570796326794896619231321691639751442099L),
2947 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1p-63L, 1.084202172485504434007452800869941711424e-19L, -1.570796326794896619231321691639751442099L),
2948 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1p-63L, 1.084202172485504434007452800869941711424e-19L, 1.570796326794896619231321691639751442099L),
2949 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1p-63L, 1.084202172485504434007452800869941711424e-19L, -1.570796326794896619231321691639751442099L),
2950 TEST_c_c (cacosh, 0x1p-63L, 0x1.fp-16385L, 8.142593549724601460479922838826119584465e-4933L, 1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION),
2951 TEST_c_c (cacosh, -0x1p-63L, 0x1.fp-16385L, 8.142593549724601460479922838826119584465e-4933L, 1.570796326794896619339741908888301885499L, UNDERFLOW_EXCEPTION),
2952 TEST_c_c (cacosh, 0x1p-63L, -0x1.fp-16385L, 8.142593549724601460479922838826119584465e-4933L, -1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION),
2953 TEST_c_c (cacosh, -0x1p-63L, -0x1.fp-16385L, 8.142593549724601460479922838826119584465e-4933L, -1.570796326794896619339741908888301885499L, UNDERFLOW_EXCEPTION),
2954 #endif
2955 TEST_c_c (cacosh, 0.0L, 0x1p-63L, 1.084202172485504434007452800869941711424e-19L, 1.570796326794896619231321691639751442099L),
2956 TEST_c_c (cacosh, 0.0L, -0x1p-63L, 1.084202172485504434007452800869941711424e-19L, -1.570796326794896619231321691639751442099L),
2957 TEST_c_c (cacosh, -0.0L, 0x1p-63L, 1.084202172485504434007452800869941711424e-19L, 1.570796326794896619231321691639751442099L),
2958 TEST_c_c (cacosh, -0.0L, -0x1p-63L, 1.084202172485504434007452800869941711424e-19L, -1.570796326794896619231321691639751442099L),
2959 TEST_c_c (cacosh, 0x1p-63L, 0.0L, 0.0L, 1.570796326794896619122901474391200998698L),
2960 TEST_c_c (cacosh, -0x1p-63L, 0.0L, 0.0L, 1.570796326794896619339741908888301885499L),
2961 TEST_c_c (cacosh, 0x1p-63L, -0.0L, 0.0L, -1.570796326794896619122901474391200998698L),
2962 TEST_c_c (cacosh, -0x1p-63L, -0.0L, 0.0L, -1.570796326794896619339741908888301885499L),
2963 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
2964 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
2965 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
2966 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
2967 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
2968 #endif
2969 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
2970 TEST_c_c (cacosh, 0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639734010571L),
2971 TEST_c_c (cacosh, 0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639734010571L),
2972 TEST_c_c (cacosh, -0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639768873627L),
2973 TEST_c_c (cacosh, -0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639768873627L),
2974 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 1.234330349600789959989661887846005659983e-16L, 1.997188458999618357060632049675702684031e-16L),
2975 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 1.234330349600789959989661887846005659983e-16L, 3.141592653589793038743797483317667178134L),
2976 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 1.234330349600789959989661887846005659983e-16L, -1.997188458999618357060632049675702684031e-16L),
2977 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 1.234330349600789959989661887846005659983e-16L, -3.141592653589793038743797483317667178134L),
2978 TEST_c_c (cacosh, 0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639751442099L),
2979 TEST_c_c (cacosh, 0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639751442099L),
2980 TEST_c_c (cacosh, -0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639751442099L),
2981 TEST_c_c (cacosh, -0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639751442099L),
2982 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 3.432186888910770473784103112009399360940e-293L, 1.570092458683775059393382371963565104164e-16L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2983 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 3.432186888910770473784103112009399360940e-293L, 3.141592653589793081453397514901996944859L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2984 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 3.432186888910770473784103112009399360940e-293L, -1.570092458683775059393382371963565104164e-16L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2985 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 3.432186888910770473784103112009399360940e-293L, -3.141592653589793081453397514901996944859L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2986 TEST_c_c (cacosh, 0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639751442099L),
2987 TEST_c_c (cacosh, 0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639751442099L),
2988 TEST_c_c (cacosh, -0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639751442099L),
2989 TEST_c_c (cacosh, -0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639751442099L),
2990 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 0.0L, 1.570092458683775059393382371963565104164e-16L),
2991 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 0.0L, 3.141592653589793081453397514901996944859L),
2992 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 0.0L, -1.570092458683775059393382371963565104164e-16L),
2993 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 0.0L, -3.141592653589793081453397514901996944859L),
2994 #endif
2995 TEST_c_c (cacosh, 0x1p-105L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639729392766L),
2996 TEST_c_c (cacosh, 0x1p-105L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639729392766L),
2997 TEST_c_c (cacosh, -0x1p-105L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639773491431L),
2998 TEST_c_c (cacosh, -0x1p-105L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639773491431L),
2999 TEST_c_c (cacosh, 0.5L, 0x1p-105L, 2.846556599890768890940941645338546615370e-32L, 1.047197551196597746154214461093167628066L),
3000 TEST_c_c (cacosh, -0.5L, 0x1p-105L, 2.846556599890768890940941645338546615370e-32L, 2.094395102393195492308428922186335256131L),
3001 TEST_c_c (cacosh, 0.5L, -0x1p-105L, 2.846556599890768890940941645338546615370e-32L, -1.047197551196597746154214461093167628066L),
3002 TEST_c_c (cacosh, -0.5L, -0x1p-105L, 2.846556599890768890940941645338546615370e-32L, -2.094395102393195492308428922186335256131L),
3003 TEST_c_c (cacosh, 0x1p-105L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639726790195L),
3004 TEST_c_c (cacosh, 0x1p-105L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639726790195L),
3005 TEST_c_c (cacosh, -0x1p-105L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639776094002L),
3006 TEST_c_c (cacosh, -0x1p-105L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639776094002L),
3007 #ifndef TEST_FLOAT
3008 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639751442099L),
3009 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639751442099L),
3010 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639751442099L),
3011 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639751442099L),
3012 TEST_c_c (cacosh, 0x1p-105L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 1.570796326794896619231321691639726790195L, UNDERFLOW_EXCEPTION_DOUBLE),
3013 TEST_c_c (cacosh, -0x1p-105L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 1.570796326794896619231321691639776094002L, UNDERFLOW_EXCEPTION_DOUBLE),
3014 TEST_c_c (cacosh, 0x1p-105L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -1.570796326794896619231321691639726790195L, UNDERFLOW_EXCEPTION_DOUBLE),
3015 TEST_c_c (cacosh, -0x1p-105L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -1.570796326794896619231321691639776094002L, UNDERFLOW_EXCEPTION_DOUBLE),
3016 #endif
3017 TEST_c_c (cacosh, 0.0L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639751442099L),
3018 TEST_c_c (cacosh, 0.0L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639751442099L),
3019 TEST_c_c (cacosh, -0.0L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639751442099L),
3020 TEST_c_c (cacosh, -0.0L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639751442099L),
3021 TEST_c_c (cacosh, 0x1p-105L, 0.0L, 0.0L, 1.570796326794896619231321691639726790195L),
3022 TEST_c_c (cacosh, -0x1p-105L, 0.0L, 0.0L, 1.570796326794896619231321691639776094002L),
3023 TEST_c_c (cacosh, 0x1p-105L, -0.0L, 0.0L, -1.570796326794896619231321691639726790195L),
3024 TEST_c_c (cacosh, -0x1p-105L, -0.0L, 0.0L, -1.570796326794896619231321691639776094002L),
3025 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
3026 TEST_c_c (cacosh, 0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751305915L),
3027 TEST_c_c (cacosh, 0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751305915L),
3028 TEST_c_c (cacosh, -0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751578282L),
3029 TEST_c_c (cacosh, -0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751578282L),
3030 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 1.091004200533850618345330909857103457781e-17L, 1.765281878332676474347460257221369818872e-17L),
3031 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 1.091004200533850618345330909857103457781e-17L, 3.141592653589793220809824599952738140723L),
3032 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 1.091004200533850618345330909857103457781e-17L, -1.765281878332676474347460257221369818872e-17L),
3033 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 1.091004200533850618345330909857103457781e-17L, -3.141592653589793220809824599952738140723L),
3034 TEST_c_c (cacosh, 0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751442099L),
3035 TEST_c_c (cacosh, 0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751442099L),
3036 TEST_c_c (cacosh, -0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751442099L),
3037 TEST_c_c (cacosh, -0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751442099L),
3038 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 5.867357004219059108790368268900490184505e-4916L, 1.387778780781445675529539585113525401762e-17L),
3039 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 5.867357004219059108790368268900490184505e-4916L, 3.141592653589793224584855575465046128902L),
3040 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 5.867357004219059108790368268900490184505e-4916L, -1.387778780781445675529539585113525401762e-17L),
3041 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 5.867357004219059108790368268900490184505e-4916L, -3.141592653589793224584855575465046128902L),
3042 TEST_c_c (cacosh, 0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751442099L),
3043 TEST_c_c (cacosh, 0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751442099L),
3044 TEST_c_c (cacosh, -0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751442099L),
3045 TEST_c_c (cacosh, -0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751442099L),
3046 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 0.0L, 1.387778780781445675529539585113525401762e-17L),
3047 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 0.0L, 3.141592653589793224584855575465046128902L),
3048 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 0.0L, -1.387778780781445675529539585113525401762e-17L),
3049 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 0.0L, -3.141592653589793224584855575465046128902L),
3050 #endif
3051 TEST_c_c (cacosh, 0x1p-112L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751269838L),
3052 TEST_c_c (cacosh, 0x1p-112L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751269838L),
3053 TEST_c_c (cacosh, -0x1p-112L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751614359L),
3054 TEST_c_c (cacosh, -0x1p-112L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751614359L),
3055 TEST_c_c (cacosh, 0.5L, 0x1p-112L, 2.223872343664663196047610660420739543258e-34L, 1.047197551196597746154214461093167628066L),
3056 TEST_c_c (cacosh, -0.5L, 0x1p-112L, 2.223872343664663196047610660420739543258e-34L, 2.094395102393195492308428922186335256131L),
3057 TEST_c_c (cacosh, 0.5L, -0x1p-112L, 2.223872343664663196047610660420739543258e-34L, -1.047197551196597746154214461093167628066L),
3058 TEST_c_c (cacosh, -0.5L, -0x1p-112L, 2.223872343664663196047610660420739543258e-34L, -2.094395102393195492308428922186335256131L),
3059 TEST_c_c (cacosh, 0x1p-112L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751249506L),
3060 TEST_c_c (cacosh, 0x1p-112L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751249506L),
3061 TEST_c_c (cacosh, -0x1p-112L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751634692L),
3062 TEST_c_c (cacosh, -0x1p-112L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751634692L),
3063 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
3064 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751442099L),
3065 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751442099L),
3066 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751442099L),
3067 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751442099L),
3068 TEST_c_c (cacosh, 0x1p-112L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 1.570796326794896619231321691639751249506L, UNDERFLOW_EXCEPTION),
3069 TEST_c_c (cacosh, -0x1p-112L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 1.570796326794896619231321691639751634692L, UNDERFLOW_EXCEPTION),
3070 TEST_c_c (cacosh, 0x1p-112L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -1.570796326794896619231321691639751249506L, UNDERFLOW_EXCEPTION),
3071 TEST_c_c (cacosh, -0x1p-112L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -1.570796326794896619231321691639751634692L, UNDERFLOW_EXCEPTION),
3072 #endif
3073 TEST_c_c (cacosh, 0.0L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751442099L),
3074 TEST_c_c (cacosh, 0.0L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751442099L),
3075 TEST_c_c (cacosh, -0.0L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751442099L),
3076 TEST_c_c (cacosh, -0.0L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751442099L),
3077 TEST_c_c (cacosh, 0x1p-112L, 0.0L, 0.0L, 1.570796326794896619231321691639751249506L),
3078 TEST_c_c (cacosh, -0x1p-112L, 0.0L, 0.0L, 1.570796326794896619231321691639751634692L),
3079 TEST_c_c (cacosh, 0x1p-112L, -0.0L, 0.0L, -1.570796326794896619231321691639751249506L),
3080 TEST_c_c (cacosh, -0x1p-112L, -0.0L, 0.0L, -1.570796326794896619231321691639751634692L),
3081
3082 TEST_c_c (cacosh, 0.75L, 1.25L, 1.13239363160530819522266333696834467L, 1.11752014915610270578240049553777969L),
3083 TEST_c_c (cacosh, -2, -3, 1.9833870299165354323470769028940395L, -2.1414491111159960199416055713254211L),
3084 END_DATA (cacosh)
3085 };
3086
3087 static void
3088 cacosh_test (void)
3089 {
3090 errno = 0;
3091 FUNC(cacosh) (BUILD_COMPLEX (0.7L, 1.2L));
3092 if (errno == ENOSYS)
3093 /* Function not implemented. */
3094 return;
3095
3096 START (cacosh);
3097 RUN_TEST_LOOP_c_c (cacosh, cacosh_test_data, );
3098 END (cacosh, complex);
3099 }
3100
3101
3102 static void
3103 carg_test (void)
3104 {
3105 START (carg);
3106
3107 /* carg (x + iy) is specified as atan2 (y, x) */
3108
3109 /* carg (x + i 0) == 0 for x > 0. */
3110 TEST_c_f (carg, 2.0, 0, 0);
3111 /* carg (x - i 0) == -0 for x > 0. */
3112 TEST_c_f (carg, 2.0, minus_zero, minus_zero);
3113
3114 TEST_c_f (carg, 0, 0, 0);
3115 TEST_c_f (carg, 0, minus_zero, minus_zero);
3116
3117 /* carg (x + i 0) == +pi for x < 0. */
3118 TEST_c_f (carg, -2.0, 0, M_PIl);
3119
3120 /* carg (x - i 0) == -pi for x < 0. */
3121 TEST_c_f (carg, -2.0, minus_zero, -M_PIl);
3122
3123 TEST_c_f (carg, minus_zero, 0, M_PIl);
3124 TEST_c_f (carg, minus_zero, minus_zero, -M_PIl);
3125
3126 /* carg (+0 + i y) == pi/2 for y > 0. */
3127 TEST_c_f (carg, 0, 2.0, M_PI_2l);
3128
3129 /* carg (-0 + i y) == pi/2 for y > 0. */
3130 TEST_c_f (carg, minus_zero, 2.0, M_PI_2l);
3131
3132 /* carg (+0 + i y) == -pi/2 for y < 0. */
3133 TEST_c_f (carg, 0, -2.0, -M_PI_2l);
3134
3135 /* carg (-0 + i y) == -pi/2 for y < 0. */
3136 TEST_c_f (carg, minus_zero, -2.0, -M_PI_2l);
3137
3138 /* carg (inf + i y) == +0 for finite y > 0. */
3139 TEST_c_f (carg, plus_infty, 2.0, 0);
3140
3141 /* carg (inf + i y) == -0 for finite y < 0. */
3142 TEST_c_f (carg, plus_infty, -2.0, minus_zero);
3143
3144 /* carg(x + i inf) == pi/2 for finite x. */
3145 TEST_c_f (carg, 10.0, plus_infty, M_PI_2l);
3146
3147 /* carg(x - i inf) == -pi/2 for finite x. */
3148 TEST_c_f (carg, 10.0, minus_infty, -M_PI_2l);
3149
3150 /* carg (-inf + i y) == +pi for finite y > 0. */
3151 TEST_c_f (carg, minus_infty, 10.0, M_PIl);
3152
3153 /* carg (-inf + i y) == -pi for finite y < 0. */
3154 TEST_c_f (carg, minus_infty, -10.0, -M_PIl);
3155
3156 TEST_c_f (carg, plus_infty, plus_infty, M_PI_4l);
3157
3158 TEST_c_f (carg, plus_infty, minus_infty, -M_PI_4l);
3159
3160 TEST_c_f (carg, minus_infty, plus_infty, M_PI_34l);
3161
3162 TEST_c_f (carg, minus_infty, minus_infty, -M_PI_34l);
3163
3164 TEST_c_f (carg, qnan_value, qnan_value, qnan_value);
3165
3166 END (carg);
3167 }
3168
3169 static const struct test_c_c_data casin_test_data[] =
3170 {
3171 START_DATA (casin),
3172 TEST_c_c (casin, 0, 0, 0.0, 0.0),
3173 TEST_c_c (casin, minus_zero, 0, minus_zero, 0.0),
3174 TEST_c_c (casin, 0, minus_zero, 0.0, minus_zero),
3175 TEST_c_c (casin, minus_zero, minus_zero, minus_zero, minus_zero),
3176
3177 TEST_c_c (casin, plus_infty, plus_infty, M_PI_4l, plus_infty),
3178 TEST_c_c (casin, plus_infty, minus_infty, M_PI_4l, minus_infty),
3179 TEST_c_c (casin, minus_infty, plus_infty, -M_PI_4l, plus_infty),
3180 TEST_c_c (casin, minus_infty, minus_infty, -M_PI_4l, minus_infty),
3181
3182 TEST_c_c (casin, -10.0, plus_infty, minus_zero, plus_infty),
3183 TEST_c_c (casin, -10.0, minus_infty, minus_zero, minus_infty),
3184 TEST_c_c (casin, 0, plus_infty, 0.0, plus_infty),
3185 TEST_c_c (casin, 0, minus_infty, 0.0, minus_infty),
3186 TEST_c_c (casin, minus_zero, plus_infty, minus_zero, plus_infty),
3187 TEST_c_c (casin, minus_zero, minus_infty, minus_zero, minus_infty),
3188 TEST_c_c (casin, 0.1L, plus_infty, 0.0, plus_infty),
3189 TEST_c_c (casin, 0.1L, minus_infty, 0.0, minus_infty),
3190
3191 TEST_c_c (casin, minus_infty, 0, -M_PI_2l, plus_infty),
3192 TEST_c_c (casin, minus_infty, minus_zero, -M_PI_2l, minus_infty),
3193 TEST_c_c (casin, minus_infty, 100, -M_PI_2l, plus_infty),
3194 TEST_c_c (casin, minus_infty, -100, -M_PI_2l, minus_infty),
3195
3196 TEST_c_c (casin, plus_infty, 0, M_PI_2l, plus_infty),
3197 TEST_c_c (casin, plus_infty, minus_zero, M_PI_2l, minus_infty),
3198 TEST_c_c (casin, plus_infty, 0.5, M_PI_2l, plus_infty),
3199 TEST_c_c (casin, plus_infty, -0.5, M_PI_2l, minus_infty),
3200
3201 TEST_c_c (casin, qnan_value, plus_infty, qnan_value, plus_infty),
3202 TEST_c_c (casin, qnan_value, minus_infty, qnan_value, minus_infty),
3203
3204 TEST_c_c (casin, 0.0, qnan_value, 0.0, qnan_value),
3205 TEST_c_c (casin, minus_zero, qnan_value, minus_zero, qnan_value),
3206
3207 TEST_c_c (casin, plus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
3208 TEST_c_c (casin, minus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
3209
3210 TEST_c_c (casin, qnan_value, 10.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3211 TEST_c_c (casin, qnan_value, -10.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3212
3213 TEST_c_c (casin, 0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3214 TEST_c_c (casin, -0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3215
3216 TEST_c_c (casin, qnan_value, qnan_value, qnan_value, qnan_value),
3217
3218 TEST_c_c (casin, plus_zero, -1.5L, plus_zero, -1.194763217287109304111930828519090523536L),
3219 TEST_c_c (casin, minus_zero, -1.5L, minus_zero, -1.194763217287109304111930828519090523536L),
3220 TEST_c_c (casin, plus_zero, -1.0L, plus_zero, -0.8813735870195430252326093249797923090282L),
3221 TEST_c_c (casin, minus_zero, -1.0L, minus_zero, -0.8813735870195430252326093249797923090282L),
3222 TEST_c_c (casin, plus_zero, -0.5L, plus_zero, -0.4812118250596034474977589134243684231352L),
3223 TEST_c_c (casin, minus_zero, -0.5L, minus_zero, -0.4812118250596034474977589134243684231352L),
3224 TEST_c_c (casin, plus_zero, 0.5L, plus_zero, 0.4812118250596034474977589134243684231352L),
3225 TEST_c_c (casin, minus_zero, 0.5L, minus_zero, 0.4812118250596034474977589134243684231352L),
3226 TEST_c_c (casin, plus_zero, 1.0L, plus_zero, 0.8813735870195430252326093249797923090282L),
3227 TEST_c_c (casin, minus_zero, 1.0L, minus_zero, 0.8813735870195430252326093249797923090282L),
3228 TEST_c_c (casin, plus_zero, 1.5L, plus_zero, 1.194763217287109304111930828519090523536L),
3229 TEST_c_c (casin, minus_zero, 1.5L, minus_zero, 1.194763217287109304111930828519090523536L),
3230
3231 TEST_c_c (casin, -1.5L, plus_zero, -M_PI_2l, 0.9624236501192068949955178268487368462704L),
3232 TEST_c_c (casin, -1.5L, minus_zero, -M_PI_2l, -0.9624236501192068949955178268487368462704L),
3233 TEST_c_c (casin, -1.0L, plus_zero, -M_PI_2l, plus_zero),
3234 TEST_c_c (casin, -1.0L, minus_zero, -M_PI_2l, minus_zero),
3235 TEST_c_c (casin, -0.5L, plus_zero, -0.5235987755982988730771072305465838140329L, plus_zero),
3236 TEST_c_c (casin, -0.5L, minus_zero, -0.5235987755982988730771072305465838140329L, minus_zero),
3237 TEST_c_c (casin, 0.5L, plus_zero, 0.5235987755982988730771072305465838140329L, plus_zero),
3238 TEST_c_c (casin, 0.5L, minus_zero, 0.5235987755982988730771072305465838140329L, minus_zero),
3239 TEST_c_c (casin, 1.0L, plus_zero, M_PI_2l, plus_zero),
3240 TEST_c_c (casin, 1.0L, minus_zero, M_PI_2l, minus_zero),
3241 TEST_c_c (casin, 1.5L, plus_zero, M_PI_2l, 0.9624236501192068949955178268487368462704L),
3242 TEST_c_c (casin, 1.5L, minus_zero, M_PI_2l, -0.9624236501192068949955178268487368462704L),
3243
3244 TEST_c_c (casin, 0x1p50L, 1.0L, 1.570796326794895731052901991514519103193L, 3.535050620855721078027883819436720218708e1L),
3245 TEST_c_c (casin, 0x1p50L, -1.0L, 1.570796326794895731052901991514519103193L, -3.535050620855721078027883819436720218708e1L),
3246 TEST_c_c (casin, -0x1p50L, 1.0L, -1.570796326794895731052901991514519103193L, 3.535050620855721078027883819436720218708e1L),
3247 TEST_c_c (casin, -0x1p50L, -1.0L, -1.570796326794895731052901991514519103193L, -3.535050620855721078027883819436720218708e1L),
3248 TEST_c_c (casin, 1.0L, 0x1p50L, 8.881784197001252323389053344720723756399e-16L, 3.535050620855721078027883819436759661753e1L),
3249 TEST_c_c (casin, -1.0L, 0x1p50L, -8.881784197001252323389053344720723756399e-16L, 3.535050620855721078027883819436759661753e1L),
3250 TEST_c_c (casin, 1.0L, -0x1p50L, 8.881784197001252323389053344720723756399e-16L, -3.535050620855721078027883819436759661753e1L),
3251 TEST_c_c (casin, -1.0L, -0x1p50L, -8.881784197001252323389053344720723756399e-16L, -3.535050620855721078027883819436759661753e1L),
3252 #ifndef TEST_FLOAT
3253 TEST_c_c (casin, 0x1p500L, 1.0L, 1.570796326794896619231321691639751442099L, 3.472667374605326000180332928505464606058e2L),
3254 TEST_c_c (casin, 0x1p500L, -1.0L, 1.570796326794896619231321691639751442099L, -3.472667374605326000180332928505464606058e2L),
3255 TEST_c_c (casin, -0x1p500L, 1.0L, -1.570796326794896619231321691639751442099L, 3.472667374605326000180332928505464606058e2L),
3256 TEST_c_c (casin, -0x1p500L, -1.0L, -1.570796326794896619231321691639751442099L, -3.472667374605326000180332928505464606058e2L),
3257 TEST_c_c (casin, 1.0L, 0x1p500L, 3.054936363499604682051979393213617699789e-151L, 3.472667374605326000180332928505464606058e2L),
3258 TEST_c_c (casin, -1.0L, 0x1p500L, -3.054936363499604682051979393213617699789e-151L, 3.472667374605326000180332928505464606058e2L),
3259 TEST_c_c (casin, 1.0L, -0x1p500L, 3.054936363499604682051979393213617699789e-151L, -3.472667374605326000180332928505464606058e2L),
3260 TEST_c_c (casin, -1.0L, -0x1p500L, -3.054936363499604682051979393213617699789e-151L, -3.472667374605326000180332928505464606058e2L),
3261 #endif
3262 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
3263 TEST_c_c (casin, 0x1p5000L, 1.0L, 1.570796326794896619231321691639751442099L, 3.466429049980286492395577839412341016946e3L),
3264 TEST_c_c (casin, 0x1p5000L, -1.0L, 1.570796326794896619231321691639751442099L, -3.466429049980286492395577839412341016946e3L),
3265 TEST_c_c (casin, -0x1p5000L, 1.0L, -1.570796326794896619231321691639751442099L, 3.466429049980286492395577839412341016946e3L),
3266 TEST_c_c (casin, -0x1p5000L, -1.0L, -1.570796326794896619231321691639751442099L, -3.466429049980286492395577839412341016946e3L),
3267 TEST_c_c (casin, 1.0L, 0x1p5000L, 7.079811261048172892385615158694057552948e-1506L, 3.466429049980286492395577839412341016946e3L),
3268 TEST_c_c (casin, -1.0L, 0x1p5000L, -7.079811261048172892385615158694057552948e-1506L, 3.466429049980286492395577839412341016946e3L),
3269 TEST_c_c (casin, 1.0L, -0x1p5000L, 7.079811261048172892385615158694057552948e-1506L, -3.466429049980286492395577839412341016946e3L),
3270 TEST_c_c (casin, -1.0L, -0x1p5000L, -7.079811261048172892385615158694057552948e-1506L, -3.466429049980286492395577839412341016946e3L),
3271 #endif
3272
3273 TEST_c_c (casin, 0x1.fp127L, 0x1.fp127L, 7.853981633974483096156608458198757210493e-1L, 8.973081118419833726837456344608533993585e1L),
3274 #ifndef TEST_FLOAT
3275 TEST_c_c (casin, 0x1.fp1023L, 0x1.fp1023L, 7.853981633974483096156608458198757210493e-1L, 7.107906849659093345062145442726115449315e2L),
3276 #endif
3277 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
3278 TEST_c_c (casin, 0x1.fp16383L, 0x1.fp16383L, 7.853981633974483096156608458198757210493e-1L, 1.135753137836666928715489992987020363057e4L),
3279 #endif
3280
3281 TEST_c_c (casin, 0x1.fp-129L, 1.5L, 1.579176199917649005841160751101628985741e-39L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_FLOAT),
3282 TEST_c_c (casin, 0x1.fp-129L, -1.5L, 1.579176199917649005841160751101628985741e-39L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_FLOAT),
3283 TEST_c_c (casin, -0x1.fp-129L, 1.5L, -1.579176199917649005841160751101628985741e-39L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_FLOAT),
3284 TEST_c_c (casin, -0x1.fp-129L, -1.5L, -1.579176199917649005841160751101628985741e-39L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_FLOAT),
3285 TEST_c_c (casin, 1.5L, 0x1.fp-129L, 1.570796326794896619231321691639751442096L, 9.624236501192068949955178268487368462704e-1L),
3286 TEST_c_c (casin, -1.5L, 0x1.fp-129L, -1.570796326794896619231321691639751442096L, 9.624236501192068949955178268487368462704e-1L),
3287 TEST_c_c (casin, 1.5L, -0x1.fp-129L, 1.570796326794896619231321691639751442096L, -9.624236501192068949955178268487368462704e-1L),
3288 TEST_c_c (casin, -1.5L, -0x1.fp-129L, -1.570796326794896619231321691639751442096L, -9.624236501192068949955178268487368462704e-1L),
3289 #ifndef TEST_FLOAT
3290 TEST_c_c (casin, 0x1.fp-1025L, 1.5L, 2.989196569048182929051881765490354365918e-309L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_DOUBLE),
3291 TEST_c_c (casin, 0x1.fp-1025L, -1.5L, 2.989196569048182929051881765490354365918e-309L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_DOUBLE),
3292 TEST_c_c (casin, -0x1.fp-1025L, 1.5L, -2.989196569048182929051881765490354365918e-309L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_DOUBLE),
3293 TEST_c_c (casin, -0x1.fp-1025L, -1.5L, -2.989196569048182929051881765490354365918e-309L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_DOUBLE),
3294 TEST_c_c (casin, 1.5L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 9.624236501192068949955178268487368462704e-1L),
3295 TEST_c_c (casin, -1.5L, 0x1.fp-1025L, -1.570796326794896619231321691639751442099L, 9.624236501192068949955178268487368462704e-1L),
3296 TEST_c_c (casin, 1.5L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -9.624236501192068949955178268487368462704e-1L),
3297 TEST_c_c (casin, -1.5L, -0x1.fp-1025L, -1.570796326794896619231321691639751442099L, -9.624236501192068949955178268487368462704e-1L),
3298 #endif
3299 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
3300 TEST_c_c (casin, 0x1.fp-16385L, 1.5L, 4.516698239814521372306784062043266700598e-4933L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION),
3301 TEST_c_c (casin, 0x1.fp-16385L, -1.5L, 4.516698239814521372306784062043266700598e-4933L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION),
3302 TEST_c_c (casin, -0x1.fp-16385L, 1.5L, -4.516698239814521372306784062043266700598e-4933L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION),
3303 TEST_c_c (casin, -0x1.fp-16385L, -1.5L, -4.516698239814521372306784062043266700598e-4933L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION),
3304 TEST_c_c (casin, 1.5L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 9.624236501192068949955178268487368462704e-1L),
3305 TEST_c_c (casin, -1.5L, 0x1.fp-16385L, -1.570796326794896619231321691639751442099L, 9.624236501192068949955178268487368462704e-1L),
3306 TEST_c_c (casin, 1.5L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -9.624236501192068949955178268487368462704e-1L),
3307 TEST_c_c (casin, -1.5L, -0x1.fp-16385L, -1.570796326794896619231321691639751442099L, -9.624236501192068949955178268487368462704e-1L),
3308 #endif
3309
3310 TEST_c_c (casin, 0.5L, 1.0L, 3.494390628572132936274118260753699527325e-1L, 9.261330313501824245501244453057873152694e-1L),
3311 TEST_c_c (casin, 0.5L, -1.0L, 3.494390628572132936274118260753699527325e-1L, -9.261330313501824245501244453057873152694e-1L),
3312 TEST_c_c (casin, -0.5L, 1.0L, -3.494390628572132936274118260753699527325e-1L, 9.261330313501824245501244453057873152694e-1L),
3313 TEST_c_c (casin, -0.5L, -1.0L, -3.494390628572132936274118260753699527325e-1L, -9.261330313501824245501244453057873152694e-1L),
3314 TEST_c_c (casin, 1.0L, 0.5L, 8.959074812088902390666567243275770102229e-1L, 7.328576759736452608886724437653071523305e-1L),
3315 TEST_c_c (casin, -1.0L, 0.5L, -8.959074812088902390666567243275770102229e-1L, 7.328576759736452608886724437653071523305e-1L),
3316 TEST_c_c (casin, 1.0L, -0.5L, 8.959074812088902390666567243275770102229e-1L, -7.328576759736452608886724437653071523305e-1L),
3317 TEST_c_c (casin, -1.0L, -0.5L, -8.959074812088902390666567243275770102229e-1L, -7.328576759736452608886724437653071523305e-1L),
3318 TEST_c_c (casin, 0.25L, 1.0L, 1.763024327769669304186785666360901026468e-1L, 8.924633639033482359562124741744951972772e-1L),
3319 TEST_c_c (casin, 0.25L, -1.0L, 1.763024327769669304186785666360901026468e-1L, -8.924633639033482359562124741744951972772e-1L),
3320 TEST_c_c (casin, -0.25L, 1.0L, -1.763024327769669304186785666360901026468e-1L, 8.924633639033482359562124741744951972772e-1L),
3321 TEST_c_c (casin, -0.25L, -1.0L, -1.763024327769669304186785666360901026468e-1L, -8.924633639033482359562124741744951972772e-1L),
3322 TEST_c_c (casin, 1.0L, 0.25L, 1.081751996523816326311037318425097434186L, 5.097911466811016354623559941115413499164e-1L),
3323 TEST_c_c (casin, -1.0L, 0.25L, -1.081751996523816326311037318425097434186L, 5.097911466811016354623559941115413499164e-1L),
3324 TEST_c_c (casin, 1.0L, -0.25L, 1.081751996523816326311037318425097434186L, -5.097911466811016354623559941115413499164e-1L),
3325 TEST_c_c (casin, -1.0L, -0.25L, -1.081751996523816326311037318425097434186L, -5.097911466811016354623559941115413499164e-1L),
3326 TEST_c_c (casin, 0x1.fp-10L, 1.0L, 1.337909359557740912558349531052239112857e-3L, 8.813742198809567991336704287826445879025e-1L),
3327 TEST_c_c (casin, 0x1.fp-10L, -1.0L, 1.337909359557740912558349531052239112857e-3L, -8.813742198809567991336704287826445879025e-1L),
3328 TEST_c_c (casin, -0x1.fp-10L, 1.0L, -1.337909359557740912558349531052239112857e-3L, 8.813742198809567991336704287826445879025e-1L),
3329 TEST_c_c (casin, -0x1.fp-10L, -1.0L, -1.337909359557740912558349531052239112857e-3L, -8.813742198809567991336704287826445879025e-1L),
3330 TEST_c_c (casin, 1.0L, 0x1.fp-10L, 1.527305029163877791518741192097931722508L, 4.350501469856803800217957402220976497152e-2L),
3331 TEST_c_c (casin, -1.0L, 0x1.fp-10L, -1.527305029163877791518741192097931722508L, 4.350501469856803800217957402220976497152e-2L),
3332 TEST_c_c (casin, 1.0L, -0x1.fp-10L, 1.527305029163877791518741192097931722508L, -4.350501469856803800217957402220976497152e-2L),
3333 TEST_c_c (casin, -1.0L, -0x1.fp-10L, -1.527305029163877791518741192097931722508L, -4.350501469856803800217957402220976497152e-2L),
3334 TEST_c_c (casin, 0x1.fp-30L, 1.0L, 1.275929984216518540252717485007112529021e-9L, 8.813735870195430258081932989769495326854e-1L),
3335 TEST_c_c (casin, 0x1.fp-30L, -1.0L, 1.275929984216518540252717485007112529021e-9L, -8.813735870195430258081932989769495326854e-1L),
3336 TEST_c_c (casin, -0x1.fp-30L, 1.0L, -1.275929984216518540252717485007112529021e-9L, 8.813735870195430258081932989769495326854e-1L),
3337 TEST_c_c (casin, -0x1.fp-30L, -1.0L, -1.275929984216518540252717485007112529021e-9L, -8.813735870195430258081932989769495326854e-1L),
3338 TEST_c_c (casin, 1.0L, 0x1.fp-30L, 1.570753848123921942730162693731872690232L, 4.247867098745151888768727039216644758847e-5L),
3339 TEST_c_c (casin, -1.0L, 0x1.fp-30L, -1.570753848123921942730162693731872690232L, 4.247867098745151888768727039216644758847e-5L),
3340 TEST_c_c (casin, 1.0L, -0x1.fp-30L, 1.570753848123921942730162693731872690232L, -4.247867098745151888768727039216644758847e-5L),
3341 TEST_c_c (casin, -1.0L, -0x1.fp-30L, -1.570753848123921942730162693731872690232L, -4.247867098745151888768727039216644758847e-5L),
3342 TEST_c_c (casin, 0x1.fp-100L, 1.0L, 1.080754735021050612990719608916167354321e-30L, 8.813735870195430252326093249797923090282e-1L),
3343 TEST_c_c (casin, 0x1.fp-100L, -1.0L, 1.080754735021050612990719608916167354321e-30L, -8.813735870195430252326093249797923090282e-1L),
3344 TEST_c_c (casin, -0x1.fp-100L, 1.0L, -1.080754735021050612990719608916167354321e-30L, 8.813735870195430252326093249797923090282e-1L),
3345 TEST_c_c (casin, -0x1.fp-100L, -1.0L, -1.080754735021050612990719608916167354321e-30L, -8.813735870195430252326093249797923090282e-1L),
3346 TEST_c_c (casin, 1.0L, 0x1.fp-100L, 1.570796326794895382939283431378862777584L, 1.236292038260260888664514866457202186027e-15L),
3347 TEST_c_c (casin, -1.0L, 0x1.fp-100L, -1.570796326794895382939283431378862777584L, 1.236292038260260888664514866457202186027e-15L),
3348 TEST_c_c (casin, 1.0L, -0x1.fp-100L, 1.570796326794895382939283431378862777584L, -1.236292038260260888664514866457202186027e-15L),
3349 TEST_c_c (casin, -1.0L, -0x1.fp-100L, -1.570796326794895382939283431378862777584L, -1.236292038260260888664514866457202186027e-15L),
3350 TEST_c_c (casin, 0x1.fp-129L, 1.0L, 2.013062564695348242280482517399205554874e-39L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3351 TEST_c_c (casin, 0x1.fp-129L, -1.0L, 2.013062564695348242280482517399205554874e-39L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3352 TEST_c_c (casin, -0x1.fp-129L, 1.0L, -2.013062564695348242280482517399205554874e-39L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3353 TEST_c_c (casin, -0x1.fp-129L, -1.0L, -2.013062564695348242280482517399205554874e-39L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3354 TEST_c_c (casin, 1.0L, 0x1.fp-129L, 1.570796326794896619177965338869929107115L, 5.335635276982233498398987585285818977933e-20L),
3355 TEST_c_c (casin, -1.0L, 0x1.fp-129L, -1.570796326794896619177965338869929107115L, 5.335635276982233498398987585285818977933e-20L),
3356 TEST_c_c (casin, 1.0L, -0x1.fp-129L, 1.570796326794896619177965338869929107115L, -5.335635276982233498398987585285818977933e-20L),
3357 TEST_c_c (casin, -1.0L, -0x1.fp-129L, -1.570796326794896619177965338869929107115L, -5.335635276982233498398987585285818977933e-20L),
3358 #ifndef TEST_FLOAT
3359 TEST_c_c (casin, 0x1.fp-1000L, 1.0L, 1.278589251976747242280879285935084814093e-301L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3360 TEST_c_c (casin, 0x1.fp-1000L, -1.0L, 1.278589251976747242280879285935084814093e-301L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3361 TEST_c_c (casin, -0x1.fp-1000L, 1.0L, -1.278589251976747242280879285935084814093e-301L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3362 TEST_c_c (casin, -0x1.fp-1000L, -1.0L, -1.278589251976747242280879285935084814093e-301L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3363 TEST_c_c (casin, 1.0L, 0x1.fp-1000L, 1.570796326794896619231321691639751442099L, 4.252291453851660175550490409247739011867e-151L),
3364 TEST_c_c (casin, -1.0L, 0x1.fp-1000L, -1.570796326794896619231321691639751442099L, 4.252291453851660175550490409247739011867e-151L),
3365 TEST_c_c (casin, 1.0L, -0x1.fp-1000L, 1.570796326794896619231321691639751442099L, -4.252291453851660175550490409247739011867e-151L),
3366 TEST_c_c (casin, -1.0L, -0x1.fp-1000L, -1.570796326794896619231321691639751442099L, -4.252291453851660175550490409247739011867e-151L),
3367 TEST_c_c (casin, 0x1.fp-1025L, 1.0L, 3.810492908885321743133304375216617626230e-309L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3368 TEST_c_c (casin, 0x1.fp-1025L, -1.0L, 3.810492908885321743133304375216617626230e-309L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3369 TEST_c_c (casin, -0x1.fp-1025L, 1.0L, -3.810492908885321743133304375216617626230e-309L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3370 TEST_c_c (casin, -0x1.fp-1025L, -1.0L, -3.810492908885321743133304375216617626230e-309L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3371 TEST_c_c (casin, 1.0L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 7.340879205566679497036857179189356754017e-155L),
3372 TEST_c_c (casin, -1.0L, 0x1.fp-1025L, -1.570796326794896619231321691639751442099L, 7.340879205566679497036857179189356754017e-155L),
3373 TEST_c_c (casin, 1.0L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -7.340879205566679497036857179189356754017e-155L),
3374 TEST_c_c (casin, -1.0L, -0x1.fp-1025L, -1.570796326794896619231321691639751442099L, -7.340879205566679497036857179189356754017e-155L),
3375 #endif
3376 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
3377 TEST_c_c (casin, 0x1.fp-10000L, 1.0L, 6.867047849047171855399183659351043150871e-3011L, 8.813735870195430252326093249797923090282e-1L),
3378 TEST_c_c (casin, 0x1.fp-10000L, -1.0L, 6.867047849047171855399183659351043150871e-3011L, -8.813735870195430252326093249797923090282e-1L),
3379 TEST_c_c (casin, -0x1.fp-10000L, 1.0L, -6.867047849047171855399183659351043150871e-3011L, 8.813735870195430252326093249797923090282e-1L),
3380 TEST_c_c (casin, -0x1.fp-10000L, -1.0L, -6.867047849047171855399183659351043150871e-3011L, -8.813735870195430252326093249797923090282e-1L),
3381 TEST_c_c (casin, 1.0L, 0x1.fp-10000L, 1.570796326794896619231321691639751442099L, 9.854680208706673586644342922051388714633e-1506L),
3382 TEST_c_c (casin, -1.0L, 0x1.fp-10000L, -1.570796326794896619231321691639751442099L, 9.854680208706673586644342922051388714633e-1506L),
3383 TEST_c_c (casin, 1.0L, -0x1.fp-10000L, 1.570796326794896619231321691639751442099L, -9.854680208706673586644342922051388714633e-1506L),
3384 TEST_c_c (casin, -1.0L, -0x1.fp-10000L, -1.570796326794896619231321691639751442099L, -9.854680208706673586644342922051388714633e-1506L),
3385 TEST_c_c (casin, 0x1.fp-16385L, 1.0L, 5.757683115456107044131264955348448954458e-4933L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION),
3386 TEST_c_c (casin, 0x1.fp-16385L, -1.0L, 5.757683115456107044131264955348448954458e-4933L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION),
3387 TEST_c_c (casin, -0x1.fp-16385L, 1.0L, -5.757683115456107044131264955348448954458e-4933L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION),
3388 TEST_c_c (casin, -0x1.fp-16385L, -1.0L, -5.757683115456107044131264955348448954458e-4933L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION),
3389 TEST_c_c (casin, 1.0L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 9.023632056840860275214893047597614177639e-2467L),
3390 TEST_c_c (casin, -1.0L, 0x1.fp-16385L, -1.570796326794896619231321691639751442099L, 9.023632056840860275214893047597614177639e-2467L),
3391 TEST_c_c (casin, 1.0L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -9.023632056840860275214893047597614177639e-2467L),
3392 TEST_c_c (casin, -1.0L, -0x1.fp-16385L, -1.570796326794896619231321691639751442099L, -9.023632056840860275214893047597614177639e-2467L),
3393 #endif
3394
3395 TEST_c_c (casin, 0x1p-23L, 0x1.000002p0L, 8.429369199749229560964789467980644296420e-8L, 8.813736713132400470205730751186547909968e-1L),
3396 TEST_c_c (casin, 0x1p-23L, -0x1.000002p0L, 8.429369199749229560964789467980644296420e-8L, -8.813736713132400470205730751186547909968e-1L),
3397 TEST_c_c (casin, -0x1p-23L, 0x1.000002p0L, -8.429369199749229560964789467980644296420e-8L, 8.813736713132400470205730751186547909968e-1L),
3398 TEST_c_c (casin, -0x1p-23L, -0x1.000002p0L, -8.429369199749229560964789467980644296420e-8L, -8.813736713132400470205730751186547909968e-1L),
3399 TEST_c_c (casin, 0x1.000002p0L, 0x1p-23L, 1.570574114956455764594481054234834678422L, 5.364668491573609633134147164031476452679e-4L),
3400 TEST_c_c (casin, -0x1.000002p0L, 0x1p-23L, -1.570574114956455764594481054234834678422L, 5.364668491573609633134147164031476452679e-4L),
3401 TEST_c_c (casin, 0x1.000002p0L, -0x1p-23L, 1.570574114956455764594481054234834678422L, -5.364668491573609633134147164031476452679e-4L),
3402 TEST_c_c (casin, -0x1.000002p0L, -0x1p-23L, -1.570574114956455764594481054234834678422L, -5.364668491573609633134147164031476452679e-4L),
3403 TEST_c_c (casin, 0x1.fp-129L, 0x1.000002p0L, 2.013062444707472738895109955455676357057e-39L, 8.813736713132375348727889167749389235161e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3404 TEST_c_c (casin, 0x1.fp-129L, -0x1.000002p0L, 2.013062444707472738895109955455676357057e-39L, -8.813736713132375348727889167749389235161e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3405 TEST_c_c (casin, -0x1.fp-129L, 0x1.000002p0L, -2.013062444707472738895109955455676357057e-39L, 8.813736713132375348727889167749389235161e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3406 TEST_c_c (casin, -0x1.fp-129L, -0x1.000002p0L, -2.013062444707472738895109955455676357057e-39L, -8.813736713132375348727889167749389235161e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3407 TEST_c_c (casin, 0x1.000002p0L, 0x1.fp-129L, 1.570796326794896619231321691639751436268L, 4.882812451493617206486388134172712975070e-4L),
3408 TEST_c_c (casin, -0x1.000002p0L, 0x1.fp-129L, -1.570796326794896619231321691639751436268L, 4.882812451493617206486388134172712975070e-4L),
3409 TEST_c_c (casin, 0x1.000002p0L, -0x1.fp-129L, 1.570796326794896619231321691639751436268L, -4.882812451493617206486388134172712975070e-4L),
3410 TEST_c_c (casin, -0x1.000002p0L, -0x1.fp-129L, -1.570796326794896619231321691639751436268L, -4.882812451493617206486388134172712975070e-4L),
3411 TEST_c_c (casin, 0.0L, 0x1.000002p0L, 0.0L, 8.813736713132375348727889167749389235161e-1L),
3412 TEST_c_c (casin, 0.0L, -0x1.000002p0L, 0.0L, -8.813736713132375348727889167749389235161e-1L),
3413 TEST_c_c (casin, -0.0L, 0x1.000002p0L, -0.0L, 8.813736713132375348727889167749389235161e-1L),
3414 TEST_c_c (casin, -0.0L, -0x1.000002p0L, -0.0L, -8.813736713132375348727889167749389235161e-1L),
3415 TEST_c_c (casin, 0x1.000002p0L, 0.0L, 1.570796326794896619231321691639751442099L, 4.882812451493617206486388134172712975070e-4L),
3416 TEST_c_c (casin, -0x1.000002p0L, 0.0L, -1.570796326794896619231321691639751442099L, 4.882812451493617206486388134172712975070e-4L),
3417 TEST_c_c (casin, 0x1.000002p0L, -0.0L, 1.570796326794896619231321691639751442099L, -4.882812451493617206486388134172712975070e-4L),
3418 TEST_c_c (casin, -0x1.000002p0L, -0.0L, -1.570796326794896619231321691639751442099L, -4.882812451493617206486388134172712975070e-4L),
3419 #ifndef TEST_FLOAT
3420 TEST_c_c (casin, 0x1p-52L, 0x1.0000000000001p0L, 1.570092458683774885078102529858632363236e-16L, 8.813735870195431822418551933572982483664e-1L),
3421 TEST_c_c (casin, 0x1p-52L, -0x1.0000000000001p0L, 1.570092458683774885078102529858632363236e-16L, -8.813735870195431822418551933572982483664e-1L),
3422 TEST_c_c (casin, -0x1p-52L, 0x1.0000000000001p0L, -1.570092458683774885078102529858632363236e-16L, 8.813735870195431822418551933572982483664e-1L),
3423 TEST_c_c (casin, -0x1p-52L, -0x1.0000000000001p0L, -1.570092458683774885078102529858632363236e-16L, -8.813735870195431822418551933572982483664e-1L),
3424 TEST_c_c (casin, 0x1.0000000000001p0L, 0x1p-52L, 1.570796317204594913251280305810847349436L, 2.315303644582684770975188768022139415020e-8L),
3425 TEST_c_c (casin, -0x1.0000000000001p0L, 0x1p-52L, -1.570796317204594913251280305810847349436L, 2.315303644582684770975188768022139415020e-8L),
3426 TEST_c_c (casin, 0x1.0000000000001p0L, -0x1p-52L, 1.570796317204594913251280305810847349436L, -2.315303644582684770975188768022139415020e-8L),
3427 TEST_c_c (casin, -0x1.0000000000001p0L, -0x1p-52L, -1.570796317204594913251280305810847349436L, -2.315303644582684770975188768022139415020e-8L),
3428 TEST_c_c (casin, 0x1.fp-1025L, 0x1.0000000000001p0L, 3.810492908885321320083608113679347200012e-309L, 8.813735870195431822418551933572895326024e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3429 TEST_c_c (casin, 0x1.fp-1025L, -0x1.0000000000001p0L, 3.810492908885321320083608113679347200012e-309L, -8.813735870195431822418551933572895326024e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3430 TEST_c_c (casin, -0x1.fp-1025L, 0x1.0000000000001p0L, -3.810492908885321320083608113679347200012e-309L, 8.813735870195431822418551933572895326024e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3431 TEST_c_c (casin, -0x1.fp-1025L, -0x1.0000000000001p0L, -3.810492908885321320083608113679347200012e-309L, -8.813735870195431822418551933572895326024e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3432 TEST_c_c (casin, 0x1.0000000000001p0L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 2.107342425544701550354780375182800088393e-8L),
3433 TEST_c_c (casin, -0x1.0000000000001p0L, 0x1.fp-1025L, -1.570796326794896619231321691639751442099L, 2.107342425544701550354780375182800088393e-8L),
3434 TEST_c_c (casin, 0x1.0000000000001p0L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -2.107342425544701550354780375182800088393e-8L),
3435 TEST_c_c (casin, -0x1.0000000000001p0L, -0x1.fp-1025L, -1.570796326794896619231321691639751442099L, -2.107342425544701550354780375182800088393e-8L),
3436 TEST_c_c (casin, 0.0L, 0x1.0000000000001p0L, 0.0L, 8.813735870195431822418551933572895326024e-1L),
3437 TEST_c_c (casin, 0.0L, -0x1.0000000000001p0L, 0.0L, -8.813735870195431822418551933572895326024e-1L),
3438 TEST_c_c (casin, -0.0L, 0x1.0000000000001p0L, -0.0L, 8.813735870195431822418551933572895326024e-1L),
3439 TEST_c_c (casin, -0.0L, -0x1.0000000000001p0L, -0.0L, -8.813735870195431822418551933572895326024e-1L),
3440 TEST_c_c (casin, 0x1.0000000000001p0L, 0.0L, 1.570796326794896619231321691639751442099L, 2.107342425544701550354780375182800088393e-8L),
3441 TEST_c_c (casin, -0x1.0000000000001p0L, 0.0L, -1.570796326794896619231321691639751442099L, 2.107342425544701550354780375182800088393e-8L),
3442 TEST_c_c (casin, 0x1.0000000000001p0L, -0.0L, 1.570796326794896619231321691639751442099L, -2.107342425544701550354780375182800088393e-8L),
3443 TEST_c_c (casin, -0x1.0000000000001p0L, -0.0L, -1.570796326794896619231321691639751442099L, -2.107342425544701550354780375182800088393e-8L),
3444 #endif
3445 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
3446 TEST_c_c (casin, 0x1p-63L, 0x1.0000000000000002p0L, 7.666467083416870406778649849746878368519e-20L, 8.813735870195430253092739958139610131001e-1L),
3447 TEST_c_c (casin, 0x1p-63L, -0x1.0000000000000002p0L, 7.666467083416870406778649849746878368519e-20L, -8.813735870195430253092739958139610131001e-1L),
3448 TEST_c_c (casin, -0x1p-63L, 0x1.0000000000000002p0L, -7.666467083416870406778649849746878368519e-20L, 8.813735870195430253092739958139610131001e-1L),
3449 TEST_c_c (casin, -0x1p-63L, -0x1.0000000000000002p0L, -7.666467083416870406778649849746878368519e-20L, -8.813735870195430253092739958139610131001e-1L),
3450 TEST_c_c (casin, 0x1.0000000000000002p0L, 0x1p-63L, 1.570796326582978888921215348380499122131L, 5.116146586219826555037807251857670783420e-10L),
3451 TEST_c_c (casin, -0x1.0000000000000002p0L, 0x1p-63L, -1.570796326582978888921215348380499122131L, 5.116146586219826555037807251857670783420e-10L),
3452 TEST_c_c (casin, 0x1.0000000000000002p0L, -0x1p-63L, 1.570796326582978888921215348380499122131L, -5.116146586219826555037807251857670783420e-10L),
3453 TEST_c_c (casin, -0x1.0000000000000002p0L, -0x1p-63L, -1.570796326582978888921215348380499122131L, -5.116146586219826555037807251857670783420e-10L),
3454 # if LDBL_MIN_EXP <= -16381
3455 TEST_c_c (casin, 0x1.fp-16385L, 0x1.0000000000000002p0L, 5.757683115456107043819140328235418018963e-4933L, 8.813735870195430253092739958139610130980e-1L, UNDERFLOW_EXCEPTION),
3456 TEST_c_c (casin, 0x1.fp-16385L, -0x1.0000000000000002p0L, 5.757683115456107043819140328235418018963e-4933L, -8.813735870195430253092739958139610130980e-1L, UNDERFLOW_EXCEPTION),
3457 TEST_c_c (casin, -0x1.fp-16385L, 0x1.0000000000000002p0L, -5.757683115456107043819140328235418018963e-4933L, 8.813735870195430253092739958139610130980e-1L, UNDERFLOW_EXCEPTION),
3458 TEST_c_c (casin, -0x1.fp-16385L, -0x1.0000000000000002p0L, -5.757683115456107043819140328235418018963e-4933L, -8.813735870195430253092739958139610130980e-1L, UNDERFLOW_EXCEPTION),
3459 TEST_c_c (casin, 0x1.0000000000000002p0L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 4.656612873077392578082927418388212703712e-10L),
3460 TEST_c_c (casin, -0x1.0000000000000002p0L, 0x1.fp-16385L, -1.570796326794896619231321691639751442099L, 4.656612873077392578082927418388212703712e-10L),
3461 TEST_c_c (casin, 0x1.0000000000000002p0L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -4.656612873077392578082927418388212703712e-10L),
3462 TEST_c_c (casin, -0x1.0000000000000002p0L, -0x1.fp-16385L, -1.570796326794896619231321691639751442099L, -4.656612873077392578082927418388212703712e-10L),
3463 # endif
3464 TEST_c_c (casin, 0.0L, 0x1.0000000000000002p0L, 0.0L, 8.813735870195430253092739958139610130980e-1L),
3465 TEST_c_c (casin, 0.0L, -0x1.0000000000000002p0L, 0.0L, -8.813735870195430253092739958139610130980e-1L),
3466 TEST_c_c (casin, -0.0L, 0x1.0000000000000002p0L, -0.0L, 8.813735870195430253092739958139610130980e-1L),
3467 TEST_c_c (casin, -0.0L, -0x1.0000000000000002p0L, -0.0L, -8.813735870195430253092739958139610130980e-1L),
3468 TEST_c_c (casin, 0x1.0000000000000002p0L, 0.0L, 1.570796326794896619231321691639751442099L, 4.656612873077392578082927418388212703712e-10L),
3469 TEST_c_c (casin, -0x1.0000000000000002p0L, 0.0L, -1.570796326794896619231321691639751442099L, 4.656612873077392578082927418388212703712e-10L),
3470 TEST_c_c (casin, 0x1.0000000000000002p0L, -0.0L, 1.570796326794896619231321691639751442099L, -4.656612873077392578082927418388212703712e-10L),
3471 TEST_c_c (casin, -0x1.0000000000000002p0L, -0.0L, -1.570796326794896619231321691639751442099L, -4.656612873077392578082927418388212703712e-10L),
3472 #endif
3473 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
3474 TEST_c_c (casin, 0x1p-106L, 0x1.000000000000000000000000008p0L, 8.715763992105246878957416200936726072500e-33L, 8.813735870195430252326093249798097405561e-1L),
3475 TEST_c_c (casin, 0x1p-106L, -0x1.000000000000000000000000008p0L, 8.715763992105246878957416200936726072500e-33L, -8.813735870195430252326093249798097405561e-1L),
3476 TEST_c_c (casin, -0x1p-106L, 0x1.000000000000000000000000008p0L, -8.715763992105246878957416200936726072500e-33L, 8.813735870195430252326093249798097405561e-1L),
3477 TEST_c_c (casin, -0x1p-106L, -0x1.000000000000000000000000008p0L, -8.715763992105246878957416200936726072500e-33L, -8.813735870195430252326093249798097405561e-1L),
3478 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, 0x1p-106L, 1.570796326794896565289107467733682961928L, 2.285028863093221674154232933662774454211e-16L),
3479 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, 0x1p-106L, -1.570796326794896565289107467733682961928L, 2.285028863093221674154232933662774454211e-16L),
3480 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, -0x1p-106L, 1.570796326794896565289107467733682961928L, -2.285028863093221674154232933662774454211e-16L),
3481 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, -0x1p-106L, -1.570796326794896565289107467733682961928L, -2.285028863093221674154232933662774454211e-16L),
3482 TEST_c_c (casin, 0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 3.810492908885321743133304375216570658278e-309L, 8.813735870195430252326093249798097405561e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3483 TEST_c_c (casin, 0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 3.810492908885321743133304375216570658278e-309L, -8.813735870195430252326093249798097405561e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3484 TEST_c_c (casin, -0x1.fp-1025L, 0x1.000000000000000000000000008p0L, -3.810492908885321743133304375216570658278e-309L, 8.813735870195430252326093249798097405561e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3485 TEST_c_c (casin, -0x1.fp-1025L, -0x1.000000000000000000000000008p0L, -3.810492908885321743133304375216570658278e-309L, -8.813735870195430252326093249798097405561e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3486 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181636063482e-16L),
3487 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, 0x1.fp-1025L, -1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181636063482e-16L),
3488 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181636063482e-16L),
3489 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, -0x1.fp-1025L, -1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181636063482e-16L),
3490 TEST_c_c (casin, 0.0L, 0x1.000000000000000000000000008p0L, 0.0L, 8.813735870195430252326093249798097405561e-1L),
3491 TEST_c_c (casin, 0.0L, -0x1.000000000000000000000000008p0L, 0.0L, -8.813735870195430252326093249798097405561e-1L),
3492 TEST_c_c (casin, -0.0L, 0x1.000000000000000000000000008p0L, -0.0L, 8.813735870195430252326093249798097405561e-1L),
3493 TEST_c_c (casin, -0.0L, -0x1.000000000000000000000000008p0L, -0.0L, -8.813735870195430252326093249798097405561e-1L),
3494 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, 0.0L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181636063482e-16L),
3495 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, 0.0L, -1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181636063482e-16L),
3496 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, -0.0L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181636063482e-16L),
3497 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, -0.0L, -1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181636063482e-16L),
3498 #endif
3499 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
3500 TEST_c_c (casin, 0x1p-113L, 0x1.0000000000000000000000000001p0L, 6.809190618832224124185481406981900518193e-35L, 8.813735870195430252326093249797924452120e-1L),
3501 TEST_c_c (casin, 0x1p-113L, -0x1.0000000000000000000000000001p0L, 6.809190618832224124185481406981900518193e-35L, -8.813735870195430252326093249797924452120e-1L),
3502 TEST_c_c (casin, -0x1p-113L, 0x1.0000000000000000000000000001p0L, -6.809190618832224124185481406981900518193e-35L, 8.813735870195430252326093249797924452120e-1L),
3503 TEST_c_c (casin, -0x1p-113L, -0x1.0000000000000000000000000001p0L, -6.809190618832224124185481406981900518193e-35L, -8.813735870195430252326093249797924452120e-1L),
3504 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, 0x1p-113L, 1.570796326794896614463458507897073960405L, 2.019699255375255198156433710951064632386e-17L),
3505 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, 0x1p-113L, -1.570796326794896614463458507897073960405L, 2.019699255375255198156433710951064632386e-17L),
3506 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, -0x1p-113L, 1.570796326794896614463458507897073960405L, -2.019699255375255198156433710951064632386e-17L),
3507 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, -0x1p-113L, -1.570796326794896614463458507897073960405L, -2.019699255375255198156433710951064632386e-17L),
3508 TEST_c_c (casin, 0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 5.757683115456107044131264955348448400014e-4933L, 8.813735870195430252326093249797924452120e-1L, UNDERFLOW_EXCEPTION),
3509 TEST_c_c (casin, 0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 5.757683115456107044131264955348448400014e-4933L, -8.813735870195430252326093249797924452120e-1L, UNDERFLOW_EXCEPTION),
3510 TEST_c_c (casin, -0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, -5.757683115456107044131264955348448400014e-4933L, 8.813735870195430252326093249797924452120e-1L, UNDERFLOW_EXCEPTION),
3511 TEST_c_c (casin, -0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, -5.757683115456107044131264955348448400014e-4933L, -8.813735870195430252326093249797924452120e-1L, UNDERFLOW_EXCEPTION),
3512 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 1.962615573354718824241727964954454332780e-17L),
3513 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, -1.570796326794896619231321691639751442099L, 1.962615573354718824241727964954454332780e-17L),
3514 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -1.962615573354718824241727964954454332780e-17L),
3515 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, -1.570796326794896619231321691639751442099L, -1.962615573354718824241727964954454332780e-17L),
3516 TEST_c_c (casin, 0.0L, 0x1.0000000000000000000000000001p0L, 0.0L, 8.813735870195430252326093249797924452120e-1L),
3517 TEST_c_c (casin, 0.0L, -0x1.0000000000000000000000000001p0L, 0.0L, -8.813735870195430252326093249797924452120e-1L),
3518 TEST_c_c (casin, -0.0L, 0x1.0000000000000000000000000001p0L, -0.0L, 8.813735870195430252326093249797924452120e-1L),
3519 TEST_c_c (casin, -0.0L, -0x1.0000000000000000000000000001p0L, -0.0L, -8.813735870195430252326093249797924452120e-1L),
3520 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, 0.0L, 1.570796326794896619231321691639751442099L, 1.962615573354718824241727964954454332780e-17L),
3521 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, 0.0L, -1.570796326794896619231321691639751442099L, 1.962615573354718824241727964954454332780e-17L),
3522 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, -0.0L, 1.570796326794896619231321691639751442099L, -1.962615573354718824241727964954454332780e-17L),
3523 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, -0.0L, -1.570796326794896619231321691639751442099L, -1.962615573354718824241727964954454332780e-17L),
3524 #endif
3525
3526 TEST_c_c (casin, 0x1p-23L, 0x0.ffffffp0L, 8.429369953393598499000760938112968755257e-8L, 8.813735448726963984495965873956465777250e-1L),
3527 TEST_c_c (casin, 0x1p-23L, -0x0.ffffffp0L, 8.429369953393598499000760938112968755257e-8L, -8.813735448726963984495965873956465777250e-1L),
3528 TEST_c_c (casin, -0x1p-23L, 0x0.ffffffp0L, -8.429369953393598499000760938112968755257e-8L, 8.813735448726963984495965873956465777250e-1L),
3529 TEST_c_c (casin, -0x1p-23L, -0x0.ffffffp0L, -8.429369953393598499000760938112968755257e-8L, -8.813735448726963984495965873956465777250e-1L),
3530 TEST_c_c (casin, 0x0.ffffffp0L, 0x1p-23L, 1.570357140408705570520377172865353621698L, 2.714321200917194650737217746780928423385e-4L),
3531 TEST_c_c (casin, -0x0.ffffffp0L, 0x1p-23L, -1.570357140408705570520377172865353621698L, 2.714321200917194650737217746780928423385e-4L),
3532 TEST_c_c (casin, 0x0.ffffffp0L, -0x1p-23L, 1.570357140408705570520377172865353621698L, -2.714321200917194650737217746780928423385e-4L),
3533 TEST_c_c (casin, -0x0.ffffffp0L, -0x1p-23L, -1.570357140408705570520377172865353621698L, -2.714321200917194650737217746780928423385e-4L),
3534 TEST_c_c (casin, 0x1.fp-129L, 0x0.ffffffp0L, 2.013062624689288675911339929224634593425e-39L, 8.813735448726938863015878255140556727969e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3535 TEST_c_c (casin, 0x1.fp-129L, -0x0.ffffffp0L, 2.013062624689288675911339929224634593425e-39L, -8.813735448726938863015878255140556727969e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3536 TEST_c_c (casin, -0x1.fp-129L, 0x0.ffffffp0L, -2.013062624689288675911339929224634593425e-39L, 8.813735448726938863015878255140556727969e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3537 TEST_c_c (casin, -0x1.fp-129L, -0x0.ffffffp0L, -2.013062624689288675911339929224634593425e-39L, -8.813735448726938863015878255140556727969e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3538 TEST_c_c (casin, 0x0.ffffffp0L, 0x1.fp-129L, 1.570451059810180415643718442157112705601L, 8.245504387859737323891843603996428534945e-36L),
3539 TEST_c_c (casin, -0x0.ffffffp0L, 0x1.fp-129L, -1.570451059810180415643718442157112705601L, 8.245504387859737323891843603996428534945e-36L),
3540 TEST_c_c (casin, 0x0.ffffffp0L, -0x1.fp-129L, 1.570451059810180415643718442157112705601L, -8.245504387859737323891843603996428534945e-36L),
3541 TEST_c_c (casin, -0x0.ffffffp0L, -0x1.fp-129L, -1.570451059810180415643718442157112705601L, -8.245504387859737323891843603996428534945e-36L),
3542 TEST_c_c (casin, 0.0L, 0x0.ffffffp0L, 0.0L, 8.813735448726938863015878255140556727969e-1L),
3543 TEST_c_c (casin, 0.0L, -0x0.ffffffp0L, 0.0L, -8.813735448726938863015878255140556727969e-1L),
3544 TEST_c_c (casin, -0.0L, 0x0.ffffffp0L, -0.0L, 8.813735448726938863015878255140556727969e-1L),
3545 TEST_c_c (casin, -0.0L, -0x0.ffffffp0L, -0.0L, -8.813735448726938863015878255140556727969e-1L),
3546 TEST_c_c (casin, 0x0.ffffffp0L, 0.0L, 1.570451059810180415643718442157112705601L, 0.0L),
3547 TEST_c_c (casin, -0x0.ffffffp0L, 0.0L, -1.570451059810180415643718442157112705601L, 0.0L),
3548 TEST_c_c (casin, 0x0.ffffffp0L, -0.0L, 1.570451059810180415643718442157112705601L, -0.0L),
3549 TEST_c_c (casin, -0x0.ffffffp0L, -0.0L, -1.570451059810180415643718442157112705601L, -0.0L),
3550 TEST_c_c (casin, 0x1p-23L, 0.5L, 1.066240299940009780479664302917201696886e-7L, 4.812118250596059896127318386463676808798e-1L),
3551 TEST_c_c (casin, 0x1p-23L, -0.5L, 1.066240299940009780479664302917201696886e-7L, -4.812118250596059896127318386463676808798e-1L),
3552 TEST_c_c (casin, -0x1p-23L, 0.5L, -1.066240299940009780479664302917201696886e-7L, 4.812118250596059896127318386463676808798e-1L),
3553 TEST_c_c (casin, -0x1p-23L, -0.5L, -1.066240299940009780479664302917201696886e-7L, -4.812118250596059896127318386463676808798e-1L),
3554 TEST_c_c (casin, 0.5L, 0x1p-23L, 5.235987755982934033165770729745469098254e-1L, 1.376510308240943236356088341381173571841e-7L),
3555 TEST_c_c (casin, -0.5L, 0x1p-23L, -5.235987755982934033165770729745469098254e-1L, 1.376510308240943236356088341381173571841e-7L),
3556 TEST_c_c (casin, 0.5L, -0x1p-23L, 5.235987755982934033165770729745469098254e-1L, -1.376510308240943236356088341381173571841e-7L),
3557 TEST_c_c (casin, -0.5L, -0x1p-23L, -5.235987755982934033165770729745469098254e-1L, -1.376510308240943236356088341381173571841e-7L),
3558 TEST_c_c (casin, 0x1.fp-129L, 0.5L, 2.546345110742945032959687790021055102355e-39L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3559 TEST_c_c (casin, 0x1.fp-129L, -0.5L, 2.546345110742945032959687790021055102355e-39L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3560 TEST_c_c (casin, -0x1.fp-129L, 0.5L, -2.546345110742945032959687790021055102355e-39L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3561 TEST_c_c (casin, -0x1.fp-129L, -0.5L, -2.546345110742945032959687790021055102355e-39L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3562 TEST_c_c (casin, 0.5L, 0x1.fp-129L, 5.235987755982988730771072305465838140329e-1L, 3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3563 TEST_c_c (casin, -0.5L, 0x1.fp-129L, -5.235987755982988730771072305465838140329e-1L, 3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3564 TEST_c_c (casin, 0.5L, -0x1.fp-129L, 5.235987755982988730771072305465838140329e-1L, -3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3565 TEST_c_c (casin, -0.5L, -0x1.fp-129L, -5.235987755982988730771072305465838140329e-1L, -3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3566 TEST_c_c (casin, 0x1p-23L, 0x1p-23L, 1.192092895507806853113684971258850504935e-7L, 1.192092895507818146886315028596704749235e-7L),
3567 TEST_c_c (casin, 0x1p-23L, -0x1p-23L, 1.192092895507806853113684971258850504935e-7L, -1.192092895507818146886315028596704749235e-7L),
3568 TEST_c_c (casin, -0x1p-23L, 0x1p-23L, -1.192092895507806853113684971258850504935e-7L, 1.192092895507818146886315028596704749235e-7L),
3569 TEST_c_c (casin, -0x1p-23L, -0x1p-23L, -1.192092895507806853113684971258850504935e-7L, -1.192092895507818146886315028596704749235e-7L),
3570 /* Bug 15319: underflow exception may be missing. */
3571 TEST_c_c (casin, 0x1.fp-129L, 0x1p-23L, 2.846900380897707329917933005874691056564e-39L, 1.192092895507809676556842485683592032154e-7L, UNDERFLOW_EXCEPTION_OK_FLOAT),
3572 TEST_c_c (casin, 0x1.fp-129L, -0x1p-23L, 2.846900380897707329917933005874691056564e-39L, -1.192092895507809676556842485683592032154e-7L, UNDERFLOW_EXCEPTION_OK_FLOAT),
3573 TEST_c_c (casin, -0x1.fp-129L, 0x1p-23L, -2.846900380897707329917933005874691056564e-39L, 1.192092895507809676556842485683592032154e-7L, UNDERFLOW_EXCEPTION_OK_FLOAT),
3574 TEST_c_c (casin, -0x1.fp-129L, -0x1p-23L, -2.846900380897707329917933005874691056564e-39L, -1.192092895507809676556842485683592032154e-7L, UNDERFLOW_EXCEPTION_OK_FLOAT),
3575 TEST_c_c (casin, 0x1p-23L, 0x1.fp-129L, 1.192092895507815323443157514352519154304e-7L, 2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3576 TEST_c_c (casin, -0x1p-23L, 0x1.fp-129L, -1.192092895507815323443157514352519154304e-7L, 2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3577 TEST_c_c (casin, 0x1p-23L, -0x1.fp-129L, 1.192092895507815323443157514352519154304e-7L, -2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3578 TEST_c_c (casin, -0x1p-23L, -0x1.fp-129L, -1.192092895507815323443157514352519154304e-7L, -2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3579 TEST_c_c (casin, 0.0L, 0x1p-23L, 0.0L, 1.192092895507809676556842485683592032154e-7L),
3580 TEST_c_c (casin, 0.0L, -0x1p-23L, 0.0L, -1.192092895507809676556842485683592032154e-7L),
3581 TEST_c_c (casin, -0.0L, 0x1p-23L, -0.0L, 1.192092895507809676556842485683592032154e-7L),
3582 TEST_c_c (casin, -0.0L, -0x1p-23L, -0.0L, -1.192092895507809676556842485683592032154e-7L),
3583 TEST_c_c (casin, 0x1p-23L, 0.0L, 1.192092895507815323443157514352519154304e-7L, 0.0L),
3584 TEST_c_c (casin, -0x1p-23L, 0.0L, -1.192092895507815323443157514352519154304e-7L, 0.0L),
3585 TEST_c_c (casin, 0x1p-23L, -0.0L, 1.192092895507815323443157514352519154304e-7L, -0.0L),
3586 TEST_c_c (casin, -0x1p-23L, -0.0L, -1.192092895507815323443157514352519154304e-7L, -0.0L),
3587 TEST_c_c (casin, 0x1.fp-129L, 0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3588 TEST_c_c (casin, 0x1.fp-129L, -0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3589 TEST_c_c (casin, -0x1.fp-129L, 0x1.fp-129L, -2.846900380897727558361783801085126250967e-39L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3590 TEST_c_c (casin, -0x1.fp-129L, -0x1.fp-129L, -2.846900380897727558361783801085126250967e-39L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3591 #ifndef TEST_FLOAT
3592 TEST_c_c (casin, 0x1p-52L, 0x0.fffffffffffff8p0L, 1.570092458683775146551022293016031474627e-16L, 8.813735870195429467279863907910458761820e-1L),
3593 TEST_c_c (casin, 0x1p-52L, -0x0.fffffffffffff8p0L, 1.570092458683775146551022293016031474627e-16L, -8.813735870195429467279863907910458761820e-1L),
3594 TEST_c_c (casin, -0x1p-52L, 0x0.fffffffffffff8p0L, -1.570092458683775146551022293016031474627e-16L, 8.813735870195429467279863907910458761820e-1L),
3595 TEST_c_c (casin, -0x1p-52L, -0x0.fffffffffffff8p0L, -1.570092458683775146551022293016031474627e-16L, -8.813735870195429467279863907910458761820e-1L),
3596 TEST_c_c (casin, 0x0.fffffffffffff8p0L, 0x1p-52L, 1.570796307840326780080580569360500172043L, 1.171456840272878582596796205397918831268e-8L),
3597 TEST_c_c (casin, -0x0.fffffffffffff8p0L, 0x1p-52L, -1.570796307840326780080580569360500172043L, 1.171456840272878582596796205397918831268e-8L),
3598 TEST_c_c (casin, 0x0.fffffffffffff8p0L, -0x1p-52L, 1.570796307840326780080580569360500172043L, -1.171456840272878582596796205397918831268e-8L),
3599 TEST_c_c (casin, -0x0.fffffffffffff8p0L, -0x1p-52L, -1.570796307840326780080580569360500172043L, -1.171456840272878582596796205397918831268e-8L),
3600 TEST_c_c (casin, 0x1.fp-1025L, 0x0.fffffffffffff8p0L, 3.810492908885321954658152505985270452320e-309L, 8.813735870195429467279863907910371604180e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3601 TEST_c_c (casin, 0x1.fp-1025L, -0x0.fffffffffffff8p0L, 3.810492908885321954658152505985270452320e-309L, -8.813735870195429467279863907910371604180e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3602 TEST_c_c (casin, -0x1.fp-1025L, 0x0.fffffffffffff8p0L, -3.810492908885321954658152505985270452320e-309L, 8.813735870195429467279863907910371604180e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3603 TEST_c_c (casin, -0x1.fp-1025L, -0x0.fffffffffffff8p0L, -3.810492908885321954658152505985270452320e-309L, -8.813735870195429467279863907910371604180e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3604 TEST_c_c (casin, 0x0.fffffffffffff8p0L, 0x1.fp-1025L, 1.570796311893735425383665303776316016594L, 3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3605 TEST_c_c (casin, -0x0.fffffffffffff8p0L, 0x1.fp-1025L, -1.570796311893735425383665303776316016594L, 3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3606 TEST_c_c (casin, 0x0.fffffffffffff8p0L, -0x1.fp-1025L, 1.570796311893735425383665303776316016594L, -3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3607 TEST_c_c (casin, -0x0.fffffffffffff8p0L, -0x1.fp-1025L, -1.570796311893735425383665303776316016594L, -3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3608 TEST_c_c (casin, 0.0L, 0x0.fffffffffffff8p0L, 0.0L, 8.813735870195429467279863907910371604180e-1L),
3609 TEST_c_c (casin, 0.0L, -0x0.fffffffffffff8p0L, 0.0L, -8.813735870195429467279863907910371604180e-1L),
3610 TEST_c_c (casin, -0.0L, 0x0.fffffffffffff8p0L, -0.0L, 8.813735870195429467279863907910371604180e-1L),
3611 TEST_c_c (casin, -0.0L, -0x0.fffffffffffff8p0L, -0.0L, -8.813735870195429467279863907910371604180e-1L),
3612 TEST_c_c (casin, 0x0.fffffffffffff8p0L, 0.0L, 1.570796311893735425383665303776316016594L, 0.0L),
3613 TEST_c_c (casin, -0x0.fffffffffffff8p0L, 0.0L, -1.570796311893735425383665303776316016594L, 0.0L),
3614 TEST_c_c (casin, 0x0.fffffffffffff8p0L, -0.0L, 1.570796311893735425383665303776316016594L, -0.0L),
3615 TEST_c_c (casin, -0x0.fffffffffffff8p0L, -0.0L, -1.570796311893735425383665303776316016594L, -0.0L),
3616 #endif
3617 TEST_c_c (casin, 0x1p-52L, 0.5L, 1.986027322597818397661816253158024383707e-16L, 4.812118250596034474977589134243772428682e-1L),
3618 TEST_c_c (casin, 0x1p-52L, -0.5L, 1.986027322597818397661816253158024383707e-16L, -4.812118250596034474977589134243772428682e-1L),
3619 TEST_c_c (casin, -0x1p-52L, 0.5L, -1.986027322597818397661816253158024383707e-16L, 4.812118250596034474977589134243772428682e-1L),
3620 TEST_c_c (casin, -0x1p-52L, -0.5L, -1.986027322597818397661816253158024383707e-16L, -4.812118250596034474977589134243772428682e-1L),
3621 TEST_c_c (casin, 0.5L, 0x1p-52L, 5.235987755982988730771072305465648369889e-1L, 2.563950248511418570403591756798643804971e-16L),
3622 TEST_c_c (casin, -0.5L, 0x1p-52L, -5.235987755982988730771072305465648369889e-1L, 2.563950248511418570403591756798643804971e-16L),
3623 TEST_c_c (casin, 0.5L, -0x1p-52L, 5.235987755982988730771072305465648369889e-1L, -2.563950248511418570403591756798643804971e-16L),
3624 TEST_c_c (casin, -0.5L, -0x1p-52L, -5.235987755982988730771072305465648369889e-1L, -2.563950248511418570403591756798643804971e-16L),
3625 #ifndef TEST_FLOAT
3626 TEST_c_c (casin, 0x1.fp-1025L, 0.5L, 4.819934639999230680322935210539402497827e-309L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3627 TEST_c_c (casin, 0x1.fp-1025L, -0.5L, 4.819934639999230680322935210539402497827e-309L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3628 TEST_c_c (casin, -0x1.fp-1025L, 0.5L, -4.819934639999230680322935210539402497827e-309L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3629 TEST_c_c (casin, -0x1.fp-1025L, -0.5L, -4.819934639999230680322935210539402497827e-309L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3630 TEST_c_c (casin, 0.5L, 0x1.fp-1025L, 5.235987755982988730771072305465838140329e-1L, 6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3631 TEST_c_c (casin, -0.5L, 0x1.fp-1025L, -5.235987755982988730771072305465838140329e-1L, 6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3632 TEST_c_c (casin, 0.5L, -0x1.fp-1025L, 5.235987755982988730771072305465838140329e-1L, -6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3633 TEST_c_c (casin, -0.5L, -0x1.fp-1025L, -5.235987755982988730771072305465838140329e-1L, -6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3634 #endif
3635 TEST_c_c (casin, 0x1p-52L, 0x1p-52L, 2.220446049250313080847263336181604132852e-16L, 2.220446049250313080847263336181677117148e-16L),
3636 TEST_c_c (casin, 0x1p-52L, -0x1p-52L, 2.220446049250313080847263336181604132852e-16L, -2.220446049250313080847263336181677117148e-16L),
3637 TEST_c_c (casin, -0x1p-52L, 0x1p-52L, -2.220446049250313080847263336181604132852e-16L, 2.220446049250313080847263336181677117148e-16L),
3638 TEST_c_c (casin, -0x1p-52L, -0x1p-52L, -2.220446049250313080847263336181604132852e-16L, -2.220446049250313080847263336181677117148e-16L),
3639 #ifndef TEST_FLOAT
3640 /* Bug 15319: underflow exception may be missing. */
3641 TEST_c_c (casin, 0x1.fp-1025L, 0x1p-52L, 5.388850751072128349671657362289283247603e-309L, 2.220446049250313080847263336181622378926e-16L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3642 TEST_c_c (casin, 0x1.fp-1025L, -0x1p-52L, 5.388850751072128349671657362289283247603e-309L, -2.220446049250313080847263336181622378926e-16L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3643 TEST_c_c (casin, -0x1.fp-1025L, 0x1p-52L, -5.388850751072128349671657362289283247603e-309L, 2.220446049250313080847263336181622378926e-16L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3644 TEST_c_c (casin, -0x1.fp-1025L, -0x1p-52L, -5.388850751072128349671657362289283247603e-309L, -2.220446049250313080847263336181622378926e-16L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3645 TEST_c_c (casin, 0x1p-52L, 0x1.fp-1025L, 2.220446049250313080847263336181658871074e-16L, 5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3646 TEST_c_c (casin, -0x1p-52L, 0x1.fp-1025L, -2.220446049250313080847263336181658871074e-16L, 5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3647 TEST_c_c (casin, 0x1p-52L, -0x1.fp-1025L, 2.220446049250313080847263336181658871074e-16L, -5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3648 TEST_c_c (casin, -0x1p-52L, -0x1.fp-1025L, -2.220446049250313080847263336181658871074e-16L, -5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3649 #endif
3650 TEST_c_c (casin, 0.0L, 0x1p-52L, 0.0L, 2.220446049250313080847263336181622378926e-16L),
3651 TEST_c_c (casin, 0.0L, -0x1p-52L, 0.0L, -2.220446049250313080847263336181622378926e-16L),
3652 TEST_c_c (casin, -0.0L, 0x1p-52L, -0.0L, 2.220446049250313080847263336181622378926e-16L),
3653 TEST_c_c (casin, -0.0L, -0x1p-52L, -0.0L, -2.220446049250313080847263336181622378926e-16L),
3654 TEST_c_c (casin, 0x1p-52L, 0.0L, 2.220446049250313080847263336181658871074e-16L, 0.0L),
3655 TEST_c_c (casin, -0x1p-52L, 0.0L, -2.220446049250313080847263336181658871074e-16L, 0.0L),
3656 TEST_c_c (casin, 0x1p-52L, -0.0L, 2.220446049250313080847263336181658871074e-16L, -0.0L),
3657 TEST_c_c (casin, -0x1p-52L, -0.0L, -2.220446049250313080847263336181658871074e-16L, -0.0L),
3658 #ifndef TEST_FLOAT
3659 TEST_c_c (casin, 0x1.fp-1025L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3660 TEST_c_c (casin, 0x1.fp-1025L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3661 TEST_c_c (casin, -0x1.fp-1025L, 0x1.fp-1025L, -5.388850751072128349671657362289416093031e-309L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3662 TEST_c_c (casin, -0x1.fp-1025L, -0x1.fp-1025L, -5.388850751072128349671657362289416093031e-309L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3663 #endif
3664 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
3665 TEST_c_c (casin, 0x1p-63L, 0x0.ffffffffffffffffp0L, 7.666467083416870407402049869781566856442e-20L, 8.813735870195430251942769895627079569937e-1L),
3666 TEST_c_c (casin, 0x1p-63L, -0x0.ffffffffffffffffp0L, 7.666467083416870407402049869781566856442e-20L, -8.813735870195430251942769895627079569937e-1L),
3667 TEST_c_c (casin, -0x1p-63L, 0x0.ffffffffffffffffp0L, -7.666467083416870407402049869781566856442e-20L, 8.813735870195430251942769895627079569937e-1L),
3668 TEST_c_c (casin, -0x1p-63L, -0x0.ffffffffffffffffp0L, -7.666467083416870407402049869781566856442e-20L, -8.813735870195430251942769895627079569937e-1L),
3669 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, 0x1p-63L, 1.570796326376055842114524927965556247908L, 2.588578361325995866221775673638805081337e-10L),
3670 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, 0x1p-63L, -1.570796326376055842114524927965556247908L, 2.588578361325995866221775673638805081337e-10L),
3671 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, -0x1p-63L, 1.570796326376055842114524927965556247908L, -2.588578361325995866221775673638805081337e-10L),
3672 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, -0x1p-63L, -1.570796326376055842114524927965556247908L, -2.588578361325995866221775673638805081337e-10L),
3673 # if LDBL_MIN_EXP <= -16381
3674 TEST_c_c (casin, 0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 5.757683115456107044287327268904964422212e-4933L, 8.813735870195430251942769895627079569917e-1L, UNDERFLOW_EXCEPTION),
3675 TEST_c_c (casin, 0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 5.757683115456107044287327268904964422212e-4933L, -8.813735870195430251942769895627079569917e-1L, UNDERFLOW_EXCEPTION),
3676 TEST_c_c (casin, -0x1.fp-16385L, 0x0.ffffffffffffffffp0L, -5.757683115456107044287327268904964422212e-4933L, 8.813735870195430251942769895627079569917e-1L, UNDERFLOW_EXCEPTION),
3677 TEST_c_c (casin, -0x1.fp-16385L, -0x0.ffffffffffffffffp0L, -5.757683115456107044287327268904964422212e-4933L, -8.813735870195430251942769895627079569917e-1L, UNDERFLOW_EXCEPTION),
3678 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 1.570796326465624365239962068302568888898L, 2.472906068161537187835415298076415423459e-4923L),
3679 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, 0x1.fp-16385L, -1.570796326465624365239962068302568888898L, 2.472906068161537187835415298076415423459e-4923L),
3680 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 1.570796326465624365239962068302568888898L, -2.472906068161537187835415298076415423459e-4923L),
3681 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, -0x1.fp-16385L, -1.570796326465624365239962068302568888898L, -2.472906068161537187835415298076415423459e-4923L),
3682 # endif
3683 TEST_c_c (casin, 0.0L, 0x0.ffffffffffffffffp0L, 0.0L, 8.813735870195430251942769895627079569917e-1L),
3684 TEST_c_c (casin, 0.0L, -0x0.ffffffffffffffffp0L, 0.0L, -8.813735870195430251942769895627079569917e-1L),
3685 TEST_c_c (casin, -0.0L, 0x0.ffffffffffffffffp0L, -0.0L, 8.813735870195430251942769895627079569917e-1L),
3686 TEST_c_c (casin, -0.0L, -0x0.ffffffffffffffffp0L, -0.0L, -8.813735870195430251942769895627079569917e-1L),
3687 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, 0.0L, 1.570796326465624365239962068302568888898L, 0.0L),
3688 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, 0.0L, -1.570796326465624365239962068302568888898L, 0.0L),
3689 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, -0.0L, 1.570796326465624365239962068302568888898L, -0.0L),
3690 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, -0.0L, -1.570796326465624365239962068302568888898L, -0.0L),
3691 #endif
3692 TEST_c_c (casin, 0x1p-63L, 0.5L, 9.697399036122160144833087173623140436413e-20L, 4.812118250596034474977589134243684231373e-1L),
3693 TEST_c_c (casin, 0x1p-63L, -0.5L, 9.697399036122160144833087173623140436413e-20L, -4.812118250596034474977589134243684231373e-1L),
3694 TEST_c_c (casin, -0x1p-63L, 0.5L, -9.697399036122160144833087173623140436413e-20L, 4.812118250596034474977589134243684231373e-1L),
3695 TEST_c_c (casin, -0x1p-63L, -0.5L, -9.697399036122160144833087173623140436413e-20L, -4.812118250596034474977589134243684231373e-1L),
3696 TEST_c_c (casin, 0.5L, 0x1p-63L, 5.235987755982988730771072305465838140283e-1L, 1.251928832280966098829878787499365228659e-19L),
3697 TEST_c_c (casin, -0.5L, 0x1p-63L, -5.235987755982988730771072305465838140283e-1L, 1.251928832280966098829878787499365228659e-19L),
3698 TEST_c_c (casin, 0.5L, -0x1p-63L, 5.235987755982988730771072305465838140283e-1L, -1.251928832280966098829878787499365228659e-19L),
3699 TEST_c_c (casin, -0.5L, -0x1p-63L, -5.235987755982988730771072305465838140283e-1L, -1.251928832280966098829878787499365228659e-19L),
3700 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
3701 TEST_c_c (casin, 0x1.fp-16385L, 0.5L, 7.282957076134209141226696333885150260319e-4933L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION),
3702 TEST_c_c (casin, 0x1.fp-16385L, -0.5L, 7.282957076134209141226696333885150260319e-4933L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION),
3703 TEST_c_c (casin, -0x1.fp-16385L, 0.5L, -7.282957076134209141226696333885150260319e-4933L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION),
3704 TEST_c_c (casin, -0x1.fp-16385L, -0.5L, -7.282957076134209141226696333885150260319e-4933L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION),
3705 TEST_c_c (casin, 0.5L, 0x1.fp-16385L, 5.235987755982988730771072305465838140329e-1L, 9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
3706 TEST_c_c (casin, -0.5L, 0x1.fp-16385L, -5.235987755982988730771072305465838140329e-1L, 9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
3707 TEST_c_c (casin, 0.5L, -0x1.fp-16385L, 5.235987755982988730771072305465838140329e-1L, -9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
3708 TEST_c_c (casin, -0.5L, -0x1.fp-16385L, -5.235987755982988730771072305465838140329e-1L, -9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
3709 #endif
3710 TEST_c_c (casin, 0x1p-63L, 0x1p-63L, 1.084202172485504434007452800869941711422e-19L, 1.084202172485504434007452800869941711430e-19L),
3711 TEST_c_c (casin, 0x1p-63L, -0x1p-63L, 1.084202172485504434007452800869941711422e-19L, -1.084202172485504434007452800869941711430e-19L),
3712 TEST_c_c (casin, -0x1p-63L, 0x1p-63L, -1.084202172485504434007452800869941711422e-19L, 1.084202172485504434007452800869941711430e-19L),
3713 TEST_c_c (casin, -0x1p-63L, -0x1p-63L, -1.084202172485504434007452800869941711422e-19L, -1.084202172485504434007452800869941711430e-19L),
3714 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
3715 TEST_c_c (casin, 0x1.fp-16385L, 0x1p-63L, 8.142593549724601460479922838826119584369e-4933L, 1.084202172485504434007452800869941711424e-19L, UNDERFLOW_EXCEPTION),
3716 TEST_c_c (casin, 0x1.fp-16385L, -0x1p-63L, 8.142593549724601460479922838826119584369e-4933L, -1.084202172485504434007452800869941711424e-19L, UNDERFLOW_EXCEPTION),
3717 TEST_c_c (casin, -0x1.fp-16385L, 0x1p-63L, -8.142593549724601460479922838826119584369e-4933L, 1.084202172485504434007452800869941711424e-19L, UNDERFLOW_EXCEPTION),
3718 TEST_c_c (casin, -0x1.fp-16385L, -0x1p-63L, -8.142593549724601460479922838826119584369e-4933L, -1.084202172485504434007452800869941711424e-19L, UNDERFLOW_EXCEPTION),
3719 TEST_c_c (casin, 0x1p-63L, 0x1.fp-16385L, 1.084202172485504434007452800869941711428e-19L, 8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
3720 TEST_c_c (casin, -0x1p-63L, 0x1.fp-16385L, -1.084202172485504434007452800869941711428e-19L, 8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
3721 TEST_c_c (casin, 0x1p-63L, -0x1.fp-16385L, 1.084202172485504434007452800869941711428e-19L, -8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
3722 TEST_c_c (casin, -0x1p-63L, -0x1.fp-16385L, -1.084202172485504434007452800869941711428e-19L, -8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
3723 #endif
3724 TEST_c_c (casin, 0.0L, 0x1p-63L, 0.0L, 1.084202172485504434007452800869941711424e-19L),
3725 TEST_c_c (casin, 0.0L, -0x1p-63L, 0.0L, -1.084202172485504434007452800869941711424e-19L),
3726 TEST_c_c (casin, -0.0L, 0x1p-63L, -0.0L, 1.084202172485504434007452800869941711424e-19L),
3727 TEST_c_c (casin, -0.0L, -0x1p-63L, -0.0L, -1.084202172485504434007452800869941711424e-19L),
3728 TEST_c_c (casin, 0x1p-63L, 0.0L, 1.084202172485504434007452800869941711428e-19L, 0.0L),
3729 TEST_c_c (casin, -0x1p-63L, 0.0L, -1.084202172485504434007452800869941711428e-19L, 0.0L),
3730 TEST_c_c (casin, 0x1p-63L, -0.0L, 1.084202172485504434007452800869941711428e-19L, -0.0L),
3731 TEST_c_c (casin, -0x1p-63L, -0.0L, -1.084202172485504434007452800869941711428e-19L, -0.0L),
3732 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
3733 TEST_c_c (casin, 0x1.fp-16385L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3734 TEST_c_c (casin, 0x1.fp-16385L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3735 TEST_c_c (casin, -0x1.fp-16385L, 0x1.fp-16385L, -8.142593549724601460479922838826119584417e-4933L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3736 TEST_c_c (casin, -0x1.fp-16385L, -0x1.fp-16385L, -8.142593549724601460479922838826119584417e-4933L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3737 #endif
3738 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
3739 TEST_c_c (casin, 0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 1.743152798421049375791483240187377443526e-32L, 8.813735870195430252326093249797835932642e-1L),
3740 TEST_c_c (casin, 0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 1.743152798421049375791483240187377443526e-32L, -8.813735870195430252326093249797835932642e-1L),
3741 TEST_c_c (casin, -0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, -1.743152798421049375791483240187377443526e-32L, 8.813735870195430252326093249797835932642e-1L),
3742 TEST_c_c (casin, -0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, -1.743152798421049375791483240187377443526e-32L, -8.813735870195430252326093249797835932642e-1L),
3743 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 1.570796326794896419512475791677915736035L, 1.234330349600789959989661887846005659983e-16L),
3744 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, -1.570796326794896419512475791677915736035L, 1.234330349600789959989661887846005659983e-16L),
3745 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 1.570796326794896419512475791677915736035L, -1.234330349600789959989661887846005659983e-16L),
3746 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, -1.570796326794896419512475791677915736035L, -1.234330349600789959989661887846005659983e-16L),
3747 TEST_c_c (casin, 0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 3.810492908885321743133304375216641110205e-309L, 8.813735870195430252326093249797835932642e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3748 TEST_c_c (casin, 0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 3.810492908885321743133304375216641110205e-309L, -8.813735870195430252326093249797835932642e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3749 TEST_c_c (casin, -0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, -3.810492908885321743133304375216641110205e-309L, 8.813735870195430252326093249797835932642e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3750 TEST_c_c (casin, -0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, -3.810492908885321743133304375216641110205e-309L, -8.813735870195430252326093249797835932642e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3751 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 1.570796326794896462222075823262245502760L, 3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3752 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, -1.570796326794896462222075823262245502760L, 3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3753 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 1.570796326794896462222075823262245502760L, -3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3754 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, -1.570796326794896462222075823262245502760L, -3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3755 TEST_c_c (casin, 0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 8.813735870195430252326093249797835932642e-1L),
3756 TEST_c_c (casin, 0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, -8.813735870195430252326093249797835932642e-1L),
3757 TEST_c_c (casin, -0.0L, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 8.813735870195430252326093249797835932642e-1L),
3758 TEST_c_c (casin, -0.0L, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, -8.813735870195430252326093249797835932642e-1L),
3759 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 1.570796326794896462222075823262245502760L, 0.0L),
3760 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, -1.570796326794896462222075823262245502760L, 0.0L),
3761 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 1.570796326794896462222075823262245502760L, -0.0L),
3762 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, -1.570796326794896462222075823262245502760L, -0.0L),
3763 #endif
3764 TEST_c_c (casin, 0x1p-105L, 0.5L, 2.204933261082751447436996198490110245167e-32L, 4.812118250596034474977589134243684231352e-1L),
3765 TEST_c_c (casin, 0x1p-105L, -0.5L, 2.204933261082751447436996198490110245167e-32L, -4.812118250596034474977589134243684231352e-1L),
3766 TEST_c_c (casin, -0x1p-105L, 0.5L, -2.204933261082751447436996198490110245167e-32L, 4.812118250596034474977589134243684231352e-1L),
3767 TEST_c_c (casin, -0x1p-105L, -0.5L, -2.204933261082751447436996198490110245167e-32L, -4.812118250596034474977589134243684231352e-1L),
3768 TEST_c_c (casin, 0.5L, 0x1p-105L, 5.235987755982988730771072305465838140329e-1L, 2.846556599890768890940941645338546615370e-32L),
3769 TEST_c_c (casin, -0.5L, 0x1p-105L, -5.235987755982988730771072305465838140329e-1L, 2.846556599890768890940941645338546615370e-32L),
3770 TEST_c_c (casin, 0.5L, -0x1p-105L, 5.235987755982988730771072305465838140329e-1L, -2.846556599890768890940941645338546615370e-32L),
3771 TEST_c_c (casin, -0.5L, -0x1p-105L, -5.235987755982988730771072305465838140329e-1L, -2.846556599890768890940941645338546615370e-32L),
3772 TEST_c_c (casin, 0x1p-105L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 2.465190328815661891911651766508706967729e-32L),
3773 TEST_c_c (casin, 0x1p-105L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -2.465190328815661891911651766508706967729e-32L),
3774 TEST_c_c (casin, -0x1p-105L, 0x1p-105L, -2.465190328815661891911651766508706967729e-32L, 2.465190328815661891911651766508706967729e-32L),
3775 TEST_c_c (casin, -0x1p-105L, -0x1p-105L, -2.465190328815661891911651766508706967729e-32L, -2.465190328815661891911651766508706967729e-32L),
3776 #ifndef TEST_FLOAT
3777 /* Bug 15319: underflow exception may be missing. */
3778 TEST_c_c (casin, 0x1.fp-1025L, 0x1p-105L, 5.388850751072128349671657362289416093031e-309L, 2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3779 TEST_c_c (casin, 0x1.fp-1025L, -0x1p-105L, 5.388850751072128349671657362289416093031e-309L, -2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3780 TEST_c_c (casin, -0x1.fp-1025L, 0x1p-105L, -5.388850751072128349671657362289416093031e-309L, 2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3781 TEST_c_c (casin, -0x1.fp-1025L, -0x1p-105L, -5.388850751072128349671657362289416093031e-309L, -2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3782 TEST_c_c (casin, 0x1p-105L, 0x1.fp-1025L, 2.465190328815661891911651766508706967729e-32L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3783 TEST_c_c (casin, -0x1p-105L, 0x1.fp-1025L, -2.465190328815661891911651766508706967729e-32L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3784 TEST_c_c (casin, 0x1p-105L, -0x1.fp-1025L, 2.465190328815661891911651766508706967729e-32L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3785 TEST_c_c (casin, -0x1p-105L, -0x1.fp-1025L, -2.465190328815661891911651766508706967729e-32L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3786 #endif
3787 TEST_c_c (casin, 0.0L, 0x1p-105L, 0.0L, 2.465190328815661891911651766508706967729e-32L),
3788 TEST_c_c (casin, 0.0L, -0x1p-105L, 0.0L, -2.465190328815661891911651766508706967729e-32L),
3789 TEST_c_c (casin, -0.0L, 0x1p-105L, -0.0L, 2.465190328815661891911651766508706967729e-32L),
3790 TEST_c_c (casin, -0.0L, -0x1p-105L, -0.0L, -2.465190328815661891911651766508706967729e-32L),
3791 TEST_c_c (casin, 0x1p-105L, 0.0L, 2.465190328815661891911651766508706967729e-32L, 0.0L),
3792 TEST_c_c (casin, -0x1p-105L, 0.0L, -2.465190328815661891911651766508706967729e-32L, 0.0L),
3793 TEST_c_c (casin, 0x1p-105L, -0.0L, 2.465190328815661891911651766508706967729e-32L, -0.0L),
3794 TEST_c_c (casin, -0x1p-105L, -0.0L, -2.465190328815661891911651766508706967729e-32L, -0.0L),
3795 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
3796 TEST_c_c (casin, 0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.361838123766444824837096281396380300349e-34L, 8.813735870195430252326093249797922409363e-1L),
3797 TEST_c_c (casin, 0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.361838123766444824837096281396380300349e-34L, -8.813735870195430252326093249797922409363e-1L),
3798 TEST_c_c (casin, -0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, -1.361838123766444824837096281396380300349e-34L, 8.813735870195430252326093249797922409363e-1L),
3799 TEST_c_c (casin, -0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, -1.361838123766444824837096281396380300349e-34L, -8.813735870195430252326093249797922409363e-1L),
3800 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 1.570796326794896601578502908312986698624L, 1.091004200533850618345330909857103457781e-17L),
3801 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, -1.570796326794896601578502908312986698624L, 1.091004200533850618345330909857103457781e-17L),
3802 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 1.570796326794896601578502908312986698624L, -1.091004200533850618345330909857103457781e-17L),
3803 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, -1.570796326794896601578502908312986698624L, -1.091004200533850618345330909857103457781e-17L),
3804 TEST_c_c (casin, 0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 5.757683115456107044131264955348449231681e-4933L, 8.813735870195430252326093249797922409363e-1L, UNDERFLOW_EXCEPTION),
3805 TEST_c_c (casin, 0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 5.757683115456107044131264955348449231681e-4933L, -8.813735870195430252326093249797922409363e-1L, UNDERFLOW_EXCEPTION),
3806 TEST_c_c (casin, -0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, -5.757683115456107044131264955348449231681e-4933L, 8.813735870195430252326093249797922409363e-1L, UNDERFLOW_EXCEPTION),
3807 TEST_c_c (casin, -0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, -5.757683115456107044131264955348449231681e-4933L, -8.813735870195430252326093249797922409363e-1L, UNDERFLOW_EXCEPTION),
3808 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 1.570796326794896605353533883825294686803L, 5.867357004219059108790368268900490184505e-4916L),
3809 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, -1.570796326794896605353533883825294686803L, 5.867357004219059108790368268900490184505e-4916L),
3810 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 1.570796326794896605353533883825294686803L, -5.867357004219059108790368268900490184505e-4916L),
3811 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, -1.570796326794896605353533883825294686803L, -5.867357004219059108790368268900490184505e-4916L),
3812 TEST_c_c (casin, 0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 8.813735870195430252326093249797922409363e-1L),
3813 TEST_c_c (casin, 0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, -8.813735870195430252326093249797922409363e-1L),
3814 TEST_c_c (casin, -0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 8.813735870195430252326093249797922409363e-1L),
3815 TEST_c_c (casin, -0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, -8.813735870195430252326093249797922409363e-1L),
3816 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 1.570796326794896605353533883825294686803L, 0.0L),
3817 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, -1.570796326794896605353533883825294686803L, 0.0L),
3818 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 1.570796326794896605353533883825294686803L, -0.0L),
3819 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, -1.570796326794896605353533883825294686803L, -0.0L),
3820 #endif
3821 TEST_c_c (casin, 0x1p-112L, 0.5L, 1.722604110220899568310153280070398629037e-34L, 4.812118250596034474977589134243684231352e-1L),
3822 TEST_c_c (casin, 0x1p-112L, -0.5L, 1.722604110220899568310153280070398629037e-34L, -4.812118250596034474977589134243684231352e-1L),
3823 TEST_c_c (casin, -0x1p-112L, 0.5L, -1.722604110220899568310153280070398629037e-34L, 4.812118250596034474977589134243684231352e-1L),
3824 TEST_c_c (casin, -0x1p-112L, -0.5L, -1.722604110220899568310153280070398629037e-34L, -4.812118250596034474977589134243684231352e-1L),
3825 TEST_c_c (casin, 0.5L, 0x1p-112L, 5.235987755982988730771072305465838140329e-1L, 2.223872343664663196047610660420739543258e-34L),
3826 TEST_c_c (casin, -0.5L, 0x1p-112L, -5.235987755982988730771072305465838140329e-1L, 2.223872343664663196047610660420739543258e-34L),
3827 TEST_c_c (casin, 0.5L, -0x1p-112L, 5.235987755982988730771072305465838140329e-1L, -2.223872343664663196047610660420739543258e-34L),
3828 TEST_c_c (casin, -0.5L, -0x1p-112L, -5.235987755982988730771072305465838140329e-1L, -2.223872343664663196047610660420739543258e-34L),
3829 TEST_c_c (casin, 0x1p-112L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.925929944387235853055977942584927318538e-34L),
3830 TEST_c_c (casin, 0x1p-112L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.925929944387235853055977942584927318538e-34L),
3831 TEST_c_c (casin, -0x1p-112L, 0x1p-112L, -1.925929944387235853055977942584927318538e-34L, 1.925929944387235853055977942584927318538e-34L),
3832 TEST_c_c (casin, -0x1p-112L, -0x1p-112L, -1.925929944387235853055977942584927318538e-34L, -1.925929944387235853055977942584927318538e-34L),
3833 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
3834 TEST_c_c (casin, 0x1.fp-16385L, 0x1p-112L, 8.142593549724601460479922838826119584417e-4933L, 1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
3835 TEST_c_c (casin, 0x1.fp-16385L, -0x1p-112L, 8.142593549724601460479922838826119584417e-4933L, -1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
3836 TEST_c_c (casin, -0x1.fp-16385L, 0x1p-112L, -8.142593549724601460479922838826119584417e-4933L, 1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
3837 TEST_c_c (casin, -0x1.fp-16385L, -0x1p-112L, -8.142593549724601460479922838826119584417e-4933L, -1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
3838 TEST_c_c (casin, 0x1p-112L, 0x1.fp-16385L, 1.925929944387235853055977942584927318538e-34L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3839 TEST_c_c (casin, -0x1p-112L, 0x1.fp-16385L, -1.925929944387235853055977942584927318538e-34L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3840 TEST_c_c (casin, 0x1p-112L, -0x1.fp-16385L, 1.925929944387235853055977942584927318538e-34L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3841 TEST_c_c (casin, -0x1p-112L, -0x1.fp-16385L, -1.925929944387235853055977942584927318538e-34L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3842 #endif
3843 TEST_c_c (casin, 0.0L, 0x1p-112L, 0.0L, 1.925929944387235853055977942584927318538e-34L),
3844 TEST_c_c (casin, 0.0L, -0x1p-112L, 0.0L, -1.925929944387235853055977942584927318538e-34L),
3845 TEST_c_c (casin, -0.0L, 0x1p-112L, -0.0L, 1.925929944387235853055977942584927318538e-34L),
3846 TEST_c_c (casin, -0.0L, -0x1p-112L, -0.0L, -1.925929944387235853055977942584927318538e-34L),
3847 TEST_c_c (casin, 0x1p-112L, 0.0L, 1.925929944387235853055977942584927318538e-34L, 0.0L),
3848 TEST_c_c (casin, -0x1p-112L, 0.0L, -1.925929944387235853055977942584927318538e-34L, 0.0L),
3849 TEST_c_c (casin, 0x1p-112L, -0.0L, 1.925929944387235853055977942584927318538e-34L, -0.0L),
3850 TEST_c_c (casin, -0x1p-112L, -0.0L, -1.925929944387235853055977942584927318538e-34L, -0.0L),
3851
3852 TEST_c_c (casin, 0.75L, 1.25L, 0.453276177638793913448921196101971749L, 1.13239363160530819522266333696834467L),
3853 TEST_c_c (casin, -2, -3, -0.57065278432109940071028387968566963L, -1.9833870299165354323470769028940395L),
3854 END_DATA (casin)
3855 };
3856
3857 static void
3858 casin_test (void)
3859 {
3860 errno = 0;
3861 FUNC(casin) (BUILD_COMPLEX (0.7L, 1.2L));
3862 if (errno == ENOSYS)
3863 /* Function not implemented. */
3864 return;
3865
3866 START (casin);
3867 RUN_TEST_LOOP_c_c (casin, casin_test_data, );
3868 END (casin, complex);
3869 }
3870
3871
3872 static const struct test_c_c_data casinh_test_data[] =
3873 {
3874 START_DATA (casinh),
3875 TEST_c_c (casinh, 0, 0, 0.0, 0.0),
3876 TEST_c_c (casinh, minus_zero, 0, minus_zero, 0),
3877 TEST_c_c (casinh, 0, minus_zero, 0.0, minus_zero),
3878 TEST_c_c (casinh, minus_zero, minus_zero, minus_zero, minus_zero),
3879
3880 TEST_c_c (casinh, plus_infty, plus_infty, plus_infty, M_PI_4l),
3881 TEST_c_c (casinh, plus_infty, minus_infty, plus_infty, -M_PI_4l),
3882 TEST_c_c (casinh, minus_infty, plus_infty, minus_infty, M_PI_4l),
3883 TEST_c_c (casinh, minus_infty, minus_infty, minus_infty, -M_PI_4l),
3884
3885 TEST_c_c (casinh, -10.0, plus_infty, minus_infty, M_PI_2l),
3886 TEST_c_c (casinh, -10.0, minus_infty, minus_infty, -M_PI_2l),
3887 TEST_c_c (casinh, 0, plus_infty, plus_infty, M_PI_2l),
3888 TEST_c_c (casinh, 0, minus_infty, plus_infty, -M_PI_2l),
3889 TEST_c_c (casinh, minus_zero, plus_infty, minus_infty, M_PI_2l),
3890 TEST_c_c (casinh, minus_zero, minus_infty, minus_infty, -M_PI_2l),
3891 TEST_c_c (casinh, 0.1L, plus_infty, plus_infty, M_PI_2l),
3892 TEST_c_c (casinh, 0.1L, minus_infty, plus_infty, -M_PI_2l),
3893
3894 TEST_c_c (casinh, minus_infty, 0, minus_infty, 0.0),
3895 TEST_c_c (casinh, minus_infty, minus_zero, minus_infty, minus_zero),
3896 TEST_c_c (casinh, minus_infty, 100, minus_infty, 0.0),
3897 TEST_c_c (casinh, minus_infty, -100, minus_infty, minus_zero),
3898
3899 TEST_c_c (casinh, plus_infty, 0, plus_infty, 0.0),
3900 TEST_c_c (casinh, plus_infty, minus_zero, plus_infty, minus_zero),
3901 TEST_c_c (casinh, plus_infty, 0.5, plus_infty, 0.0),
3902 TEST_c_c (casinh, plus_infty, -0.5, plus_infty, minus_zero),
3903
3904 TEST_c_c (casinh, plus_infty, qnan_value, plus_infty, qnan_value),
3905 TEST_c_c (casinh, minus_infty, qnan_value, minus_infty, qnan_value),
3906
3907 TEST_c_c (casinh, qnan_value, 0, qnan_value, 0.0),
3908 TEST_c_c (casinh, qnan_value, minus_zero, qnan_value, minus_zero),
3909
3910 TEST_c_c (casinh, qnan_value, plus_infty, plus_infty, qnan_value, IGNORE_ZERO_INF_SIGN),
3911 TEST_c_c (casinh, qnan_value, minus_infty, plus_infty, qnan_value, IGNORE_ZERO_INF_SIGN),
3912
3913 TEST_c_c (casinh, 10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3914 TEST_c_c (casinh, -10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3915
3916 TEST_c_c (casinh, qnan_value, 0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3917 TEST_c_c (casinh, -0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3918
3919 TEST_c_c (casinh, qnan_value, qnan_value, qnan_value, qnan_value),
3920
3921 TEST_c_c (casinh, plus_zero, -1.5L, 0.9624236501192068949955178268487368462704L, -M_PI_2l),
3922 TEST_c_c (casinh, minus_zero, -1.5L, -0.9624236501192068949955178268487368462704L, -M_PI_2l),
3923 TEST_c_c (casinh, plus_zero, -1.0L, plus_zero, -M_PI_2l),
3924 TEST_c_c (casinh, minus_zero, -1.0L, minus_zero, -M_PI_2l),
3925 TEST_c_c (casinh, plus_zero, -0.5L, plus_zero, -0.5235987755982988730771072305465838140329L),
3926 TEST_c_c (casinh, minus_zero, -0.5L, minus_zero, -0.5235987755982988730771072305465838140329L),
3927 TEST_c_c (casinh, plus_zero, 0.5L, plus_zero, 0.5235987755982988730771072305465838140329L),
3928 TEST_c_c (casinh, minus_zero, 0.5L, minus_zero, 0.5235987755982988730771072305465838140329L),
3929 TEST_c_c (casinh, plus_zero, 1.0L, plus_zero, M_PI_2l),
3930 TEST_c_c (casinh, minus_zero, 1.0L, minus_zero, M_PI_2l),
3931 TEST_c_c (casinh, plus_zero, 1.5L, 0.9624236501192068949955178268487368462704L, M_PI_2l),
3932 TEST_c_c (casinh, minus_zero, 1.5L, -0.9624236501192068949955178268487368462704L, M_PI_2l),
3933
3934 TEST_c_c (casinh, -1.5L, plus_zero, -1.194763217287109304111930828519090523536L, plus_zero),
3935 TEST_c_c (casinh, -1.5L, minus_zero, -1.194763217287109304111930828519090523536L, minus_zero),
3936 TEST_c_c (casinh, -1.0L, plus_zero, -0.8813735870195430252326093249797923090282L, plus_zero),
3937 TEST_c_c (casinh, -1.0L, minus_zero, -0.8813735870195430252326093249797923090282L, minus_zero),
3938 TEST_c_c (casinh, -0.5L, plus_zero, -0.4812118250596034474977589134243684231352L, plus_zero),
3939 TEST_c_c (casinh, -0.5L, minus_zero, -0.4812118250596034474977589134243684231352L, minus_zero),
3940 TEST_c_c (casinh, 0.5L, plus_zero, 0.4812118250596034474977589134243684231352L, plus_zero),
3941 TEST_c_c (casinh, 0.5L, minus_zero, 0.4812118250596034474977589134243684231352L, minus_zero),
3942 TEST_c_c (casinh, 1.0L, plus_zero, 0.8813735870195430252326093249797923090282L, plus_zero),
3943 TEST_c_c (casinh, 1.0L, minus_zero, 0.8813735870195430252326093249797923090282L, minus_zero),
3944 TEST_c_c (casinh, 1.5L, plus_zero, 1.194763217287109304111930828519090523536L, plus_zero),
3945 TEST_c_c (casinh, 1.5L, minus_zero, 1.194763217287109304111930828519090523536L, minus_zero),
3946
3947 TEST_c_c (casinh, 0x1p50L, 1.0L, 3.535050620855721078027883819436759661753e1L, 8.881784197001252323389053344720723756399e-16L),
3948 TEST_c_c (casinh, 0x1p50L, -1.0L, 3.535050620855721078027883819436759661753e1L, -8.881784197001252323389053344720723756399e-16L),
3949 TEST_c_c (casinh, -0x1p50L, 1.0L, -3.535050620855721078027883819436759661753e1L, 8.881784197001252323389053344720723756399e-16L),
3950 TEST_c_c (casinh, -0x1p50L, -1.0L, -3.535050620855721078027883819436759661753e1L, -8.881784197001252323389053344720723756399e-16L),
3951 TEST_c_c (casinh, 1.0L, 0x1p50L, 3.535050620855721078027883819436720218708e1L, 1.570796326794895731052901991514519103193L),
3952 TEST_c_c (casinh, -1.0L, 0x1p50L, -3.535050620855721078027883819436720218708e1L, 1.570796326794895731052901991514519103193L),
3953 TEST_c_c (casinh, 1.0L, -0x1p50L, 3.535050620855721078027883819436720218708e1L, -1.570796326794895731052901991514519103193L),
3954 TEST_c_c (casinh, -1.0L, -0x1p50L, -3.535050620855721078027883819436720218708e1L, -1.570796326794895731052901991514519103193L),
3955 #ifndef TEST_FLOAT
3956 TEST_c_c (casinh, 0x1p500L, 1.0L, 3.472667374605326000180332928505464606058e2L, 3.054936363499604682051979393213617699789e-151L),
3957 TEST_c_c (casinh, 0x1p500L, -1.0L, 3.472667374605326000180332928505464606058e2L, -3.054936363499604682051979393213617699789e-151L),
3958 TEST_c_c (casinh, -0x1p500L, 1.0L, -3.472667374605326000180332928505464606058e2L, 3.054936363499604682051979393213617699789e-151L),
3959 TEST_c_c (casinh, -0x1p500L, -1.0L, -3.472667374605326000180332928505464606058e2L, -3.054936363499604682051979393213617699789e-151L),
3960 TEST_c_c (casinh, 1.0L, 0x1p500L, 3.472667374605326000180332928505464606058e2L, 1.570796326794896619231321691639751442099L),
3961 TEST_c_c (casinh, -1.0L, 0x1p500L, -3.472667374605326000180332928505464606058e2L, 1.570796326794896619231321691639751442099L),
3962 TEST_c_c (casinh, 1.0L, -0x1p500L, 3.472667374605326000180332928505464606058e2L, -1.570796326794896619231321691639751442099L),
3963 TEST_c_c (casinh, -1.0L, -0x1p500L, -3.472667374605326000180332928505464606058e2L, -1.570796326794896619231321691639751442099L),
3964 #endif
3965 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
3966 TEST_c_c (casinh, 0x1p5000L, 1.0L, 3.466429049980286492395577839412341016946e3L, 7.079811261048172892385615158694057552948e-1506L),
3967 TEST_c_c (casinh, 0x1p5000L, -1.0L, 3.466429049980286492395577839412341016946e3L, -7.079811261048172892385615158694057552948e-1506L),
3968 TEST_c_c (casinh, -0x1p5000L, 1.0L, -3.466429049980286492395577839412341016946e3L, 7.079811261048172892385615158694057552948e-1506L),
3969 TEST_c_c (casinh, -0x1p5000L, -1.0L, -3.466429049980286492395577839412341016946e3L, -7.079811261048172892385615158694057552948e-1506L),
3970 TEST_c_c (casinh, 1.0L, 0x1p5000L, 3.466429049980286492395577839412341016946e3L, 1.570796326794896619231321691639751442099L),
3971 TEST_c_c (casinh, -1.0L, 0x1p5000L, -3.466429049980286492395577839412341016946e3L, 1.570796326794896619231321691639751442099L),
3972 TEST_c_c (casinh, 1.0L, -0x1p5000L, 3.466429049980286492395577839412341016946e3L, -1.570796326794896619231321691639751442099L),
3973 TEST_c_c (casinh, -1.0L, -0x1p5000L, -3.466429049980286492395577839412341016946e3L, -1.570796326794896619231321691639751442099L),
3974 #endif
3975
3976 TEST_c_c (casinh, 0x1.fp127L, 0x1.fp127L, 8.973081118419833726837456344608533993585e1L, 7.853981633974483096156608458198757210493e-1L),
3977 #ifndef TEST_FLOAT
3978 TEST_c_c (casinh, 0x1.fp1023L, 0x1.fp1023L, 7.107906849659093345062145442726115449315e2L, 7.853981633974483096156608458198757210493e-1L),
3979 #endif
3980 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
3981 TEST_c_c (casinh, 0x1.fp16383L, 0x1.fp16383L, 1.135753137836666928715489992987020363057e4L, 7.853981633974483096156608458198757210493e-1L),
3982 #endif
3983
3984 TEST_c_c (casinh, 0x1.fp-129L, 1.5L, 9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442096L),
3985 TEST_c_c (casinh, 0x1.fp-129L, -1.5L, 9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442096L),
3986 TEST_c_c (casinh, -0x1.fp-129L, 1.5L, -9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442096L),
3987 TEST_c_c (casinh, -0x1.fp-129L, -1.5L, -9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442096L),
3988 TEST_c_c (casinh, 1.5L, 0x1.fp-129L, 1.194763217287109304111930828519090523536L, 1.579176199917649005841160751101628985741e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3989 TEST_c_c (casinh, -1.5L, 0x1.fp-129L, -1.194763217287109304111930828519090523536L, 1.579176199917649005841160751101628985741e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3990 TEST_c_c (casinh, 1.5L, -0x1.fp-129L, 1.194763217287109304111930828519090523536L, -1.579176199917649005841160751101628985741e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3991 TEST_c_c (casinh, -1.5L, -0x1.fp-129L, -1.194763217287109304111930828519090523536L, -1.579176199917649005841160751101628985741e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3992 #ifndef TEST_FLOAT
3993 TEST_c_c (casinh, 0x1.fp-1025L, 1.5L, 9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442099L),
3994 TEST_c_c (casinh, 0x1.fp-1025L, -1.5L, 9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442099L),
3995 TEST_c_c (casinh, -0x1.fp-1025L, 1.5L, -9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442099L),
3996 TEST_c_c (casinh, -0x1.fp-1025L, -1.5L, -9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442099L),
3997 TEST_c_c (casinh, 1.5L, 0x1.fp-1025L, 1.194763217287109304111930828519090523536L, 2.989196569048182929051881765490354365918e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3998 TEST_c_c (casinh, -1.5L, 0x1.fp-1025L, -1.194763217287109304111930828519090523536L, 2.989196569048182929051881765490354365918e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3999 TEST_c_c (casinh, 1.5L, -0x1.fp-1025L, 1.194763217287109304111930828519090523536L, -2.989196569048182929051881765490354365918e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4000 TEST_c_c (casinh, -1.5L, -0x1.fp-1025L, -1.194763217287109304111930828519090523536L, -2.989196569048182929051881765490354365918e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4001 #endif
4002 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
4003 TEST_c_c (casinh, 0x1.fp-16385L, 1.5L, 9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442099L),
4004 TEST_c_c (casinh, 0x1.fp-16385L, -1.5L, 9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442099L),
4005 TEST_c_c (casinh, -0x1.fp-16385L, 1.5L, -9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442099L),
4006 TEST_c_c (casinh, -0x1.fp-16385L, -1.5L, -9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442099L),
4007 TEST_c_c (casinh, 1.5L, 0x1.fp-16385L, 1.194763217287109304111930828519090523536L, 4.516698239814521372306784062043266700598e-4933L, UNDERFLOW_EXCEPTION),
4008 TEST_c_c (casinh, -1.5L, 0x1.fp-16385L, -1.194763217287109304111930828519090523536L, 4.516698239814521372306784062043266700598e-4933L, UNDERFLOW_EXCEPTION),
4009 TEST_c_c (casinh, 1.5L, -0x1.fp-16385L, 1.194763217287109304111930828519090523536L, -4.516698239814521372306784062043266700598e-4933L, UNDERFLOW_EXCEPTION),
4010 TEST_c_c (casinh, -1.5L, -0x1.fp-16385L, -1.194763217287109304111930828519090523536L, -4.516698239814521372306784062043266700598e-4933L, UNDERFLOW_EXCEPTION),
4011 #endif
4012
4013 TEST_c_c (casinh, 0.5L, 1.0L, 7.328576759736452608886724437653071523305e-1L, 8.959074812088902390666567243275770102229e-1L),
4014 TEST_c_c (casinh, 0.5L, -1.0L, 7.328576759736452608886724437653071523305e-1L, -8.959074812088902390666567243275770102229e-1L),
4015 TEST_c_c (casinh, -0.5L, 1.0L, -7.328576759736452608886724437653071523305e-1L, 8.959074812088902390666567243275770102229e-1L),
4016 TEST_c_c (casinh, -0.5L, -1.0L, -7.328576759736452608886724437653071523305e-1L, -8.959074812088902390666567243275770102229e-1L),
4017 TEST_c_c (casinh, 1.0L, 0.5L, 9.261330313501824245501244453057873152694e-1L, 3.494390628572132936274118260753699527325e-1L),
4018 TEST_c_c (casinh, -1.0L, 0.5L, -9.261330313501824245501244453057873152694e-1L, 3.494390628572132936274118260753699527325e-1L),
4019 TEST_c_c (casinh, 1.0L, -0.5L, 9.261330313501824245501244453057873152694e-1L, -3.494390628572132936274118260753699527325e-1L),
4020 TEST_c_c (casinh, -1.0L, -0.5L, -9.261330313501824245501244453057873152694e-1L, -3.494390628572132936274118260753699527325e-1L),
4021 TEST_c_c (casinh, 0.25L, 1.0L, 5.097911466811016354623559941115413499164e-1L, 1.081751996523816326311037318425097434186L),
4022 TEST_c_c (casinh, 0.25L, -1.0L, 5.097911466811016354623559941115413499164e-1L, -1.081751996523816326311037318425097434186L),
4023 TEST_c_c (casinh, -0.25L, 1.0L, -5.097911466811016354623559941115413499164e-1L, 1.081751996523816326311037318425097434186L),
4024 TEST_c_c (casinh, -0.25L, -1.0L, -5.097911466811016354623559941115413499164e-1L, -1.081751996523816326311037318425097434186L),
4025 TEST_c_c (casinh, 1.0L, 0.25L, 8.924633639033482359562124741744951972772e-1L, 1.763024327769669304186785666360901026468e-1L),
4026 TEST_c_c (casinh, -1.0L, 0.25L, -8.924633639033482359562124741744951972772e-1L, 1.763024327769669304186785666360901026468e-1L),
4027 TEST_c_c (casinh, 1.0L, -0.25L, 8.924633639033482359562124741744951972772e-1L, -1.763024327769669304186785666360901026468e-1L),
4028 TEST_c_c (casinh, -1.0L, -0.25L, -8.924633639033482359562124741744951972772e-1L, -1.763024327769669304186785666360901026468e-1L),
4029 TEST_c_c (casinh, 0x1.fp-10L, 1.0L, 4.350501469856803800217957402220976497152e-2L, 1.527305029163877791518741192097931722508L),
4030 TEST_c_c (casinh, 0x1.fp-10L, -1.0L, 4.350501469856803800217957402220976497152e-2L, -1.527305029163877791518741192097931722508L),
4031 TEST_c_c (casinh, -0x1.fp-10L, 1.0L, -4.350501469856803800217957402220976497152e-2L, 1.527305029163877791518741192097931722508L),
4032 TEST_c_c (casinh, -0x1.fp-10L, -1.0L, -4.350501469856803800217957402220976497152e-2L, -1.527305029163877791518741192097931722508L),
4033 TEST_c_c (casinh, 1.0L, 0x1.fp-10L, 8.813742198809567991336704287826445879025e-1L, 1.337909359557740912558349531052239112857e-3L),
4034 TEST_c_c (casinh, -1.0L, 0x1.fp-10L, -8.813742198809567991336704287826445879025e-1L, 1.337909359557740912558349531052239112857e-3L),
4035 TEST_c_c (casinh, 1.0L, -0x1.fp-10L, 8.813742198809567991336704287826445879025e-1L, -1.337909359557740912558349531052239112857e-3L),
4036 TEST_c_c (casinh, -1.0L, -0x1.fp-10L, -8.813742198809567991336704287826445879025e-1L, -1.337909359557740912558349531052239112857e-3L),
4037 TEST_c_c (casinh, 0x1.fp-30L, 1.0L, 4.247867098745151888768727039216644758847e-5L, 1.570753848123921942730162693731872690232L),
4038 TEST_c_c (casinh, 0x1.fp-30L, -1.0L, 4.247867098745151888768727039216644758847e-5L, -1.570753848123921942730162693731872690232L),
4039 TEST_c_c (casinh, -0x1.fp-30L, 1.0L, -4.247867098745151888768727039216644758847e-5L, 1.570753848123921942730162693731872690232L),
4040 TEST_c_c (casinh, -0x1.fp-30L, -1.0L, -4.247867098745151888768727039216644758847e-5L, -1.570753848123921942730162693731872690232L),
4041 TEST_c_c (casinh, 1.0L, 0x1.fp-30L, 8.813735870195430258081932989769495326854e-1L, 1.275929984216518540252717485007112529021e-9L),
4042 TEST_c_c (casinh, -1.0L, 0x1.fp-30L, -8.813735870195430258081932989769495326854e-1L, 1.275929984216518540252717485007112529021e-9L),
4043 TEST_c_c (casinh, 1.0L, -0x1.fp-30L, 8.813735870195430258081932989769495326854e-1L, -1.275929984216518540252717485007112529021e-9L),
4044 TEST_c_c (casinh, -1.0L, -0x1.fp-30L, -8.813735870195430258081932989769495326854e-1L, -1.275929984216518540252717485007112529021e-9L),
4045 TEST_c_c (casinh, 0x1.fp-100L, 1.0L, 1.236292038260260888664514866457202186027e-15L, 1.570796326794895382939283431378862777584L),
4046 TEST_c_c (casinh, 0x1.fp-100L, -1.0L, 1.236292038260260888664514866457202186027e-15L, -1.570796326794895382939283431378862777584L),
4047 TEST_c_c (casinh, -0x1.fp-100L, 1.0L, -1.236292038260260888664514866457202186027e-15L, 1.570796326794895382939283431378862777584L),
4048 TEST_c_c (casinh, -0x1.fp-100L, -1.0L, -1.236292038260260888664514866457202186027e-15L, -1.570796326794895382939283431378862777584L),
4049 TEST_c_c (casinh, 1.0L, 0x1.fp-100L, 8.813735870195430252326093249797923090282e-1L, 1.080754735021050612990719608916167354321e-30L),
4050 TEST_c_c (casinh, -1.0L, 0x1.fp-100L, -8.813735870195430252326093249797923090282e-1L, 1.080754735021050612990719608916167354321e-30L),
4051 TEST_c_c (casinh, 1.0L, -0x1.fp-100L, 8.813735870195430252326093249797923090282e-1L, -1.080754735021050612990719608916167354321e-30L),
4052 TEST_c_c (casinh, -1.0L, -0x1.fp-100L, -8.813735870195430252326093249797923090282e-1L, -1.080754735021050612990719608916167354321e-30L),
4053 TEST_c_c (casinh, 0x1.fp-129L, 1.0L, 5.335635276982233498398987585285818977933e-20L, 1.570796326794896619177965338869929107115L),
4054 TEST_c_c (casinh, 0x1.fp-129L, -1.0L, 5.335635276982233498398987585285818977933e-20L, -1.570796326794896619177965338869929107115L),
4055 TEST_c_c (casinh, -0x1.fp-129L, 1.0L, -5.335635276982233498398987585285818977933e-20L, 1.570796326794896619177965338869929107115L),
4056 TEST_c_c (casinh, -0x1.fp-129L, -1.0L, -5.335635276982233498398987585285818977933e-20L, -1.570796326794896619177965338869929107115L),
4057 TEST_c_c (casinh, 1.0L, 0x1.fp-129L, 8.813735870195430252326093249797923090282e-1L, 2.013062564695348242280482517399205554874e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4058 TEST_c_c (casinh, -1.0L, 0x1.fp-129L, -8.813735870195430252326093249797923090282e-1L, 2.013062564695348242280482517399205554874e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4059 TEST_c_c (casinh, 1.0L, -0x1.fp-129L, 8.813735870195430252326093249797923090282e-1L, -2.013062564695348242280482517399205554874e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4060 TEST_c_c (casinh, -1.0L, -0x1.fp-129L, -8.813735870195430252326093249797923090282e-1L, -2.013062564695348242280482517399205554874e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4061 #ifndef TEST_FLOAT
4062 TEST_c_c (casinh, 0x1.fp-1000L, 1.0L, 4.252291453851660175550490409247739011867e-151L, 1.570796326794896619231321691639751442099L),
4063 TEST_c_c (casinh, 0x1.fp-1000L, -1.0L, 4.252291453851660175550490409247739011867e-151L, -1.570796326794896619231321691639751442099L),
4064 TEST_c_c (casinh, -0x1.fp-1000L, 1.0L, -4.252291453851660175550490409247739011867e-151L, 1.570796326794896619231321691639751442099L),
4065 TEST_c_c (casinh, -0x1.fp-1000L, -1.0L, -4.252291453851660175550490409247739011867e-151L, -1.570796326794896619231321691639751442099L),
4066 TEST_c_c (casinh, 1.0L, 0x1.fp-1000L, 8.813735870195430252326093249797923090282e-1L, 1.278589251976747242280879285935084814093e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4067 TEST_c_c (casinh, -1.0L, 0x1.fp-1000L, -8.813735870195430252326093249797923090282e-1L, 1.278589251976747242280879285935084814093e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4068 TEST_c_c (casinh, 1.0L, -0x1.fp-1000L, 8.813735870195430252326093249797923090282e-1L, -1.278589251976747242280879285935084814093e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4069 TEST_c_c (casinh, -1.0L, -0x1.fp-1000L, -8.813735870195430252326093249797923090282e-1L, -1.278589251976747242280879285935084814093e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4070 TEST_c_c (casinh, 0x1.fp-1025L, 1.0L, 7.340879205566679497036857179189356754017e-155L, 1.570796326794896619231321691639751442099L),
4071 TEST_c_c (casinh, 0x1.fp-1025L, -1.0L, 7.340879205566679497036857179189356754017e-155L, -1.570796326794896619231321691639751442099L),
4072 TEST_c_c (casinh, -0x1.fp-1025L, 1.0L, -7.340879205566679497036857179189356754017e-155L, 1.570796326794896619231321691639751442099L),
4073 TEST_c_c (casinh, -0x1.fp-1025L, -1.0L, -7.340879205566679497036857179189356754017e-155L, -1.570796326794896619231321691639751442099L),
4074 TEST_c_c (casinh, 1.0L, 0x1.fp-1025L, 8.813735870195430252326093249797923090282e-1L, 3.810492908885321743133304375216617626230e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4075 TEST_c_c (casinh, -1.0L, 0x1.fp-1025L, -8.813735870195430252326093249797923090282e-1L, 3.810492908885321743133304375216617626230e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4076 TEST_c_c (casinh, 1.0L, -0x1.fp-1025L, 8.813735870195430252326093249797923090282e-1L, -3.810492908885321743133304375216617626230e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4077 TEST_c_c (casinh, -1.0L, -0x1.fp-1025L, -8.813735870195430252326093249797923090282e-1L, -3.810492908885321743133304375216617626230e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4078 #endif
4079 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
4080 TEST_c_c (casinh, 0x1.fp-10000L, 1.0L, 9.854680208706673586644342922051388714633e-1506L, 1.570796326794896619231321691639751442099L),
4081 TEST_c_c (casinh, 0x1.fp-10000L, -1.0L, 9.854680208706673586644342922051388714633e-1506L, -1.570796326794896619231321691639751442099L),
4082 TEST_c_c (casinh, -0x1.fp-10000L, 1.0L, -9.854680208706673586644342922051388714633e-1506L, 1.570796326794896619231321691639751442099L),
4083 TEST_c_c (casinh, -0x1.fp-10000L, -1.0L, -9.854680208706673586644342922051388714633e-1506L, -1.570796326794896619231321691639751442099L),
4084 TEST_c_c (casinh, 1.0L, 0x1.fp-10000L, 8.813735870195430252326093249797923090282e-1L, 6.867047849047171855399183659351043150871e-3011L),
4085 TEST_c_c (casinh, -1.0L, 0x1.fp-10000L, -8.813735870195430252326093249797923090282e-1L, 6.867047849047171855399183659351043150871e-3011L),
4086 TEST_c_c (casinh, 1.0L, -0x1.fp-10000L, 8.813735870195430252326093249797923090282e-1L, -6.867047849047171855399183659351043150871e-3011L),
4087 TEST_c_c (casinh, -1.0L, -0x1.fp-10000L, -8.813735870195430252326093249797923090282e-1L, -6.867047849047171855399183659351043150871e-3011L),
4088 TEST_c_c (casinh, 0x1.fp-16385L, 1.0L, 9.023632056840860275214893047597614177639e-2467L, 1.570796326794896619231321691639751442099L),
4089 TEST_c_c (casinh, 0x1.fp-16385L, -1.0L, 9.023632056840860275214893047597614177639e-2467L, -1.570796326794896619231321691639751442099L),
4090 TEST_c_c (casinh, -0x1.fp-16385L, 1.0L, -9.023632056840860275214893047597614177639e-2467L, 1.570796326794896619231321691639751442099L),
4091 TEST_c_c (casinh, -0x1.fp-16385L, -1.0L, -9.023632056840860275214893047597614177639e-2467L, -1.570796326794896619231321691639751442099L),
4092 TEST_c_c (casinh, 1.0L, 0x1.fp-16385L, 8.813735870195430252326093249797923090282e-1L, 5.757683115456107044131264955348448954458e-4933L, UNDERFLOW_EXCEPTION),
4093 TEST_c_c (casinh, -1.0L, 0x1.fp-16385L, -8.813735870195430252326093249797923090282e-1L, 5.757683115456107044131264955348448954458e-4933L, UNDERFLOW_EXCEPTION),
4094 TEST_c_c (casinh, 1.0L, -0x1.fp-16385L, 8.813735870195430252326093249797923090282e-1L, -5.757683115456107044131264955348448954458e-4933L, UNDERFLOW_EXCEPTION),
4095 TEST_c_c (casinh, -1.0L, -0x1.fp-16385L, -8.813735870195430252326093249797923090282e-1L, -5.757683115456107044131264955348448954458e-4933L, UNDERFLOW_EXCEPTION),
4096 #endif
4097
4098 TEST_c_c (casinh, 0x1p-23L, 0x1.000002p0L, 5.364668491573609633134147164031476452679e-4L, 1.570574114956455764594481054234834678422L),
4099 TEST_c_c (casinh, 0x1p-23L, -0x1.000002p0L, 5.364668491573609633134147164031476452679e-4L, -1.570574114956455764594481054234834678422L),
4100 TEST_c_c (casinh, -0x1p-23L, 0x1.000002p0L, -5.364668491573609633134147164031476452679e-4L, 1.570574114956455764594481054234834678422L),
4101 TEST_c_c (casinh, -0x1p-23L, -0x1.000002p0L, -5.364668491573609633134147164031476452679e-4L, -1.570574114956455764594481054234834678422L),
4102 TEST_c_c (casinh, 0x1.000002p0L, 0x1p-23L, 8.813736713132400470205730751186547909968e-1L, 8.429369199749229560964789467980644296420e-8L),
4103 TEST_c_c (casinh, -0x1.000002p0L, 0x1p-23L, -8.813736713132400470205730751186547909968e-1L, 8.429369199749229560964789467980644296420e-8L),
4104 TEST_c_c (casinh, 0x1.000002p0L, -0x1p-23L, 8.813736713132400470205730751186547909968e-1L, -8.429369199749229560964789467980644296420e-8L),
4105 TEST_c_c (casinh, -0x1.000002p0L, -0x1p-23L, -8.813736713132400470205730751186547909968e-1L, -8.429369199749229560964789467980644296420e-8L),
4106 TEST_c_c (casinh, 0x1.fp-129L, 0x1.000002p0L, 4.882812451493617206486388134172712975070e-4L, 1.570796326794896619231321691639751436268L),
4107 TEST_c_c (casinh, 0x1.fp-129L, -0x1.000002p0L, 4.882812451493617206486388134172712975070e-4L, -1.570796326794896619231321691639751436268L),
4108 TEST_c_c (casinh, -0x1.fp-129L, 0x1.000002p0L, -4.882812451493617206486388134172712975070e-4L, 1.570796326794896619231321691639751436268L),
4109 TEST_c_c (casinh, -0x1.fp-129L, -0x1.000002p0L, -4.882812451493617206486388134172712975070e-4L, -1.570796326794896619231321691639751436268L),
4110 TEST_c_c (casinh, 0x1.000002p0L, 0x1.fp-129L, 8.813736713132375348727889167749389235161e-1L, 2.013062444707472738895109955455676357057e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4111 TEST_c_c (casinh, -0x1.000002p0L, 0x1.fp-129L, -8.813736713132375348727889167749389235161e-1L, 2.013062444707472738895109955455676357057e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4112 TEST_c_c (casinh, 0x1.000002p0L, -0x1.fp-129L, 8.813736713132375348727889167749389235161e-1L, -2.013062444707472738895109955455676357057e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4113 TEST_c_c (casinh, -0x1.000002p0L, -0x1.fp-129L, -8.813736713132375348727889167749389235161e-1L, -2.013062444707472738895109955455676357057e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4114 TEST_c_c (casinh, 0.0L, 0x1.000002p0L, 4.882812451493617206486388134172712975070e-4L, 1.570796326794896619231321691639751442099L),
4115 TEST_c_c (casinh, 0.0L, -0x1.000002p0L, 4.882812451493617206486388134172712975070e-4L, -1.570796326794896619231321691639751442099L),
4116 TEST_c_c (casinh, -0.0L, 0x1.000002p0L, -4.882812451493617206486388134172712975070e-4L, 1.570796326794896619231321691639751442099L),
4117 TEST_c_c (casinh, -0.0L, -0x1.000002p0L, -4.882812451493617206486388134172712975070e-4L, -1.570796326794896619231321691639751442099L),
4118 TEST_c_c (casinh, 0x1.000002p0L, 0.0L, 8.813736713132375348727889167749389235161e-1L, 0.0L),
4119 TEST_c_c (casinh, -0x1.000002p0L, 0.0L, -8.813736713132375348727889167749389235161e-1L, 0.0L),
4120 TEST_c_c (casinh, 0x1.000002p0L, -0.0L, 8.813736713132375348727889167749389235161e-1L, -0.0L),
4121 TEST_c_c (casinh, -0x1.000002p0L, -0.0L, -8.813736713132375348727889167749389235161e-1L, -0.0L),
4122 #ifndef TEST_FLOAT
4123 TEST_c_c (casinh, 0x1p-52L, 0x1.0000000000001p0L, 2.315303644582684770975188768022139415020e-8L, 1.570796317204594913251280305810847349436L),
4124 TEST_c_c (casinh, 0x1p-52L, -0x1.0000000000001p0L, 2.315303644582684770975188768022139415020e-8L, -1.570796317204594913251280305810847349436L),
4125 TEST_c_c (casinh, -0x1p-52L, 0x1.0000000000001p0L, -2.315303644582684770975188768022139415020e-8L, 1.570796317204594913251280305810847349436L),
4126 TEST_c_c (casinh, -0x1p-52L, -0x1.0000000000001p0L, -2.315303644582684770975188768022139415020e-8L, -1.570796317204594913251280305810847349436L),
4127 TEST_c_c (casinh, 0x1.0000000000001p0L, 0x1p-52L, 8.813735870195431822418551933572982483664e-1L, 1.570092458683774885078102529858632363236e-16L),
4128 TEST_c_c (casinh, -0x1.0000000000001p0L, 0x1p-52L, -8.813735870195431822418551933572982483664e-1L, 1.570092458683774885078102529858632363236e-16L),
4129 TEST_c_c (casinh, 0x1.0000000000001p0L, -0x1p-52L, 8.813735870195431822418551933572982483664e-1L, -1.570092458683774885078102529858632363236e-16L),
4130 TEST_c_c (casinh, -0x1.0000000000001p0L, -0x1p-52L, -8.813735870195431822418551933572982483664e-1L, -1.570092458683774885078102529858632363236e-16L),
4131 TEST_c_c (casinh, 0x1.fp-1025L, 0x1.0000000000001p0L, 2.107342425544701550354780375182800088393e-8L, 1.570796326794896619231321691639751442099L),
4132 TEST_c_c (casinh, 0x1.fp-1025L, -0x1.0000000000001p0L, 2.107342425544701550354780375182800088393e-8L, -1.570796326794896619231321691639751442099L),
4133 TEST_c_c (casinh, -0x1.fp-1025L, 0x1.0000000000001p0L, -2.107342425544701550354780375182800088393e-8L, 1.570796326794896619231321691639751442099L),
4134 TEST_c_c (casinh, -0x1.fp-1025L, -0x1.0000000000001p0L, -2.107342425544701550354780375182800088393e-8L, -1.570796326794896619231321691639751442099L),
4135 TEST_c_c (casinh, 0x1.0000000000001p0L, 0x1.fp-1025L, 8.813735870195431822418551933572895326024e-1L, 3.810492908885321320083608113679347200012e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4136 TEST_c_c (casinh, -0x1.0000000000001p0L, 0x1.fp-1025L, -8.813735870195431822418551933572895326024e-1L, 3.810492908885321320083608113679347200012e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4137 TEST_c_c (casinh, 0x1.0000000000001p0L, -0x1.fp-1025L, 8.813735870195431822418551933572895326024e-1L, -3.810492908885321320083608113679347200012e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4138 TEST_c_c (casinh, -0x1.0000000000001p0L, -0x1.fp-1025L, -8.813735870195431822418551933572895326024e-1L, -3.810492908885321320083608113679347200012e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4139 TEST_c_c (casinh, 0.0L, 0x1.0000000000001p0L, 2.107342425544701550354780375182800088393e-8L, 1.570796326794896619231321691639751442099L),
4140 TEST_c_c (casinh, 0.0L, -0x1.0000000000001p0L, 2.107342425544701550354780375182800088393e-8L, -1.570796326794896619231321691639751442099L),
4141 TEST_c_c (casinh, -0.0L, 0x1.0000000000001p0L, -2.107342425544701550354780375182800088393e-8L, 1.570796326794896619231321691639751442099L),
4142 TEST_c_c (casinh, -0.0L, -0x1.0000000000001p0L, -2.107342425544701550354780375182800088393e-8L, -1.570796326794896619231321691639751442099L),
4143 TEST_c_c (casinh, 0x1.0000000000001p0L, 0.0L, 8.813735870195431822418551933572895326024e-1L, 0.0L),
4144 TEST_c_c (casinh, -0x1.0000000000001p0L, 0.0L, -8.813735870195431822418551933572895326024e-1L, 0.0L),
4145 TEST_c_c (casinh, 0x1.0000000000001p0L, -0.0L, 8.813735870195431822418551933572895326024e-1L, -0.0L),
4146 TEST_c_c (casinh, -0x1.0000000000001p0L, -0.0L, -8.813735870195431822418551933572895326024e-1L, -0.0L),
4147 #endif
4148 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
4149 TEST_c_c (casinh, 0x1p-63L, 0x1.0000000000000002p0L, 5.116146586219826555037807251857670783420e-10L, 1.570796326582978888921215348380499122131L),
4150 TEST_c_c (casinh, 0x1p-63L, -0x1.0000000000000002p0L, 5.116146586219826555037807251857670783420e-10L, -1.570796326582978888921215348380499122131L),
4151 TEST_c_c (casinh, -0x1p-63L, 0x1.0000000000000002p0L, -5.116146586219826555037807251857670783420e-10L, 1.570796326582978888921215348380499122131L),
4152 TEST_c_c (casinh, -0x1p-63L, -0x1.0000000000000002p0L, -5.116146586219826555037807251857670783420e-10L, -1.570796326582978888921215348380499122131L),
4153 TEST_c_c (casinh, 0x1.0000000000000002p0L, 0x1p-63L, 8.813735870195430253092739958139610131001e-1L, 7.666467083416870406778649849746878368519e-20L),
4154 TEST_c_c (casinh, -0x1.0000000000000002p0L, 0x1p-63L, -8.813735870195430253092739958139610131001e-1L, 7.666467083416870406778649849746878368519e-20L),
4155 TEST_c_c (casinh, 0x1.0000000000000002p0L, -0x1p-63L, 8.813735870195430253092739958139610131001e-1L, -7.666467083416870406778649849746878368519e-20L),
4156 TEST_c_c (casinh, -0x1.0000000000000002p0L, -0x1p-63L, -8.813735870195430253092739958139610131001e-1L, -7.666467083416870406778649849746878368519e-20L),
4157 # if LDBL_MIN_EXP <= -16381
4158 TEST_c_c (casinh, 0x1.fp-16385L, 0x1.0000000000000002p0L, 4.656612873077392578082927418388212703712e-10L, 1.570796326794896619231321691639751442099L),
4159 TEST_c_c (casinh, 0x1.fp-16385L, -0x1.0000000000000002p0L, 4.656612873077392578082927418388212703712e-10L, -1.570796326794896619231321691639751442099L),
4160 TEST_c_c (casinh, -0x1.fp-16385L, 0x1.0000000000000002p0L, -4.656612873077392578082927418388212703712e-10L, 1.570796326794896619231321691639751442099L),
4161 TEST_c_c (casinh, -0x1.fp-16385L, -0x1.0000000000000002p0L, -4.656612873077392578082927418388212703712e-10L, -1.570796326794896619231321691639751442099L),
4162 TEST_c_c (casinh, 0x1.0000000000000002p0L, 0x1.fp-16385L, 8.813735870195430253092739958139610130980e-1L, 5.757683115456107043819140328235418018963e-4933L, UNDERFLOW_EXCEPTION),
4163 TEST_c_c (casinh, -0x1.0000000000000002p0L, 0x1.fp-16385L, -8.813735870195430253092739958139610130980e-1L, 5.757683115456107043819140328235418018963e-4933L, UNDERFLOW_EXCEPTION),
4164 TEST_c_c (casinh, 0x1.0000000000000002p0L, -0x1.fp-16385L, 8.813735870195430253092739958139610130980e-1L, -5.757683115456107043819140328235418018963e-4933L, UNDERFLOW_EXCEPTION),
4165 TEST_c_c (casinh, -0x1.0000000000000002p0L, -0x1.fp-16385L, -8.813735870195430253092739958139610130980e-1L, -5.757683115456107043819140328235418018963e-4933L, UNDERFLOW_EXCEPTION),
4166 # endif
4167 TEST_c_c (casinh, 0.0L, 0x1.0000000000000002p0L, 4.656612873077392578082927418388212703712e-10L, 1.570796326794896619231321691639751442099L),
4168 TEST_c_c (casinh, 0.0L, -0x1.0000000000000002p0L, 4.656612873077392578082927418388212703712e-10L, -1.570796326794896619231321691639751442099L),
4169 TEST_c_c (casinh, -0.0L, 0x1.0000000000000002p0L, -4.656612873077392578082927418388212703712e-10L, 1.570796326794896619231321691639751442099L),
4170 TEST_c_c (casinh, -0.0L, -0x1.0000000000000002p0L, -4.656612873077392578082927418388212703712e-10L, -1.570796326794896619231321691639751442099L),
4171 TEST_c_c (casinh, 0x1.0000000000000002p0L, 0.0L, 8.813735870195430253092739958139610130980e-1L, 0.0L),
4172 TEST_c_c (casinh, -0x1.0000000000000002p0L, 0.0L, -8.813735870195430253092739958139610130980e-1L, 0.0L),
4173 TEST_c_c (casinh, 0x1.0000000000000002p0L, -0.0L, 8.813735870195430253092739958139610130980e-1L, -0.0L),
4174 TEST_c_c (casinh, -0x1.0000000000000002p0L, -0.0L, -8.813735870195430253092739958139610130980e-1L, -0.0L),
4175 #endif
4176 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
4177 TEST_c_c (casinh, 0x1p-106L, 0x1.000000000000000000000000008p0L, 2.285028863093221674154232933662774454211e-16L, 1.570796326794896565289107467733682961928L),
4178 TEST_c_c (casinh, 0x1p-106L, -0x1.000000000000000000000000008p0L, 2.285028863093221674154232933662774454211e-16L, -1.570796326794896565289107467733682961928L),
4179 TEST_c_c (casinh, -0x1p-106L, 0x1.000000000000000000000000008p0L, -2.285028863093221674154232933662774454211e-16L, 1.570796326794896565289107467733682961928L),
4180 TEST_c_c (casinh, -0x1p-106L, -0x1.000000000000000000000000008p0L, -2.285028863093221674154232933662774454211e-16L, -1.570796326794896565289107467733682961928L),
4181 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, 0x1p-106L, 8.813735870195430252326093249798097405561e-1L, 8.715763992105246878957416200936726072500e-33L),
4182 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, 0x1p-106L, -8.813735870195430252326093249798097405561e-1L, 8.715763992105246878957416200936726072500e-33L),
4183 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, -0x1p-106L, 8.813735870195430252326093249798097405561e-1L, -8.715763992105246878957416200936726072500e-33L),
4184 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, -0x1p-106L, -8.813735870195430252326093249798097405561e-1L, -8.715763992105246878957416200936726072500e-33L),
4185 TEST_c_c (casinh, 0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 2.220446049250313080847263336181636063482e-16L, 1.570796326794896619231321691639751442099L),
4186 TEST_c_c (casinh, 0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 2.220446049250313080847263336181636063482e-16L, -1.570796326794896619231321691639751442099L),
4187 TEST_c_c (casinh, -0x1.fp-1025L, 0x1.000000000000000000000000008p0L, -2.220446049250313080847263336181636063482e-16L, 1.570796326794896619231321691639751442099L),
4188 TEST_c_c (casinh, -0x1.fp-1025L, -0x1.000000000000000000000000008p0L, -2.220446049250313080847263336181636063482e-16L, -1.570796326794896619231321691639751442099L),
4189 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 8.813735870195430252326093249798097405561e-1L, 3.810492908885321743133304375216570658278e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4190 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, 0x1.fp-1025L, -8.813735870195430252326093249798097405561e-1L, 3.810492908885321743133304375216570658278e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4191 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 8.813735870195430252326093249798097405561e-1L, -3.810492908885321743133304375216570658278e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4192 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, -0x1.fp-1025L, -8.813735870195430252326093249798097405561e-1L, -3.810492908885321743133304375216570658278e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4193 TEST_c_c (casinh, 0.0L, 0x1.000000000000000000000000008p0L, 2.220446049250313080847263336181636063482e-16L, 1.570796326794896619231321691639751442099L),
4194 TEST_c_c (casinh, 0.0L, -0x1.000000000000000000000000008p0L, 2.220446049250313080847263336181636063482e-16L, -1.570796326794896619231321691639751442099L),
4195 TEST_c_c (casinh, -0.0L, 0x1.000000000000000000000000008p0L, -2.220446049250313080847263336181636063482e-16L, 1.570796326794896619231321691639751442099L),
4196 TEST_c_c (casinh, -0.0L, -0x1.000000000000000000000000008p0L, -2.220446049250313080847263336181636063482e-16L, -1.570796326794896619231321691639751442099L),
4197 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, 0.0L, 8.813735870195430252326093249798097405561e-1L, 0.0L),
4198 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, 0.0L, -8.813735870195430252326093249798097405561e-1L, 0.0L),
4199 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, -0.0L, 8.813735870195430252326093249798097405561e-1L, -0.0L),
4200 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, -0.0L, -8.813735870195430252326093249798097405561e-1L, -0.0L),
4201 #endif
4202 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
4203 TEST_c_c (casinh, 0x1p-113L, 0x1.0000000000000000000000000001p0L, 2.019699255375255198156433710951064632386e-17L, 1.570796326794896614463458507897073960405L),
4204 TEST_c_c (casinh, 0x1p-113L, -0x1.0000000000000000000000000001p0L, 2.019699255375255198156433710951064632386e-17L, -1.570796326794896614463458507897073960405L),
4205 TEST_c_c (casinh, -0x1p-113L, 0x1.0000000000000000000000000001p0L, -2.019699255375255198156433710951064632386e-17L, 1.570796326794896614463458507897073960405L),
4206 TEST_c_c (casinh, -0x1p-113L, -0x1.0000000000000000000000000001p0L, -2.019699255375255198156433710951064632386e-17L, -1.570796326794896614463458507897073960405L),
4207 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, 0x1p-113L, 8.813735870195430252326093249797924452120e-1L, 6.809190618832224124185481406981900518193e-35L),
4208 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, 0x1p-113L, -8.813735870195430252326093249797924452120e-1L, 6.809190618832224124185481406981900518193e-35L),
4209 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, -0x1p-113L, 8.813735870195430252326093249797924452120e-1L, -6.809190618832224124185481406981900518193e-35L),
4210 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, -0x1p-113L, -8.813735870195430252326093249797924452120e-1L, -6.809190618832224124185481406981900518193e-35L),
4211 TEST_c_c (casinh, 0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 1.962615573354718824241727964954454332780e-17L, 1.570796326794896619231321691639751442099L),
4212 TEST_c_c (casinh, 0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 1.962615573354718824241727964954454332780e-17L, -1.570796326794896619231321691639751442099L),
4213 TEST_c_c (casinh, -0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, -1.962615573354718824241727964954454332780e-17L, 1.570796326794896619231321691639751442099L),
4214 TEST_c_c (casinh, -0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, -1.962615573354718824241727964954454332780e-17L, -1.570796326794896619231321691639751442099L),
4215 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 8.813735870195430252326093249797924452120e-1L, 5.757683115456107044131264955348448400014e-4933L, UNDERFLOW_EXCEPTION),
4216 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, -8.813735870195430252326093249797924452120e-1L, 5.757683115456107044131264955348448400014e-4933L, UNDERFLOW_EXCEPTION),
4217 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 8.813735870195430252326093249797924452120e-1L, -5.757683115456107044131264955348448400014e-4933L, UNDERFLOW_EXCEPTION),
4218 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, -8.813735870195430252326093249797924452120e-1L, -5.757683115456107044131264955348448400014e-4933L, UNDERFLOW_EXCEPTION),
4219 TEST_c_c (casinh, 0.0L, 0x1.0000000000000000000000000001p0L, 1.962615573354718824241727964954454332780e-17L, 1.570796326794896619231321691639751442099L),
4220 TEST_c_c (casinh, 0.0L, -0x1.0000000000000000000000000001p0L, 1.962615573354718824241727964954454332780e-17L, -1.570796326794896619231321691639751442099L),
4221 TEST_c_c (casinh, -0.0L, 0x1.0000000000000000000000000001p0L, -1.962615573354718824241727964954454332780e-17L, 1.570796326794896619231321691639751442099L),
4222 TEST_c_c (casinh, -0.0L, -0x1.0000000000000000000000000001p0L, -1.962615573354718824241727964954454332780e-17L, -1.570796326794896619231321691639751442099L),
4223 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, 0.0L, 8.813735870195430252326093249797924452120e-1L, 0.0L),
4224 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, 0.0L, -8.813735870195430252326093249797924452120e-1L, 0.0L),
4225 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, -0.0L, 8.813735870195430252326093249797924452120e-1L, -0.0L),
4226 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, -0.0L, -8.813735870195430252326093249797924452120e-1L, -0.0L),
4227 #endif
4228
4229 TEST_c_c (casinh, 0x1p-23L, 0x0.ffffffp0L, 2.714321200917194650737217746780928423385e-4L, 1.570357140408705570520377172865353621698L),
4230 TEST_c_c (casinh, 0x1p-23L, -0x0.ffffffp0L, 2.714321200917194650737217746780928423385e-4L, -1.570357140408705570520377172865353621698L),
4231 TEST_c_c (casinh, -0x1p-23L, 0x0.ffffffp0L, -2.714321200917194650737217746780928423385e-4L, 1.570357140408705570520377172865353621698L),
4232 TEST_c_c (casinh, -0x1p-23L, -0x0.ffffffp0L, -2.714321200917194650737217746780928423385e-4L, -1.570357140408705570520377172865353621698L),
4233 TEST_c_c (casinh, 0x0.ffffffp0L, 0x1p-23L, 8.813735448726963984495965873956465777250e-1L, 8.429369953393598499000760938112968755257e-8L),
4234 TEST_c_c (casinh, -0x0.ffffffp0L, 0x1p-23L, -8.813735448726963984495965873956465777250e-1L, 8.429369953393598499000760938112968755257e-8L),
4235 TEST_c_c (casinh, 0x0.ffffffp0L, -0x1p-23L, 8.813735448726963984495965873956465777250e-1L, -8.429369953393598499000760938112968755257e-8L),
4236 TEST_c_c (casinh, -0x0.ffffffp0L, -0x1p-23L, -8.813735448726963984495965873956465777250e-1L, -8.429369953393598499000760938112968755257e-8L),
4237 TEST_c_c (casinh, 0x1.fp-129L, 0x0.ffffffp0L, 8.245504387859737323891843603996428534945e-36L, 1.570451059810180415643718442157112705601L),
4238 TEST_c_c (casinh, 0x1.fp-129L, -0x0.ffffffp0L, 8.245504387859737323891843603996428534945e-36L, -1.570451059810180415643718442157112705601L),
4239 TEST_c_c (casinh, -0x1.fp-129L, 0x0.ffffffp0L, -8.245504387859737323891843603996428534945e-36L, 1.570451059810180415643718442157112705601L),
4240 TEST_c_c (casinh, -0x1.fp-129L, -0x0.ffffffp0L, -8.245504387859737323891843603996428534945e-36L, -1.570451059810180415643718442157112705601L),
4241 TEST_c_c (casinh, 0x0.ffffffp0L, 0x1.fp-129L, 8.813735448726938863015878255140556727969e-1L, 2.013062624689288675911339929224634593425e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4242 TEST_c_c (casinh, -0x0.ffffffp0L, 0x1.fp-129L, -8.813735448726938863015878255140556727969e-1L, 2.013062624689288675911339929224634593425e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4243 TEST_c_c (casinh, 0x0.ffffffp0L, -0x1.fp-129L, 8.813735448726938863015878255140556727969e-1L, -2.013062624689288675911339929224634593425e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4244 TEST_c_c (casinh, -0x0.ffffffp0L, -0x1.fp-129L, -8.813735448726938863015878255140556727969e-1L, -2.013062624689288675911339929224634593425e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4245 TEST_c_c (casinh, 0.0L, 0x0.ffffffp0L, 0.0L, 1.570451059810180415643718442157112705601L),
4246 TEST_c_c (casinh, 0.0L, -0x0.ffffffp0L, 0.0L, -1.570451059810180415643718442157112705601L),
4247 TEST_c_c (casinh, -0.0L, 0x0.ffffffp0L, -0.0L, 1.570451059810180415643718442157112705601L),
4248 TEST_c_c (casinh, -0.0L, -0x0.ffffffp0L, -0.0L, -1.570451059810180415643718442157112705601L),
4249 TEST_c_c (casinh, 0x0.ffffffp0L, 0.0L, 8.813735448726938863015878255140556727969e-1L, 0.0L),
4250 TEST_c_c (casinh, -0x0.ffffffp0L, 0.0L, -8.813735448726938863015878255140556727969e-1L, 0.0L),
4251 TEST_c_c (casinh, 0x0.ffffffp0L, -0.0L, 8.813735448726938863015878255140556727969e-1L, -0.0L),
4252 TEST_c_c (casinh, -0x0.ffffffp0L, -0.0L, -8.813735448726938863015878255140556727969e-1L, -0.0L),
4253 TEST_c_c (casinh, 0x1p-23L, 0.5L, 1.376510308240943236356088341381173571841e-7L, 5.235987755982934033165770729745469098254e-1L),
4254 TEST_c_c (casinh, 0x1p-23L, -0.5L, 1.376510308240943236356088341381173571841e-7L, -5.235987755982934033165770729745469098254e-1L),
4255 TEST_c_c (casinh, -0x1p-23L, 0.5L, -1.376510308240943236356088341381173571841e-7L, 5.235987755982934033165770729745469098254e-1L),
4256 TEST_c_c (casinh, -0x1p-23L, -0.5L, -1.376510308240943236356088341381173571841e-7L, -5.235987755982934033165770729745469098254e-1L),
4257 TEST_c_c (casinh, 0.5L, 0x1p-23L, 4.812118250596059896127318386463676808798e-1L, 1.066240299940009780479664302917201696886e-7L),
4258 TEST_c_c (casinh, -0.5L, 0x1p-23L, -4.812118250596059896127318386463676808798e-1L, 1.066240299940009780479664302917201696886e-7L),
4259 TEST_c_c (casinh, 0.5L, -0x1p-23L, 4.812118250596059896127318386463676808798e-1L, -1.066240299940009780479664302917201696886e-7L),
4260 TEST_c_c (casinh, -0.5L, -0x1p-23L, -4.812118250596059896127318386463676808798e-1L, -1.066240299940009780479664302917201696886e-7L),
4261 TEST_c_c (casinh, 0x1.fp-129L, 0.5L, 3.287317402534702257036015056278368274737e-39L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_FLOAT),
4262 TEST_c_c (casinh, 0x1.fp-129L, -0.5L, 3.287317402534702257036015056278368274737e-39L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_FLOAT),
4263 TEST_c_c (casinh, -0x1.fp-129L, 0.5L, -3.287317402534702257036015056278368274737e-39L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_FLOAT),
4264 TEST_c_c (casinh, -0x1.fp-129L, -0.5L, -3.287317402534702257036015056278368274737e-39L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_FLOAT),
4265 TEST_c_c (casinh, 0.5L, 0x1.fp-129L, 4.812118250596034474977589134243684231352e-1L, 2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4266 TEST_c_c (casinh, -0.5L, 0x1.fp-129L, -4.812118250596034474977589134243684231352e-1L, 2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4267 TEST_c_c (casinh, 0.5L, -0x1.fp-129L, 4.812118250596034474977589134243684231352e-1L, -2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4268 TEST_c_c (casinh, -0.5L, -0x1.fp-129L, -4.812118250596034474977589134243684231352e-1L, -2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4269 TEST_c_c (casinh, 0x1p-23L, 0x1p-23L, 1.192092895507818146886315028596704749235e-7L, 1.192092895507806853113684971258850504935e-7L),
4270 TEST_c_c (casinh, 0x1p-23L, -0x1p-23L, 1.192092895507818146886315028596704749235e-7L, -1.192092895507806853113684971258850504935e-7L),
4271 TEST_c_c (casinh, -0x1p-23L, 0x1p-23L, -1.192092895507818146886315028596704749235e-7L, 1.192092895507806853113684971258850504935e-7L),
4272 TEST_c_c (casinh, -0x1p-23L, -0x1p-23L, -1.192092895507818146886315028596704749235e-7L, -1.192092895507806853113684971258850504935e-7L),
4273 TEST_c_c (casinh, 0x1.fp-129L, 0x1p-23L, 2.846900380897747786805634596726756660388e-39L, 1.192092895507815323443157514352519154304e-7L, UNDERFLOW_EXCEPTION_FLOAT),
4274 TEST_c_c (casinh, 0x1.fp-129L, -0x1p-23L, 2.846900380897747786805634596726756660388e-39L, -1.192092895507815323443157514352519154304e-7L, UNDERFLOW_EXCEPTION_FLOAT),
4275 TEST_c_c (casinh, -0x1.fp-129L, 0x1p-23L, -2.846900380897747786805634596726756660388e-39L, 1.192092895507815323443157514352519154304e-7L, UNDERFLOW_EXCEPTION_FLOAT),
4276 TEST_c_c (casinh, -0x1.fp-129L, -0x1p-23L, -2.846900380897747786805634596726756660388e-39L, -1.192092895507815323443157514352519154304e-7L, UNDERFLOW_EXCEPTION_FLOAT),
4277 /* Bug 15319: underflow exception may be missing. */
4278 TEST_c_c (casinh, 0x1p-23L, 0x1.fp-129L, 1.192092895507809676556842485683592032154e-7L, 2.846900380897707329917933005874691056564e-39L, UNDERFLOW_EXCEPTION_OK_FLOAT),
4279 TEST_c_c (casinh, -0x1p-23L, 0x1.fp-129L, -1.192092895507809676556842485683592032154e-7L, 2.846900380897707329917933005874691056564e-39L, UNDERFLOW_EXCEPTION_OK_FLOAT),
4280 TEST_c_c (casinh, 0x1p-23L, -0x1.fp-129L, 1.192092895507809676556842485683592032154e-7L, -2.846900380897707329917933005874691056564e-39L, UNDERFLOW_EXCEPTION_OK_FLOAT),
4281 TEST_c_c (casinh, -0x1p-23L, -0x1.fp-129L, -1.192092895507809676556842485683592032154e-7L, -2.846900380897707329917933005874691056564e-39L, UNDERFLOW_EXCEPTION_OK_FLOAT),
4282 TEST_c_c (casinh, 0.0L, 0x1p-23L, 0.0L, 1.192092895507815323443157514352519154304e-7L),
4283 TEST_c_c (casinh, 0.0L, -0x1p-23L, 0.0L, -1.192092895507815323443157514352519154304e-7L),
4284 TEST_c_c (casinh, -0.0L, 0x1p-23L, -0.0L, 1.192092895507815323443157514352519154304e-7L),
4285 TEST_c_c (casinh, -0.0L, -0x1p-23L, -0.0L, -1.192092895507815323443157514352519154304e-7L),
4286 TEST_c_c (casinh, 0x1p-23L, 0.0L, 1.192092895507809676556842485683592032154e-7L, 0.0L),
4287 TEST_c_c (casinh, -0x1p-23L, 0.0L, -1.192092895507809676556842485683592032154e-7L, 0.0L),
4288 TEST_c_c (casinh, 0x1p-23L, -0.0L, 1.192092895507809676556842485683592032154e-7L, -0.0L),
4289 TEST_c_c (casinh, -0x1p-23L, -0.0L, -1.192092895507809676556842485683592032154e-7L, -0.0L),
4290 TEST_c_c (casinh, 0x1.fp-129L, 0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4291 TEST_c_c (casinh, 0x1.fp-129L, -0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4292 TEST_c_c (casinh, -0x1.fp-129L, 0x1.fp-129L, -2.846900380897727558361783801085126250967e-39L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4293 TEST_c_c (casinh, -0x1.fp-129L, -0x1.fp-129L, -2.846900380897727558361783801085126250967e-39L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4294 #ifndef TEST_FLOAT
4295 TEST_c_c (casinh, 0x1p-52L, 0x0.fffffffffffff8p0L, 1.171456840272878582596796205397918831268e-8L, 1.570796307840326780080580569360500172043L),
4296 TEST_c_c (casinh, 0x1p-52L, -0x0.fffffffffffff8p0L, 1.171456840272878582596796205397918831268e-8L, -1.570796307840326780080580569360500172043L),
4297 TEST_c_c (casinh, -0x1p-52L, 0x0.fffffffffffff8p0L, -1.171456840272878582596796205397918831268e-8L, 1.570796307840326780080580569360500172043L),
4298 TEST_c_c (casinh, -0x1p-52L, -0x0.fffffffffffff8p0L, -1.171456840272878582596796205397918831268e-8L, -1.570796307840326780080580569360500172043L),
4299 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, 0x1p-52L, 8.813735870195429467279863907910458761820e-1L, 1.570092458683775146551022293016031474627e-16L),
4300 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, 0x1p-52L, -8.813735870195429467279863907910458761820e-1L, 1.570092458683775146551022293016031474627e-16L),
4301 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, -0x1p-52L, 8.813735870195429467279863907910458761820e-1L, -1.570092458683775146551022293016031474627e-16L),
4302 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, -0x1p-52L, -8.813735870195429467279863907910458761820e-1L, -1.570092458683775146551022293016031474627e-16L),
4303 TEST_c_c (casinh, 0x1.fp-1025L, 0x0.fffffffffffff8p0L, 3.616396521699973256461764099945789620604e-301L, 1.570796311893735425383665303776316016594L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4304 TEST_c_c (casinh, 0x1.fp-1025L, -0x0.fffffffffffff8p0L, 3.616396521699973256461764099945789620604e-301L, -1.570796311893735425383665303776316016594L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4305 TEST_c_c (casinh, -0x1.fp-1025L, 0x0.fffffffffffff8p0L, -3.616396521699973256461764099945789620604e-301L, 1.570796311893735425383665303776316016594L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4306 TEST_c_c (casinh, -0x1.fp-1025L, -0x0.fffffffffffff8p0L, -3.616396521699973256461764099945789620604e-301L, -1.570796311893735425383665303776316016594L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4307 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, 0x1.fp-1025L, 8.813735870195429467279863907910371604180e-1L, 3.810492908885321954658152505985270452320e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4308 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, 0x1.fp-1025L, -8.813735870195429467279863907910371604180e-1L, 3.810492908885321954658152505985270452320e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4309 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, -0x1.fp-1025L, 8.813735870195429467279863907910371604180e-1L, -3.810492908885321954658152505985270452320e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4310 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, -0x1.fp-1025L, -8.813735870195429467279863907910371604180e-1L, -3.810492908885321954658152505985270452320e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4311 TEST_c_c (casinh, 0.0L, 0x0.fffffffffffff8p0L, 0.0L, 1.570796311893735425383665303776316016594L),
4312 TEST_c_c (casinh, 0.0L, -0x0.fffffffffffff8p0L, 0.0L, -1.570796311893735425383665303776316016594L),
4313 TEST_c_c (casinh, -0.0L, 0x0.fffffffffffff8p0L, -0.0L, 1.570796311893735425383665303776316016594L),
4314 TEST_c_c (casinh, -0.0L, -0x0.fffffffffffff8p0L, -0.0L, -1.570796311893735425383665303776316016594L),
4315 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, 0.0L, 8.813735870195429467279863907910371604180e-1L, 0.0L),
4316 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, 0.0L, -8.813735870195429467279863907910371604180e-1L, 0.0L),
4317 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, -0.0L, 8.813735870195429467279863907910371604180e-1L, -0.0L),
4318 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, -0.0L, -8.813735870195429467279863907910371604180e-1L, -0.0L),
4319 #endif
4320 TEST_c_c (casinh, 0x1p-52L, 0.5L, 2.563950248511418570403591756798643804971e-16L, 5.235987755982988730771072305465648369889e-1L),
4321 TEST_c_c (casinh, 0x1p-52L, -0.5L, 2.563950248511418570403591756798643804971e-16L, -5.235987755982988730771072305465648369889e-1L),
4322 TEST_c_c (casinh, -0x1p-52L, 0.5L, -2.563950248511418570403591756798643804971e-16L, 5.235987755982988730771072305465648369889e-1L),
4323 TEST_c_c (casinh, -0x1p-52L, -0.5L, -2.563950248511418570403591756798643804971e-16L, -5.235987755982988730771072305465648369889e-1L),
4324 TEST_c_c (casinh, 0.5L, 0x1p-52L, 4.812118250596034474977589134243772428682e-1L, 1.986027322597818397661816253158024383707e-16L),
4325 TEST_c_c (casinh, -0.5L, 0x1p-52L, -4.812118250596034474977589134243772428682e-1L, 1.986027322597818397661816253158024383707e-16L),
4326 TEST_c_c (casinh, 0.5L, -0x1p-52L, 4.812118250596034474977589134243772428682e-1L, -1.986027322597818397661816253158024383707e-16L),
4327 TEST_c_c (casinh, -0.5L, -0x1p-52L, -4.812118250596034474977589134243772428682e-1L, -1.986027322597818397661816253158024383707e-16L),
4328 #ifndef TEST_FLOAT
4329 TEST_c_c (casinh, 0x1.fp-1025L, 0.5L, 6.222508863508420569166420770843207333493e-309L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
4330 TEST_c_c (casinh, 0x1.fp-1025L, -0.5L, 6.222508863508420569166420770843207333493e-309L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
4331 TEST_c_c (casinh, -0x1.fp-1025L, 0.5L, -6.222508863508420569166420770843207333493e-309L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
4332 TEST_c_c (casinh, -0x1.fp-1025L, -0.5L, -6.222508863508420569166420770843207333493e-309L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
4333 TEST_c_c (casinh, 0.5L, 0x1.fp-1025L, 4.812118250596034474977589134243684231352e-1L, 4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4334 TEST_c_c (casinh, -0.5L, 0x1.fp-1025L, -4.812118250596034474977589134243684231352e-1L, 4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4335 TEST_c_c (casinh, 0.5L, -0x1.fp-1025L, 4.812118250596034474977589134243684231352e-1L, -4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4336 TEST_c_c (casinh, -0.5L, -0x1.fp-1025L, -4.812118250596034474977589134243684231352e-1L, -4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4337 #endif
4338 TEST_c_c (casinh, 0x1p-52L, 0x1p-52L, 2.220446049250313080847263336181677117148e-16L, 2.220446049250313080847263336181604132852e-16L),
4339 TEST_c_c (casinh, 0x1p-52L, -0x1p-52L, 2.220446049250313080847263336181677117148e-16L, -2.220446049250313080847263336181604132852e-16L),
4340 TEST_c_c (casinh, -0x1p-52L, 0x1p-52L, -2.220446049250313080847263336181677117148e-16L, 2.220446049250313080847263336181604132852e-16L),
4341 TEST_c_c (casinh, -0x1p-52L, -0x1p-52L, -2.220446049250313080847263336181677117148e-16L, -2.220446049250313080847263336181604132852e-16L),
4342 #ifndef TEST_FLOAT
4343 TEST_c_c (casinh, 0x1.fp-1025L, 0x1p-52L, 5.388850751072128349671657362289548938458e-309L, 2.220446049250313080847263336181658871074e-16L, UNDERFLOW_EXCEPTION_DOUBLE),
4344 TEST_c_c (casinh, 0x1.fp-1025L, -0x1p-52L, 5.388850751072128349671657362289548938458e-309L, -2.220446049250313080847263336181658871074e-16L, UNDERFLOW_EXCEPTION_DOUBLE),
4345 TEST_c_c (casinh, -0x1.fp-1025L, 0x1p-52L, -5.388850751072128349671657362289548938458e-309L, 2.220446049250313080847263336181658871074e-16L, UNDERFLOW_EXCEPTION_DOUBLE),
4346 TEST_c_c (casinh, -0x1.fp-1025L, -0x1p-52L, -5.388850751072128349671657362289548938458e-309L, -2.220446049250313080847263336181658871074e-16L, UNDERFLOW_EXCEPTION_DOUBLE),
4347 /* Bug 15319: underflow exception may be missing. */
4348 TEST_c_c (casinh, 0x1p-52L, 0x1.fp-1025L, 2.220446049250313080847263336181622378926e-16L, 5.388850751072128349671657362289283247603e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4349 TEST_c_c (casinh, -0x1p-52L, 0x1.fp-1025L, -2.220446049250313080847263336181622378926e-16L, 5.388850751072128349671657362289283247603e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4350 TEST_c_c (casinh, 0x1p-52L, -0x1.fp-1025L, 2.220446049250313080847263336181622378926e-16L, -5.388850751072128349671657362289283247603e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4351 TEST_c_c (casinh, -0x1p-52L, -0x1.fp-1025L, -2.220446049250313080847263336181622378926e-16L, -5.388850751072128349671657362289283247603e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4352 #endif
4353 TEST_c_c (casinh, 0.0L, 0x1p-52L, 0.0L, 2.220446049250313080847263336181658871074e-16L),
4354 TEST_c_c (casinh, 0.0L, -0x1p-52L, 0.0L, -2.220446049250313080847263336181658871074e-16L),
4355 TEST_c_c (casinh, -0.0L, 0x1p-52L, -0.0L, 2.220446049250313080847263336181658871074e-16L),
4356 TEST_c_c (casinh, -0.0L, -0x1p-52L, -0.0L, -2.220446049250313080847263336181658871074e-16L),
4357 TEST_c_c (casinh, 0x1p-52L, 0.0L, 2.220446049250313080847263336181622378926e-16L, 0.0L),
4358 TEST_c_c (casinh, -0x1p-52L, 0.0L, -2.220446049250313080847263336181622378926e-16L, 0.0L),
4359 TEST_c_c (casinh, 0x1p-52L, -0.0L, 2.220446049250313080847263336181622378926e-16L, -0.0L),
4360 TEST_c_c (casinh, -0x1p-52L, -0.0L, -2.220446049250313080847263336181622378926e-16L, -0.0L),
4361 #ifndef TEST_FLOAT
4362 TEST_c_c (casinh, 0x1.fp-1025L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4363 TEST_c_c (casinh, 0x1.fp-1025L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4364 TEST_c_c (casinh, -0x1.fp-1025L, 0x1.fp-1025L, -5.388850751072128349671657362289416093031e-309L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4365 TEST_c_c (casinh, -0x1.fp-1025L, -0x1.fp-1025L, -5.388850751072128349671657362289416093031e-309L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4366 #endif
4367 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
4368 TEST_c_c (casinh, 0x1p-63L, 0x0.ffffffffffffffffp0L, 2.588578361325995866221775673638805081337e-10L, 1.570796326376055842114524927965556247908L),
4369 TEST_c_c (casinh, 0x1p-63L, -0x0.ffffffffffffffffp0L, 2.588578361325995866221775673638805081337e-10L, -1.570796326376055842114524927965556247908L),
4370 TEST_c_c (casinh, -0x1p-63L, 0x0.ffffffffffffffffp0L, -2.588578361325995866221775673638805081337e-10L, 1.570796326376055842114524927965556247908L),
4371 TEST_c_c (casinh, -0x1p-63L, -0x0.ffffffffffffffffp0L, -2.588578361325995866221775673638805081337e-10L, -1.570796326376055842114524927965556247908L),
4372 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, 0x1p-63L, 8.813735870195430251942769895627079569937e-1L, 7.666467083416870407402049869781566856442e-20L),
4373 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, 0x1p-63L, -8.813735870195430251942769895627079569937e-1L, 7.666467083416870407402049869781566856442e-20L),
4374 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, -0x1p-63L, 8.813735870195430251942769895627079569937e-1L, -7.666467083416870407402049869781566856442e-20L),
4375 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, -0x1p-63L, -8.813735870195430251942769895627079569937e-1L, -7.666467083416870407402049869781566856442e-20L),
4376 # if LDBL_MIN_EXP <= -16381
4377 TEST_c_c (casinh, 0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 2.472906068161537187835415298076415423459e-4923L, 1.570796326465624365239962068302568888898L),
4378 TEST_c_c (casinh, 0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 2.472906068161537187835415298076415423459e-4923L, -1.570796326465624365239962068302568888898L),
4379 TEST_c_c (casinh, -0x1.fp-16385L, 0x0.ffffffffffffffffp0L, -2.472906068161537187835415298076415423459e-4923L, 1.570796326465624365239962068302568888898L),
4380 TEST_c_c (casinh, -0x1.fp-16385L, -0x0.ffffffffffffffffp0L, -2.472906068161537187835415298076415423459e-4923L, -1.570796326465624365239962068302568888898L),
4381 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 8.813735870195430251942769895627079569917e-1L, 5.757683115456107044287327268904964422212e-4933L, UNDERFLOW_EXCEPTION),
4382 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, 0x1.fp-16385L, -8.813735870195430251942769895627079569917e-1L, 5.757683115456107044287327268904964422212e-4933L, UNDERFLOW_EXCEPTION),
4383 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 8.813735870195430251942769895627079569917e-1L, -5.757683115456107044287327268904964422212e-4933L, UNDERFLOW_EXCEPTION),
4384 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, -0x1.fp-16385L, -8.813735870195430251942769895627079569917e-1L, -5.757683115456107044287327268904964422212e-4933L, UNDERFLOW_EXCEPTION),
4385 # endif
4386 TEST_c_c (casinh, 0.0L, 0x0.ffffffffffffffffp0L, 0.0L, 1.570796326465624365239962068302568888898L),
4387 TEST_c_c (casinh, 0.0L, -0x0.ffffffffffffffffp0L, 0.0L, -1.570796326465624365239962068302568888898L),
4388 TEST_c_c (casinh, -0.0L, 0x0.ffffffffffffffffp0L, -0.0L, 1.570796326465624365239962068302568888898L),
4389 TEST_c_c (casinh, -0.0L, -0x0.ffffffffffffffffp0L, -0.0L, -1.570796326465624365239962068302568888898L),
4390 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, 0.0L, 8.813735870195430251942769895627079569917e-1L, 0.0L),
4391 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, 0.0L, -8.813735870195430251942769895627079569917e-1L, 0.0L),
4392 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, -0.0L, 8.813735870195430251942769895627079569917e-1L, -0.0L),
4393 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, -0.0L, -8.813735870195430251942769895627079569917e-1L, -0.0L),
4394 #endif
4395 TEST_c_c (casinh, 0x1p-63L, 0.5L, 1.251928832280966098829878787499365228659e-19L, 5.235987755982988730771072305465838140283e-1L),
4396 TEST_c_c (casinh, 0x1p-63L, -0.5L, 1.251928832280966098829878787499365228659e-19L, -5.235987755982988730771072305465838140283e-1L),
4397 TEST_c_c (casinh, -0x1p-63L, 0.5L, -1.251928832280966098829878787499365228659e-19L, 5.235987755982988730771072305465838140283e-1L),
4398 TEST_c_c (casinh, -0x1p-63L, -0.5L, -1.251928832280966098829878787499365228659e-19L, -5.235987755982988730771072305465838140283e-1L),
4399 TEST_c_c (casinh, 0.5L, 0x1p-63L, 4.812118250596034474977589134243684231373e-1L, 9.697399036122160144833087173623140436413e-20L),
4400 TEST_c_c (casinh, -0.5L, 0x1p-63L, -4.812118250596034474977589134243684231373e-1L, 9.697399036122160144833087173623140436413e-20L),
4401 TEST_c_c (casinh, 0.5L, -0x1p-63L, 4.812118250596034474977589134243684231373e-1L, -9.697399036122160144833087173623140436413e-20L),
4402 TEST_c_c (casinh, -0.5L, -0x1p-63L, -4.812118250596034474977589134243684231373e-1L, -9.697399036122160144833087173623140436413e-20L),
4403 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
4404 TEST_c_c (casinh, 0x1.fp-16385L, 0.5L, 9.402257155670418112159334875199821342890e-4933L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION),
4405 TEST_c_c (casinh, 0x1.fp-16385L, -0.5L, 9.402257155670418112159334875199821342890e-4933L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION),
4406 TEST_c_c (casinh, -0x1.fp-16385L, 0.5L, -9.402257155670418112159334875199821342890e-4933L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION),
4407 TEST_c_c (casinh, -0x1.fp-16385L, -0.5L, -9.402257155670418112159334875199821342890e-4933L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION),
4408 TEST_c_c (casinh, 0.5L, 0x1.fp-16385L, 4.812118250596034474977589134243684231352e-1L, 7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
4409 TEST_c_c (casinh, -0.5L, 0x1.fp-16385L, -4.812118250596034474977589134243684231352e-1L, 7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
4410 TEST_c_c (casinh, 0.5L, -0x1.fp-16385L, 4.812118250596034474977589134243684231352e-1L, -7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
4411 TEST_c_c (casinh, -0.5L, -0x1.fp-16385L, -4.812118250596034474977589134243684231352e-1L, -7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
4412 #endif
4413 TEST_c_c (casinh, 0x1p-63L, 0x1p-63L, 1.084202172485504434007452800869941711430e-19L, 1.084202172485504434007452800869941711422e-19L),
4414 TEST_c_c (casinh, 0x1p-63L, -0x1p-63L, 1.084202172485504434007452800869941711430e-19L, -1.084202172485504434007452800869941711422e-19L),
4415 TEST_c_c (casinh, -0x1p-63L, 0x1p-63L, -1.084202172485504434007452800869941711430e-19L, 1.084202172485504434007452800869941711422e-19L),
4416 TEST_c_c (casinh, -0x1p-63L, -0x1p-63L, -1.084202172485504434007452800869941711430e-19L, -1.084202172485504434007452800869941711422e-19L),
4417 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
4418 TEST_c_c (casinh, 0x1.fp-16385L, 0x1p-63L, 8.142593549724601460479922838826119584465e-4933L, 1.084202172485504434007452800869941711428e-19L, UNDERFLOW_EXCEPTION),
4419 TEST_c_c (casinh, 0x1.fp-16385L, -0x1p-63L, 8.142593549724601460479922838826119584465e-4933L, -1.084202172485504434007452800869941711428e-19L, UNDERFLOW_EXCEPTION),
4420 TEST_c_c (casinh, -0x1.fp-16385L, 0x1p-63L, -8.142593549724601460479922838826119584465e-4933L, 1.084202172485504434007452800869941711428e-19L, UNDERFLOW_EXCEPTION),
4421 TEST_c_c (casinh, -0x1.fp-16385L, -0x1p-63L, -8.142593549724601460479922838826119584465e-4933L, -1.084202172485504434007452800869941711428e-19L, UNDERFLOW_EXCEPTION),
4422 TEST_c_c (casinh, 0x1p-63L, 0x1.fp-16385L, 1.084202172485504434007452800869941711424e-19L, 8.142593549724601460479922838826119584369e-4933L, UNDERFLOW_EXCEPTION),
4423 TEST_c_c (casinh, -0x1p-63L, 0x1.fp-16385L, -1.084202172485504434007452800869941711424e-19L, 8.142593549724601460479922838826119584369e-4933L, UNDERFLOW_EXCEPTION),
4424 TEST_c_c (casinh, 0x1p-63L, -0x1.fp-16385L, 1.084202172485504434007452800869941711424e-19L, -8.142593549724601460479922838826119584369e-4933L, UNDERFLOW_EXCEPTION),
4425 TEST_c_c (casinh, -0x1p-63L, -0x1.fp-16385L, -1.084202172485504434007452800869941711424e-19L, -8.142593549724601460479922838826119584369e-4933L, UNDERFLOW_EXCEPTION),
4426 #endif
4427 TEST_c_c (casinh, 0.0L, 0x1p-63L, 0.0L, 1.084202172485504434007452800869941711428e-19L),
4428 TEST_c_c (casinh, 0.0L, -0x1p-63L, 0.0L, -1.084202172485504434007452800869941711428e-19L),
4429 TEST_c_c (casinh, -0.0L, 0x1p-63L, -0.0L, 1.084202172485504434007452800869941711428e-19L),
4430 TEST_c_c (casinh, -0.0L, -0x1p-63L, -0.0L, -1.084202172485504434007452800869941711428e-19L),
4431 TEST_c_c (casinh, 0x1p-63L, 0.0L, 1.084202172485504434007452800869941711424e-19L, 0.0L),
4432 TEST_c_c (casinh, -0x1p-63L, 0.0L, -1.084202172485504434007452800869941711424e-19L, 0.0L),
4433 TEST_c_c (casinh, 0x1p-63L, -0.0L, 1.084202172485504434007452800869941711424e-19L, -0.0L),
4434 TEST_c_c (casinh, -0x1p-63L, -0.0L, -1.084202172485504434007452800869941711424e-19L, -0.0L),
4435 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
4436 TEST_c_c (casinh, 0x1.fp-16385L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4437 TEST_c_c (casinh, 0x1.fp-16385L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4438 TEST_c_c (casinh, -0x1.fp-16385L, 0x1.fp-16385L, -8.142593549724601460479922838826119584417e-4933L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4439 TEST_c_c (casinh, -0x1.fp-16385L, -0x1.fp-16385L, -8.142593549724601460479922838826119584417e-4933L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4440 #endif
4441 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
4442 TEST_c_c (casinh, 0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 1.234330349600789959989661887846005659983e-16L, 1.570796326794896419512475791677915736035L),
4443 TEST_c_c (casinh, 0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 1.234330349600789959989661887846005659983e-16L, -1.570796326794896419512475791677915736035L),
4444 TEST_c_c (casinh, -0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, -1.234330349600789959989661887846005659983e-16L, 1.570796326794896419512475791677915736035L),
4445 TEST_c_c (casinh, -0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, -1.234330349600789959989661887846005659983e-16L, -1.570796326794896419512475791677915736035L),
4446 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 8.813735870195430252326093249797835932642e-1L, 1.743152798421049375791483240187377443526e-32L),
4447 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, -8.813735870195430252326093249797835932642e-1L, 1.743152798421049375791483240187377443526e-32L),
4448 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 8.813735870195430252326093249797835932642e-1L, -1.743152798421049375791483240187377443526e-32L),
4449 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, -8.813735870195430252326093249797835932642e-1L, -1.743152798421049375791483240187377443526e-32L),
4450 TEST_c_c (casinh, 0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 3.432186888910770473784103112009399360940e-293L, 1.570796326794896462222075823262245502760L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4451 TEST_c_c (casinh, 0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 3.432186888910770473784103112009399360940e-293L, -1.570796326794896462222075823262245502760L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4452 TEST_c_c (casinh, -0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, -3.432186888910770473784103112009399360940e-293L, 1.570796326794896462222075823262245502760L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4453 TEST_c_c (casinh, -0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, -3.432186888910770473784103112009399360940e-293L, -1.570796326794896462222075823262245502760L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4454 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 8.813735870195430252326093249797835932642e-1L, 3.810492908885321743133304375216641110205e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4455 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, -8.813735870195430252326093249797835932642e-1L, 3.810492908885321743133304375216641110205e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4456 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 8.813735870195430252326093249797835932642e-1L, -3.810492908885321743133304375216641110205e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4457 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, -8.813735870195430252326093249797835932642e-1L, -3.810492908885321743133304375216641110205e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4458 TEST_c_c (casinh, 0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 1.570796326794896462222075823262245502760L),
4459 TEST_c_c (casinh, 0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, -1.570796326794896462222075823262245502760L),
4460 TEST_c_c (casinh, -0.0L, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 1.570796326794896462222075823262245502760L),
4461 TEST_c_c (casinh, -0.0L, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, -1.570796326794896462222075823262245502760L),
4462 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 8.813735870195430252326093249797835932642e-1L, 0.0L),
4463 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, -8.813735870195430252326093249797835932642e-1L, 0.0L),
4464 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 8.813735870195430252326093249797835932642e-1L, -0.0L),
4465 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, -8.813735870195430252326093249797835932642e-1L, -0.0L),
4466 #endif
4467 TEST_c_c (casinh, 0x1p-105L, 0.5L, 2.846556599890768890940941645338546615370e-32L, 5.235987755982988730771072305465838140329e-1L),
4468 TEST_c_c (casinh, 0x1p-105L, -0.5L, 2.846556599890768890940941645338546615370e-32L, -5.235987755982988730771072305465838140329e-1L),
4469 TEST_c_c (casinh, -0x1p-105L, 0.5L, -2.846556599890768890940941645338546615370e-32L, 5.235987755982988730771072305465838140329e-1L),
4470 TEST_c_c (casinh, -0x1p-105L, -0.5L, -2.846556599890768890940941645338546615370e-32L, -5.235987755982988730771072305465838140329e-1L),
4471 TEST_c_c (casinh, 0.5L, 0x1p-105L, 4.812118250596034474977589134243684231352e-1L, 2.204933261082751447436996198490110245167e-32L),
4472 TEST_c_c (casinh, -0.5L, 0x1p-105L, -4.812118250596034474977589134243684231352e-1L, 2.204933261082751447436996198490110245167e-32L),
4473 TEST_c_c (casinh, 0.5L, -0x1p-105L, 4.812118250596034474977589134243684231352e-1L, -2.204933261082751447436996198490110245167e-32L),
4474 TEST_c_c (casinh, -0.5L, -0x1p-105L, -4.812118250596034474977589134243684231352e-1L, -2.204933261082751447436996198490110245167e-32L),
4475 TEST_c_c (casinh, 0x1p-105L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 2.465190328815661891911651766508706967729e-32L),
4476 TEST_c_c (casinh, 0x1p-105L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -2.465190328815661891911651766508706967729e-32L),
4477 TEST_c_c (casinh, -0x1p-105L, 0x1p-105L, -2.465190328815661891911651766508706967729e-32L, 2.465190328815661891911651766508706967729e-32L),
4478 TEST_c_c (casinh, -0x1p-105L, -0x1p-105L, -2.465190328815661891911651766508706967729e-32L, -2.465190328815661891911651766508706967729e-32L),
4479 #ifndef TEST_FLOAT
4480 TEST_c_c (casinh, 0x1.fp-1025L, 0x1p-105L, 5.388850751072128349671657362289416093031e-309L, 2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_DOUBLE),
4481 TEST_c_c (casinh, 0x1.fp-1025L, -0x1p-105L, 5.388850751072128349671657362289416093031e-309L, -2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_DOUBLE),
4482 TEST_c_c (casinh, -0x1.fp-1025L, 0x1p-105L, -5.388850751072128349671657362289416093031e-309L, 2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_DOUBLE),
4483 TEST_c_c (casinh, -0x1.fp-1025L, -0x1p-105L, -5.388850751072128349671657362289416093031e-309L, -2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_DOUBLE),
4484 /* Bug 15319: underflow exception may be missing. */
4485 TEST_c_c (casinh, 0x1p-105L, 0x1.fp-1025L, 2.465190328815661891911651766508706967729e-32L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4486 TEST_c_c (casinh, -0x1p-105L, 0x1.fp-1025L, -2.465190328815661891911651766508706967729e-32L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4487 TEST_c_c (casinh, 0x1p-105L, -0x1.fp-1025L, 2.465190328815661891911651766508706967729e-32L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4488 TEST_c_c (casinh, -0x1p-105L, -0x1.fp-1025L, -2.465190328815661891911651766508706967729e-32L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4489 #endif
4490 TEST_c_c (casinh, 0.0L, 0x1p-105L, 0.0L, 2.465190328815661891911651766508706967729e-32L),
4491 TEST_c_c (casinh, 0.0L, -0x1p-105L, 0.0L, -2.465190328815661891911651766508706967729e-32L),
4492 TEST_c_c (casinh, -0.0L, 0x1p-105L, -0.0L, 2.465190328815661891911651766508706967729e-32L),
4493 TEST_c_c (casinh, -0.0L, -0x1p-105L, -0.0L, -2.465190328815661891911651766508706967729e-32L),
4494 TEST_c_c (casinh, 0x1p-105L, 0.0L, 2.465190328815661891911651766508706967729e-32L, 0.0L),
4495 TEST_c_c (casinh, -0x1p-105L, 0.0L, -2.465190328815661891911651766508706967729e-32L, 0.0L),
4496 TEST_c_c (casinh, 0x1p-105L, -0.0L, 2.465190328815661891911651766508706967729e-32L, -0.0L),
4497 TEST_c_c (casinh, -0x1p-105L, -0.0L, -2.465190328815661891911651766508706967729e-32L, -0.0L),
4498 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
4499 TEST_c_c (casinh, 0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.091004200533850618345330909857103457781e-17L, 1.570796326794896601578502908312986698624L),
4500 TEST_c_c (casinh, 0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.091004200533850618345330909857103457781e-17L, -1.570796326794896601578502908312986698624L),
4501 TEST_c_c (casinh, -0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, -1.091004200533850618345330909857103457781e-17L, 1.570796326794896601578502908312986698624L),
4502 TEST_c_c (casinh, -0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, -1.091004200533850618345330909857103457781e-17L, -1.570796326794896601578502908312986698624L),
4503 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 8.813735870195430252326093249797922409363e-1L, 1.361838123766444824837096281396380300349e-34L),
4504 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, -8.813735870195430252326093249797922409363e-1L, 1.361838123766444824837096281396380300349e-34L),
4505 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 8.813735870195430252326093249797922409363e-1L, -1.361838123766444824837096281396380300349e-34L),
4506 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, -8.813735870195430252326093249797922409363e-1L, -1.361838123766444824837096281396380300349e-34L),
4507 TEST_c_c (casinh, 0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 5.867357004219059108790368268900490184505e-4916L, 1.570796326794896605353533883825294686803L),
4508 TEST_c_c (casinh, 0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 5.867357004219059108790368268900490184505e-4916L, -1.570796326794896605353533883825294686803L),
4509 TEST_c_c (casinh, -0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, -5.867357004219059108790368268900490184505e-4916L, 1.570796326794896605353533883825294686803L),
4510 TEST_c_c (casinh, -0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, -5.867357004219059108790368268900490184505e-4916L, -1.570796326794896605353533883825294686803L),
4511 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 8.813735870195430252326093249797922409363e-1L, 5.757683115456107044131264955348449231681e-4933L, UNDERFLOW_EXCEPTION),
4512 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, -8.813735870195430252326093249797922409363e-1L, 5.757683115456107044131264955348449231681e-4933L, UNDERFLOW_EXCEPTION),
4513 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 8.813735870195430252326093249797922409363e-1L, -5.757683115456107044131264955348449231681e-4933L, UNDERFLOW_EXCEPTION),
4514 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, -8.813735870195430252326093249797922409363e-1L, -5.757683115456107044131264955348449231681e-4933L, UNDERFLOW_EXCEPTION),
4515 TEST_c_c (casinh, 0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 1.570796326794896605353533883825294686803L),
4516 TEST_c_c (casinh, 0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, -1.570796326794896605353533883825294686803L),
4517 TEST_c_c (casinh, -0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 1.570796326794896605353533883825294686803L),
4518 TEST_c_c (casinh, -0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, -1.570796326794896605353533883825294686803L),
4519 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 8.813735870195430252326093249797922409363e-1L, 0.0L),
4520 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, -8.813735870195430252326093249797922409363e-1L, 0.0L),
4521 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 8.813735870195430252326093249797922409363e-1L, -0.0L),
4522 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, -8.813735870195430252326093249797922409363e-1L, -0.0L),
4523 #endif
4524 TEST_c_c (casinh, 0x1p-112L, 0.5L, 2.223872343664663196047610660420739543258e-34L, 5.235987755982988730771072305465838140329e-1L),
4525 TEST_c_c (casinh, 0x1p-112L, -0.5L, 2.223872343664663196047610660420739543258e-34L, -5.235987755982988730771072305465838140329e-1L),
4526 TEST_c_c (casinh, -0x1p-112L, 0.5L, -2.223872343664663196047610660420739543258e-34L, 5.235987755982988730771072305465838140329e-1L),
4527 TEST_c_c (casinh, -0x1p-112L, -0.5L, -2.223872343664663196047610660420739543258e-34L, -5.235987755982988730771072305465838140329e-1L),
4528 TEST_c_c (casinh, 0.5L, 0x1p-112L, 4.812118250596034474977589134243684231352e-1L, 1.722604110220899568310153280070398629037e-34L),
4529 TEST_c_c (casinh, -0.5L, 0x1p-112L, -4.812118250596034474977589134243684231352e-1L, 1.722604110220899568310153280070398629037e-34L),
4530 TEST_c_c (casinh, 0.5L, -0x1p-112L, 4.812118250596034474977589134243684231352e-1L, -1.722604110220899568310153280070398629037e-34L),
4531 TEST_c_c (casinh, -0.5L, -0x1p-112L, -4.812118250596034474977589134243684231352e-1L, -1.722604110220899568310153280070398629037e-34L),
4532 TEST_c_c (casinh, 0x1p-112L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.925929944387235853055977942584927318538e-34L),
4533 TEST_c_c (casinh, 0x1p-112L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.925929944387235853055977942584927318538e-34L),
4534 TEST_c_c (casinh, -0x1p-112L, 0x1p-112L, -1.925929944387235853055977942584927318538e-34L, 1.925929944387235853055977942584927318538e-34L),
4535 TEST_c_c (casinh, -0x1p-112L, -0x1p-112L, -1.925929944387235853055977942584927318538e-34L, -1.925929944387235853055977942584927318538e-34L),
4536 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
4537 TEST_c_c (casinh, 0x1.fp-16385L, 0x1p-112L, 8.142593549724601460479922838826119584417e-4933L, 1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4538 TEST_c_c (casinh, 0x1.fp-16385L, -0x1p-112L, 8.142593549724601460479922838826119584417e-4933L, -1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4539 TEST_c_c (casinh, -0x1.fp-16385L, 0x1p-112L, -8.142593549724601460479922838826119584417e-4933L, 1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4540 TEST_c_c (casinh, -0x1.fp-16385L, -0x1p-112L, -8.142593549724601460479922838826119584417e-4933L, -1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4541 TEST_c_c (casinh, 0x1p-112L, 0x1.fp-16385L, 1.925929944387235853055977942584927318538e-34L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4542 TEST_c_c (casinh, -0x1p-112L, 0x1.fp-16385L, -1.925929944387235853055977942584927318538e-34L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4543 TEST_c_c (casinh, 0x1p-112L, -0x1.fp-16385L, 1.925929944387235853055977942584927318538e-34L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4544 TEST_c_c (casinh, -0x1p-112L, -0x1.fp-16385L, -1.925929944387235853055977942584927318538e-34L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4545 #endif
4546 TEST_c_c (casinh, 0.0L, 0x1p-112L, 0.0L, 1.925929944387235853055977942584927318538e-34L),
4547 TEST_c_c (casinh, 0.0L, -0x1p-112L, 0.0L, -1.925929944387235853055977942584927318538e-34L),
4548 TEST_c_c (casinh, -0.0L, 0x1p-112L, -0.0L, 1.925929944387235853055977942584927318538e-34L),
4549 TEST_c_c (casinh, -0.0L, -0x1p-112L, -0.0L, -1.925929944387235853055977942584927318538e-34L),
4550 TEST_c_c (casinh, 0x1p-112L, 0.0L, 1.925929944387235853055977942584927318538e-34L, 0.0L),
4551 TEST_c_c (casinh, -0x1p-112L, 0.0L, -1.925929944387235853055977942584927318538e-34L, 0.0L),
4552 TEST_c_c (casinh, 0x1p-112L, -0.0L, 1.925929944387235853055977942584927318538e-34L, -0.0L),
4553 TEST_c_c (casinh, -0x1p-112L, -0.0L, -1.925929944387235853055977942584927318538e-34L, -0.0L),
4554
4555 TEST_c_c (casinh, 0.75L, 1.25L, 1.03171853444778027336364058631006594L, 0.911738290968487636358489564316731207L),
4556 TEST_c_c (casinh, -2, -3, -1.9686379257930962917886650952454982L, -0.96465850440760279204541105949953237L),
4557 END_DATA (casinh)
4558 };
4559
4560 static void
4561 casinh_test (void)
4562 {
4563 errno = 0;
4564 FUNC(casinh) (BUILD_COMPLEX (0.7L, 1.2L));
4565 if (errno == ENOSYS)
4566 /* Function not implemented. */
4567 return;
4568
4569 START (casinh);
4570 RUN_TEST_LOOP_c_c (casinh, casinh_test_data, );
4571 END (casinh, complex);
4572 }
4573
4574
4575 static const struct test_c_c_data catan_test_data[] =
4576 {
4577 START_DATA (catan),
4578 TEST_c_c (catan, 0, 0, 0, 0),
4579 TEST_c_c (catan, minus_zero, 0, minus_zero, 0),
4580 TEST_c_c (catan, 0, minus_zero, 0, minus_zero),
4581 TEST_c_c (catan, minus_zero, minus_zero, minus_zero, minus_zero),
4582
4583 TEST_c_c (catan, 1.0L, plus_zero, M_PI_4l, plus_zero),
4584 TEST_c_c (catan, 1.0L, minus_zero, M_PI_4l, minus_zero),
4585 TEST_c_c (catan, -1.0L, plus_zero, -M_PI_4l, plus_zero),
4586 TEST_c_c (catan, -1.0L, minus_zero, -M_PI_4l, minus_zero),
4587 TEST_c_c (catan, plus_zero, 1.0L, plus_zero, plus_infty, DIVIDE_BY_ZERO_EXCEPTION),
4588 TEST_c_c (catan, minus_zero, 1.0L, minus_zero, plus_infty, DIVIDE_BY_ZERO_EXCEPTION),
4589 TEST_c_c (catan, plus_zero, -1.0L, plus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
4590 TEST_c_c (catan, minus_zero, -1.0L, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
4591
4592 TEST_c_c (catan, plus_infty, plus_infty, M_PI_2l, 0),
4593 TEST_c_c (catan, plus_infty, minus_infty, M_PI_2l, minus_zero),
4594 TEST_c_c (catan, minus_infty, plus_infty, -M_PI_2l, 0),
4595 TEST_c_c (catan, minus_infty, minus_infty, -M_PI_2l, minus_zero),
4596
4597
4598 TEST_c_c (catan, plus_infty, -10.0, M_PI_2l, minus_zero),
4599 TEST_c_c (catan, minus_infty, -10.0, -M_PI_2l, minus_zero),
4600 TEST_c_c (catan, plus_infty, minus_zero, M_PI_2l, minus_zero),
4601 TEST_c_c (catan, minus_infty, minus_zero, -M_PI_2l, minus_zero),
4602 TEST_c_c (catan, plus_infty, 0.0, M_PI_2l, 0),
4603 TEST_c_c (catan, minus_infty, 0.0, -M_PI_2l, 0),
4604 TEST_c_c (catan, plus_infty, 0.1L, M_PI_2l, 0),
4605 TEST_c_c (catan, minus_infty, 0.1L, -M_PI_2l, 0),
4606
4607 TEST_c_c (catan, 0.0, minus_infty, M_PI_2l, minus_zero),
4608 TEST_c_c (catan, minus_zero, minus_infty, -M_PI_2l, minus_zero),
4609 TEST_c_c (catan, 100.0, minus_infty, M_PI_2l, minus_zero),
4610 TEST_c_c (catan, -100.0, minus_infty, -M_PI_2l, minus_zero),
4611
4612 TEST_c_c (catan, 0.0, plus_infty, M_PI_2l, 0),
4613 TEST_c_c (catan, minus_zero, plus_infty, -M_PI_2l, 0),
4614 TEST_c_c (catan, 0.5, plus_infty, M_PI_2l, 0),
4615 TEST_c_c (catan, -0.5, plus_infty, -M_PI_2l, 0),
4616
4617 TEST_c_c (catan, qnan_value, 0.0, qnan_value, 0),
4618 TEST_c_c (catan, qnan_value, minus_zero, qnan_value, minus_zero),
4619
4620 TEST_c_c (catan, qnan_value, plus_infty, qnan_value, 0),
4621 TEST_c_c (catan, qnan_value, minus_infty, qnan_value, minus_zero),
4622
4623 TEST_c_c (catan, 0.0, qnan_value, qnan_value, qnan_value),
4624 TEST_c_c (catan, minus_zero, qnan_value, qnan_value, qnan_value),
4625
4626 TEST_c_c (catan, plus_infty, qnan_value, M_PI_2l, 0, IGNORE_ZERO_INF_SIGN),
4627 TEST_c_c (catan, minus_infty, qnan_value, -M_PI_2l, 0, IGNORE_ZERO_INF_SIGN),
4628
4629 TEST_c_c (catan, qnan_value, 10.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4630 TEST_c_c (catan, qnan_value, -10.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4631
4632 TEST_c_c (catan, 0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4633 TEST_c_c (catan, -0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4634
4635 TEST_c_c (catan, qnan_value, qnan_value, qnan_value, qnan_value),
4636
4637 TEST_c_c (catan, 0x1p50L, 0.0L, 1.570796326794895731052901991514519103193L, 0.0L),
4638 TEST_c_c (catan, 0x1p50L, -0.0L, 1.570796326794895731052901991514519103193L, -0.0L),
4639 TEST_c_c (catan, -0x1p50L, 0.0L, -1.570796326794895731052901991514519103193L, 0.0L),
4640 TEST_c_c (catan, -0x1p50L, -0.0L, -1.570796326794895731052901991514519103193L, -0.0L),
4641 TEST_c_c (catan, 0.0L, 0x1p50L, 1.570796326794896619231321691639751442099L, 8.881784197001252323389053344728897997441e-16L),
4642 TEST_c_c (catan, -0.0L, 0x1p50L, -1.570796326794896619231321691639751442099L, 8.881784197001252323389053344728897997441e-16L),
4643 TEST_c_c (catan, 0.0L, -0x1p50L, 1.570796326794896619231321691639751442099L, -8.881784197001252323389053344728897997441e-16L),
4644 TEST_c_c (catan, -0.0L, -0x1p50L, -1.570796326794896619231321691639751442099L, -8.881784197001252323389053344728897997441e-16L),
4645 #ifndef TEST_FLOAT
4646 TEST_c_c (catan, 0x1p500L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4647 TEST_c_c (catan, 0x1p500L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4648 TEST_c_c (catan, -0x1p500L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4649 TEST_c_c (catan, -0x1p500L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4650 TEST_c_c (catan, 0.0L, 0x1p500L, 1.570796326794896619231321691639751442099L, 3.054936363499604682051979393213617699789e-151L),
4651 TEST_c_c (catan, -0.0L, 0x1p500L, -1.570796326794896619231321691639751442099L, 3.054936363499604682051979393213617699789e-151L),
4652 TEST_c_c (catan, 0.0L, -0x1p500L, 1.570796326794896619231321691639751442099L, -3.054936363499604682051979393213617699789e-151L),
4653 TEST_c_c (catan, -0.0L, -0x1p500L, -1.570796326794896619231321691639751442099L, -3.054936363499604682051979393213617699789e-151L),
4654 #endif
4655 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
4656 TEST_c_c (catan, 0x1p5000L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4657 TEST_c_c (catan, 0x1p5000L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4658 TEST_c_c (catan, -0x1p5000L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4659 TEST_c_c (catan, -0x1p5000L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4660 TEST_c_c (catan, 0.0L, 0x1p5000L, 1.570796326794896619231321691639751442099L, 7.079811261048172892385615158694057552948e-1506L),
4661 TEST_c_c (catan, -0.0L, 0x1p5000L, -1.570796326794896619231321691639751442099L, 7.079811261048172892385615158694057552948e-1506L),
4662 TEST_c_c (catan, 0.0L, -0x1p5000L, 1.570796326794896619231321691639751442099L, -7.079811261048172892385615158694057552948e-1506L),
4663 TEST_c_c (catan, -0.0L, -0x1p5000L, -1.570796326794896619231321691639751442099L, -7.079811261048172892385615158694057552948e-1506L),
4664 #endif
4665 TEST_c_c (catan, 0x1p63L, 0.5L, 1.570796326794896619122901474391200998698L, 5.877471754111437539843682686111228389007e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4666 TEST_c_c (catan, 0x1p63L, -0.5L, 1.570796326794896619122901474391200998698L, -5.877471754111437539843682686111228389007e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4667 TEST_c_c (catan, -0x1p63L, 0.5L, -1.570796326794896619122901474391200998698L, 5.877471754111437539843682686111228389007e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4668 TEST_c_c (catan, -0x1p63L, -0.5L, -1.570796326794896619122901474391200998698L, -5.877471754111437539843682686111228389007e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4669 TEST_c_c (catan, 0.5L, 0x1p63L, 1.570796326794896619231321691639751442093L, 1.084202172485504434007452800869941711427e-19L),
4670 TEST_c_c (catan, -0.5L, 0x1p63L, -1.570796326794896619231321691639751442093L, 1.084202172485504434007452800869941711427e-19L),
4671 TEST_c_c (catan, 0.5L, -0x1p63L, 1.570796326794896619231321691639751442093L, -1.084202172485504434007452800869941711427e-19L),
4672 TEST_c_c (catan, -0.5L, -0x1p63L, -1.570796326794896619231321691639751442093L, -1.084202172485504434007452800869941711427e-19L),
4673 #ifndef TEST_FLOAT
4674 TEST_c_c (catan, 0x1p511L, 0.5L, 1.570796326794896619231321691639751442099L, 1.112536929253600691545116358666202032110e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4675 TEST_c_c (catan, 0x1p511L, -0.5L, 1.570796326794896619231321691639751442099L, -1.112536929253600691545116358666202032110e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4676 TEST_c_c (catan, -0x1p511L, 0.5L, -1.570796326794896619231321691639751442099L, 1.112536929253600691545116358666202032110e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4677 TEST_c_c (catan, -0x1p511L, -0.5L, -1.570796326794896619231321691639751442099L, -1.112536929253600691545116358666202032110e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4678 TEST_c_c (catan, 0.5L, 0x1p511L, 1.570796326794896619231321691639751442099L, 1.491668146240041348658193063092586767475e-154L),
4679 TEST_c_c (catan, -0.5L, 0x1p511L, -1.570796326794896619231321691639751442099L, 1.491668146240041348658193063092586767475e-154L),
4680 TEST_c_c (catan, 0.5L, -0x1p511L, 1.570796326794896619231321691639751442099L, -1.491668146240041348658193063092586767475e-154L),
4681 TEST_c_c (catan, -0.5L, -0x1p511L, -1.570796326794896619231321691639751442099L, -1.491668146240041348658193063092586767475e-154L),
4682 #endif
4683 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
4684 TEST_c_c (catan, 0x1p8191L, 0.5L, 1.570796326794896619231321691639751442099L, 1.681051571556046753131338908660876301299e-4932L, UNDERFLOW_EXCEPTION),
4685 TEST_c_c (catan, 0x1p8191L, -0.5L, 1.570796326794896619231321691639751442099L, -1.681051571556046753131338908660876301299e-4932L, UNDERFLOW_EXCEPTION),
4686 TEST_c_c (catan, -0x1p8191L, 0.5L, -1.570796326794896619231321691639751442099L, 1.681051571556046753131338908660876301299e-4932L, UNDERFLOW_EXCEPTION),
4687 TEST_c_c (catan, -0x1p8191L, -0.5L, -1.570796326794896619231321691639751442099L, -1.681051571556046753131338908660876301299e-4932L, UNDERFLOW_EXCEPTION),
4688 TEST_c_c (catan, 0.5L, 0x1p8191L, 1.570796326794896619231321691639751442099L, 1.833603867554847165621412392048483165956e-2466L),
4689 TEST_c_c (catan, -0.5L, 0x1p8191L, -1.570796326794896619231321691639751442099L, 1.833603867554847165621412392048483165956e-2466L),
4690 TEST_c_c (catan, 0.5L, -0x1p8191L, 1.570796326794896619231321691639751442099L, -1.833603867554847165621412392048483165956e-2466L),
4691 TEST_c_c (catan, -0.5L, -0x1p8191L, -1.570796326794896619231321691639751442099L, -1.833603867554847165621412392048483165956e-2466L),
4692 #endif
4693 TEST_c_c (catan, 0x1p100L, 0.0L, 1.570796326794896619231321691638962581193L, 0.0L),
4694 TEST_c_c (catan, 0x1p100L, -0.0L, 1.570796326794896619231321691638962581193L, -0.0L),
4695 TEST_c_c (catan, -0x1p100L, 0.0L, -1.570796326794896619231321691638962581193L, 0.0L),
4696 TEST_c_c (catan, -0x1p100L, -0.0L, -1.570796326794896619231321691638962581193L, -0.0L),
4697 TEST_c_c (catan, 0.0L, 0x1p100L, 1.570796326794896619231321691639751442099L, 7.888609052210118054117285652827862296732e-31L),
4698 TEST_c_c (catan, -0.0L, 0x1p100L, -1.570796326794896619231321691639751442099L, 7.888609052210118054117285652827862296732e-31L),
4699 TEST_c_c (catan, 0.0L, -0x1p100L, 1.570796326794896619231321691639751442099L, -7.888609052210118054117285652827862296732e-31L),
4700 TEST_c_c (catan, -0.0L, -0x1p100L, -1.570796326794896619231321691639751442099L, -7.888609052210118054117285652827862296732e-31L),
4701 TEST_c_c (catan, 0x1.fp127L, 0.0L, 1.570796326794896619231321691639751442096L, 0.0L),
4702 TEST_c_c (catan, 0x1.fp127L, -0.0L, 1.570796326794896619231321691639751442096L, -0.0L),
4703 TEST_c_c (catan, -0x1.fp127L, 0.0L, -1.570796326794896619231321691639751442096L, 0.0L),
4704 TEST_c_c (catan, -0x1.fp127L, -0.0L, -1.570796326794896619231321691639751442096L, -0.0L),
4705 TEST_c_c (catan, 0.0L, 0x1.fp127L, 1.570796326794896619231321691639751442099L, 3.033533808573645181854803967025150136306e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4706 TEST_c_c (catan, -0.0L, 0x1.fp127L, -1.570796326794896619231321691639751442099L, 3.033533808573645181854803967025150136306e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4707 TEST_c_c (catan, 0.0L, -0x1.fp127L, 1.570796326794896619231321691639751442099L, -3.033533808573645181854803967025150136306e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4708 TEST_c_c (catan, -0.0L, -0x1.fp127L, -1.570796326794896619231321691639751442099L, -3.033533808573645181854803967025150136306e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4709 TEST_c_c (catan, 0x1.fp127L, 0x1.fp127L, 1.570796326794896619231321691639751442097L, 1.516766904286822590927401983512575068153e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4710 TEST_c_c (catan, 0x1.fp127L, -0x1.fp127L, 1.570796326794896619231321691639751442097L, -1.516766904286822590927401983512575068153e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4711 TEST_c_c (catan, -0x1.fp127L, 0x1.fp127L, -1.570796326794896619231321691639751442097L, 1.516766904286822590927401983512575068153e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4712 TEST_c_c (catan, -0x1.fp127L, -0x1.fp127L, -1.570796326794896619231321691639751442097L, -1.516766904286822590927401983512575068153e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4713 #ifndef TEST_FLOAT
4714 TEST_c_c (catan, 0x1p900L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4715 TEST_c_c (catan, 0x1p900L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4716 TEST_c_c (catan, -0x1p900L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4717 TEST_c_c (catan, -0x1p900L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4718 TEST_c_c (catan, 0.0L, 0x1p900L, 1.570796326794896619231321691639751442099L, 1.183052186166774710972751597518026531652e-271L),
4719 TEST_c_c (catan, -0.0L, 0x1p900L, -1.570796326794896619231321691639751442099L, 1.183052186166774710972751597518026531652e-271L),
4720 TEST_c_c (catan, 0.0L, -0x1p900L, 1.570796326794896619231321691639751442099L, -1.183052186166774710972751597518026531652e-271L),
4721 TEST_c_c (catan, -0.0L, -0x1p900L, -1.570796326794896619231321691639751442099L, -1.183052186166774710972751597518026531652e-271L),
4722 TEST_c_c (catan, 0x1.fp1023L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4723 TEST_c_c (catan, 0x1.fp1023L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4724 TEST_c_c (catan, -0x1.fp1023L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4725 TEST_c_c (catan, -0x1.fp1023L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4726 TEST_c_c (catan, 0.0L, 0x1.fp1023L, 1.570796326794896619231321691639751442099L, 5.742126086470197117652213464083623391533e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4727 TEST_c_c (catan, -0.0L, 0x1.fp1023L, -1.570796326794896619231321691639751442099L, 5.742126086470197117652213464083623391533e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4728 TEST_c_c (catan, 0.0L, -0x1.fp1023L, 1.570796326794896619231321691639751442099L, -5.742126086470197117652213464083623391533e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4729 TEST_c_c (catan, -0.0L, -0x1.fp1023L, -1.570796326794896619231321691639751442099L, -5.742126086470197117652213464083623391533e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4730 TEST_c_c (catan, 0x1.fp1023L, 0x1.fp1023L, 1.570796326794896619231321691639751442099L, 2.871063043235098558826106732041811695767e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4731 TEST_c_c (catan, 0x1.fp1023L, -0x1.fp1023L, 1.570796326794896619231321691639751442099L, -2.871063043235098558826106732041811695767e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4732 TEST_c_c (catan, -0x1.fp1023L, 0x1.fp1023L, -1.570796326794896619231321691639751442099L, 2.871063043235098558826106732041811695767e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4733 TEST_c_c (catan, -0x1.fp1023L, -0x1.fp1023L, -1.570796326794896619231321691639751442099L, -2.871063043235098558826106732041811695767e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4734 #endif
4735 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
4736 TEST_c_c (catan, 0x1p10000L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4737 TEST_c_c (catan, 0x1p10000L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4738 TEST_c_c (catan, -0x1p10000L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4739 TEST_c_c (catan, -0x1p10000L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4740 TEST_c_c (catan, 0.0L, 0x1p10000L, 1.570796326794896619231321691639751442099L, 5.012372749206452009297555933742977749322e-3011L),
4741 TEST_c_c (catan, -0.0L, 0x1p10000L, -1.570796326794896619231321691639751442099L, 5.012372749206452009297555933742977749322e-3011L),
4742 TEST_c_c (catan, 0.0L, -0x1p10000L, 1.570796326794896619231321691639751442099L, -5.012372749206452009297555933742977749322e-3011L),
4743 TEST_c_c (catan, -0.0L, -0x1p10000L, -1.570796326794896619231321691639751442099L, -5.012372749206452009297555933742977749322e-3011L),
4744 TEST_c_c (catan, 0x1.fp16383L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4745 TEST_c_c (catan, 0x1.fp16383L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4746 TEST_c_c (catan, -0x1.fp16383L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4747 TEST_c_c (catan, -0x1.fp16383L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4748 TEST_c_c (catan, 0.0L, 0x1.fp16383L, 1.570796326794896619231321691639751442099L, 8.676395208031209048419813722120651877672e-4933L, UNDERFLOW_EXCEPTION),
4749 TEST_c_c (catan, -0.0L, 0x1.fp16383L, -1.570796326794896619231321691639751442099L, 8.676395208031209048419813722120651877672e-4933L, UNDERFLOW_EXCEPTION),
4750 TEST_c_c (catan, 0.0L, -0x1.fp16383L, 1.570796326794896619231321691639751442099L, -8.676395208031209048419813722120651877672e-4933L, UNDERFLOW_EXCEPTION),
4751 TEST_c_c (catan, -0.0L, -0x1.fp16383L, -1.570796326794896619231321691639751442099L, -8.676395208031209048419813722120651877672e-4933L, UNDERFLOW_EXCEPTION),
4752 TEST_c_c (catan, 0x1.fp16383L, 0x1.fp16383L, 1.570796326794896619231321691639751442099L, 4.338197604015604524209906861060325938836e-4933L, UNDERFLOW_EXCEPTION),
4753 TEST_c_c (catan, 0x1.fp16383L, -0x1.fp16383L, 1.570796326794896619231321691639751442099L, -4.338197604015604524209906861060325938836e-4933L, UNDERFLOW_EXCEPTION),
4754 TEST_c_c (catan, -0x1.fp16383L, 0x1.fp16383L, -1.570796326794896619231321691639751442099L, 4.338197604015604524209906861060325938836e-4933L, UNDERFLOW_EXCEPTION),
4755 TEST_c_c (catan, -0x1.fp16383L, -0x1.fp16383L, -1.570796326794896619231321691639751442099L, -4.338197604015604524209906861060325938836e-4933L, UNDERFLOW_EXCEPTION),
4756 #endif
4757 TEST_c_c (catan, 0x1p-13L, 1.0L, 7.854286809755354140031716771044626356262e-1L, 4.852030264850939738801379894163661227127L),
4758 TEST_c_c (catan, 0x1p-13L, -1.0L, 7.854286809755354140031716771044626356262e-1L, -4.852030264850939738801379894163661227127L),
4759 TEST_c_c (catan, -0x1p-13L, 1.0L, -7.854286809755354140031716771044626356262e-1L, 4.852030264850939738801379894163661227127L),
4760 TEST_c_c (catan, -0x1p-13L, -1.0L, -7.854286809755354140031716771044626356262e-1L, -4.852030264850939738801379894163661227127L),
4761 TEST_c_c (catan, 1.0L, 0x1p-13L, 7.853981671227386080775748393881580082970e-1L, 6.103515609841754902688560615027452023669e-5L),
4762 TEST_c_c (catan, -1.0L, 0x1p-13L, -7.853981671227386080775748393881580082970e-1L, 6.103515609841754902688560615027452023669e-5L),
4763 TEST_c_c (catan, 1.0L, -0x1p-13L, 7.853981671227386080775748393881580082970e-1L, -6.103515609841754902688560615027452023669e-5L),
4764 TEST_c_c (catan, -1.0L, -0x1p-13L, -7.853981671227386080775748393881580082970e-1L, -6.103515609841754902688560615027452023669e-5L),
4765 TEST_c_c (catan, 0x1p-27L, 1.0L, 7.853981652600934588466178684534110069553e-1L, 9.704060527839234335310696652368086117807L),
4766 TEST_c_c (catan, 0x1p-27L, -1.0L, 7.853981652600934588466178684534110069553e-1L, -9.704060527839234335310696652368086117807L),
4767 TEST_c_c (catan, -0x1p-27L, 1.0L, -7.853981652600934588466178684534110069553e-1L, 9.704060527839234335310696652368086117807L),
4768 TEST_c_c (catan, -0x1p-27L, -1.0L, -7.853981652600934588466178684534110069553e-1L, -9.704060527839234335310696652368086117807L),
4769 TEST_c_c (catan, 1.0L, 0x1p-27L, 7.853981633974483234934486536343324763447e-1L, 3.725290298461914028034141143623846306386e-9L),
4770 TEST_c_c (catan, -1.0L, 0x1p-27L, -7.853981633974483234934486536343324763447e-1L, 3.725290298461914028034141143623846306386e-9L),
4771 TEST_c_c (catan, 1.0L, -0x1p-27L, 7.853981633974483234934486536343324763447e-1L, -3.725290298461914028034141143623846306386e-9L),
4772 TEST_c_c (catan, -1.0L, -0x1p-27L, -7.853981633974483234934486536343324763447e-1L, -3.725290298461914028034141143623846306386e-9L),
4773 TEST_c_c (catan, 0x1p-33L, 1.0L, 7.853981634265521400723945494331241018449e-1L, 1.178350206951907026009379309773625595762e1L),
4774 TEST_c_c (catan, 0x1p-33L, -1.0L, 7.853981634265521400723945494331241018449e-1L, -1.178350206951907026009379309773625595762e1L),
4775 TEST_c_c (catan, -0x1p-33L, 1.0L, -7.853981634265521400723945494331241018449e-1L, 1.178350206951907026009379309773625595762e1L),
4776 TEST_c_c (catan, -0x1p-33L, -1.0L, -7.853981634265521400723945494331241018449e-1L, -1.178350206951907026009379309773625595762e1L),
4777 TEST_c_c (catan, 1.0L, 0x1p-33L, 7.853981633974483096190489776088929224056e-1L, 5.820766091346740722643102318246316469910e-11L),
4778 TEST_c_c (catan, -1.0L, 0x1p-33L, -7.853981633974483096190489776088929224056e-1L, 5.820766091346740722643102318246316469910e-11L),
4779 TEST_c_c (catan, 1.0L, -0x1p-33L, 7.853981633974483096190489776088929224056e-1L, -5.820766091346740722643102318246316469910e-11L),
4780 TEST_c_c (catan, -1.0L, -0x1p-33L, -7.853981633974483096190489776088929224056e-1L, -5.820766091346740722643102318246316469910e-11L),
4781 TEST_c_c (catan, 0x1p-54L, 1.0L, 7.853981633974483234934486536343324763447e-1L, 1.906154746539849600897388334009985581467e1L),
4782 TEST_c_c (catan, 0x1p-54L, -1.0L, 7.853981633974483234934486536343324763447e-1L, -1.906154746539849600897388334009985581467e1L),
4783 TEST_c_c (catan, -0x1p-54L, 1.0L, -7.853981633974483234934486536343324763447e-1L, 1.906154746539849600897388334009985581467e1L),
4784 TEST_c_c (catan, -0x1p-54L, -1.0L, -7.853981633974483234934486536343324763447e-1L, -1.906154746539849600897388334009985581467e1L),
4785 TEST_c_c (catan, 1.0L, 0x1p-54L, 7.853981633974483096156608458198764914213e-1L, 2.775557561562891351059079170227049355775e-17L),
4786 TEST_c_c (catan, -1.0L, 0x1p-54L, -7.853981633974483096156608458198764914213e-1L, 2.775557561562891351059079170227049355775e-17L),
4787 TEST_c_c (catan, 1.0L, -0x1p-54L, 7.853981633974483096156608458198764914213e-1L, -2.775557561562891351059079170227049355775e-17L),
4788 TEST_c_c (catan, -1.0L, -0x1p-54L, -7.853981633974483096156608458198764914213e-1L, -2.775557561562891351059079170227049355775e-17L),
4789 TEST_c_c (catan, 0x1p-57L, 1.0L, 7.853981633974483113503843217966828154612e-1L, 2.010126823623841397309973152228712047720e1L),
4790 TEST_c_c (catan, 0x1p-57L, -1.0L, 7.853981633974483113503843217966828154612e-1L, -2.010126823623841397309973152228712047720e1L),
4791 TEST_c_c (catan, -0x1p-57L, 1.0L, -7.853981633974483113503843217966828154612e-1L, 2.010126823623841397309973152228712047720e1L),
4792 TEST_c_c (catan, -0x1p-57L, -1.0L, -7.853981633974483113503843217966828154612e-1L, -2.010126823623841397309973152228712047720e1L),
4793 TEST_c_c (catan, 1.0L, 0x1p-57L, 7.853981633974483096156608458198757330864e-1L, 3.469446951953614188823848962783813448721e-18L),
4794 TEST_c_c (catan, -1.0L, 0x1p-57L, -7.853981633974483096156608458198757330864e-1L, 3.469446951953614188823848962783813448721e-18L),
4795 TEST_c_c (catan, 1.0L, -0x1p-57L, 7.853981633974483096156608458198757330864e-1L, -3.469446951953614188823848962783813448721e-18L),
4796 TEST_c_c (catan, -1.0L, -0x1p-57L, -7.853981633974483096156608458198757330864e-1L, -3.469446951953614188823848962783813448721e-18L),
4797 TEST_c_c (catan, 0x1p-13L, 0x1.000002p0L, 7.859169620684960844300240092596908675974e-1L, 4.852030056234795712498957387213592193975L),
4798 TEST_c_c (catan, 0x1p-13L, -0x1.000002p0L, 7.859169620684960844300240092596908675974e-1L, -4.852030056234795712498957387213592193975L),
4799 TEST_c_c (catan, -0x1p-13L, 0x1.000002p0L, -7.859169620684960844300240092596908675974e-1L, 4.852030056234795712498957387213592193975L),
4800 TEST_c_c (catan, -0x1p-13L, -0x1.000002p0L, -7.859169620684960844300240092596908675974e-1L, -4.852030056234795712498957387213592193975L),
4801 TEST_c_c (catan, 0x1.000002p0L, 0x1p-13L, 7.853982267273793866654490522673596014524e-1L, 6.103514882246036852433556327261700380577e-5L),
4802 TEST_c_c (catan, -0x1.000002p0L, 0x1p-13L, -7.853982267273793866654490522673596014524e-1L, 6.103514882246036852433556327261700380577e-5L),
4803 TEST_c_c (catan, 0x1.000002p0L, -0x1p-13L, 7.853982267273793866654490522673596014524e-1L, -6.103514882246036852433556327261700380577e-5L),
4804 TEST_c_c (catan, -0x1.000002p0L, -0x1p-13L, -7.853982267273793866654490522673596014524e-1L, -6.103514882246036852433556327261700380577e-5L),
4805 TEST_c_c (catan, 0x1p-13L, 0x0.ffffffp0L, 7.851845403708474595909269086711426246675e-1L, 4.852030190345140708455871037447717761868L),
4806 TEST_c_c (catan, 0x1p-13L, -0x0.ffffffp0L, 7.851845403708474595909269086711426246675e-1L, -4.852030190345140708455871037447717761868L),
4807 TEST_c_c (catan, -0x1p-13L, 0x0.ffffffp0L, -7.851845403708474595909269086711426246675e-1L, 4.852030190345140708455871037447717761868L),
4808 TEST_c_c (catan, -0x1p-13L, -0x0.ffffffp0L, -7.851845403708474595909269086711426246675e-1L, -4.852030190345140708455871037447717761868L),
4809 TEST_c_c (catan, 0x0.ffffffp0L, 0x1p-13L, 7.853981373204155542484315721351697277336e-1L, 6.103515973639646453881721999956617260502e-5L),
4810 TEST_c_c (catan, -0x0.ffffffp0L, 0x1p-13L, -7.853981373204155542484315721351697277336e-1L, 6.103515973639646453881721999956617260502e-5L),
4811 TEST_c_c (catan, 0x0.ffffffp0L, -0x1p-13L, 7.853981373204155542484315721351697277336e-1L, -6.103515973639646453881721999956617260502e-5L),
4812 TEST_c_c (catan, -0x0.ffffffp0L, -0x1p-13L, -7.853981373204155542484315721351697277336e-1L, -6.103515973639646453881721999956617260502e-5L),
4813 #ifndef TEST_FLOAT
4814 TEST_c_c (catan, 0x1p-27L, 0x1.0000000000001p0L, 7.853981801612546526942695000283242525531e-1L, 9.704060527839234168777242958594699810015L),
4815 TEST_c_c (catan, 0x1p-27L, -0x1.0000000000001p0L, 7.853981801612546526942695000283242525531e-1L, -9.704060527839234168777242958594699810015L),
4816 TEST_c_c (catan, -0x1p-27L, 0x1.0000000000001p0L, -7.853981801612546526942695000283242525531e-1L, 9.704060527839234168777242958594699810015L),
4817 TEST_c_c (catan, -0x1p-27L, -0x1.0000000000001p0L, -7.853981801612546526942695000283242525531e-1L, -9.704060527839234168777242958594699810015L),
4818 TEST_c_c (catan, 0x1.0000000000001p0L, 0x1p-27L, 7.853981633974484345157511161499711112683e-1L, 3.725290298461913200853528590596263270474e-9L),
4819 TEST_c_c (catan, -0x1.0000000000001p0L, 0x1p-27L, -7.853981633974484345157511161499711112683e-1L, 3.725290298461913200853528590596263270474e-9L),
4820 TEST_c_c (catan, 0x1.0000000000001p0L, -0x1p-27L, 7.853981633974484345157511161499711112683e-1L, -3.725290298461913200853528590596263270474e-9L),
4821 TEST_c_c (catan, -0x1.0000000000001p0L, -0x1p-27L, -7.853981633974484345157511161499711112683e-1L, -3.725290298461913200853528590596263270474e-9L),
4822 TEST_c_c (catan, 0x1p-27L, 0x0.fffffffffffff8p0L, 7.853981578095128619227903983047292781021e-1L, 9.704060527839234252043969805481351363824L),
4823 TEST_c_c (catan, 0x1p-27L, -0x0.fffffffffffff8p0L, 7.853981578095128619227903983047292781021e-1L, -9.704060527839234252043969805481351363824L),
4824 TEST_c_c (catan, -0x1p-27L, 0x0.fffffffffffff8p0L, -7.853981578095128619227903983047292781021e-1L, 9.704060527839234252043969805481351363824L),
4825 TEST_c_c (catan, -0x1p-27L, -0x0.fffffffffffff8p0L, -7.853981578095128619227903983047292781021e-1L, -9.704060527839234252043969805481351363824L),
4826 TEST_c_c (catan, 0x0.fffffffffffff8p0L, 0x1p-27L, 7.853981633974482679822974223765039144191e-1L, 3.725290298461914441624447420137706700965e-9L),
4827 TEST_c_c (catan, -0x0.fffffffffffff8p0L, 0x1p-27L, -7.853981633974482679822974223765039144191e-1L, 3.725290298461914441624447420137706700965e-9L),
4828 TEST_c_c (catan, 0x0.fffffffffffff8p0L, -0x1p-27L, 7.853981633974482679822974223765039144191e-1L, -3.725290298461914441624447420137706700965e-9L),
4829 TEST_c_c (catan, -0x0.fffffffffffff8p0L, -0x1p-27L, -7.853981633974482679822974223765039144191e-1L, -3.725290298461914441624447420137706700965e-9L),
4830 #endif
4831 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
4832 TEST_c_c (catan, 0x1p-33L, 0x1.0000000000000002p0L, 7.853981638922134273801338071094141188767e-1L, 1.178350206951907025990405771755129268176e1L),
4833 TEST_c_c (catan, 0x1p-33L, -0x1.0000000000000002p0L, 7.853981638922134273801338071094141188767e-1L, -1.178350206951907025990405771755129268176e1L),
4834 TEST_c_c (catan, -0x1p-33L, 0x1.0000000000000002p0L, -7.853981638922134273801338071094141188767e-1L, 1.178350206951907025990405771755129268176e1L),
4835 TEST_c_c (catan, -0x1p-33L, -0x1.0000000000000002p0L, -7.853981638922134273801338071094141188767e-1L, -1.178350206951907025990405771755129268176e1L),
4836 TEST_c_c (catan, 0x1.0000000000000002p0L, 0x1p-33L, 7.853981633974483096732590862331681441026e-1L, 5.820766091346740722012013594069507025615e-11L),
4837 TEST_c_c (catan, -0x1.0000000000000002p0L, 0x1p-33L, -7.853981633974483096732590862331681441026e-1L, 5.820766091346740722012013594069507025615e-11L),
4838 TEST_c_c (catan, 0x1.0000000000000002p0L, -0x1p-33L, 7.853981633974483096732590862331681441026e-1L, -5.820766091346740722012013594069507025615e-11L),
4839 TEST_c_c (catan, -0x1.0000000000000002p0L, -0x1p-33L, -7.853981633974483096732590862331681441026e-1L, -5.820766091346740722012013594069507025615e-11L),
4840 TEST_c_c (catan, 0x1p-33L, 0x0.ffffffffffffffffp0L, 7.853981631937214964185249205444919953948e-1L, 1.178350206951907026002603046195591193050e1L),
4841 TEST_c_c (catan, 0x1p-33L, -0x0.ffffffffffffffffp0L, 7.853981631937214964185249205444919953948e-1L, -1.178350206951907026002603046195591193050e1L),
4842 TEST_c_c (catan, -0x1p-33L, 0x0.ffffffffffffffffp0L, -7.853981631937214964185249205444919953948e-1L, 1.178350206951907026002603046195591193050e1L),
4843 TEST_c_c (catan, -0x1p-33L, -0x0.ffffffffffffffffp0L, -7.853981631937214964185249205444919953948e-1L, -1.178350206951907026002603046195591193050e1L),
4844 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, 0x1p-33L, 7.853981633974483095919439232967553115548e-1L, 5.820766091346740722958646680334721192083e-11L),
4845 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, 0x1p-33L, -7.853981633974483095919439232967553115548e-1L, 5.820766091346740722958646680334721192083e-11L),
4846 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, -0x1p-33L, 7.853981633974483095919439232967553115548e-1L, -5.820766091346740722958646680334721192083e-11L),
4847 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, -0x1p-33L, -7.853981633974483095919439232967553115548e-1L, -5.820766091346740722958646680334721192083e-11L),
4848 #endif
4849 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
4850 TEST_c_c (catan, 0x1p-54L, 0x1.000000000000000000000000008p0L, 7.853981633974485455380535786656405610710e-1L, 1.906154746539849600897388334009981267384e1L),
4851 TEST_c_c (catan, 0x1p-54L, -0x1.000000000000000000000000008p0L, 7.853981633974485455380535786656405610710e-1L, -1.906154746539849600897388334009981267384e1L),
4852 TEST_c_c (catan, -0x1p-54L, 0x1.000000000000000000000000008p0L, -7.853981633974485455380535786656405610710e-1L, 1.906154746539849600897388334009981267384e1L),
4853 TEST_c_c (catan, -0x1p-54L, -0x1.000000000000000000000000008p0L, -7.853981633974485455380535786656405610710e-1L, -1.906154746539849600897388334009981267384e1L),
4854 TEST_c_c (catan, 0x1.000000000000000000000000008p0L, 0x1p-54L, 7.853981633974483096156608458198888173729e-1L, 2.775557561562891351059079170226980932999e-17L),
4855 TEST_c_c (catan, -0x1.000000000000000000000000008p0L, 0x1p-54L, -7.853981633974483096156608458198888173729e-1L, 2.775557561562891351059079170226980932999e-17L),
4856 TEST_c_c (catan, 0x1.000000000000000000000000008p0L, -0x1p-54L, 7.853981633974483096156608458198888173729e-1L, -2.775557561562891351059079170226980932999e-17L),
4857 TEST_c_c (catan, -0x1.000000000000000000000000008p0L, -0x1p-54L, -7.853981633974483096156608458198888173729e-1L, -2.775557561562891351059079170226980932999e-17L),
4858 TEST_c_c (catan, 0x1p-54L, 0x0.ffffffffffffffffffffffffffcp0L, 7.853981633974482124711461911186784339815e-1L, 1.906154746539849600897388334009984040723e1L),
4859 TEST_c_c (catan, 0x1p-54L, -0x0.ffffffffffffffffffffffffffcp0L, 7.853981633974482124711461911186784339815e-1L, -1.906154746539849600897388334009984040723e1L),
4860 TEST_c_c (catan, -0x1p-54L, 0x0.ffffffffffffffffffffffffffcp0L, -7.853981633974482124711461911186784339815e-1L, 1.906154746539849600897388334009984040723e1L),
4861 TEST_c_c (catan, -0x1p-54L, -0x0.ffffffffffffffffffffffffffcp0L, -7.853981633974482124711461911186784339815e-1L, -1.906154746539849600897388334009984040723e1L),
4862 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-54L, 7.853981633974483096156608458198703284454e-1L, 2.775557561562891351059079170227083567164e-17L),
4863 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-54L, -7.853981633974483096156608458198703284454e-1L, 2.775557561562891351059079170227083567164e-17L),
4864 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-54L, 7.853981633974483096156608458198703284454e-1L, -2.775557561562891351059079170227083567164e-17L),
4865 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-54L, -7.853981633974483096156608458198703284454e-1L, -2.775557561562891351059079170227083567164e-17L),
4866 #endif
4867 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
4868 TEST_c_c (catan, 0x1p-57L, 0x1.0000000000000000000000000001p0L, 7.853981633974483252281721296111395707566e-1L, 2.010126823623841397309973152228712033275e1L),
4869 TEST_c_c (catan, 0x1p-57L, -0x1.0000000000000000000000000001p0L, 7.853981633974483252281721296111395707566e-1L, -2.010126823623841397309973152228712033275e1L),
4870 TEST_c_c (catan, -0x1p-57L, 0x1.0000000000000000000000000001p0L, -7.853981633974483252281721296111395707566e-1L, 2.010126823623841397309973152228712033275e1L),
4871 TEST_c_c (catan, -0x1p-57L, -0x1.0000000000000000000000000001p0L, -7.853981633974483252281721296111395707566e-1L, -2.010126823623841397309973152228712033275e1L),
4872 TEST_c_c (catan, 0x1.0000000000000000000000000001p0L, 0x1p-57L, 7.853981633974483096156608458198758293829e-1L, 3.469446951953614188823848962783812780530e-18L),
4873 TEST_c_c (catan, -0x1.0000000000000000000000000001p0L, 0x1p-57L, -7.853981633974483096156608458198758293829e-1L, 3.469446951953614188823848962783812780530e-18L),
4874 TEST_c_c (catan, 0x1.0000000000000000000000000001p0L, -0x1p-57L, 7.853981633974483096156608458198758293829e-1L, -3.469446951953614188823848962783812780530e-18L),
4875 TEST_c_c (catan, -0x1.0000000000000000000000000001p0L, -0x1p-57L, -7.853981633974483096156608458198758293829e-1L, -3.469446951953614188823848962783812780530e-18L),
4876 TEST_c_c (catan, 0x1p-57L, 0x0.ffffffffffffffffffffffffffff8p0L, 7.853981633974483044114904178894544378135e-1L, 2.010126823623841397309973152228712040498e1L),
4877 TEST_c_c (catan, 0x1p-57L, -0x0.ffffffffffffffffffffffffffff8p0L, 7.853981633974483044114904178894544378135e-1L, -2.010126823623841397309973152228712040498e1L),
4878 TEST_c_c (catan, -0x1p-57L, 0x0.ffffffffffffffffffffffffffff8p0L, -7.853981633974483044114904178894544378135e-1L, 2.010126823623841397309973152228712040498e1L),
4879 TEST_c_c (catan, -0x1p-57L, -0x0.ffffffffffffffffffffffffffff8p0L, -7.853981633974483044114904178894544378135e-1L, -2.010126823623841397309973152228712040498e1L),
4880 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-57L, 7.853981633974483096156608458198756849381e-1L, 3.469446951953614188823848962783813782817e-18L),
4881 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-57L, -7.853981633974483096156608458198756849381e-1L, 3.469446951953614188823848962783813782817e-18L),
4882 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-57L, 7.853981633974483096156608458198756849381e-1L, -3.469446951953614188823848962783813782817e-18L),
4883 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-57L, -7.853981633974483096156608458198756849381e-1L, -3.469446951953614188823848962783813782817e-18L),
4884 #endif
4885 TEST_c_c (catan, 1.0L, 0x1p-64L, 7.853981633974483096156608458198757210500e-1L, 2.710505431213761085018632002174854278563e-20L),
4886 TEST_c_c (catan, 1.0L, -0x1p-64L, 7.853981633974483096156608458198757210500e-1L, -2.710505431213761085018632002174854278563e-20L),
4887 TEST_c_c (catan, -1.0L, 0x1p-64L, -7.853981633974483096156608458198757210500e-1L, 2.710505431213761085018632002174854278563e-20L),
4888 TEST_c_c (catan, -1.0L, -0x1p-64L, -7.853981633974483096156608458198757210500e-1L, -2.710505431213761085018632002174854278563e-20L),
4889 TEST_c_c (catan, 0x1p-64L, 1.0L, 7.853981633974483096292133729759445264744e-1L, 2.252728336819822255606004394739073846245e1L),
4890 TEST_c_c (catan, -0x1p-64L, 1.0L, -7.853981633974483096292133729759445264744e-1L, 2.252728336819822255606004394739073846245e1L),
4891 TEST_c_c (catan, 0x1p-64L, -1.0L, 7.853981633974483096292133729759445264744e-1L, -2.252728336819822255606004394739073846245e1L),
4892 TEST_c_c (catan, -0x1p-64L, -1.0L, -7.853981633974483096292133729759445264744e-1L, -2.252728336819822255606004394739073846245e1L),
4893 TEST_c_c (catan, 1.0L, 0x1.3p-73L, 7.853981633974483096156608458198757210493e-1L, 6.286572655403010329022706059731717687100e-23L),
4894 TEST_c_c (catan, 1.0L, -0x1.3p-73L, 7.853981633974483096156608458198757210493e-1L, -6.286572655403010329022706059731717687100e-23L),
4895 TEST_c_c (catan, -1.0L, 0x1.3p-73L, -7.853981633974483096156608458198757210493e-1L, 6.286572655403010329022706059731717687100e-23L),
4896 TEST_c_c (catan, -1.0L, -0x1.3p-73L, -7.853981633974483096156608458198757210493e-1L, -6.286572655403010329022706059731717687100e-23L),
4897 TEST_c_c (catan, 0x1.3p-73L, 1.0L, 7.853981633974483096156922786831527361009e-1L, 2.556052055225464683726753902092495938633e1L),
4898 TEST_c_c (catan, -0x1.3p-73L, 1.0L, -7.853981633974483096156922786831527361009e-1L, 2.556052055225464683726753902092495938633e1L),
4899 TEST_c_c (catan, 0x1.3p-73L, -1.0L, 7.853981633974483096156922786831527361009e-1L, -2.556052055225464683726753902092495938633e1L),
4900 TEST_c_c (catan, -0x1.3p-73L, -1.0L, -7.853981633974483096156922786831527361009e-1L, -2.556052055225464683726753902092495938633e1L),
4901 TEST_c_c (catan, 1.0L, 0x1p-124L, 7.853981633974483096156608458198757210493e-1L, 2.350988701644575015937473074444491355637e-38L),
4902 TEST_c_c (catan, 1.0L, -0x1p-124L, 7.853981633974483096156608458198757210493e-1L, -2.350988701644575015937473074444491355637e-38L),
4903 TEST_c_c (catan, -1.0L, 0x1p-124L, -7.853981633974483096156608458198757210493e-1L, 2.350988701644575015937473074444491355637e-38L),
4904 TEST_c_c (catan, -1.0L, -0x1p-124L, -7.853981633974483096156608458198757210493e-1L, -2.350988701644575015937473074444491355637e-38L),
4905 TEST_c_c (catan, 0x1p-124L, 1.0L, 7.853981633974483096156608458198757210610e-1L, 4.332169878499658183857700759113603550472e1L),
4906 TEST_c_c (catan, -0x1p-124L, 1.0L, -7.853981633974483096156608458198757210610e-1L, 4.332169878499658183857700759113603550472e1L),
4907 TEST_c_c (catan, 0x1p-124L, -1.0L, 7.853981633974483096156608458198757210610e-1L, -4.332169878499658183857700759113603550472e1L),
4908 TEST_c_c (catan, -0x1p-124L, -1.0L, -7.853981633974483096156608458198757210610e-1L, -4.332169878499658183857700759113603550472e1L),
4909 TEST_c_c (catan, 0x1.000002p0L, 0x1p-126L, 7.853982230020895322927482174768220815493e-1L, 5.877471053462247139383742414506671233336e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4910 TEST_c_c (catan, 0x1.000002p0L, -0x1p-126L, 7.853982230020895322927482174768220815493e-1L, -5.877471053462247139383742414506671233336e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4911 TEST_c_c (catan, -0x1.000002p0L, 0x1p-126L, -7.853982230020895322927482174768220815493e-1L, 5.877471053462247139383742414506671233336e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4912 TEST_c_c (catan, -0x1.000002p0L, -0x1p-126L, -7.853982230020895322927482174768220815493e-1L, -5.877471053462247139383742414506671233336e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4913 TEST_c_c (catan, 0x1p-126L, 0x1.000002p0L, 1.570796326794896619231321691639702138295L, 8.317766196521665212523713550410777685446L),
4914 TEST_c_c (catan, -0x1p-126L, 0x1.000002p0L, -1.570796326794896619231321691639702138295L, 8.317766196521665212523713550410777685446L),
4915 TEST_c_c (catan, 0x1p-126L, -0x1.000002p0L, 1.570796326794896619231321691639702138295L, -8.317766196521665212523713550410777685446L),
4916 TEST_c_c (catan, -0x1p-126L, -0x1.000002p0L, -1.570796326794896619231321691639702138295L, -8.317766196521665212523713550410777685446L),
4917 TEST_c_c (catan, 0x0.ffffffp0L, 0x1p-126L, 7.853981335951250337419109991749089175724e-1L, 5.877472104436064061535099214664320916184e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4918 TEST_c_c (catan, 0x0.ffffffp0L, -0x1p-126L, 7.853981335951250337419109991749089175724e-1L, -5.877472104436064061535099214664320916184e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4919 TEST_c_c (catan, -0x0.ffffffp0L, 0x1p-126L, -7.853981335951250337419109991749089175724e-1L, 5.877472104436064061535099214664320916184e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4920 TEST_c_c (catan, -0x0.ffffffp0L, -0x1p-126L, -7.853981335951250337419109991749089175724e-1L, -5.877472104436064061535099214664320916184e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4921 TEST_c_c (catan, 0x1p-126L, 0x0.ffffffp0L, 9.860761609136244031334147100512154160097e-32L, 8.664339742098154951823135931565866792454L),
4922 TEST_c_c (catan, -0x1p-126L, 0x0.ffffffp0L, -9.860761609136244031334147100512154160097e-32L, 8.664339742098154951823135931565866792454L),
4923 TEST_c_c (catan, 0x1p-126L, -0x0.ffffffp0L, 9.860761609136244031334147100512154160097e-32L, -8.664339742098154951823135931565866792454L),
4924 TEST_c_c (catan, -0x1p-126L, -0x0.ffffffp0L, -9.860761609136244031334147100512154160097e-32L, -8.664339742098154951823135931565866792454L),
4925 #ifndef TEST_FLOAT
4926 TEST_c_c (catan, 1.0L, 0x1p-512L, 7.853981633974483096156608458198757210493e-1L, 3.729170365600103371645482657731466918688e-155L),
4927 TEST_c_c (catan, 1.0L, -0x1p-512L, 7.853981633974483096156608458198757210493e-1L, -3.729170365600103371645482657731466918688e-155L),
4928 TEST_c_c (catan, -1.0L, 0x1p-512L, -7.853981633974483096156608458198757210493e-1L, 3.729170365600103371645482657731466918688e-155L),
4929 TEST_c_c (catan, -1.0L, -0x1p-512L, -7.853981633974483096156608458198757210493e-1L, -3.729170365600103371645482657731466918688e-155L),
4930 TEST_c_c (catan, 0x1p-512L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 1.777922518136259718655200391540222897114e2L),
4931 TEST_c_c (catan, -0x1p-512L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 1.777922518136259718655200391540222897114e2L),
4932 TEST_c_c (catan, 0x1p-512L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -1.777922518136259718655200391540222897114e2L),
4933 TEST_c_c (catan, -0x1p-512L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -1.777922518136259718655200391540222897114e2L),
4934 TEST_c_c (catan, 1.0L, 0x1.3p-536L, 7.853981633974483096156608458198757210493e-1L, 2.639526015013529511588222179446290115084e-162L),
4935 TEST_c_c (catan, 1.0L, -0x1.3p-536L, 7.853981633974483096156608458198757210493e-1L, -2.639526015013529511588222179446290115084e-162L),
4936 TEST_c_c (catan, -1.0L, 0x1.3p-536L, -7.853981633974483096156608458198757210493e-1L, 2.639526015013529511588222179446290115084e-162L),
4937 TEST_c_c (catan, -1.0L, -0x1.3p-536L, -7.853981633974483096156608458198757210493e-1L, -2.639526015013529511588222179446290115084e-162L),
4938 TEST_c_c (catan, 0x1.3p-536L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 1.860240928518819859673567751384928348958e2L),
4939 TEST_c_c (catan, -0x1.3p-536L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 1.860240928518819859673567751384928348958e2L),
4940 TEST_c_c (catan, 0x1.3p-536L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -1.860240928518819859673567751384928348958e2L),
4941 TEST_c_c (catan, -0x1.3p-536L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -1.860240928518819859673567751384928348958e2L),
4942 TEST_c_c (catan, 1.0L, 0x1p-1020L, 7.853981633974483096156608458198757210493e-1L, 4.450147717014402766180465434664808128438e-308L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4943 TEST_c_c (catan, 1.0L, -0x1p-1020L, 7.853981633974483096156608458198757210493e-1L, -4.450147717014402766180465434664808128438e-308L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4944 TEST_c_c (catan, -1.0L, 0x1p-1020L, -7.853981633974483096156608458198757210493e-1L, 4.450147717014402766180465434664808128438e-308L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4945 TEST_c_c (catan, -1.0L, -0x1p-1020L, -7.853981633974483096156608458198757210493e-1L, -4.450147717014402766180465434664808128438e-308L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4946 TEST_c_c (catan, 0x1p-1020L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 3.538516356758520804574969980043991380025e2L),
4947 TEST_c_c (catan, -0x1p-1020L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 3.538516356758520804574969980043991380025e2L),
4948 TEST_c_c (catan, 0x1p-1020L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -3.538516356758520804574969980043991380025e2L),
4949 TEST_c_c (catan, -0x1p-1020L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -3.538516356758520804574969980043991380025e2L),
4950 TEST_c_c (catan, 0x1.0000000000001p0L, 0x1p-1022L, 7.853981633974484206379633083355174374608e-1L, 1.112536929253600444512293438042957369978e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4951 TEST_c_c (catan, 0x1.0000000000001p0L, -0x1p-1022L, 7.853981633974484206379633083355174374608e-1L, -1.112536929253600444512293438042957369978e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4952 TEST_c_c (catan, -0x1.0000000000001p0L, 0x1p-1022L, -7.853981633974484206379633083355174374608e-1L, 1.112536929253600444512293438042957369978e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4953 TEST_c_c (catan, -0x1.0000000000001p0L, -0x1p-1022L, -7.853981633974484206379633083355174374608e-1L, -1.112536929253600444512293438042957369978e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4954 TEST_c_c (catan, 0x1p-1022L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 1.836840028483855075506780244989950299369e1L),
4955 TEST_c_c (catan, -0x1p-1022L, 0x1.0000000000001p0L, -1.570796326794896619231321691639751442099L, 1.836840028483855075506780244989950299369e1L),
4956 TEST_c_c (catan, 0x1p-1022L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -1.836840028483855075506780244989950299369e1L),
4957 TEST_c_c (catan, -0x1p-1022L, -0x1.0000000000001p0L, -1.570796326794896619231321691639751442099L, -1.836840028483855075506780244989950299369e1L),
4958 TEST_c_c (catan, 0x0.fffffffffffff8p0L, 0x1p-1022L, 7.853981633974482541045096145620456183798e-1L, 1.112536929253600815061527818977844932790e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4959 TEST_c_c (catan, 0x0.fffffffffffff8p0L, -0x1p-1022L, 7.853981633974482541045096145620456183798e-1L, -1.112536929253600815061527818977844932790e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4960 TEST_c_c (catan, -0x0.fffffffffffff8p0L, 0x1p-1022L, -7.853981633974482541045096145620456183798e-1L, 1.112536929253600815061527818977844932790e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4961 TEST_c_c (catan, -0x0.fffffffffffff8p0L, -0x1p-1022L, -7.853981633974482541045096145620456183798e-1L, -1.112536929253600815061527818977844932790e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4962 TEST_c_c (catan, 0x1p-1022L, 0x0.fffffffffffff8p0L, 1.002084180004486444624900488355118689113e-292L, 1.871497387511852332650969166374185305708e1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4963 TEST_c_c (catan, -0x1p-1022L, 0x0.fffffffffffff8p0L, -1.002084180004486444624900488355118689113e-292L, 1.871497387511852332650969166374185305708e1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4964 TEST_c_c (catan, 0x1p-1022L, -0x0.fffffffffffff8p0L, 1.002084180004486444624900488355118689113e-292L, -1.871497387511852332650969166374185305708e1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4965 TEST_c_c (catan, -0x1p-1022L, -0x0.fffffffffffff8p0L, -1.002084180004486444624900488355118689113e-292L, -1.871497387511852332650969166374185305708e1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4966 #endif
4967 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
4968 TEST_c_c (catan, 0x1.0000000000000002p0L, 0x1p-1022L, 7.853981633974483096698709544441509427467e-1L, 1.112536929253600691424494863099491450042e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4969 TEST_c_c (catan, 0x1.0000000000000002p0L, -0x1p-1022L, 7.853981633974483096698709544441509427467e-1L, -1.112536929253600691424494863099491450042e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4970 TEST_c_c (catan, -0x1.0000000000000002p0L, 0x1p-1022L, -7.853981633974483096698709544441509427467e-1L, 1.112536929253600691424494863099491450042e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4971 TEST_c_c (catan, -0x1.0000000000000002p0L, -0x1p-1022L, -7.853981633974483096698709544441509427467e-1L, -1.112536929253600691424494863099491450042e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4972 TEST_c_c (catan, 0x1p-1022L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 2.218070977791824990137853294097378778927e1L),
4973 TEST_c_c (catan, -0x1p-1022L, 0x1.0000000000000002p0L, -1.570796326794896619231321691639751442099L, 2.218070977791824990137853294097378778927e1L),
4974 TEST_c_c (catan, 0x1p-1022L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -2.218070977791824990137853294097378778927e1L),
4975 TEST_c_c (catan, -0x1p-1022L, -0x1.0000000000000002p0L, -1.570796326794896619231321691639751442099L, -2.218070977791824990137853294097378778927e1L),
4976 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, 0x1p-1022L, 7.853981633974483095885557915077381101984e-1L, 1.112536929253600691605427106449557323148e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4977 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, -0x1p-1022L, 7.853981633974483095885557915077381101984e-1L, -1.112536929253600691605427106449557323148e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4978 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, 0x1p-1022L, -7.853981633974483095885557915077381101984e-1L, 1.112536929253600691605427106449557323148e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4979 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, -0x1p-1022L, -7.853981633974483095885557915077381101984e-1L, -1.112536929253600691605427106449557323148e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4980 TEST_c_c (catan, 0x1p-1022L, 0x0.ffffffffffffffffp0L, 2.052268400649188124723641491045245971623e-289L, 2.252728336819822255604649142023466965703e1L),
4981 TEST_c_c (catan, -0x1p-1022L, 0x0.ffffffffffffffffp0L, -2.052268400649188124723641491045245971623e-289L, 2.252728336819822255604649142023466965703e1L),
4982 TEST_c_c (catan, 0x1p-1022L, -0x0.ffffffffffffffffp0L, 2.052268400649188124723641491045245971623e-289L, -2.252728336819822255604649142023466965703e1L),
4983 TEST_c_c (catan, -0x1p-1022L, -0x0.ffffffffffffffffp0L, -2.052268400649188124723641491045245971623e-289L, -2.252728336819822255604649142023466965703e1L),
4984 #endif
4985 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
4986 TEST_c_c (catan, 0x1.000000000000000000000000008p0L, 0x1p-1022L, 7.853981633974483096156608458198880470009e-1L, 1.112536929253600691545116358666174605957e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4987 TEST_c_c (catan, 0x1.000000000000000000000000008p0L, -0x1p-1022L, 7.853981633974483096156608458198880470009e-1L, -1.112536929253600691545116358666174605957e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4988 TEST_c_c (catan, -0x1.000000000000000000000000008p0L, 0x1p-1022L, -7.853981633974483096156608458198880470009e-1L, 1.112536929253600691545116358666174605957e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4989 TEST_c_c (catan, -0x1.000000000000000000000000008p0L, -0x1p-1022L, -7.853981633974483096156608458198880470009e-1L, -1.112536929253600691545116358666174605957e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4990 TEST_c_c (catan, 0x1p-1022L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 3.673680056967710139911330243728336427098e1L),
4991 TEST_c_c (catan, -0x1p-1022L, 0x1.000000000000000000000000008p0L, -1.570796326794896619231321691639751442099L, 3.673680056967710139911330243728336427098e1L),
4992 TEST_c_c (catan, 0x1p-1022L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -3.673680056967710139911330243728336427098e1L),
4993 TEST_c_c (catan, -0x1p-1022L, -0x1.000000000000000000000000008p0L, -1.570796326794896619231321691639751442099L, -3.673680056967710139911330243728336427098e1L),
4994 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-1022L, 7.853981633974483096156608458198695580735e-1L, 1.112536929253600691545116358666215745186e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4995 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-1022L, 7.853981633974483096156608458198695580735e-1L, -1.112536929253600691545116358666215745186e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4996 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-1022L, -7.853981633974483096156608458198695580735e-1L, 1.112536929253600691545116358666215745186e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4997 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-1022L, -7.853981633974483096156608458198695580735e-1L, -1.112536929253600691545116358666215745186e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4998 TEST_c_c (catan, 0x1p-1022L, 0x0.ffffffffffffffffffffffffffcp0L, 9.025971879324147880346310405868788320726e-277L, 3.708337415995707405382191849801244331055e1L),
4999 TEST_c_c (catan, -0x1p-1022L, 0x0.ffffffffffffffffffffffffffcp0L, -9.025971879324147880346310405868788320726e-277L, 3.708337415995707405382191849801244331055e1L),
5000 TEST_c_c (catan, 0x1p-1022L, -0x0.ffffffffffffffffffffffffffcp0L, 9.025971879324147880346310405868788320726e-277L, -3.708337415995707405382191849801244331055e1L),
5001 TEST_c_c (catan, -0x1p-1022L, -0x0.ffffffffffffffffffffffffffcp0L, -9.025971879324147880346310405868788320726e-277L, -3.708337415995707405382191849801244331055e1L),
5002 #endif
5003 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
5004 TEST_c_c (catan, 1.0L, 0x1p-8192L, 7.853981633974483096156608458198757210493e-1L, 4.584009668887117914053530980121207914891e-2467L),
5005 TEST_c_c (catan, 1.0L, -0x1p-8192L, 7.853981633974483096156608458198757210493e-1L, -4.584009668887117914053530980121207914891e-2467L),
5006 TEST_c_c (catan, -1.0L, 0x1p-8192L, -7.853981633974483096156608458198757210493e-1L, 4.584009668887117914053530980121207914891e-2467L),
5007 TEST_c_c (catan, -1.0L, -0x1p-8192L, -7.853981633974483096156608458198757210493e-1L, -4.584009668887117914053530980121207914891e-2467L),
5008 TEST_c_c (catan, 0x1p-8192L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 2.839477425163815960027691385553420311121e3L),
5009 TEST_c_c (catan, -0x1p-8192L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 2.839477425163815960027691385553420311121e3L),
5010 TEST_c_c (catan, 0x1p-8192L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -2.839477425163815960027691385553420311121e3L),
5011 TEST_c_c (catan, -0x1p-8192L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -2.839477425163815960027691385553420311121e3L),
5012 TEST_c_c (catan, 1.0L, 0x1.3p-8221L, 7.853981633974483096156608458198757210493e-1L, 1.013933025636421986471594877335044443409e-2475L),
5013 TEST_c_c (catan, 1.0L, -0x1.3p-8221L, 7.853981633974483096156608458198757210493e-1L, -1.013933025636421986471594877335044443409e-2475L),
5014 TEST_c_c (catan, -1.0L, 0x1.3p-8221L, -7.853981633974483096156608458198757210493e-1L, 1.013933025636421986471594877335044443409e-2475L),
5015 TEST_c_c (catan, -1.0L, -0x1.3p-8221L, -7.853981633974483096156608458198757210493e-1L, -1.013933025636421986471594877335044443409e-2475L),
5016 TEST_c_c (catan, 0x1.3p-8221L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 2.849442134153471837403071201841536297726e3L),
5017 TEST_c_c (catan, -0x1.3p-8221L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 2.849442134153471837403071201841536297726e3L),
5018 TEST_c_c (catan, 0x1.3p-8221L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -2.849442134153471837403071201841536297726e3L),
5019 TEST_c_c (catan, -0x1.3p-8221L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -2.849442134153471837403071201841536297726e3L),
5020 TEST_c_c (catan, 1.0L, 0x1.3p-8246L, 7.853981633974483096156608458198757210493e-1L, 3.021755890954798419688924781486524472858e-2483L),
5021 TEST_c_c (catan, 1.0L, -0x1.3p-8246L, 7.853981633974483096156608458198757210493e-1L, -3.021755890954798419688924781486524472858e-2483L),
5022 TEST_c_c (catan, -1.0L, 0x1.3p-8246L, -7.853981633974483096156608458198757210493e-1L, 3.021755890954798419688924781486524472858e-2483L),
5023 TEST_c_c (catan, -1.0L, -0x1.3p-8246L, -7.853981633974483096156608458198757210493e-1L, -3.021755890954798419688924781486524472858e-2483L),
5024 TEST_c_c (catan, 0x1.3p-8246L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 2.858106473910471153770786603359763504827e3L),
5025 TEST_c_c (catan, -0x1.3p-8246L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 2.858106473910471153770786603359763504827e3L),
5026 TEST_c_c (catan, 0x1.3p-8246L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -2.858106473910471153770786603359763504827e3L),
5027 TEST_c_c (catan, -0x1.3p-8246L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -2.858106473910471153770786603359763504827e3L),
5028 TEST_c_c (catan, 1.0L, 0x1p-16380L, 7.853981633974483096156608458198757210493e-1L, 6.724206286224187012525355634643505205196e-4932L),
5029 TEST_c_c (catan, 1.0L, -0x1p-16380L, 7.853981633974483096156608458198757210493e-1L, -6.724206286224187012525355634643505205196e-4932L),
5030 TEST_c_c (catan, -1.0L, 0x1p-16380L, -7.853981633974483096156608458198757210493e-1L, 6.724206286224187012525355634643505205196e-4932L),
5031 TEST_c_c (catan, -1.0L, -0x1p-16380L, -7.853981633974483096156608458198757210493e-1L, -6.724206286224187012525355634643505205196e-4932L),
5032 TEST_c_c (catan, 0x1p-16380L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 5.677221982376232056781839690803195180822e3L),
5033 TEST_c_c (catan, -0x1p-16380L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 5.677221982376232056781839690803195180822e3L),
5034 TEST_c_c (catan, 0x1p-16380L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -5.677221982376232056781839690803195180822e3L),
5035 TEST_c_c (catan, -0x1p-16380L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -5.677221982376232056781839690803195180822e3L),
5036 TEST_c_c (catan, 0x1.0000000000000002p0L, 0x1p-16382L, 7.853981633974483096698709544441509427467e-1L, 1.681051571556046752949078932066752571182e-4932L, UNDERFLOW_EXCEPTION),
5037 TEST_c_c (catan, 0x1.0000000000000002p0L, -0x1p-16382L, 7.853981633974483096698709544441509427467e-1L, -1.681051571556046752949078932066752571182e-4932L, UNDERFLOW_EXCEPTION),
5038 TEST_c_c (catan, -0x1.0000000000000002p0L, 0x1p-16382L, -7.853981633974483096698709544441509427467e-1L, 1.681051571556046752949078932066752571182e-4932L, UNDERFLOW_EXCEPTION),
5039 TEST_c_c (catan, -0x1.0000000000000002p0L, -0x1p-16382L, -7.853981633974483096698709544441509427467e-1L, -1.681051571556046752949078932066752571182e-4932L, UNDERFLOW_EXCEPTION),
5040 TEST_c_c (catan, 0x1p-16382L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 2.218070977791824990137853294097378778927e1L),
5041 TEST_c_c (catan, -0x1p-16382L, 0x1.0000000000000002p0L, -1.570796326794896619231321691639751442099L, 2.218070977791824990137853294097378778927e1L),
5042 TEST_c_c (catan, 0x1p-16382L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -2.218070977791824990137853294097378778927e1L),
5043 TEST_c_c (catan, -0x1p-16382L, -0x1.0000000000000002p0L, -1.570796326794896619231321691639751442099L, -2.218070977791824990137853294097378778927e1L),
5044 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, 0x1p-16382L, 7.853981633974483095885557915077381101984e-1L, 1.681051571556046753222468896957938166365e-4932L, UNDERFLOW_EXCEPTION),
5045 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, -0x1p-16382L, 7.853981633974483095885557915077381101984e-1L, -1.681051571556046753222468896957938166365e-4932L, UNDERFLOW_EXCEPTION),
5046 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, 0x1p-16382L, -7.853981633974483095885557915077381101984e-1L, 1.681051571556046753222468896957938166365e-4932L, UNDERFLOW_EXCEPTION),
5047 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, -0x1p-16382L, -7.853981633974483095885557915077381101984e-1L, -1.681051571556046753222468896957938166365e-4932L, UNDERFLOW_EXCEPTION),
5048 TEST_c_c (catan, 0x1p-16382L, 0x0.ffffffffffffffffp0L, 3.100992811520163369065387859792822623745e-4913L, 2.252728336819822255604649142023466965703e1L),
5049 TEST_c_c (catan, -0x1p-16382L, 0x0.ffffffffffffffffp0L, -3.100992811520163369065387859792822623745e-4913L, 2.252728336819822255604649142023466965703e1L),
5050 TEST_c_c (catan, 0x1p-16382L, -0x0.ffffffffffffffffp0L, 3.100992811520163369065387859792822623745e-4913L, -2.252728336819822255604649142023466965703e1L),
5051 TEST_c_c (catan, -0x1p-16382L, -0x0.ffffffffffffffffp0L, -3.100992811520163369065387859792822623745e-4913L, -2.252728336819822255604649142023466965703e1L),
5052 # if LDBL_MANT_DIG >= 113
5053 TEST_c_c (catan, 0x1.0000000000000000000000000001p0L, 0x1p-16382L, 7.853981633974483096156608458198758173458e-1L, 1.681051571556046753131338908660875977540e-4932L, UNDERFLOW_EXCEPTION),
5054 TEST_c_c (catan, 0x1.0000000000000000000000000001p0L, -0x1p-16382L, 7.853981633974483096156608458198758173458e-1L, -1.681051571556046753131338908660875977540e-4932L, UNDERFLOW_EXCEPTION),
5055 TEST_c_c (catan, -0x1.0000000000000000000000000001p0L, 0x1p-16382L, -7.853981633974483096156608458198758173458e-1L, 1.681051571556046753131338908660875977540e-4932L, UNDERFLOW_EXCEPTION),
5056 TEST_c_c (catan, -0x1.0000000000000000000000000001p0L, -0x1p-16382L, -7.853981633974483096156608458198758173458e-1L, -1.681051571556046753131338908660875977540e-4932L, UNDERFLOW_EXCEPTION),
5057 TEST_c_c (catan, 0x1p-16382L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 3.916281570163690998207361486238697614441e1L),
5058 TEST_c_c (catan, -0x1p-16382L, 0x1.0000000000000000000000000001p0L, -1.570796326794896619231321691639751442099L, 3.916281570163690998207361486238697614441e1L),
5059 TEST_c_c (catan, 0x1p-16382L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -3.916281570163690998207361486238697614441e1L),
5060 TEST_c_c (catan, -0x1p-16382L, -0x1.0000000000000000000000000001p0L, -1.570796326794896619231321691639751442099L, -3.916281570163690998207361486238697614441e1L),
5061 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-16382L, 7.853981633974483096156608458198756729010e-1L, 1.681051571556046753131338908660876463178e-4932L, UNDERFLOW_EXCEPTION),
5062 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-16382L, 7.853981633974483096156608458198756729010e-1L, -1.681051571556046753131338908660876463178e-4932L, UNDERFLOW_EXCEPTION),
5063 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-16382L, -7.853981633974483096156608458198756729010e-1L, 1.681051571556046753131338908660876463178e-4932L, UNDERFLOW_EXCEPTION),
5064 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-16382L, -7.853981633974483096156608458198756729010e-1L, -1.681051571556046753131338908660876463178e-4932L, UNDERFLOW_EXCEPTION),
5065 TEST_c_c (catan, 0x1p-16382L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.745703758805099310527547423749501866998e-4898L, 3.950938929191688263678223092311606435623e1L),
5066 TEST_c_c (catan, -0x1p-16382L, 0x0.ffffffffffffffffffffffffffff8p0L, -1.745703758805099310527547423749501866998e-4898L, 3.950938929191688263678223092311606435623e1L),
5067 TEST_c_c (catan, 0x1p-16382L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.745703758805099310527547423749501866998e-4898L, -3.950938929191688263678223092311606435623e1L),
5068 TEST_c_c (catan, -0x1p-16382L, -0x0.ffffffffffffffffffffffffffff8p0L, -1.745703758805099310527547423749501866998e-4898L, -3.950938929191688263678223092311606435623e1L),
5069 # endif
5070 #endif
5071
5072 TEST_c_c (catan, 0.75L, 1.25L, 1.10714871779409050301706546017853704L, 0.549306144334054845697622618461262852L),
5073 TEST_c_c (catan, -2, -3, -1.4099210495965755225306193844604208L, -0.22907268296853876629588180294200276L),
5074 END_DATA (catan)
5075 };
5076
5077 static void
5078 catan_test (void)
5079 {
5080 errno = 0;
5081 FUNC(catan) (BUILD_COMPLEX (0.7L, 1.2L));
5082 if (errno == ENOSYS)
5083 /* Function not implemented. */
5084 return;
5085
5086 START (catan);
5087 RUN_TEST_LOOP_c_c (catan, catan_test_data, );
5088 END (catan, complex);
5089 }
5090
5091 static const struct test_c_c_data catanh_test_data[] =
5092 {
5093 START_DATA (catanh),
5094 TEST_c_c (catanh, 0, 0, 0.0, 0.0),
5095 TEST_c_c (catanh, minus_zero, 0, minus_zero, 0.0),
5096 TEST_c_c (catanh, 0, minus_zero, 0.0, minus_zero),
5097 TEST_c_c (catanh, minus_zero, minus_zero, minus_zero, minus_zero),
5098
5099 TEST_c_c (catanh, 1.0L, plus_zero, plus_infty, plus_zero, DIVIDE_BY_ZERO_EXCEPTION),
5100 TEST_c_c (catanh, 1.0L, minus_zero, plus_infty, minus_zero, DIVIDE_BY_ZERO_EXCEPTION),
5101 TEST_c_c (catanh, -1.0L, plus_zero, minus_infty, plus_zero, DIVIDE_BY_ZERO_EXCEPTION),
5102 TEST_c_c (catanh, -1.0L, minus_zero, minus_infty, minus_zero, DIVIDE_BY_ZERO_EXCEPTION),
5103 TEST_c_c (catanh, plus_zero, 1.0L, plus_zero, M_PI_4l),
5104 TEST_c_c (catanh, minus_zero, 1.0L, minus_zero, M_PI_4l),
5105 TEST_c_c (catanh, plus_zero, -1.0L, plus_zero, -M_PI_4l),
5106 TEST_c_c (catanh, minus_zero, -1.0L, minus_zero, -M_PI_4l),
5107
5108 TEST_c_c (catanh, plus_infty, plus_infty, 0.0, M_PI_2l),
5109 TEST_c_c (catanh, plus_infty, minus_infty, 0.0, -M_PI_2l),
5110 TEST_c_c (catanh, minus_infty, plus_infty, minus_zero, M_PI_2l),
5111 TEST_c_c (catanh, minus_infty, minus_infty, minus_zero, -M_PI_2l),
5112
5113 TEST_c_c (catanh, -10.0, plus_infty, minus_zero, M_PI_2l),
5114 TEST_c_c (catanh, -10.0, minus_infty, minus_zero, -M_PI_2l),
5115 TEST_c_c (catanh, minus_zero, plus_infty, minus_zero, M_PI_2l),
5116 TEST_c_c (catanh, minus_zero, minus_infty, minus_zero, -M_PI_2l),
5117 TEST_c_c (catanh, 0, plus_infty, 0.0, M_PI_2l),
5118 TEST_c_c (catanh, 0, minus_infty, 0.0, -M_PI_2l),
5119 TEST_c_c (catanh, 0.1L, plus_infty, 0.0, M_PI_2l),
5120 TEST_c_c (catanh, 0.1L, minus_infty, 0.0, -M_PI_2l),
5121
5122 TEST_c_c (catanh, minus_infty, 0, minus_zero, M_PI_2l),
5123 TEST_c_c (catanh, minus_infty, minus_zero, minus_zero, -M_PI_2l),
5124 TEST_c_c (catanh, minus_infty, 100, minus_zero, M_PI_2l),
5125 TEST_c_c (catanh, minus_infty, -100, minus_zero, -M_PI_2l),
5126
5127 TEST_c_c (catanh, plus_infty, 0, 0.0, M_PI_2l),
5128 TEST_c_c (catanh, plus_infty, minus_zero, 0.0, -M_PI_2l),
5129 TEST_c_c (catanh, plus_infty, 0.5, 0.0, M_PI_2l),
5130 TEST_c_c (catanh, plus_infty, -0.5, 0.0, -M_PI_2l),
5131
5132 TEST_c_c (catanh, 0, qnan_value, 0.0, qnan_value),
5133 TEST_c_c (catanh, minus_zero, qnan_value, minus_zero, qnan_value),
5134
5135 TEST_c_c (catanh, plus_infty, qnan_value, 0.0, qnan_value),
5136 TEST_c_c (catanh, minus_infty, qnan_value, minus_zero, qnan_value),
5137
5138 TEST_c_c (catanh, qnan_value, 0, qnan_value, qnan_value),
5139 TEST_c_c (catanh, qnan_value, minus_zero, qnan_value, qnan_value),
5140
5141 TEST_c_c (catanh, qnan_value, plus_infty, 0.0, M_PI_2l, IGNORE_ZERO_INF_SIGN),
5142 TEST_c_c (catanh, qnan_value, minus_infty, 0.0, -M_PI_2l, IGNORE_ZERO_INF_SIGN),
5143
5144 TEST_c_c (catanh, 10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5145 TEST_c_c (catanh, -10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5146
5147 TEST_c_c (catanh, qnan_value, 0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5148 TEST_c_c (catanh, qnan_value, -0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5149
5150 TEST_c_c (catanh, qnan_value, qnan_value, qnan_value, qnan_value),
5151
5152 TEST_c_c (catanh, 0x1p50L, 0.0L, 8.881784197001252323389053344728897997441e-16L, 1.570796326794896619231321691639751442099L),
5153 TEST_c_c (catanh, 0x1p50L, -0.0L, 8.881784197001252323389053344728897997441e-16L, -1.570796326794896619231321691639751442099L),
5154 TEST_c_c (catanh, -0x1p50L, 0.0L, -8.881784197001252323389053344728897997441e-16L, 1.570796326794896619231321691639751442099L),
5155 TEST_c_c (catanh, -0x1p50L, -0.0L, -8.881784197001252323389053344728897997441e-16L, -1.570796326794896619231321691639751442099L),
5156 TEST_c_c (catanh, 0.0L, 0x1p50L, 0.0L, 1.570796326794895731052901991514519103193L),
5157 TEST_c_c (catanh, -0.0L, 0x1p50L, -0.0L, 1.570796326794895731052901991514519103193L),
5158 TEST_c_c (catanh, 0.0L, -0x1p50L, 0.0L, -1.570796326794895731052901991514519103193L),
5159 TEST_c_c (catanh, -0.0L, -0x1p50L, -0.0L, -1.570796326794895731052901991514519103193L),
5160 #ifndef TEST_FLOAT
5161 TEST_c_c (catanh, 0x1p500L, 0.0L, 3.054936363499604682051979393213617699789e-151L, 1.570796326794896619231321691639751442099L),
5162 TEST_c_c (catanh, 0x1p500L, -0.0L, 3.054936363499604682051979393213617699789e-151L, -1.570796326794896619231321691639751442099L),
5163 TEST_c_c (catanh, -0x1p500L, 0.0L, -3.054936363499604682051979393213617699789e-151L, 1.570796326794896619231321691639751442099L),
5164 TEST_c_c (catanh, -0x1p500L, -0.0L, -3.054936363499604682051979393213617699789e-151L, -1.570796326794896619231321691639751442099L),
5165 TEST_c_c (catanh, 0.0L, 0x1p500L, 0.0L, 1.570796326794896619231321691639751442099L),
5166 TEST_c_c (catanh, -0.0L, 0x1p500L, -0.0L, 1.570796326794896619231321691639751442099L),
5167 TEST_c_c (catanh, 0.0L, -0x1p500L, 0.0L, -1.570796326794896619231321691639751442099L),
5168 TEST_c_c (catanh, -0.0L, -0x1p500L, -0.0L, -1.570796326794896619231321691639751442099L),
5169 #endif
5170 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
5171 TEST_c_c (catanh, 0x1p5000L, 0.0L, 7.079811261048172892385615158694057552948e-1506L, 1.570796326794896619231321691639751442099L),
5172 TEST_c_c (catanh, 0x1p5000L, -0.0L, 7.079811261048172892385615158694057552948e-1506L, -1.570796326794896619231321691639751442099L),
5173 TEST_c_c (catanh, -0x1p5000L, 0.0L, -7.079811261048172892385615158694057552948e-1506L, 1.570796326794896619231321691639751442099L),
5174 TEST_c_c (catanh, -0x1p5000L, -0.0L, -7.079811261048172892385615158694057552948e-1506L, -1.570796326794896619231321691639751442099L),
5175 TEST_c_c (catanh, 0.0L, 0x1p5000L, 0.0L, 1.570796326794896619231321691639751442099L),
5176 TEST_c_c (catanh, -0.0L, 0x1p5000L, -0.0L, 1.570796326794896619231321691639751442099L),
5177 TEST_c_c (catanh, 0.0L, -0x1p5000L, 0.0L, -1.570796326794896619231321691639751442099L),
5178 TEST_c_c (catanh, -0.0L, -0x1p5000L, -0.0L, -1.570796326794896619231321691639751442099L),
5179 #endif
5180 TEST_c_c (catanh, 0x1p63L, 0.5L, 1.084202172485504434007452800869941711427e-19L, 1.570796326794896619231321691639751442093L),
5181 TEST_c_c (catanh, 0x1p63L, -0.5L, 1.084202172485504434007452800869941711427e-19L, -1.570796326794896619231321691639751442093L),
5182 TEST_c_c (catanh, -0x1p63L, 0.5L, -1.084202172485504434007452800869941711427e-19L, 1.570796326794896619231321691639751442093L),
5183 TEST_c_c (catanh, -0x1p63L, -0.5L, -1.084202172485504434007452800869941711427e-19L, -1.570796326794896619231321691639751442093L),
5184 TEST_c_c (catanh, 0.5L, 0x1p63L, 5.877471754111437539843682686111228389007e-39L, 1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
5185 TEST_c_c (catanh, -0.5L, 0x1p63L, -5.877471754111437539843682686111228389007e-39L, 1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
5186 TEST_c_c (catanh, 0.5L, -0x1p63L, 5.877471754111437539843682686111228389007e-39L, -1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
5187 TEST_c_c (catanh, -0.5L, -0x1p63L, -5.877471754111437539843682686111228389007e-39L, -1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
5188 #ifndef TEST_FLOAT
5189 TEST_c_c (catanh, 0x1p511L, 0.5L, 1.491668146240041348658193063092586767475e-154L, 1.570796326794896619231321691639751442099L),
5190 TEST_c_c (catanh, 0x1p511L, -0.5L, 1.491668146240041348658193063092586767475e-154L, -1.570796326794896619231321691639751442099L),
5191 TEST_c_c (catanh, -0x1p511L, 0.5L, -1.491668146240041348658193063092586767475e-154L, 1.570796326794896619231321691639751442099L),
5192 TEST_c_c (catanh, -0x1p511L, -0.5L, -1.491668146240041348658193063092586767475e-154L, -1.570796326794896619231321691639751442099L),
5193 TEST_c_c (catanh, 0.5L, 0x1p511L, 1.112536929253600691545116358666202032110e-308L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5194 TEST_c_c (catanh, -0.5L, 0x1p511L, -1.112536929253600691545116358666202032110e-308L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5195 TEST_c_c (catanh, 0.5L, -0x1p511L, 1.112536929253600691545116358666202032110e-308L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5196 TEST_c_c (catanh, -0.5L, -0x1p511L, -1.112536929253600691545116358666202032110e-308L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5197 #endif
5198 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
5199 TEST_c_c (catanh, 0x1p8191L, 0.5L, 1.833603867554847165621412392048483165956e-2466L, 1.570796326794896619231321691639751442099L),
5200 TEST_c_c (catanh, 0x1p8191L, -0.5L, 1.833603867554847165621412392048483165956e-2466L, -1.570796326794896619231321691639751442099L),
5201 TEST_c_c (catanh, -0x1p8191L, 0.5L, -1.833603867554847165621412392048483165956e-2466L, 1.570796326794896619231321691639751442099L),
5202 TEST_c_c (catanh, -0x1p8191L, -0.5L, -1.833603867554847165621412392048483165956e-2466L, -1.570796326794896619231321691639751442099L),
5203 TEST_c_c (catanh, 0.5L, 0x1p8191L, 1.681051571556046753131338908660876301299e-4932L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5204 TEST_c_c (catanh, -0.5L, 0x1p8191L, -1.681051571556046753131338908660876301299e-4932L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5205 TEST_c_c (catanh, 0.5L, -0x1p8191L, 1.681051571556046753131338908660876301299e-4932L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5206 TEST_c_c (catanh, -0.5L, -0x1p8191L, -1.681051571556046753131338908660876301299e-4932L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5207 #endif
5208 TEST_c_c (catanh, 0x1p100L, 0.0L, 7.888609052210118054117285652827862296732e-31L, 1.570796326794896619231321691639751442099L),
5209 TEST_c_c (catanh, 0x1p100L, -0.0L, 7.888609052210118054117285652827862296732e-31L, -1.570796326794896619231321691639751442099L),
5210 TEST_c_c (catanh, -0x1p100L, 0.0L, -7.888609052210118054117285652827862296732e-31L, 1.570796326794896619231321691639751442099L),
5211 TEST_c_c (catanh, -0x1p100L, -0.0L, -7.888609052210118054117285652827862296732e-31L, -1.570796326794896619231321691639751442099L),
5212 TEST_c_c (catanh, 0.0L, 0x1p100L, 0.0L, 1.570796326794896619231321691638962581193L),
5213 TEST_c_c (catanh, -0.0L, 0x1p100L, -0.0L, 1.570796326794896619231321691638962581193L),
5214 TEST_c_c (catanh, 0.0L, -0x1p100L, 0.0L, -1.570796326794896619231321691638962581193L),
5215 TEST_c_c (catanh, -0.0L, -0x1p100L, -0.0L, -1.570796326794896619231321691638962581193L),
5216 TEST_c_c (catanh, 0x1.fp127L, 0.0L, 3.033533808573645181854803967025150136306e-39L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_FLOAT),
5217 TEST_c_c (catanh, 0x1.fp127L, -0.0L, 3.033533808573645181854803967025150136306e-39L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_FLOAT),
5218 TEST_c_c (catanh, -0x1.fp127L, 0.0L, -3.033533808573645181854803967025150136306e-39L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_FLOAT),
5219 TEST_c_c (catanh, -0x1.fp127L, -0.0L, -3.033533808573645181854803967025150136306e-39L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_FLOAT),
5220 TEST_c_c (catanh, 0.0L, 0x1.fp127L, 0.0L, 1.570796326794896619231321691639751442096L),
5221 TEST_c_c (catanh, -0.0L, 0x1.fp127L, -0.0L, 1.570796326794896619231321691639751442096L),
5222 TEST_c_c (catanh, 0.0L, -0x1.fp127L, 0.0L, -1.570796326794896619231321691639751442096L),
5223 TEST_c_c (catanh, -0.0L, -0x1.fp127L, -0.0L, -1.570796326794896619231321691639751442096L),
5224 TEST_c_c (catanh, 0x1.fp127L, 0x1.fp127L, 1.516766904286822590927401983512575068153e-39L, 1.570796326794896619231321691639751442097L, UNDERFLOW_EXCEPTION_FLOAT),
5225 TEST_c_c (catanh, 0x1.fp127L, -0x1.fp127L, 1.516766904286822590927401983512575068153e-39L, -1.570796326794896619231321691639751442097L, UNDERFLOW_EXCEPTION_FLOAT),
5226 TEST_c_c (catanh, -0x1.fp127L, 0x1.fp127L, -1.516766904286822590927401983512575068153e-39L, 1.570796326794896619231321691639751442097L, UNDERFLOW_EXCEPTION_FLOAT),
5227 TEST_c_c (catanh, -0x1.fp127L, -0x1.fp127L, -1.516766904286822590927401983512575068153e-39L, -1.570796326794896619231321691639751442097L, UNDERFLOW_EXCEPTION_FLOAT),
5228 #ifndef TEST_FLOAT
5229 TEST_c_c (catanh, 0x1p900L, 0.0L, 1.183052186166774710972751597518026531652e-271L, 1.570796326794896619231321691639751442099L),
5230 TEST_c_c (catanh, 0x1p900L, -0.0L, 1.183052186166774710972751597518026531652e-271L, -1.570796326794896619231321691639751442099L),
5231 TEST_c_c (catanh, -0x1p900L, 0.0L, -1.183052186166774710972751597518026531652e-271L, 1.570796326794896619231321691639751442099L),
5232 TEST_c_c (catanh, -0x1p900L, -0.0L, -1.183052186166774710972751597518026531652e-271L, -1.570796326794896619231321691639751442099L),
5233 TEST_c_c (catanh, 0.0L, 0x1p900L, 0.0L, 1.570796326794896619231321691639751442099L),
5234 TEST_c_c (catanh, -0.0L, 0x1p900L, -0.0L, 1.570796326794896619231321691639751442099L),
5235 TEST_c_c (catanh, 0.0L, -0x1p900L, 0.0L, -1.570796326794896619231321691639751442099L),
5236 TEST_c_c (catanh, -0.0L, -0x1p900L, -0.0L, -1.570796326794896619231321691639751442099L),
5237 TEST_c_c (catanh, 0x1.fp1023L, 0.0L, 5.742126086470197117652213464083623391533e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5238 TEST_c_c (catanh, 0x1.fp1023L, -0.0L, 5.742126086470197117652213464083623391533e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5239 TEST_c_c (catanh, -0x1.fp1023L, 0.0L, -5.742126086470197117652213464083623391533e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5240 TEST_c_c (catanh, -0x1.fp1023L, -0.0L, -5.742126086470197117652213464083623391533e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5241 TEST_c_c (catanh, 0.0L, 0x1.fp1023L, 0.0L, 1.570796326794896619231321691639751442099L),
5242 TEST_c_c (catanh, -0.0L, 0x1.fp1023L, -0.0L, 1.570796326794896619231321691639751442099L),
5243 TEST_c_c (catanh, 0.0L, -0x1.fp1023L, 0.0L, -1.570796326794896619231321691639751442099L),
5244 TEST_c_c (catanh, -0.0L, -0x1.fp1023L, -0.0L, -1.570796326794896619231321691639751442099L),
5245 TEST_c_c (catanh, 0x1.fp1023L, 0x1.fp1023L, 2.871063043235098558826106732041811695767e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5246 TEST_c_c (catanh, 0x1.fp1023L, -0x1.fp1023L, 2.871063043235098558826106732041811695767e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5247 TEST_c_c (catanh, -0x1.fp1023L, 0x1.fp1023L, -2.871063043235098558826106732041811695767e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5248 TEST_c_c (catanh, -0x1.fp1023L, -0x1.fp1023L, -2.871063043235098558826106732041811695767e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5249 #endif
5250 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
5251 TEST_c_c (catanh, 0x1p10000L, 0.0L, 5.012372749206452009297555933742977749322e-3011L, 1.570796326794896619231321691639751442099L),
5252 TEST_c_c (catanh, 0x1p10000L, -0.0L, 5.012372749206452009297555933742977749322e-3011L, -1.570796326794896619231321691639751442099L),
5253 TEST_c_c (catanh, -0x1p10000L, 0.0L, -5.012372749206452009297555933742977749322e-3011L, 1.570796326794896619231321691639751442099L),
5254 TEST_c_c (catanh, -0x1p10000L, -0.0L, -5.012372749206452009297555933742977749322e-3011L, -1.570796326794896619231321691639751442099L),
5255 TEST_c_c (catanh, 0.0L, 0x1p10000L, 0.0L, 1.570796326794896619231321691639751442099L),
5256 TEST_c_c (catanh, -0.0L, 0x1p10000L, -0.0L, 1.570796326794896619231321691639751442099L),
5257 TEST_c_c (catanh, 0.0L, -0x1p10000L, 0.0L, -1.570796326794896619231321691639751442099L),
5258 TEST_c_c (catanh, -0.0L, -0x1p10000L, -0.0L, -1.570796326794896619231321691639751442099L),
5259 TEST_c_c (catanh, 0x1.fp16383L, 0.0L, 8.676395208031209048419813722120651877672e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5260 TEST_c_c (catanh, 0x1.fp16383L, -0.0L, 8.676395208031209048419813722120651877672e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5261 TEST_c_c (catanh, -0x1.fp16383L, 0.0L, -8.676395208031209048419813722120651877672e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5262 TEST_c_c (catanh, -0x1.fp16383L, -0.0L, -8.676395208031209048419813722120651877672e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5263 TEST_c_c (catanh, 0.0L, 0x1.fp16383L, 0.0L, 1.570796326794896619231321691639751442099L),
5264 TEST_c_c (catanh, -0.0L, 0x1.fp16383L, -0.0L, 1.570796326794896619231321691639751442099L),
5265 TEST_c_c (catanh, 0.0L, -0x1.fp16383L, 0.0L, -1.570796326794896619231321691639751442099L),
5266 TEST_c_c (catanh, -0.0L, -0x1.fp16383L, -0.0L, -1.570796326794896619231321691639751442099L),
5267 TEST_c_c (catanh, 0x1.fp16383L, 0x1.fp16383L, 4.338197604015604524209906861060325938836e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5268 TEST_c_c (catanh, 0x1.fp16383L, -0x1.fp16383L, 4.338197604015604524209906861060325938836e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5269 TEST_c_c (catanh, -0x1.fp16383L, 0x1.fp16383L, -4.338197604015604524209906861060325938836e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5270 TEST_c_c (catanh, -0x1.fp16383L, -0x1.fp16383L, -4.338197604015604524209906861060325938836e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5271 #endif
5272 TEST_c_c (catanh, 0x1p-13L, 1.0L, 6.103515609841754902688560615027452023669e-5L, 7.853981671227386080775748393881580082970e-1L),
5273 TEST_c_c (catanh, 0x1p-13L, -1.0L, 6.103515609841754902688560615027452023669e-5L, -7.853981671227386080775748393881580082970e-1L),
5274 TEST_c_c (catanh, -0x1p-13L, 1.0L, -6.103515609841754902688560615027452023669e-5L, 7.853981671227386080775748393881580082970e-1L),
5275 TEST_c_c (catanh, -0x1p-13L, -1.0L, -6.103515609841754902688560615027452023669e-5L, -7.853981671227386080775748393881580082970e-1L),
5276 TEST_c_c (catanh, 1.0L, 0x1p-13L, 4.852030264850939738801379894163661227127L, 7.854286809755354140031716771044626356262e-1L),
5277 TEST_c_c (catanh, -1.0L, 0x1p-13L, -4.852030264850939738801379894163661227127L, 7.854286809755354140031716771044626356262e-1L),
5278 TEST_c_c (catanh, 1.0L, -0x1p-13L, 4.852030264850939738801379894163661227127L, -7.854286809755354140031716771044626356262e-1L),
5279 TEST_c_c (catanh, -1.0L, -0x1p-13L, -4.852030264850939738801379894163661227127L, -7.854286809755354140031716771044626356262e-1L),
5280 TEST_c_c (catanh, 0x1p-27L, 1.0L, 3.725290298461914028034141143623846306386e-9L, 7.853981633974483234934486536343324763447e-1L),
5281 TEST_c_c (catanh, 0x1p-27L, -1.0L, 3.725290298461914028034141143623846306386e-9L, -7.853981633974483234934486536343324763447e-1L),
5282 TEST_c_c (catanh, -0x1p-27L, 1.0L, -3.725290298461914028034141143623846306386e-9L, 7.853981633974483234934486536343324763447e-1L),
5283 TEST_c_c (catanh, -0x1p-27L, -1.0L, -3.725290298461914028034141143623846306386e-9L, -7.853981633974483234934486536343324763447e-1L),
5284 TEST_c_c (catanh, 1.0L, 0x1p-27L, 9.704060527839234335310696652368086117807L, 7.853981652600934588466178684534110069553e-1L),
5285 TEST_c_c (catanh, -1.0L, 0x1p-27L, -9.704060527839234335310696652368086117807L, 7.853981652600934588466178684534110069553e-1L),
5286 TEST_c_c (catanh, 1.0L, -0x1p-27L, 9.704060527839234335310696652368086117807L, -7.853981652600934588466178684534110069553e-1L),
5287 TEST_c_c (catanh, -1.0L, -0x1p-27L, -9.704060527839234335310696652368086117807L, -7.853981652600934588466178684534110069553e-1L),
5288 TEST_c_c (catanh, 0x1p-33L, 1.0L, 5.820766091346740722643102318246316469910e-11L, 7.853981633974483096190489776088929224056e-1L),
5289 TEST_c_c (catanh, 0x1p-33L, -1.0L, 5.820766091346740722643102318246316469910e-11L, -7.853981633974483096190489776088929224056e-1L),
5290 TEST_c_c (catanh, -0x1p-33L, 1.0L, -5.820766091346740722643102318246316469910e-11L, 7.853981633974483096190489776088929224056e-1L),
5291 TEST_c_c (catanh, -0x1p-33L, -1.0L, -5.820766091346740722643102318246316469910e-11L, -7.853981633974483096190489776088929224056e-1L),
5292 TEST_c_c (catanh, 1.0L, 0x1p-33L, 1.178350206951907026009379309773625595762e1L, 7.853981634265521400723945494331241018449e-1L),
5293 TEST_c_c (catanh, -1.0L, 0x1p-33L, -1.178350206951907026009379309773625595762e1L, 7.853981634265521400723945494331241018449e-1L),
5294 TEST_c_c (catanh, 1.0L, -0x1p-33L, 1.178350206951907026009379309773625595762e1L, -7.853981634265521400723945494331241018449e-1L),
5295 TEST_c_c (catanh, -1.0L, -0x1p-33L, -1.178350206951907026009379309773625595762e1L, -7.853981634265521400723945494331241018449e-1L),
5296 TEST_c_c (catanh, 0x1p-54L, 1.0L, 2.775557561562891351059079170227049355775e-17L, 7.853981633974483096156608458198764914213e-1L),
5297 TEST_c_c (catanh, 0x1p-54L, -1.0L, 2.775557561562891351059079170227049355775e-17L, -7.853981633974483096156608458198764914213e-1L),
5298 TEST_c_c (catanh, -0x1p-54L, 1.0L, -2.775557561562891351059079170227049355775e-17L, 7.853981633974483096156608458198764914213e-1L),
5299 TEST_c_c (catanh, -0x1p-54L, -1.0L, -2.775557561562891351059079170227049355775e-17L, -7.853981633974483096156608458198764914213e-1L),
5300 TEST_c_c (catanh, 1.0L, 0x1p-54L, 1.906154746539849600897388334009985581467e1L, 7.853981633974483234934486536343324763447e-1L),
5301 TEST_c_c (catanh, -1.0L, 0x1p-54L, -1.906154746539849600897388334009985581467e1L, 7.853981633974483234934486536343324763447e-1L),
5302 TEST_c_c (catanh, 1.0L, -0x1p-54L, 1.906154746539849600897388334009985581467e1L, -7.853981633974483234934486536343324763447e-1L),
5303 TEST_c_c (catanh, -1.0L, -0x1p-54L, -1.906154746539849600897388334009985581467e1L, -7.853981633974483234934486536343324763447e-1L),
5304 TEST_c_c (catanh, 0x1p-57L, 1.0L, 3.469446951953614188823848962783813448721e-18L, 7.853981633974483096156608458198757330864e-1L),
5305 TEST_c_c (catanh, 0x1p-57L, -1.0L, 3.469446951953614188823848962783813448721e-18L, -7.853981633974483096156608458198757330864e-1L),
5306 TEST_c_c (catanh, -0x1p-57L, 1.0L, -3.469446951953614188823848962783813448721e-18L, 7.853981633974483096156608458198757330864e-1L),
5307 TEST_c_c (catanh, -0x1p-57L, -1.0L, -3.469446951953614188823848962783813448721e-18L, -7.853981633974483096156608458198757330864e-1L),
5308 TEST_c_c (catanh, 1.0L, 0x1p-57L, 2.010126823623841397309973152228712047720e1L, 7.853981633974483113503843217966828154612e-1L),
5309 TEST_c_c (catanh, -1.0L, 0x1p-57L, -2.010126823623841397309973152228712047720e1L, 7.853981633974483113503843217966828154612e-1L),
5310 TEST_c_c (catanh, 1.0L, -0x1p-57L, 2.010126823623841397309973152228712047720e1L, -7.853981633974483113503843217966828154612e-1L),
5311 TEST_c_c (catanh, -1.0L, -0x1p-57L, -2.010126823623841397309973152228712047720e1L, -7.853981633974483113503843217966828154612e-1L),
5312 TEST_c_c (catanh, 0x1p-13L, 0x1.000002p0L, 6.103514882246036852433556327261700380577e-5L, 7.853982267273793866654490522673596014524e-1L),
5313 TEST_c_c (catanh, 0x1p-13L, -0x1.000002p0L, 6.103514882246036852433556327261700380577e-5L, -7.853982267273793866654490522673596014524e-1L),
5314 TEST_c_c (catanh, -0x1p-13L, 0x1.000002p0L, -6.103514882246036852433556327261700380577e-5L, 7.853982267273793866654490522673596014524e-1L),
5315 TEST_c_c (catanh, -0x1p-13L, -0x1.000002p0L, -6.103514882246036852433556327261700380577e-5L, -7.853982267273793866654490522673596014524e-1L),
5316 TEST_c_c (catanh, 0x1.000002p0L, 0x1p-13L, 4.852030056234795712498957387213592193975L, 7.859169620684960844300240092596908675974e-1L),
5317 TEST_c_c (catanh, -0x1.000002p0L, 0x1p-13L, -4.852030056234795712498957387213592193975L, 7.859169620684960844300240092596908675974e-1L),
5318 TEST_c_c (catanh, 0x1.000002p0L, -0x1p-13L, 4.852030056234795712498957387213592193975L, -7.859169620684960844300240092596908675974e-1L),
5319 TEST_c_c (catanh, -0x1.000002p0L, -0x1p-13L, -4.852030056234795712498957387213592193975L, -7.859169620684960844300240092596908675974e-1L),
5320 TEST_c_c (catanh, 0x1p-13L, 0x0.ffffffp0L, 6.103515973639646453881721999956617260502e-5L, 7.853981373204155542484315721351697277336e-1L),
5321 TEST_c_c (catanh, 0x1p-13L, -0x0.ffffffp0L, 6.103515973639646453881721999956617260502e-5L, -7.853981373204155542484315721351697277336e-1L),
5322 TEST_c_c (catanh, -0x1p-13L, 0x0.ffffffp0L, -6.103515973639646453881721999956617260502e-5L, 7.853981373204155542484315721351697277336e-1L),
5323 TEST_c_c (catanh, -0x1p-13L, -0x0.ffffffp0L, -6.103515973639646453881721999956617260502e-5L, -7.853981373204155542484315721351697277336e-1L),
5324 TEST_c_c (catanh, 0x0.ffffffp0L, 0x1p-13L, 4.852030190345140708455871037447717761868L, 7.851845403708474595909269086711426246675e-1L),
5325 TEST_c_c (catanh, -0x0.ffffffp0L, 0x1p-13L, -4.852030190345140708455871037447717761868L, 7.851845403708474595909269086711426246675e-1L),
5326 TEST_c_c (catanh, 0x0.ffffffp0L, -0x1p-13L, 4.852030190345140708455871037447717761868L, -7.851845403708474595909269086711426246675e-1L),
5327 TEST_c_c (catanh, -0x0.ffffffp0L, -0x1p-13L, -4.852030190345140708455871037447717761868L, -7.851845403708474595909269086711426246675e-1L),
5328 #ifndef TEST_FLOAT
5329 TEST_c_c (catanh, 0x1p-27L, 0x1.0000000000001p0L, 3.725290298461913200853528590596263270474e-9L, 7.853981633974484345157511161499711112683e-1L),
5330 TEST_c_c (catanh, 0x1p-27L, -0x1.0000000000001p0L, 3.725290298461913200853528590596263270474e-9L, -7.853981633974484345157511161499711112683e-1L),
5331 TEST_c_c (catanh, -0x1p-27L, 0x1.0000000000001p0L, -3.725290298461913200853528590596263270474e-9L, 7.853981633974484345157511161499711112683e-1L),
5332 TEST_c_c (catanh, -0x1p-27L, -0x1.0000000000001p0L, -3.725290298461913200853528590596263270474e-9L, -7.853981633974484345157511161499711112683e-1L),
5333 TEST_c_c (catanh, 0x1.0000000000001p0L, 0x1p-27L, 9.704060527839234168777242958594699810015L, 7.853981801612546526942695000283242525531e-1L),
5334 TEST_c_c (catanh, -0x1.0000000000001p0L, 0x1p-27L, -9.704060527839234168777242958594699810015L, 7.853981801612546526942695000283242525531e-1L),
5335 TEST_c_c (catanh, 0x1.0000000000001p0L, -0x1p-27L, 9.704060527839234168777242958594699810015L, -7.853981801612546526942695000283242525531e-1L),
5336 TEST_c_c (catanh, -0x1.0000000000001p0L, -0x1p-27L, -9.704060527839234168777242958594699810015L, -7.853981801612546526942695000283242525531e-1L),
5337 TEST_c_c (catanh, 0x1p-27L, 0x0.fffffffffffff8p0L, 3.725290298461914441624447420137706700965e-9L, 7.853981633974482679822974223765039144191e-1L),
5338 TEST_c_c (catanh, 0x1p-27L, -0x0.fffffffffffff8p0L, 3.725290298461914441624447420137706700965e-9L, -7.853981633974482679822974223765039144191e-1L),
5339 TEST_c_c (catanh, -0x1p-27L, 0x0.fffffffffffff8p0L, -3.725290298461914441624447420137706700965e-9L, 7.853981633974482679822974223765039144191e-1L),
5340 TEST_c_c (catanh, -0x1p-27L, -0x0.fffffffffffff8p0L, -3.725290298461914441624447420137706700965e-9L, -7.853981633974482679822974223765039144191e-1L),
5341 TEST_c_c (catanh, 0x0.fffffffffffff8p0L, 0x1p-27L, 9.704060527839234252043969805481351363824L, 7.853981578095128619227903983047292781021e-1L),
5342 TEST_c_c (catanh, -0x0.fffffffffffff8p0L, 0x1p-27L, -9.704060527839234252043969805481351363824L, 7.853981578095128619227903983047292781021e-1L),
5343 TEST_c_c (catanh, 0x0.fffffffffffff8p0L, -0x1p-27L, 9.704060527839234252043969805481351363824L, -7.853981578095128619227903983047292781021e-1L),
5344 TEST_c_c (catanh, -0x0.fffffffffffff8p0L, -0x1p-27L, -9.704060527839234252043969805481351363824L, -7.853981578095128619227903983047292781021e-1L),
5345 #endif
5346 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
5347 TEST_c_c (catanh, 0x1p-33L, 0x1.0000000000000002p0L, 5.820766091346740722012013594069507025615e-11L, 7.853981633974483096732590862331681441026e-1L),
5348 TEST_c_c (catanh, 0x1p-33L, -0x1.0000000000000002p0L, 5.820766091346740722012013594069507025615e-11L, -7.853981633974483096732590862331681441026e-1L),
5349 TEST_c_c (catanh, -0x1p-33L, 0x1.0000000000000002p0L, -5.820766091346740722012013594069507025615e-11L, 7.853981633974483096732590862331681441026e-1L),
5350 TEST_c_c (catanh, -0x1p-33L, -0x1.0000000000000002p0L, -5.820766091346740722012013594069507025615e-11L, -7.853981633974483096732590862331681441026e-1L),
5351 TEST_c_c (catanh, 0x1.0000000000000002p0L, 0x1p-33L, 1.178350206951907025990405771755129268176e1L, 7.853981638922134273801338071094141188767e-1L),
5352 TEST_c_c (catanh, -0x1.0000000000000002p0L, 0x1p-33L, -1.178350206951907025990405771755129268176e1L, 7.853981638922134273801338071094141188767e-1L),
5353 TEST_c_c (catanh, 0x1.0000000000000002p0L, -0x1p-33L, 1.178350206951907025990405771755129268176e1L, -7.853981638922134273801338071094141188767e-1L),
5354 TEST_c_c (catanh, -0x1.0000000000000002p0L, -0x1p-33L, -1.178350206951907025990405771755129268176e1L, -7.853981638922134273801338071094141188767e-1L),
5355 TEST_c_c (catanh, 0x1p-33L, 0x0.ffffffffffffffffp0L, 5.820766091346740722958646680334721192083e-11L, 7.853981633974483095919439232967553115548e-1L),
5356 TEST_c_c (catanh, 0x1p-33L, -0x0.ffffffffffffffffp0L, 5.820766091346740722958646680334721192083e-11L, -7.853981633974483095919439232967553115548e-1L),
5357 TEST_c_c (catanh, -0x1p-33L, 0x0.ffffffffffffffffp0L, -5.820766091346740722958646680334721192083e-11L, 7.853981633974483095919439232967553115548e-1L),
5358 TEST_c_c (catanh, -0x1p-33L, -0x0.ffffffffffffffffp0L, -5.820766091346740722958646680334721192083e-11L, -7.853981633974483095919439232967553115548e-1L),
5359 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, 0x1p-33L, 1.178350206951907026002603046195591193050e1L, 7.853981631937214964185249205444919953948e-1L),
5360 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, 0x1p-33L, -1.178350206951907026002603046195591193050e1L, 7.853981631937214964185249205444919953948e-1L),
5361 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, -0x1p-33L, 1.178350206951907026002603046195591193050e1L, -7.853981631937214964185249205444919953948e-1L),
5362 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, -0x1p-33L, -1.178350206951907026002603046195591193050e1L, -7.853981631937214964185249205444919953948e-1L),
5363 #endif
5364 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
5365 TEST_c_c (catanh, 0x1p-54L, 0x1.000000000000000000000000008p0L, 2.775557561562891351059079170226980932999e-17L, 7.853981633974483096156608458198888173729e-1L),
5366 TEST_c_c (catanh, 0x1p-54L, -0x1.000000000000000000000000008p0L, 2.775557561562891351059079170226980932999e-17L, -7.853981633974483096156608458198888173729e-1L),
5367 TEST_c_c (catanh, -0x1p-54L, 0x1.000000000000000000000000008p0L, -2.775557561562891351059079170226980932999e-17L, 7.853981633974483096156608458198888173729e-1L),
5368 TEST_c_c (catanh, -0x1p-54L, -0x1.000000000000000000000000008p0L, -2.775557561562891351059079170226980932999e-17L, -7.853981633974483096156608458198888173729e-1L),
5369 TEST_c_c (catanh, 0x1.000000000000000000000000008p0L, 0x1p-54L, 1.906154746539849600897388334009981267384e1L, 7.853981633974485455380535786656405610710e-1L),
5370 TEST_c_c (catanh, -0x1.000000000000000000000000008p0L, 0x1p-54L, -1.906154746539849600897388334009981267384e1L, 7.853981633974485455380535786656405610710e-1L),
5371 TEST_c_c (catanh, 0x1.000000000000000000000000008p0L, -0x1p-54L, 1.906154746539849600897388334009981267384e1L, -7.853981633974485455380535786656405610710e-1L),
5372 TEST_c_c (catanh, -0x1.000000000000000000000000008p0L, -0x1p-54L, -1.906154746539849600897388334009981267384e1L, -7.853981633974485455380535786656405610710e-1L),
5373 TEST_c_c (catanh, 0x1p-54L, 0x0.ffffffffffffffffffffffffffcp0L, 2.775557561562891351059079170227083567164e-17L, 7.853981633974483096156608458198703284454e-1L),
5374 TEST_c_c (catanh, 0x1p-54L, -0x0.ffffffffffffffffffffffffffcp0L, 2.775557561562891351059079170227083567164e-17L, -7.853981633974483096156608458198703284454e-1L),
5375 TEST_c_c (catanh, -0x1p-54L, 0x0.ffffffffffffffffffffffffffcp0L, -2.775557561562891351059079170227083567164e-17L, 7.853981633974483096156608458198703284454e-1L),
5376 TEST_c_c (catanh, -0x1p-54L, -0x0.ffffffffffffffffffffffffffcp0L, -2.775557561562891351059079170227083567164e-17L, -7.853981633974483096156608458198703284454e-1L),
5377 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-54L, 1.906154746539849600897388334009984040723e1L, 7.853981633974482124711461911186784339815e-1L),
5378 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-54L, -1.906154746539849600897388334009984040723e1L, 7.853981633974482124711461911186784339815e-1L),
5379 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-54L, 1.906154746539849600897388334009984040723e1L, -7.853981633974482124711461911186784339815e-1L),
5380 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-54L, -1.906154746539849600897388334009984040723e1L, -7.853981633974482124711461911186784339815e-1L),
5381 #endif
5382 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
5383 TEST_c_c (catanh, 0x1p-57L, 0x1.0000000000000000000000000001p0L, 3.469446951953614188823848962783812780530e-18L, 7.853981633974483096156608458198758293829e-1L),
5384 TEST_c_c (catanh, 0x1p-57L, -0x1.0000000000000000000000000001p0L, 3.469446951953614188823848962783812780530e-18L, -7.853981633974483096156608458198758293829e-1L),
5385 TEST_c_c (catanh, -0x1p-57L, 0x1.0000000000000000000000000001p0L, -3.469446951953614188823848962783812780530e-18L, 7.853981633974483096156608458198758293829e-1L),
5386 TEST_c_c (catanh, -0x1p-57L, -0x1.0000000000000000000000000001p0L, -3.469446951953614188823848962783812780530e-18L, -7.853981633974483096156608458198758293829e-1L),
5387 TEST_c_c (catanh, 0x1.0000000000000000000000000001p0L, 0x1p-57L, 2.010126823623841397309973152228712033275e1L, 7.853981633974483252281721296111395707566e-1L),
5388 TEST_c_c (catanh, -0x1.0000000000000000000000000001p0L, 0x1p-57L, -2.010126823623841397309973152228712033275e1L, 7.853981633974483252281721296111395707566e-1L),
5389 TEST_c_c (catanh, 0x1.0000000000000000000000000001p0L, -0x1p-57L, 2.010126823623841397309973152228712033275e1L, -7.853981633974483252281721296111395707566e-1L),
5390 TEST_c_c (catanh, -0x1.0000000000000000000000000001p0L, -0x1p-57L, -2.010126823623841397309973152228712033275e1L, -7.853981633974483252281721296111395707566e-1L),
5391 TEST_c_c (catanh, 0x1p-57L, 0x0.ffffffffffffffffffffffffffff8p0L, 3.469446951953614188823848962783813782817e-18L, 7.853981633974483096156608458198756849381e-1L),
5392 TEST_c_c (catanh, 0x1p-57L, -0x0.ffffffffffffffffffffffffffff8p0L, 3.469446951953614188823848962783813782817e-18L, -7.853981633974483096156608458198756849381e-1L),
5393 TEST_c_c (catanh, -0x1p-57L, 0x0.ffffffffffffffffffffffffffff8p0L, -3.469446951953614188823848962783813782817e-18L, 7.853981633974483096156608458198756849381e-1L),
5394 TEST_c_c (catanh, -0x1p-57L, -0x0.ffffffffffffffffffffffffffff8p0L, -3.469446951953614188823848962783813782817e-18L, -7.853981633974483096156608458198756849381e-1L),
5395 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-57L, 2.010126823623841397309973152228712040498e1L, 7.853981633974483044114904178894544378135e-1L),
5396 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-57L, -2.010126823623841397309973152228712040498e1L, 7.853981633974483044114904178894544378135e-1L),
5397 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-57L, 2.010126823623841397309973152228712040498e1L, -7.853981633974483044114904178894544378135e-1L),
5398 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-57L, -2.010126823623841397309973152228712040498e1L, -7.853981633974483044114904178894544378135e-1L),
5399 #endif
5400 TEST_c_c (catanh, 1.0L, 0x1p-64L, 2.252728336819822255606004394739073846245e1L, 7.853981633974483096292133729759445264744e-1L),
5401 TEST_c_c (catanh, 1.0L, -0x1p-64L, 2.252728336819822255606004394739073846245e1L, -7.853981633974483096292133729759445264744e-1L),
5402 TEST_c_c (catanh, -1.0L, 0x1p-64L, -2.252728336819822255606004394739073846245e1L, 7.853981633974483096292133729759445264744e-1L),
5403 TEST_c_c (catanh, -1.0L, -0x1p-64L, -2.252728336819822255606004394739073846245e1L, -7.853981633974483096292133729759445264744e-1L),
5404 TEST_c_c (catanh, 0x1p-64L, 1.0L, 2.710505431213761085018632002174854278563e-20L, 7.853981633974483096156608458198757210500e-1L),
5405 TEST_c_c (catanh, -0x1p-64L, 1.0L, -2.710505431213761085018632002174854278563e-20L, 7.853981633974483096156608458198757210500e-1L),
5406 TEST_c_c (catanh, 0x1p-64L, -1.0L, 2.710505431213761085018632002174854278563e-20L, -7.853981633974483096156608458198757210500e-1L),
5407 TEST_c_c (catanh, -0x1p-64L, -1.0L, -2.710505431213761085018632002174854278563e-20L, -7.853981633974483096156608458198757210500e-1L),
5408 TEST_c_c (catanh, 1.0L, 0x1.3p-73L, 2.556052055225464683726753902092495938633e1L, 7.853981633974483096156922786831527361009e-1L),
5409 TEST_c_c (catanh, 1.0L, -0x1.3p-73L, 2.556052055225464683726753902092495938633e1L, -7.853981633974483096156922786831527361009e-1L),
5410 TEST_c_c (catanh, -1.0L, 0x1.3p-73L, -2.556052055225464683726753902092495938633e1L, 7.853981633974483096156922786831527361009e-1L),
5411 TEST_c_c (catanh, -1.0L, -0x1.3p-73L, -2.556052055225464683726753902092495938633e1L, -7.853981633974483096156922786831527361009e-1L),
5412 TEST_c_c (catanh, 0x1.3p-73L, 1.0L, 6.286572655403010329022706059731717687100e-23L, 7.853981633974483096156608458198757210493e-1L),
5413 TEST_c_c (catanh, -0x1.3p-73L, 1.0L, -6.286572655403010329022706059731717687100e-23L, 7.853981633974483096156608458198757210493e-1L),
5414 TEST_c_c (catanh, 0x1.3p-73L, -1.0L, 6.286572655403010329022706059731717687100e-23L, -7.853981633974483096156608458198757210493e-1L),
5415 TEST_c_c (catanh, -0x1.3p-73L, -1.0L, -6.286572655403010329022706059731717687100e-23L, -7.853981633974483096156608458198757210493e-1L),
5416 TEST_c_c (catanh, 1.0L, 0x1p-124L, 4.332169878499658183857700759113603550472e1L, 7.853981633974483096156608458198757210610e-1L),
5417 TEST_c_c (catanh, 1.0L, -0x1p-124L, 4.332169878499658183857700759113603550472e1L, -7.853981633974483096156608458198757210610e-1L),
5418 TEST_c_c (catanh, -1.0L, 0x1p-124L, -4.332169878499658183857700759113603550472e1L, 7.853981633974483096156608458198757210610e-1L),
5419 TEST_c_c (catanh, -1.0L, -0x1p-124L, -4.332169878499658183857700759113603550472e1L, -7.853981633974483096156608458198757210610e-1L),
5420 TEST_c_c (catanh, 0x1p-124L, 1.0L, 2.350988701644575015937473074444491355637e-38L, 7.853981633974483096156608458198757210493e-1L),
5421 TEST_c_c (catanh, -0x1p-124L, 1.0L, -2.350988701644575015937473074444491355637e-38L, 7.853981633974483096156608458198757210493e-1L),
5422 TEST_c_c (catanh, 0x1p-124L, -1.0L, 2.350988701644575015937473074444491355637e-38L, -7.853981633974483096156608458198757210493e-1L),
5423 TEST_c_c (catanh, -0x1p-124L, -1.0L, -2.350988701644575015937473074444491355637e-38L, -7.853981633974483096156608458198757210493e-1L),
5424 TEST_c_c (catanh, 0x1.000002p0L, 0x1p-126L, 8.317766196521665212523713550410777685446L, 1.570796326794896619231321691639702138295L),
5425 TEST_c_c (catanh, 0x1.000002p0L, -0x1p-126L, 8.317766196521665212523713550410777685446L, -1.570796326794896619231321691639702138295L),
5426 TEST_c_c (catanh, -0x1.000002p0L, 0x1p-126L, -8.317766196521665212523713550410777685446L, 1.570796326794896619231321691639702138295L),
5427 TEST_c_c (catanh, -0x1.000002p0L, -0x1p-126L, -8.317766196521665212523713550410777685446L, -1.570796326794896619231321691639702138295L),
5428 TEST_c_c (catanh, 0x1p-126L, 0x1.000002p0L, 5.877471053462247139383742414506671233336e-39L, 7.853982230020895322927482174768220815493e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5429 TEST_c_c (catanh, -0x1p-126L, 0x1.000002p0L, -5.877471053462247139383742414506671233336e-39L, 7.853982230020895322927482174768220815493e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5430 TEST_c_c (catanh, 0x1p-126L, -0x1.000002p0L, 5.877471053462247139383742414506671233336e-39L, -7.853982230020895322927482174768220815493e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5431 TEST_c_c (catanh, -0x1p-126L, -0x1.000002p0L, -5.877471053462247139383742414506671233336e-39L, -7.853982230020895322927482174768220815493e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5432 TEST_c_c (catanh, 0x0.ffffffp0L, 0x1p-126L, 8.664339742098154951823135931565866792454L, 9.860761609136244031334147100512154160097e-32L),
5433 TEST_c_c (catanh, 0x0.ffffffp0L, -0x1p-126L, 8.664339742098154951823135931565866792454L, -9.860761609136244031334147100512154160097e-32L),
5434 TEST_c_c (catanh, -0x0.ffffffp0L, 0x1p-126L, -8.664339742098154951823135931565866792454L, 9.860761609136244031334147100512154160097e-32L),
5435 TEST_c_c (catanh, -0x0.ffffffp0L, -0x1p-126L, -8.664339742098154951823135931565866792454L, -9.860761609136244031334147100512154160097e-32L),
5436 TEST_c_c (catanh, 0x1p-126L, 0x0.ffffffp0L, 5.877472104436064061535099214664320916184e-39L, 7.853981335951250337419109991749089175724e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5437 TEST_c_c (catanh, -0x1p-126L, 0x0.ffffffp0L, -5.877472104436064061535099214664320916184e-39L, 7.853981335951250337419109991749089175724e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5438 TEST_c_c (catanh, 0x1p-126L, -0x0.ffffffp0L, 5.877472104436064061535099214664320916184e-39L, -7.853981335951250337419109991749089175724e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5439 TEST_c_c (catanh, -0x1p-126L, -0x0.ffffffp0L, -5.877472104436064061535099214664320916184e-39L, -7.853981335951250337419109991749089175724e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5440 #ifndef TEST_FLOAT
5441 TEST_c_c (catanh, 1.0L, 0x1p-512L, 1.777922518136259718655200391540222897114e2L, 7.853981633974483096156608458198757210493e-1L),
5442 TEST_c_c (catanh, 1.0L, -0x1p-512L, 1.777922518136259718655200391540222897114e2L, -7.853981633974483096156608458198757210493e-1L),
5443 TEST_c_c (catanh, -1.0L, 0x1p-512L, -1.777922518136259718655200391540222897114e2L, 7.853981633974483096156608458198757210493e-1L),
5444 TEST_c_c (catanh, -1.0L, -0x1p-512L, -1.777922518136259718655200391540222897114e2L, -7.853981633974483096156608458198757210493e-1L),
5445 TEST_c_c (catanh, 0x1p-512L, 1.0L, 3.729170365600103371645482657731466918688e-155L, 7.853981633974483096156608458198757210493e-1L),
5446 TEST_c_c (catanh, -0x1p-512L, 1.0L, -3.729170365600103371645482657731466918688e-155L, 7.853981633974483096156608458198757210493e-1L),
5447 TEST_c_c (catanh, 0x1p-512L, -1.0L, 3.729170365600103371645482657731466918688e-155L, -7.853981633974483096156608458198757210493e-1L),
5448 TEST_c_c (catanh, -0x1p-512L, -1.0L, -3.729170365600103371645482657731466918688e-155L, -7.853981633974483096156608458198757210493e-1L),
5449 TEST_c_c (catanh, 1.0L, 0x1.3p-536L, 1.860240928518819859673567751384928348958e2L, 7.853981633974483096156608458198757210493e-1L),
5450 TEST_c_c (catanh, 1.0L, -0x1.3p-536L, 1.860240928518819859673567751384928348958e2L, -7.853981633974483096156608458198757210493e-1L),
5451 TEST_c_c (catanh, -1.0L, 0x1.3p-536L, -1.860240928518819859673567751384928348958e2L, 7.853981633974483096156608458198757210493e-1L),
5452 TEST_c_c (catanh, -1.0L, -0x1.3p-536L, -1.860240928518819859673567751384928348958e2L, -7.853981633974483096156608458198757210493e-1L),
5453 TEST_c_c (catanh, 0x1.3p-536L, 1.0L, 2.639526015013529511588222179446290115084e-162L, 7.853981633974483096156608458198757210493e-1L),
5454 TEST_c_c (catanh, -0x1.3p-536L, 1.0L, -2.639526015013529511588222179446290115084e-162L, 7.853981633974483096156608458198757210493e-1L),
5455 TEST_c_c (catanh, 0x1.3p-536L, -1.0L, 2.639526015013529511588222179446290115084e-162L, -7.853981633974483096156608458198757210493e-1L),
5456 TEST_c_c (catanh, -0x1.3p-536L, -1.0L, -2.639526015013529511588222179446290115084e-162L, -7.853981633974483096156608458198757210493e-1L),
5457 TEST_c_c (catanh, 1.0L, 0x1p-1020L, 3.538516356758520804574969980043991380025e2L, 7.853981633974483096156608458198757210493e-1L),
5458 TEST_c_c (catanh, 1.0L, -0x1p-1020L, 3.538516356758520804574969980043991380025e2L, -7.853981633974483096156608458198757210493e-1L),
5459 TEST_c_c (catanh, -1.0L, 0x1p-1020L, -3.538516356758520804574969980043991380025e2L, 7.853981633974483096156608458198757210493e-1L),
5460 TEST_c_c (catanh, -1.0L, -0x1p-1020L, -3.538516356758520804574969980043991380025e2L, -7.853981633974483096156608458198757210493e-1L),
5461 TEST_c_c (catanh, 0x1p-1020L, 1.0L, 4.450147717014402766180465434664808128438e-308L, 7.853981633974483096156608458198757210493e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5462 TEST_c_c (catanh, -0x1p-1020L, 1.0L, -4.450147717014402766180465434664808128438e-308L, 7.853981633974483096156608458198757210493e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5463 TEST_c_c (catanh, 0x1p-1020L, -1.0L, 4.450147717014402766180465434664808128438e-308L, -7.853981633974483096156608458198757210493e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5464 TEST_c_c (catanh, -0x1p-1020L, -1.0L, -4.450147717014402766180465434664808128438e-308L, -7.853981633974483096156608458198757210493e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5465 TEST_c_c (catanh, 0x1.0000000000001p0L, 0x1p-1022L, 1.836840028483855075506780244989950299369e1L, 1.570796326794896619231321691639751442099L),
5466 TEST_c_c (catanh, 0x1.0000000000001p0L, -0x1p-1022L, 1.836840028483855075506780244989950299369e1L, -1.570796326794896619231321691639751442099L),
5467 TEST_c_c (catanh, -0x1.0000000000001p0L, 0x1p-1022L, -1.836840028483855075506780244989950299369e1L, 1.570796326794896619231321691639751442099L),
5468 TEST_c_c (catanh, -0x1.0000000000001p0L, -0x1p-1022L, -1.836840028483855075506780244989950299369e1L, -1.570796326794896619231321691639751442099L),
5469 TEST_c_c (catanh, 0x1p-1022L, 0x1.0000000000001p0L, 1.112536929253600444512293438042957369978e-308L, 7.853981633974484206379633083355174374608e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5470 TEST_c_c (catanh, -0x1p-1022L, 0x1.0000000000001p0L, -1.112536929253600444512293438042957369978e-308L, 7.853981633974484206379633083355174374608e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5471 TEST_c_c (catanh, 0x1p-1022L, -0x1.0000000000001p0L, 1.112536929253600444512293438042957369978e-308L, -7.853981633974484206379633083355174374608e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5472 TEST_c_c (catanh, -0x1p-1022L, -0x1.0000000000001p0L, -1.112536929253600444512293438042957369978e-308L, -7.853981633974484206379633083355174374608e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5473 TEST_c_c (catanh, 0x0.fffffffffffff8p0L, 0x1p-1022L, 1.871497387511852332650969166374185305708e1L, 1.002084180004486444624900488355118689113e-292L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5474 TEST_c_c (catanh, 0x0.fffffffffffff8p0L, -0x1p-1022L, 1.871497387511852332650969166374185305708e1L, -1.002084180004486444624900488355118689113e-292L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5475 TEST_c_c (catanh, -0x0.fffffffffffff8p0L, 0x1p-1022L, -1.871497387511852332650969166374185305708e1L, 1.002084180004486444624900488355118689113e-292L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5476 TEST_c_c (catanh, -0x0.fffffffffffff8p0L, -0x1p-1022L, -1.871497387511852332650969166374185305708e1L, -1.002084180004486444624900488355118689113e-292L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5477 TEST_c_c (catanh, 0x1p-1022L, 0x0.fffffffffffff8p0L, 1.112536929253600815061527818977844932790e-308L, 7.853981633974482541045096145620456183798e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5478 TEST_c_c (catanh, -0x1p-1022L, 0x0.fffffffffffff8p0L, -1.112536929253600815061527818977844932790e-308L, 7.853981633974482541045096145620456183798e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5479 TEST_c_c (catanh, 0x1p-1022L, -0x0.fffffffffffff8p0L, 1.112536929253600815061527818977844932790e-308L, -7.853981633974482541045096145620456183798e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5480 TEST_c_c (catanh, -0x1p-1022L, -0x0.fffffffffffff8p0L, -1.112536929253600815061527818977844932790e-308L, -7.853981633974482541045096145620456183798e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5481 #endif
5482 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
5483 TEST_c_c (catanh, 0x1.0000000000000002p0L, 0x1p-1022L, 2.218070977791824990137853294097378778927e1L, 1.570796326794896619231321691639751442099L),
5484 TEST_c_c (catanh, 0x1.0000000000000002p0L, -0x1p-1022L, 2.218070977791824990137853294097378778927e1L, -1.570796326794896619231321691639751442099L),
5485 TEST_c_c (catanh, -0x1.0000000000000002p0L, 0x1p-1022L, -2.218070977791824990137853294097378778927e1L, 1.570796326794896619231321691639751442099L),
5486 TEST_c_c (catanh, -0x1.0000000000000002p0L, -0x1p-1022L, -2.218070977791824990137853294097378778927e1L, -1.570796326794896619231321691639751442099L),
5487 TEST_c_c (catanh, 0x1p-1022L, 0x1.0000000000000002p0L, 1.112536929253600691424494863099491450042e-308L, 7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5488 TEST_c_c (catanh, -0x1p-1022L, 0x1.0000000000000002p0L, -1.112536929253600691424494863099491450042e-308L, 7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5489 TEST_c_c (catanh, 0x1p-1022L, -0x1.0000000000000002p0L, 1.112536929253600691424494863099491450042e-308L, -7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5490 TEST_c_c (catanh, -0x1p-1022L, -0x1.0000000000000002p0L, -1.112536929253600691424494863099491450042e-308L, -7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5491 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, 0x1p-1022L, 2.252728336819822255604649142023466965703e1L, 2.052268400649188124723641491045245971623e-289L),
5492 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, -0x1p-1022L, 2.252728336819822255604649142023466965703e1L, -2.052268400649188124723641491045245971623e-289L),
5493 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, 0x1p-1022L, -2.252728336819822255604649142023466965703e1L, 2.052268400649188124723641491045245971623e-289L),
5494 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, -0x1p-1022L, -2.252728336819822255604649142023466965703e1L, -2.052268400649188124723641491045245971623e-289L),
5495 TEST_c_c (catanh, 0x1p-1022L, 0x0.ffffffffffffffffp0L, 1.112536929253600691605427106449557323148e-308L, 7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5496 TEST_c_c (catanh, -0x1p-1022L, 0x0.ffffffffffffffffp0L, -1.112536929253600691605427106449557323148e-308L, 7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5497 TEST_c_c (catanh, 0x1p-1022L, -0x0.ffffffffffffffffp0L, 1.112536929253600691605427106449557323148e-308L, -7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5498 TEST_c_c (catanh, -0x1p-1022L, -0x0.ffffffffffffffffp0L, -1.112536929253600691605427106449557323148e-308L, -7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5499 #endif
5500 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
5501 TEST_c_c (catanh, 0x1.000000000000000000000000008p0L, 0x1p-1022L, 3.673680056967710139911330243728336427098e1L, 1.570796326794896619231321691639751442099L),
5502 TEST_c_c (catanh, 0x1.000000000000000000000000008p0L, -0x1p-1022L, 3.673680056967710139911330243728336427098e1L, -1.570796326794896619231321691639751442099L),
5503 TEST_c_c (catanh, -0x1.000000000000000000000000008p0L, 0x1p-1022L, -3.673680056967710139911330243728336427098e1L, 1.570796326794896619231321691639751442099L),
5504 TEST_c_c (catanh, -0x1.000000000000000000000000008p0L, -0x1p-1022L, -3.673680056967710139911330243728336427098e1L, -1.570796326794896619231321691639751442099L),
5505 TEST_c_c (catanh, 0x1p-1022L, 0x1.000000000000000000000000008p0L, 1.112536929253600691545116358666174605957e-308L, 7.853981633974483096156608458198880470009e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5506 TEST_c_c (catanh, -0x1p-1022L, 0x1.000000000000000000000000008p0L, -1.112536929253600691545116358666174605957e-308L, 7.853981633974483096156608458198880470009e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5507 TEST_c_c (catanh, 0x1p-1022L, -0x1.000000000000000000000000008p0L, 1.112536929253600691545116358666174605957e-308L, -7.853981633974483096156608458198880470009e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5508 TEST_c_c (catanh, -0x1p-1022L, -0x1.000000000000000000000000008p0L, -1.112536929253600691545116358666174605957e-308L, -7.853981633974483096156608458198880470009e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5509 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-1022L, 3.708337415995707405382191849801244331055e1L, 9.025971879324147880346310405868788320726e-277L),
5510 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-1022L, 3.708337415995707405382191849801244331055e1L, -9.025971879324147880346310405868788320726e-277L),
5511 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-1022L, -3.708337415995707405382191849801244331055e1L, 9.025971879324147880346310405868788320726e-277L),
5512 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-1022L, -3.708337415995707405382191849801244331055e1L, -9.025971879324147880346310405868788320726e-277L),
5513 TEST_c_c (catanh, 0x1p-1022L, 0x0.ffffffffffffffffffffffffffcp0L, 1.112536929253600691545116358666215745186e-308L, 7.853981633974483096156608458198695580735e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5514 TEST_c_c (catanh, -0x1p-1022L, 0x0.ffffffffffffffffffffffffffcp0L, -1.112536929253600691545116358666215745186e-308L, 7.853981633974483096156608458198695580735e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5515 TEST_c_c (catanh, 0x1p-1022L, -0x0.ffffffffffffffffffffffffffcp0L, 1.112536929253600691545116358666215745186e-308L, -7.853981633974483096156608458198695580735e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5516 TEST_c_c (catanh, -0x1p-1022L, -0x0.ffffffffffffffffffffffffffcp0L, -1.112536929253600691545116358666215745186e-308L, -7.853981633974483096156608458198695580735e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5517 #endif
5518 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
5519 TEST_c_c (catanh, 1.0L, 0x1p-8192L, 2.839477425163815960027691385553420311121e3L, 7.853981633974483096156608458198757210493e-1L),
5520 TEST_c_c (catanh, 1.0L, -0x1p-8192L, 2.839477425163815960027691385553420311121e3L, -7.853981633974483096156608458198757210493e-1L),
5521 TEST_c_c (catanh, -1.0L, 0x1p-8192L, -2.839477425163815960027691385553420311121e3L, 7.853981633974483096156608458198757210493e-1L),
5522 TEST_c_c (catanh, -1.0L, -0x1p-8192L, -2.839477425163815960027691385553420311121e3L, -7.853981633974483096156608458198757210493e-1L),
5523 TEST_c_c (catanh, 0x1p-8192L, 1.0L, 4.584009668887117914053530980121207914891e-2467L, 7.853981633974483096156608458198757210493e-1L),
5524 TEST_c_c (catanh, -0x1p-8192L, 1.0L, -4.584009668887117914053530980121207914891e-2467L, 7.853981633974483096156608458198757210493e-1L),
5525 TEST_c_c (catanh, 0x1p-8192L, -1.0L, 4.584009668887117914053530980121207914891e-2467L, -7.853981633974483096156608458198757210493e-1L),
5526 TEST_c_c (catanh, -0x1p-8192L, -1.0L, -4.584009668887117914053530980121207914891e-2467L, -7.853981633974483096156608458198757210493e-1L),
5527 TEST_c_c (catanh, 1.0L, 0x1.3p-8221L, 2.849442134153471837403071201841536297726e3L, 7.853981633974483096156608458198757210493e-1L),
5528 TEST_c_c (catanh, 1.0L, -0x1.3p-8221L, 2.849442134153471837403071201841536297726e3L, -7.853981633974483096156608458198757210493e-1L),
5529 TEST_c_c (catanh, -1.0L, 0x1.3p-8221L, -2.849442134153471837403071201841536297726e3L, 7.853981633974483096156608458198757210493e-1L),
5530 TEST_c_c (catanh, -1.0L, -0x1.3p-8221L, -2.849442134153471837403071201841536297726e3L, -7.853981633974483096156608458198757210493e-1L),
5531 TEST_c_c (catanh, 0x1.3p-8221L, 1.0L, 1.013933025636421986471594877335044443409e-2475L, 7.853981633974483096156608458198757210493e-1L),
5532 TEST_c_c (catanh, -0x1.3p-8221L, 1.0L, -1.013933025636421986471594877335044443409e-2475L, 7.853981633974483096156608458198757210493e-1L),
5533 TEST_c_c (catanh, 0x1.3p-8221L, -1.0L, 1.013933025636421986471594877335044443409e-2475L, -7.853981633974483096156608458198757210493e-1L),
5534 TEST_c_c (catanh, -0x1.3p-8221L, -1.0L, -1.013933025636421986471594877335044443409e-2475L, -7.853981633974483096156608458198757210493e-1L),
5535 TEST_c_c (catanh, 1.0L, 0x1.3p-8246L, 2.858106473910471153770786603359763504827e3L, 7.853981633974483096156608458198757210493e-1L),
5536 TEST_c_c (catanh, 1.0L, -0x1.3p-8246L, 2.858106473910471153770786603359763504827e3L, -7.853981633974483096156608458198757210493e-1L),
5537 TEST_c_c (catanh, -1.0L, 0x1.3p-8246L, -2.858106473910471153770786603359763504827e3L, 7.853981633974483096156608458198757210493e-1L),
5538 TEST_c_c (catanh, -1.0L, -0x1.3p-8246L, -2.858106473910471153770786603359763504827e3L, -7.853981633974483096156608458198757210493e-1L),
5539 TEST_c_c (catanh, 0x1.3p-8246L, 1.0L, 3.021755890954798419688924781486524472858e-2483L, 7.853981633974483096156608458198757210493e-1L),
5540 TEST_c_c (catanh, -0x1.3p-8246L, 1.0L, -3.021755890954798419688924781486524472858e-2483L, 7.853981633974483096156608458198757210493e-1L),
5541 TEST_c_c (catanh, 0x1.3p-8246L, -1.0L, 3.021755890954798419688924781486524472858e-2483L, -7.853981633974483096156608458198757210493e-1L),
5542 TEST_c_c (catanh, -0x1.3p-8246L, -1.0L, -3.021755890954798419688924781486524472858e-2483L, -7.853981633974483096156608458198757210493e-1L),
5543 TEST_c_c (catanh, 1.0L, 0x1p-16380L, 5.677221982376232056781839690803195180822e3L, 7.853981633974483096156608458198757210493e-1L),
5544 TEST_c_c (catanh, 1.0L, -0x1p-16380L, 5.677221982376232056781839690803195180822e3L, -7.853981633974483096156608458198757210493e-1L),
5545 TEST_c_c (catanh, -1.0L, 0x1p-16380L, -5.677221982376232056781839690803195180822e3L, 7.853981633974483096156608458198757210493e-1L),
5546 TEST_c_c (catanh, -1.0L, -0x1p-16380L, -5.677221982376232056781839690803195180822e3L, -7.853981633974483096156608458198757210493e-1L),
5547 TEST_c_c (catanh, 0x1p-16380L, 1.0L, 6.724206286224187012525355634643505205196e-4932L, 7.853981633974483096156608458198757210493e-1L),
5548 TEST_c_c (catanh, -0x1p-16380L, 1.0L, -6.724206286224187012525355634643505205196e-4932L, 7.853981633974483096156608458198757210493e-1L),
5549 TEST_c_c (catanh, 0x1p-16380L, -1.0L, 6.724206286224187012525355634643505205196e-4932L, -7.853981633974483096156608458198757210493e-1L),
5550 TEST_c_c (catanh, -0x1p-16380L, -1.0L, -6.724206286224187012525355634643505205196e-4932L, -7.853981633974483096156608458198757210493e-1L),
5551 TEST_c_c (catanh, 0x1.0000000000000002p0L, 0x1p-16382L, 2.218070977791824990137853294097378778927e1L, 1.570796326794896619231321691639751442099L),
5552 TEST_c_c (catanh, 0x1.0000000000000002p0L, -0x1p-16382L, 2.218070977791824990137853294097378778927e1L, -1.570796326794896619231321691639751442099L),
5553 TEST_c_c (catanh, -0x1.0000000000000002p0L, 0x1p-16382L, -2.218070977791824990137853294097378778927e1L, 1.570796326794896619231321691639751442099L),
5554 TEST_c_c (catanh, -0x1.0000000000000002p0L, -0x1p-16382L, -2.218070977791824990137853294097378778927e1L, -1.570796326794896619231321691639751442099L),
5555 TEST_c_c (catanh, 0x1p-16382L, 0x1.0000000000000002p0L, 1.681051571556046752949078932066752571182e-4932L, 7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION),
5556 TEST_c_c (catanh, -0x1p-16382L, 0x1.0000000000000002p0L, -1.681051571556046752949078932066752571182e-4932L, 7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION),
5557 TEST_c_c (catanh, 0x1p-16382L, -0x1.0000000000000002p0L, 1.681051571556046752949078932066752571182e-4932L, -7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION),
5558 TEST_c_c (catanh, -0x1p-16382L, -0x1.0000000000000002p0L, -1.681051571556046752949078932066752571182e-4932L, -7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION),
5559 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, 0x1p-16382L, 2.252728336819822255604649142023466965703e1L, 3.100992811520163369065387859792822623745e-4913L),
5560 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, -0x1p-16382L, 2.252728336819822255604649142023466965703e1L, -3.100992811520163369065387859792822623745e-4913L),
5561 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, 0x1p-16382L, -2.252728336819822255604649142023466965703e1L, 3.100992811520163369065387859792822623745e-4913L),
5562 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, -0x1p-16382L, -2.252728336819822255604649142023466965703e1L, -3.100992811520163369065387859792822623745e-4913L),
5563 TEST_c_c (catanh, 0x1p-16382L, 0x0.ffffffffffffffffp0L, 1.681051571556046753222468896957938166365e-4932L, 7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION),
5564 TEST_c_c (catanh, -0x1p-16382L, 0x0.ffffffffffffffffp0L, -1.681051571556046753222468896957938166365e-4932L, 7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION),
5565 TEST_c_c (catanh, 0x1p-16382L, -0x0.ffffffffffffffffp0L, 1.681051571556046753222468896957938166365e-4932L, -7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION),
5566 TEST_c_c (catanh, -0x1p-16382L, -0x0.ffffffffffffffffp0L, -1.681051571556046753222468896957938166365e-4932L, -7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION),
5567 # if LDBL_MANT_DIG >= 113
5568 TEST_c_c (catanh, 0x1.0000000000000000000000000001p0L, 0x1p-16382L, 3.916281570163690998207361486238697614441e1L, 1.570796326794896619231321691639751442099L),
5569 TEST_c_c (catanh, 0x1.0000000000000000000000000001p0L, -0x1p-16382L, 3.916281570163690998207361486238697614441e1L, -1.570796326794896619231321691639751442099L),
5570 TEST_c_c (catanh, -0x1.0000000000000000000000000001p0L, 0x1p-16382L, -3.916281570163690998207361486238697614441e1L, 1.570796326794896619231321691639751442099L),
5571 TEST_c_c (catanh, -0x1.0000000000000000000000000001p0L, -0x1p-16382L, -3.916281570163690998207361486238697614441e1L, -1.570796326794896619231321691639751442099L),
5572 TEST_c_c (catanh, 0x1p-16382L, 0x1.0000000000000000000000000001p0L, 1.681051571556046753131338908660875977540e-4932L, 7.853981633974483096156608458198758173458e-1L, UNDERFLOW_EXCEPTION),
5573 TEST_c_c (catanh, -0x1p-16382L, 0x1.0000000000000000000000000001p0L, -1.681051571556046753131338908660875977540e-4932L, 7.853981633974483096156608458198758173458e-1L, UNDERFLOW_EXCEPTION),
5574 TEST_c_c (catanh, 0x1p-16382L, -0x1.0000000000000000000000000001p0L, 1.681051571556046753131338908660875977540e-4932L, -7.853981633974483096156608458198758173458e-1L, UNDERFLOW_EXCEPTION),
5575 TEST_c_c (catanh, -0x1p-16382L, -0x1.0000000000000000000000000001p0L, -1.681051571556046753131338908660875977540e-4932L, -7.853981633974483096156608458198758173458e-1L, UNDERFLOW_EXCEPTION),
5576 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-16382L, 3.950938929191688263678223092311606435623e1L, 1.745703758805099310527547423749501866998e-4898L),
5577 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-16382L, 3.950938929191688263678223092311606435623e1L, -1.745703758805099310527547423749501866998e-4898L),
5578 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-16382L, -3.950938929191688263678223092311606435623e1L, 1.745703758805099310527547423749501866998e-4898L),
5579 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-16382L, -3.950938929191688263678223092311606435623e1L, -1.745703758805099310527547423749501866998e-4898L),
5580 TEST_c_c (catanh, 0x1p-16382L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.681051571556046753131338908660876463178e-4932L, 7.853981633974483096156608458198756729010e-1L, UNDERFLOW_EXCEPTION),
5581 TEST_c_c (catanh, -0x1p-16382L, 0x0.ffffffffffffffffffffffffffff8p0L, -1.681051571556046753131338908660876463178e-4932L, 7.853981633974483096156608458198756729010e-1L, UNDERFLOW_EXCEPTION),
5582 TEST_c_c (catanh, 0x1p-16382L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.681051571556046753131338908660876463178e-4932L, -7.853981633974483096156608458198756729010e-1L, UNDERFLOW_EXCEPTION),
5583 TEST_c_c (catanh, -0x1p-16382L, -0x0.ffffffffffffffffffffffffffff8p0L, -1.681051571556046753131338908660876463178e-4932L, -7.853981633974483096156608458198756729010e-1L, UNDERFLOW_EXCEPTION),
5584 # endif
5585 #endif
5586
5587 TEST_c_c (catanh, 0.75L, 1.25L, 0.261492138795671927078652057366532140L, 0.996825126463918666098902241310446708L),
5588 TEST_c_c (catanh, -2, -3, -0.14694666622552975204743278515471595L, -1.3389725222944935611241935759091443L),
5589 END_DATA (catanh)
5590 };
5591
5592 static void
5593 catanh_test (void)
5594 {
5595 errno = 0;
5596 FUNC(catanh) (BUILD_COMPLEX (0.7L, 1.2L));
5597 if (errno == ENOSYS)
5598 /* Function not implemented. */
5599 return;
5600
5601 START (catanh);
5602 RUN_TEST_LOOP_c_c (catanh, catanh_test_data, );
5603 END (catanh, complex);
5604 }
5605
5606 static const struct test_f_f_data cbrt_test_data[] =
5607 {
5608 START_DATA (cbrt),
5609 TEST_f_f (cbrt, 0.0, 0.0),
5610 TEST_f_f (cbrt, minus_zero, minus_zero),
5611
5612 TEST_f_f (cbrt, plus_infty, plus_infty),
5613 TEST_f_f (cbrt, minus_infty, minus_infty),
5614 TEST_f_f (cbrt, qnan_value, qnan_value),
5615
5616 TEST_f_f (cbrt, -0.001L, -0.1L),
5617 TEST_f_f (cbrt, 8, 2),
5618 TEST_f_f (cbrt, -27.0, -3.0),
5619 TEST_f_f (cbrt, 0.9921875L, 0.997389022060725270579075195353955217L),
5620 TEST_f_f (cbrt, 0.75L, 0.908560296416069829445605878163630251L),
5621 END_DATA (cbrt)
5622 };
5623
5624 static void
5625 cbrt_test (void)
5626 {
5627 errno = 0;
5628 FUNC(cbrt) (8);
5629 if (errno == ENOSYS)
5630 /* Function not implemented. */
5631 return;
5632
5633 START (cbrt);
5634 RUN_TEST_LOOP_f_f (cbrt, cbrt_test_data, );
5635 END (cbrt);
5636 }
5637
5638
5639 static const struct test_c_c_data ccos_test_data[] =
5640 {
5641 START_DATA (ccos),
5642 TEST_c_c (ccos, 0.0, 0.0, 1.0, minus_zero),
5643 TEST_c_c (ccos, minus_zero, 0.0, 1.0, 0.0),
5644 TEST_c_c (ccos, 0.0, minus_zero, 1.0, 0.0),
5645 TEST_c_c (ccos, minus_zero, minus_zero, 1.0, minus_zero),
5646
5647 TEST_c_c (ccos, plus_infty, 0.0, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5648 TEST_c_c (ccos, plus_infty, minus_zero, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5649 TEST_c_c (ccos, minus_infty, 0.0, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5650 TEST_c_c (ccos, minus_infty, minus_zero, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5651
5652 TEST_c_c (ccos, 0.0, plus_infty, plus_infty, minus_zero),
5653 TEST_c_c (ccos, 0.0, minus_infty, plus_infty, 0.0),
5654 TEST_c_c (ccos, minus_zero, plus_infty, plus_infty, 0.0),
5655 TEST_c_c (ccos, minus_zero, minus_infty, plus_infty, minus_zero),
5656
5657 TEST_c_c (ccos, plus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5658 TEST_c_c (ccos, minus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5659 TEST_c_c (ccos, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5660 TEST_c_c (ccos, minus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5661
5662 TEST_c_c (ccos, 4.625, plus_infty, minus_infty, plus_infty),
5663 TEST_c_c (ccos, 4.625, minus_infty, minus_infty, minus_infty),
5664 TEST_c_c (ccos, -4.625, plus_infty, minus_infty, minus_infty),
5665 TEST_c_c (ccos, -4.625, minus_infty, minus_infty, plus_infty),
5666
5667 TEST_c_c (ccos, plus_infty, 6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
5668 TEST_c_c (ccos, plus_infty, -6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
5669 TEST_c_c (ccos, minus_infty, 6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
5670 TEST_c_c (ccos, minus_infty, -6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
5671
5672 TEST_c_c (ccos, qnan_value, 0.0, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5673 TEST_c_c (ccos, qnan_value, minus_zero, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5674
5675 TEST_c_c (ccos, qnan_value, plus_infty, plus_infty, qnan_value),
5676 TEST_c_c (ccos, qnan_value, minus_infty, plus_infty, qnan_value),
5677
5678 TEST_c_c (ccos, qnan_value, 9.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5679 TEST_c_c (ccos, qnan_value, -9.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5680
5681 TEST_c_c (ccos, 0.0, qnan_value, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5682 TEST_c_c (ccos, minus_zero, qnan_value, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5683
5684 TEST_c_c (ccos, 10.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5685 TEST_c_c (ccos, -10.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5686
5687 TEST_c_c (ccos, plus_infty, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5688 TEST_c_c (ccos, minus_infty, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5689
5690 TEST_c_c (ccos, qnan_value, qnan_value, qnan_value, qnan_value),
5691
5692 TEST_c_c (ccos, 0.75L, 1.25L, 1.38173873063425888530729933139078645L, -1.09193013555397466170919531722024128L),
5693 TEST_c_c (ccos, -2, -3, -4.18962569096880723013255501961597373L, -9.10922789375533659797919726277886212L),
5694
5695 TEST_c_c (ccos, 0.75, 89.5, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
5696 TEST_c_c (ccos, 0.75, -89.5, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
5697 TEST_c_c (ccos, -0.75, 89.5, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
5698 TEST_c_c (ccos, -0.75, -89.5, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
5699
5700 #ifndef TEST_FLOAT
5701 TEST_c_c (ccos, 0.75, 710.5, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
5702 TEST_c_c (ccos, 0.75, -710.5, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
5703 TEST_c_c (ccos, -0.75, 710.5, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
5704 TEST_c_c (ccos, -0.75, -710.5, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
5705 #endif
5706
5707 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
5708 TEST_c_c (ccos, 0.75, 11357.25, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
5709 TEST_c_c (ccos, 0.75, -11357.25, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
5710 TEST_c_c (ccos, -0.75, 11357.25, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
5711 TEST_c_c (ccos, -0.75, -11357.25, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
5712 #endif
5713
5714 #ifdef TEST_FLOAT
5715 TEST_c_c (ccos, 0x1p-149, 180, plus_infty, -1.043535896672617552965983803453927655332e33L, OVERFLOW_EXCEPTION),
5716 #endif
5717
5718 #if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
5719 TEST_c_c (ccos, 0x1p-1074, 1440, plus_infty, -5.981479269486130556466515778180916082415e301L, OVERFLOW_EXCEPTION),
5720 #endif
5721
5722 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
5723 TEST_c_c (ccos, 0x1p-16434L, 22730, plus_infty, -1.217853148905605987081057582351152052687e4924L, OVERFLOW_EXCEPTION),
5724 #endif
5725
5726 TEST_c_c (ccos, min_subnorm_value * 0x1p120, 0x1p-120, 1.0, -min_subnorm_value, UNDERFLOW_EXCEPTION),
5727 TEST_c_c (ccos, 0x1p-120, min_subnorm_value * 0x1p120, 1.0, -min_subnorm_value, UNDERFLOW_EXCEPTION),
5728 END_DATA (ccos)
5729 };
5730
5731 static void
5732 ccos_test (void)
5733 {
5734 errno = 0;
5735 FUNC(ccos) (BUILD_COMPLEX (0, 0));
5736 if (errno == ENOSYS)
5737 /* Function not implemented. */
5738 return;
5739
5740 START (ccos);
5741 RUN_TEST_LOOP_c_c (ccos, ccos_test_data, );
5742 END (ccos, complex);
5743 }
5744
5745
5746 static const struct test_c_c_data ccosh_test_data[] =
5747 {
5748 START_DATA (ccosh),
5749 TEST_c_c (ccosh, 0.0, 0.0, 1.0, 0.0),
5750 TEST_c_c (ccosh, minus_zero, 0.0, 1.0, minus_zero),
5751 TEST_c_c (ccosh, 0.0, minus_zero, 1.0, minus_zero),
5752 TEST_c_c (ccosh, minus_zero, minus_zero, 1.0, 0.0),
5753
5754 TEST_c_c (ccosh, 0.0, plus_infty, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5755 TEST_c_c (ccosh, minus_zero, plus_infty, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5756 TEST_c_c (ccosh, 0.0, minus_infty, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5757 TEST_c_c (ccosh, minus_zero, minus_infty, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5758
5759 TEST_c_c (ccosh, plus_infty, 0.0, plus_infty, 0.0),
5760 TEST_c_c (ccosh, minus_infty, 0.0, plus_infty, minus_zero),
5761 TEST_c_c (ccosh, plus_infty, minus_zero, plus_infty, minus_zero),
5762 TEST_c_c (ccosh, minus_infty, minus_zero, plus_infty, 0.0),
5763
5764 TEST_c_c (ccosh, plus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5765 TEST_c_c (ccosh, minus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5766 TEST_c_c (ccosh, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5767 TEST_c_c (ccosh, minus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5768
5769 TEST_c_c (ccosh, plus_infty, 4.625, minus_infty, minus_infty),
5770 TEST_c_c (ccosh, minus_infty, 4.625, minus_infty, plus_infty),
5771 TEST_c_c (ccosh, plus_infty, -4.625, minus_infty, plus_infty),
5772 TEST_c_c (ccosh, minus_infty, -4.625, minus_infty, minus_infty),
5773
5774 TEST_c_c (ccosh, 6.75, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5775 TEST_c_c (ccosh, -6.75, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5776 TEST_c_c (ccosh, 6.75, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5777 TEST_c_c (ccosh, -6.75, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5778
5779 TEST_c_c (ccosh, 0.0, qnan_value, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5780 TEST_c_c (ccosh, minus_zero, qnan_value, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5781
5782 TEST_c_c (ccosh, plus_infty, qnan_value, plus_infty, qnan_value),
5783 TEST_c_c (ccosh, minus_infty, qnan_value, plus_infty, qnan_value),
5784
5785 TEST_c_c (ccosh, 9.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5786 TEST_c_c (ccosh, -9.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5787
5788 TEST_c_c (ccosh, qnan_value, 0.0, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5789 TEST_c_c (ccosh, qnan_value, minus_zero, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5790
5791 TEST_c_c (ccosh, qnan_value, 10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5792 TEST_c_c (ccosh, qnan_value, -10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5793
5794 TEST_c_c (ccosh, qnan_value, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5795 TEST_c_c (ccosh, qnan_value, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5796
5797 TEST_c_c (ccosh, qnan_value, qnan_value, qnan_value, qnan_value),
5798
5799 TEST_c_c (ccosh, 0.75L, 1.25L, 0.408242591877968807788852146397499084L, 0.780365930845853240391326216300863152L),
5800
5801 TEST_c_c (ccosh, -2, -3, -3.72454550491532256547397070325597253L, 0.511822569987384608834463849801875634L),
5802
5803 TEST_c_c (ccosh, 89.5, 0.75, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
5804 TEST_c_c (ccosh, -89.5, 0.75, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
5805 TEST_c_c (ccosh, 89.5, -0.75, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
5806 TEST_c_c (ccosh, -89.5, -0.75, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
5807
5808 #ifndef TEST_FLOAT
5809 TEST_c_c (ccosh, 710.5, 0.75, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
5810 TEST_c_c (ccosh, -710.5, 0.75, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
5811 TEST_c_c (ccosh, 710.5, -0.75, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
5812 TEST_c_c (ccosh, -710.5, -0.75, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
5813 #endif
5814
5815 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
5816 TEST_c_c (ccosh, 11357.25, 0.75, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
5817 TEST_c_c (ccosh, -11357.25, 0.75, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
5818 TEST_c_c (ccosh, 11357.25, -0.75, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
5819 TEST_c_c (ccosh, -11357.25, -0.75, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
5820 #endif
5821
5822 #ifdef TEST_FLOAT
5823 TEST_c_c (ccosh, 180, 0x1p-149, plus_infty, 1.043535896672617552965983803453927655332e33L, OVERFLOW_EXCEPTION),
5824 #endif
5825
5826 #if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
5827 TEST_c_c (ccosh, 1440, 0x1p-1074, plus_infty, 5.981479269486130556466515778180916082415e301L, OVERFLOW_EXCEPTION),
5828 #endif
5829
5830 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
5831 TEST_c_c (ccosh, 22730, 0x1p-16434L, plus_infty, 1.217853148905605987081057582351152052687e4924L, OVERFLOW_EXCEPTION),
5832 #endif
5833
5834 TEST_c_c (ccosh, min_subnorm_value * 0x1p120, 0x1p-120, 1.0, min_subnorm_value, UNDERFLOW_EXCEPTION),
5835 TEST_c_c (ccosh, 0x1p-120, min_subnorm_value * 0x1p120, 1.0, min_subnorm_value, UNDERFLOW_EXCEPTION),
5836 END_DATA (ccosh)
5837 };
5838
5839 static void
5840 ccosh_test (void)
5841 {
5842 errno = 0;
5843 FUNC(ccosh) (BUILD_COMPLEX (0.7L, 1.2L));
5844 if (errno == ENOSYS)
5845 /* Function not implemented. */
5846 return;
5847
5848 START (ccosh);
5849 RUN_TEST_LOOP_c_c (ccosh, ccosh_test_data, );
5850 END (ccosh, complex);
5851 }
5852
5853
5854 static const struct test_f_f_data ceil_test_data[] =
5855 {
5856 START_DATA (ceil),
5857 TEST_f_f (ceil, 0.0, 0.0),
5858 TEST_f_f (ceil, minus_zero, minus_zero),
5859 TEST_f_f (ceil, plus_infty, plus_infty),
5860 TEST_f_f (ceil, minus_infty, minus_infty),
5861 TEST_f_f (ceil, qnan_value, qnan_value),
5862
5863 TEST_f_f (ceil, M_PIl, 4.0),
5864 TEST_f_f (ceil, -M_PIl, -3.0),
5865 TEST_f_f (ceil, 0.1, 1.0),
5866 TEST_f_f (ceil, 0.25, 1.0),
5867 TEST_f_f (ceil, 0.625, 1.0),
5868 TEST_f_f (ceil, -0.1, minus_zero),
5869 TEST_f_f (ceil, -0.25, minus_zero),
5870 TEST_f_f (ceil, -0.625, minus_zero),
5871
5872 #ifdef TEST_LDOUBLE
5873 /* The result can only be represented in long double. */
5874 TEST_f_f (ceil, 4503599627370495.5L, 4503599627370496.0L),
5875 TEST_f_f (ceil, 4503599627370496.25L, 4503599627370497.0L),
5876 TEST_f_f (ceil, 4503599627370496.5L, 4503599627370497.0L),
5877 TEST_f_f (ceil, 4503599627370496.75L, 4503599627370497.0L),
5878 TEST_f_f (ceil, 4503599627370497.5L, 4503599627370498.0L),
5879
5880 TEST_f_f (ceil, -4503599627370495.5L, -4503599627370495.0L),
5881 TEST_f_f (ceil, -4503599627370496.25L, -4503599627370496.0L),
5882 TEST_f_f (ceil, -4503599627370496.5L, -4503599627370496.0L),
5883 TEST_f_f (ceil, -4503599627370496.75L, -4503599627370496.0L),
5884 TEST_f_f (ceil, -4503599627370497.5L, -4503599627370497.0L),
5885
5886 # if LDBL_MANT_DIG > 100
5887 TEST_f_f (ceil, 4503599627370494.5000000000001L, 4503599627370495.0L),
5888 TEST_f_f (ceil, 4503599627370495.5000000000001L, 4503599627370496.0L),
5889 TEST_f_f (ceil, 4503599627370496.5000000000001L, 4503599627370497.0L),
5890 TEST_f_f (ceil, -4503599627370494.5000000000001L, -4503599627370494.0L),
5891 TEST_f_f (ceil, -4503599627370495.5000000000001L, -4503599627370495.0L),
5892 TEST_f_f (ceil, -4503599627370496.5000000000001L, -4503599627370496.0L),
5893 # endif
5894
5895 TEST_f_f (ceil, 9007199254740991.5L, 9007199254740992.0L),
5896 TEST_f_f (ceil, 9007199254740992.25L, 9007199254740993.0L),
5897 TEST_f_f (ceil, 9007199254740992.5L, 9007199254740993.0L),
5898 TEST_f_f (ceil, 9007199254740992.75L, 9007199254740993.0L),
5899 TEST_f_f (ceil, 9007199254740993.5L, 9007199254740994.0L),
5900
5901 TEST_f_f (ceil, -9007199254740991.5L, -9007199254740991.0L),
5902 TEST_f_f (ceil, -9007199254740992.25L, -9007199254740992.0L),
5903 TEST_f_f (ceil, -9007199254740992.5L, -9007199254740992.0L),
5904 TEST_f_f (ceil, -9007199254740992.75L, -9007199254740992.0L),
5905 TEST_f_f (ceil, -9007199254740993.5L, -9007199254740993.0L),
5906
5907 # if LDBL_MANT_DIG > 100
5908 TEST_f_f (ceil, 9007199254740991.0000000000001L, 9007199254740992.0L),
5909 TEST_f_f (ceil, 9007199254740992.0000000000001L, 9007199254740993.0L),
5910 TEST_f_f (ceil, 9007199254740993.0000000000001L, 9007199254740994.0L),
5911 TEST_f_f (ceil, 9007199254740991.5000000000001L, 9007199254740992.0L),
5912 TEST_f_f (ceil, 9007199254740992.5000000000001L, 9007199254740993.0L),
5913 TEST_f_f (ceil, 9007199254740993.5000000000001L, 9007199254740994.0L),
5914
5915 TEST_f_f (ceil, -9007199254740991.0000000000001L, -9007199254740991.0L),
5916 TEST_f_f (ceil, -9007199254740992.0000000000001L, -9007199254740992.0L),
5917 TEST_f_f (ceil, -9007199254740993.0000000000001L, -9007199254740993.0L),
5918 TEST_f_f (ceil, -9007199254740991.5000000000001L, -9007199254740991.0L),
5919 TEST_f_f (ceil, -9007199254740992.5000000000001L, -9007199254740992.0L),
5920 TEST_f_f (ceil, -9007199254740993.5000000000001L, -9007199254740993.0L),
5921 # endif
5922
5923 TEST_f_f (ceil, 72057594037927935.5L, 72057594037927936.0L),
5924 TEST_f_f (ceil, 72057594037927936.25L, 72057594037927937.0L),
5925 TEST_f_f (ceil, 72057594037927936.5L, 72057594037927937.0L),
5926 TEST_f_f (ceil, 72057594037927936.75L, 72057594037927937.0L),
5927 TEST_f_f (ceil, 72057594037927937.5L, 72057594037927938.0L),
5928
5929 TEST_f_f (ceil, -72057594037927935.5L, -72057594037927935.0L),
5930 TEST_f_f (ceil, -72057594037927936.25L, -72057594037927936.0L),
5931 TEST_f_f (ceil, -72057594037927936.5L, -72057594037927936.0L),
5932 TEST_f_f (ceil, -72057594037927936.75L, -72057594037927936.0L),
5933 TEST_f_f (ceil, -72057594037927937.5L, -72057594037927937.0L),
5934
5935 TEST_f_f (ceil, 10141204801825835211973625643007.5L, 10141204801825835211973625643008.0L),
5936 TEST_f_f (ceil, 10141204801825835211973625643008.25L, 10141204801825835211973625643009.0L),
5937 TEST_f_f (ceil, 10141204801825835211973625643008.5L, 10141204801825835211973625643009.0L),
5938 TEST_f_f (ceil, 10141204801825835211973625643008.75L, 10141204801825835211973625643009.0L),
5939 TEST_f_f (ceil, 10141204801825835211973625643009.5L, 10141204801825835211973625643010.0L),
5940 #endif
5941 END_DATA (ceil)
5942 };
5943
5944 static void
5945 ceil_test (void)
5946 {
5947 START (ceil);
5948 RUN_TEST_LOOP_f_f (ceil, ceil_test_data, );
5949 END (ceil);
5950 }
5951
5952
5953 static const struct test_c_c_data cexp_test_data[] =
5954 {
5955 START_DATA (cexp),
5956 TEST_c_c (cexp, plus_zero, plus_zero, 1, 0.0),
5957 TEST_c_c (cexp, minus_zero, plus_zero, 1, 0.0),
5958 TEST_c_c (cexp, plus_zero, minus_zero, 1, minus_zero),
5959 TEST_c_c (cexp, minus_zero, minus_zero, 1, minus_zero),
5960
5961 TEST_c_c (cexp, plus_infty, plus_zero, plus_infty, 0.0),
5962 TEST_c_c (cexp, plus_infty, minus_zero, plus_infty, minus_zero),
5963
5964 TEST_c_c (cexp, minus_infty, plus_zero, 0.0, 0.0),
5965 TEST_c_c (cexp, minus_infty, minus_zero, 0.0, minus_zero),
5966
5967 TEST_c_c (cexp, 0.0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5968 TEST_c_c (cexp, minus_zero, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5969
5970 TEST_c_c (cexp, 0.0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5971 TEST_c_c (cexp, minus_zero, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5972
5973 TEST_c_c (cexp, 100.0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5974 TEST_c_c (cexp, -100.0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5975
5976 TEST_c_c (cexp, 100.0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5977 TEST_c_c (cexp, -100.0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5978
5979 TEST_c_c (cexp, minus_infty, 2.0, minus_zero, 0.0),
5980 TEST_c_c (cexp, minus_infty, 4.0, minus_zero, minus_zero),
5981 TEST_c_c (cexp, plus_infty, 2.0, minus_infty, plus_infty),
5982 TEST_c_c (cexp, plus_infty, 4.0, minus_infty, minus_infty),
5983
5984 TEST_c_c (cexp, plus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5985 TEST_c_c (cexp, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5986
5987 TEST_c_c (cexp, minus_infty, plus_infty, 0.0, 0.0, IGNORE_ZERO_INF_SIGN),
5988 TEST_c_c (cexp, minus_infty, minus_infty, 0.0, minus_zero, IGNORE_ZERO_INF_SIGN),
5989
5990 TEST_c_c (cexp, minus_infty, qnan_value, 0, 0, IGNORE_ZERO_INF_SIGN),
5991
5992 TEST_c_c (cexp, plus_infty, qnan_value, plus_infty, qnan_value),
5993
5994 TEST_c_c (cexp, qnan_value, 0.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5995 TEST_c_c (cexp, qnan_value, 1.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5996
5997 TEST_c_c (cexp, qnan_value, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5998 TEST_c_c (cexp, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5999 TEST_c_c (cexp, 1, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6000 TEST_c_c (cexp, qnan_value, qnan_value, qnan_value, qnan_value),
6001
6002 TEST_c_c (cexp, 0.75L, 1.25L, 0.667537446429131586942201977015932112L, 2.00900045494094876258347228145863909L),
6003 TEST_c_c (cexp, -2.0, -3.0, -0.13398091492954261346140525546115575L, -0.019098516261135196432576240858800925L),
6004
6005 TEST_c_c (cexp, 0, 0x1p65, 0.99888622066058013610642172179340364209972L, -0.047183876212354673805106149805700013943218L),
6006 TEST_c_c (cexp, 0, -0x1p65, 0.99888622066058013610642172179340364209972L, 0.047183876212354673805106149805700013943218L),
6007 TEST_c_c (cexp, 50, 0x1p127, 4.053997150228616856622417636046265337193e21L, 3.232070315463388524466674772633810238819e21L),
6008
6009 #ifndef TEST_FLOAT
6010 TEST_c_c (cexp, 0, 1e22, 0.5232147853951389454975944733847094921409L, -0.8522008497671888017727058937530293682618L),
6011 TEST_c_c (cexp, 0, 0x1p1023, -0.826369834614147994500785680811743734805L, 0.5631277798508840134529434079444683477104L),
6012 TEST_c_c (cexp, 500, 0x1p1023, -1.159886268932754433233243794561351783426e217L, 7.904017694554466595359379965081774849708e216L),
6013 #endif
6014
6015 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
6016 TEST_c_c (cexp, 0, 0x1p16383L, 0.9210843909921906206874509522505756251609L, 0.3893629985894208126948115852610595405563L),
6017 TEST_c_c (cexp, -10000, 0x1p16383L, 1.045876464564882298442774542991176546722e-4343L, 4.421154026488516836023811173959413420548e-4344L),
6018 #endif
6019
6020 TEST_c_c (cexp, 88.75, 0.75, 2.558360358486542817001900410314204322891e38L, 2.383359453227311447654736314679677655100e38L),
6021 TEST_c_c (cexp, -95, 0.75, 4.039714446238306526889476684000081624047e-42L, 3.763383677300535390271646960780570275931e-42L, UNDERFLOW_EXCEPTION_FLOAT),
6022
6023 #ifndef TEST_FLOAT
6024 TEST_c_c (cexp, 709.8125, 0.75, 1.355121963080879535248452862759108365762e308L, 1.262426823598609432507811340856186873507e308L),
6025 TEST_c_c (cexp, -720, 0.75, 1.486960657116368433685753325516638551722e-313L, 1.385247284245720590980701226843815229385e-313L, UNDERFLOW_EXCEPTION_DOUBLE),
6026 #endif
6027
6028 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
6029 TEST_c_c (cexp, 11356.5625, 0.75, 9.052188470850960144814815984311663764287e4931L, 8.432986734191301036267148978260970230200e4931L),
6030 TEST_c_c (cexp, -11370, 0.75, 8.631121063182211587489310508568170739592e-4939L, 8.040721827809267291427062346918413482824e-4939L, UNDERFLOW_EXCEPTION),
6031 #endif
6032
6033 #ifdef TEST_FLOAT
6034 TEST_c_c (cexp, 180, 0x1p-149, plus_infty, 2.087071793345235105931967606907855310664e33L, OVERFLOW_EXCEPTION),
6035 #endif
6036
6037 #if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
6038 TEST_c_c (cexp, 1440, 0x1p-1074, plus_infty, 1.196295853897226111293303155636183216483e302L, OVERFLOW_EXCEPTION),
6039 #endif
6040
6041 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
6042 TEST_c_c (cexp, 22730, 0x1p-16434L, plus_infty, 2.435706297811211974162115164702304105374e4924L, OVERFLOW_EXCEPTION),
6043 #endif
6044
6045 TEST_c_c (cexp, 1e6, 0, plus_infty, 0, OVERFLOW_EXCEPTION),
6046 TEST_c_c (cexp, 1e6, min_value, plus_infty, plus_infty, OVERFLOW_EXCEPTION),
6047 TEST_c_c (cexp, 1e6, -min_value, plus_infty, minus_infty, OVERFLOW_EXCEPTION),
6048
6049 TEST_c_c (cexp, min_value, min_subnorm_value, 1.0, min_subnorm_value, UNDERFLOW_EXCEPTION),
6050 TEST_c_c (cexp, min_value, -min_subnorm_value, 1.0, -min_subnorm_value, UNDERFLOW_EXCEPTION),
6051 END_DATA (cexp)
6052 };
6053
6054 static void
6055 cexp_test (void)
6056 {
6057 errno = 0;
6058 FUNC(cexp) (BUILD_COMPLEX (0, 0));
6059 if (errno == ENOSYS)
6060 /* Function not implemented. */
6061 return;
6062
6063 START (cexp);
6064 RUN_TEST_LOOP_c_c (cexp, cexp_test_data, );
6065 END (cexp, complex);
6066 }
6067
6068
6069 static void
6070 cimag_test (void)
6071 {
6072 START (cimag);
6073 TEST_c_f (cimag, 1.0, 0.0, 0.0);
6074 TEST_c_f (cimag, 1.0, minus_zero, minus_zero);
6075 TEST_c_f (cimag, 1.0, qnan_value, qnan_value);
6076 TEST_c_f (cimag, qnan_value, qnan_value, qnan_value);
6077 TEST_c_f (cimag, 1.0, plus_infty, plus_infty);
6078 TEST_c_f (cimag, 1.0, minus_infty, minus_infty);
6079 TEST_c_f (cimag, 2.0, 3.0, 3.0);
6080
6081 END (cimag);
6082 }
6083
6084 static const struct test_c_c_data clog_test_data[] =
6085 {
6086 START_DATA (clog),
6087 TEST_c_c (clog, minus_zero, 0, minus_infty, M_PIl, DIVIDE_BY_ZERO_EXCEPTION),
6088 TEST_c_c (clog, minus_zero, minus_zero, minus_infty, -M_PIl, DIVIDE_BY_ZERO_EXCEPTION),
6089
6090 TEST_c_c (clog, 0, 0, minus_infty, 0.0, DIVIDE_BY_ZERO_EXCEPTION),
6091 TEST_c_c (clog, 0, minus_zero, minus_infty, minus_zero, DIVIDE_BY_ZERO_EXCEPTION),
6092
6093 TEST_c_c (clog, minus_infty, plus_infty, plus_infty, M_PI_34l),
6094 TEST_c_c (clog, minus_infty, minus_infty, plus_infty, -M_PI_34l),
6095
6096 TEST_c_c (clog, plus_infty, plus_infty, plus_infty, M_PI_4l),
6097 TEST_c_c (clog, plus_infty, minus_infty, plus_infty, -M_PI_4l),
6098
6099 TEST_c_c (clog, 0, plus_infty, plus_infty, M_PI_2l),
6100 TEST_c_c (clog, 3, plus_infty, plus_infty, M_PI_2l),
6101 TEST_c_c (clog, minus_zero, plus_infty, plus_infty, M_PI_2l),
6102 TEST_c_c (clog, -3, plus_infty, plus_infty, M_PI_2l),
6103 TEST_c_c (clog, 0, minus_infty, plus_infty, -M_PI_2l),
6104 TEST_c_c (clog, 3, minus_infty, plus_infty, -M_PI_2l),
6105 TEST_c_c (clog, minus_zero, minus_infty, plus_infty, -M_PI_2l),
6106 TEST_c_c (clog, -3, minus_infty, plus_infty, -M_PI_2l),
6107
6108 TEST_c_c (clog, minus_infty, 0, plus_infty, M_PIl),
6109 TEST_c_c (clog, minus_infty, 1, plus_infty, M_PIl),
6110 TEST_c_c (clog, minus_infty, minus_zero, plus_infty, -M_PIl),
6111 TEST_c_c (clog, minus_infty, -1, plus_infty, -M_PIl),
6112
6113 TEST_c_c (clog, plus_infty, 0, plus_infty, 0.0),
6114 TEST_c_c (clog, plus_infty, 1, plus_infty, 0.0),
6115 TEST_c_c (clog, plus_infty, minus_zero, plus_infty, minus_zero),
6116 TEST_c_c (clog, plus_infty, -1, plus_infty, minus_zero),
6117
6118 TEST_c_c (clog, plus_infty, qnan_value, plus_infty, qnan_value),
6119 TEST_c_c (clog, minus_infty, qnan_value, plus_infty, qnan_value),
6120
6121 TEST_c_c (clog, qnan_value, plus_infty, plus_infty, qnan_value),
6122 TEST_c_c (clog, qnan_value, minus_infty, plus_infty, qnan_value),
6123
6124 TEST_c_c (clog, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6125 TEST_c_c (clog, 3, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6126 TEST_c_c (clog, minus_zero, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6127 TEST_c_c (clog, -3, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6128
6129 TEST_c_c (clog, qnan_value, 0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6130 TEST_c_c (clog, qnan_value, 5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6131 TEST_c_c (clog, qnan_value, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6132 TEST_c_c (clog, qnan_value, -5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6133
6134 TEST_c_c (clog, qnan_value, qnan_value, qnan_value, qnan_value),
6135
6136 TEST_c_c (clog, 0.75L, 1.25L, 0.376885901188190075998919126749298416L, 1.03037682652431246378774332703115153L),
6137 TEST_c_c (clog, -2, -3, 1.2824746787307683680267437207826593L, -2.1587989303424641704769327722648368L),
6138
6139 TEST_c_c (clog, 0x1.fffffep+127L, 0x1.fffffep+127L, 89.06941264234832570836679262104313101776L, M_PI_4l),
6140 TEST_c_c (clog, 0x1.fffffep+127L, 1.0L, 88.72283905206835305365817656031404273372L, 2.938736052218037251011746307725933020145e-39L, UNDERFLOW_EXCEPTION_FLOAT),
6141 TEST_c_c (clog, 0x1p-149L, 0x1p-149L, -102.9323563131518784484589700365392203592L, M_PI_4l),
6142 TEST_c_c (clog, 0x1p-147L, 0x1p-147L, -101.5460619520319878296245057936228672231L, M_PI_4l),
6143
6144 #ifndef TEST_FLOAT
6145 TEST_c_c (clog, 0x1.fffffffffffffp+1023L, 0x1.fffffffffffffp+1023L, 710.1292864836639693869320059713862337880L, M_PI_4l),
6146 TEST_c_c (clog, 0x1.fffffffffffffp+1023L, 0x1p+1023L, 709.8942846690411016323109979483151967689L, 0.4636476090008061606231772164674799632783L),
6147 TEST_c_c (clog, 0x1p-1074L, 0x1p-1074L, -744.0934983311012896593986823853525458290L, M_PI_4l),
6148 TEST_c_c (clog, 0x1p-1073L, 0x1p-1073L, -743.4003511505413443499814502638943692610L, M_PI_4l),
6149 #endif
6150
6151 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
6152 TEST_c_c (clog, 0x1.fp+16383L, 0x1.fp+16383L, 11356.83823118610934184548269774874545400L, M_PI_4l),
6153 TEST_c_c (clog, 0x1.fp+16383L, 0x1p+16383L, 11356.60974243783798653123798337822335902L, 0.4764674194737066993385333770295162295856L),
6154 TEST_c_c (clog, 0x1p-16440L, 0x1p-16441L, -11395.22807662984378194141292922726786191L, 0.4636476090008061162142562314612144020285L),
6155 #endif
6156
6157 TEST_c_c (clog, 0x1p-149L, 0x1.fp+127L, 88.69109041335841930424871526389807508374L, M_PI_2l),
6158 TEST_c_c (clog, -0x1p-149L, 0x1.fp+127L, 88.69109041335841930424871526389807508374L, M_PI_2l),
6159 TEST_c_c (clog, 0x1p-149L, -0x1.fp+127L, 88.69109041335841930424871526389807508374L, -M_PI_2l),
6160 TEST_c_c (clog, -0x1p-149L, -0x1.fp+127L, 88.69109041335841930424871526389807508374L, -M_PI_2l),
6161 TEST_c_c (clog, -0x1.fp+127L, 0x1p-149L, 88.69109041335841930424871526389807508374L, M_PIl),
6162 TEST_c_c (clog, -0x1.fp+127L, -0x1p-149L, 88.69109041335841930424871526389807508374L, -M_PIl),
6163 #ifdef TEST_FLOAT
6164 TEST_c_c (clog, 0x1.fp+127L, 0x1p-149L, 88.69109041335841930424871526389807508374L, plus_zero, UNDERFLOW_EXCEPTION),
6165 TEST_c_c (clog, 0x1.fp+127L, -0x1p-149L, 88.69109041335841930424871526389807508374L, minus_zero, UNDERFLOW_EXCEPTION),
6166 #endif
6167
6168 #ifndef TEST_FLOAT
6169 TEST_c_c (clog, 0x1p-1074L, 0x1.fp+1023L, 709.7509641950694165420886960904242800794L, M_PI_2l),
6170 TEST_c_c (clog, -0x1p-1074L, 0x1.fp+1023L, 709.7509641950694165420886960904242800794L, M_PI_2l),
6171 TEST_c_c (clog, 0x1p-1074L, -0x1.fp+1023L, 709.7509641950694165420886960904242800794L, -M_PI_2l),
6172 TEST_c_c (clog, -0x1p-1074L, -0x1.fp+1023L, 709.7509641950694165420886960904242800794L, -M_PI_2l),
6173 TEST_c_c (clog, -0x1.fp+1023L, 0x1p-1074L, 709.7509641950694165420886960904242800794L, M_PIl),
6174 TEST_c_c (clog, -0x1.fp+1023L, -0x1p-1074L, 709.7509641950694165420886960904242800794L, -M_PIl),
6175 #endif
6176 #if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
6177 TEST_c_c (clog, 0x1.fp+1023L, 0x1p-1074L, 709.7509641950694165420886960904242800794L, plus_zero, UNDERFLOW_EXCEPTION),
6178 TEST_c_c (clog, 0x1.fp+1023L, -0x1p-1074L, 709.7509641950694165420886960904242800794L, minus_zero, UNDERFLOW_EXCEPTION),
6179 #endif
6180
6181 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
6182 TEST_c_c (clog, 0x1p-16445L, 0x1.fp+16383L, 11356.49165759582936919077408168801636572L, M_PI_2l),
6183 TEST_c_c (clog, -0x1p-16445L, 0x1.fp+16383L, 11356.49165759582936919077408168801636572L, M_PI_2l),
6184 TEST_c_c (clog, 0x1p-16445L, -0x1.fp+16383L, 11356.49165759582936919077408168801636572L, -M_PI_2l),
6185 TEST_c_c (clog, -0x1p-16445L, -0x1.fp+16383L, 11356.49165759582936919077408168801636572L, -M_PI_2l),
6186 TEST_c_c (clog, -0x1.fp+16383L, 0x1p-16445L, 11356.49165759582936919077408168801636572L, M_PIl),
6187 TEST_c_c (clog, -0x1.fp+16383L, -0x1p-16445L, 11356.49165759582936919077408168801636572L, -M_PIl),
6188 TEST_c_c (clog, 0x1.fp+16383L, 0x1p-16445L, 11356.49165759582936919077408168801636572L, plus_zero, UNDERFLOW_EXCEPTION),
6189 TEST_c_c (clog, 0x1.fp+16383L, -0x1p-16445L, 11356.49165759582936919077408168801636572L, minus_zero, UNDERFLOW_EXCEPTION),
6190 # if LDBL_MANT_DIG >= 113
6191 TEST_c_c (clog, 0x1p-16494L, 0x1.fp+16383L, 11356.49165759582936919077408168801636572L, M_PI_2l),
6192 TEST_c_c (clog, -0x1p-16494L, 0x1.fp+16383L, 11356.49165759582936919077408168801636572L, M_PI_2l),
6193 TEST_c_c (clog, 0x1p-16494L, -0x1.fp+16383L, 11356.49165759582936919077408168801636572L, -M_PI_2l),
6194 TEST_c_c (clog, -0x1p-16494L, -0x1.fp+16383L, 11356.49165759582936919077408168801636572L, -M_PI_2l),
6195 TEST_c_c (clog, -0x1.fp+16383L, 0x1p-16494L, 11356.49165759582936919077408168801636572L, M_PIl),
6196 TEST_c_c (clog, -0x1.fp+16383L, -0x1p-16494L, 11356.49165759582936919077408168801636572L, -M_PIl),
6197 TEST_c_c (clog, 0x1.fp+16383L, 0x1p-16494L, 11356.49165759582936919077408168801636572L, plus_zero, UNDERFLOW_EXCEPTION),
6198 TEST_c_c (clog, 0x1.fp+16383L, -0x1p-16494L, 11356.49165759582936919077408168801636572L, minus_zero, UNDERFLOW_EXCEPTION),
6199 # endif
6200 #endif
6201
6202 TEST_c_c (clog, 1.0L, 0x1.234566p-10L, 6.172834701221959432440126967147726538097e-7L, 1.111110564353742042376451655136933182201e-3L),
6203 TEST_c_c (clog, -1.0L, 0x1.234566p-20L, 5.886877547844618300918562490463748605537e-13L, 3.141591568520436206990380699322226378452L),
6204 TEST_c_c (clog, 0x1.234566p-30L, 1.0L, 5.614163921211322622623353961365728040115e-19L, 1.570796325735258575254858696548386439740L),
6205 TEST_c_c (clog, -0x1.234566p-40L, -1.0L, 5.354083939753840089583620652120903838944e-25L, -1.570796326795931422008642456283782656359L),
6206 TEST_c_c (clog, 0x1.234566p-50L, 1.0L, 5.106052341226425256332038420428899201070e-31L, 1.570796326794895608681734464330528755366L),
6207 TEST_c_c (clog, 0x1.234566p-60L, 1.0L, 4.869510976053643471080816669875627875933e-37L, 1.570796326794896618244456860363082279319L),
6208 TEST_c_c (clog, 0x1p-62L, 1.0L, 2.350988701644575015937473074444491355582e-38L, 1.570796326794896619014481257142650555297L),
6209 TEST_c_c (clog, 0x1p-63L, 1.0L, 5.877471754111437539843682686111228389059e-39L, 1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
6210 TEST_c_c (clog, 0x1p-64L, 1.0L, 1.469367938527859384960920671527807097271e-39L, 1.570796326794896619177111583015476220398L, UNDERFLOW_EXCEPTION_FLOAT),
6211 #ifndef TEST_FLOAT
6212 TEST_c_c (clog, 0x1p-510L, 1.0L, 4.450147717014402766180465434664808128438e-308L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
6213 TEST_c_c (clog, 0x1p-511L, 1.0L, 1.112536929253600691545116358666202032110e-308L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
6214 TEST_c_c (clog, 0x1p-512L, 1.0L, 2.781342323134001728862790896665505080274e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
6215 #endif
6216 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
6217 TEST_c_c (clog, 0x1p-8190L, 1.0L, 6.724206286224187012525355634643505205196e-4932L, 1.570796326794896619231321691639751442099L),
6218 TEST_c_c (clog, 0x1p-8191L, 1.0L, 1.681051571556046753131338908660876301299e-4932L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
6219 TEST_c_c (clog, 0x1p-8192L, 1.0L, 4.202628928890116882828347271652190753248e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
6220 #endif
6221
6222 TEST_c_c (clog, 0x1.000566p0L, 0x1.234p-10L, 8.298731898331237038231468223024422855654e-5L, 1.110938609507128729312743251313024793990e-3L),
6223 TEST_c_c (clog, 0x1.000566p0L, 0x1.234p-100L, 8.237022655933121125560939513260027133767e-5L, 8.974094312218060110948251664314290484113e-31L),
6224 #ifndef TEST_FLOAT
6225 TEST_c_c (clog, -0x1.0000000123456p0L, 0x1.2345678p-30L, 2.649094282537168795982991778475646793277e-10L, 3.141592652530155111500161671113150737892L),
6226 TEST_c_c (clog, -0x1.0000000123456p0L, 0x1.2345678p-1000L, 2.649094276923003995420209214900915462737e-10L, 3.141592653589793238462643383279502884197L),
6227 #endif
6228 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
6229 TEST_c_c (clog, 0x1.00000000000000123456789abcp0L, 0x1.23456789p-60L, 9.868649107778739757272772275265050767867e-19L, 9.868649106423871142816660980898339912137e-19L),
6230 TEST_c_c (clog, 0x1.00000000000000123456789abcp0L, 0x1.23456789p-1000L, 9.868649107778739752403260515979017248596e-19L, 1.061846605795612822522063052130030717368e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
6231 #endif
6232
6233 TEST_c_c (clog, 0x0.ffffffp0L, 0x0.ffffffp-100L, -5.960464655174753498633255797994360530379e-8L, 7.888609052210118054117285652827862296732e-31L),
6234 #ifndef TEST_FLOAT
6235 TEST_c_c (clog, 0x0.fffffffffffff8p0L, 0x0.fffffffffffff8p-1000L, -1.110223024625156602053389888482372171810e-16L, 9.332636185032188789900895447238171696171e-302L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
6236 #endif
6237 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
6238 TEST_c_c (clog, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp-15000L, -5.421010862427522170184200798202494495630e-20L, 3.548665303440282824232502561095699343814e-4516L),
6239 #endif
6240
6241 TEST_c_c (clog, 0x1a6p-10L, 0x3a5p-10L, -1.4305135209763571252847059962654228661815e-06L, 1.1460277178115757370775644871674016684074L),
6242 TEST_c_c (clog, 0xf2p-10L, 0x3e3p-10L, 6.1988446308070710970664736815277450078106e-06L, 1.3322126499153926210226335249558203898460L),
6243 TEST_c_c (clog, 0x4d4ep-15L, 0x6605p-15L, -1.6298145321400412054744424587143483169412e-08L, 0.9223574537155056772124552172295398141249L),
6244 TEST_c_c (clog, 0x2818p-15L, 0x798fp-15L, 1.5366822245016167178749091974664853785194e-08L, 1.2522014929038946066987318471922169174157L),
6245 TEST_c_c (clog, 0x9b57bp-20L, 0xcb7b4p-20L, -3.9563019528687610863490232935890272740908e-11L, 0.9187593477446338910857133065497364950682L),
6246 TEST_c_c (clog, 0x2731p-20L, 0xfffd0p-20L, 4.4110493034041283943115971658295280288115e-11L, 1.5612279663766352262688735061954290528838L),
6247 TEST_c_c (clog, 0x2ede88p-23L, 0x771c3fp-23L, -4.4764192352906350039050902870893173560494e-13L, 1.1959106857549200806818600493552847793381L),
6248 TEST_c_c (clog, 0x11682p-23L, 0x7ffed1p-23L, 1.1723955140027907954461000991619077811832e-12L, 1.5622968405332756349813737986164832897108L),
6249 TEST_c_c (clog, 0xa1f2c1p-24L, 0xc643aep-24L, -1.0480505352462576151523512837107080269981e-13L, 0.8858771987699967480545613322309315260313L),
6250 TEST_c_c (clog, 0x659feap-24L, 0xeaf6f9p-24L, 3.7303493627403868207597214252239749960738e-14L, 1.1625816408046866464773042283673653469061L),
6251 #ifndef TEST_FLOAT
6252 TEST_c_c (clog, 0x4447d7175p-35L, 0x6c445e00ap-35L, -1.4823076576950255933915367361099865652625e-20L, 1.0081311552703893116404606212158840190615L),
6253 TEST_c_c (clog, 0x2dd46725bp-35L, 0x7783a1284p-35L, 4.4469229730850767799109418892826021157328e-20L, 1.2046235979300843056806465045930070146351L),
6254 TEST_c_c (clog, 0x164c74eea876p-45L, 0x16f393482f77p-45L, -3.0292258760486853327810377824479932031744e-26L, 0.7998237934177411746093524982030330293980L),
6255 TEST_c_c (clog, 0xfe961079616p-45L, 0x1bc37e09e6d1p-45L, 5.3718272201930019901317065495843842735179e-26L, 1.0503831592447830576186444373011142397404L),
6256 TEST_c_c (clog, 0xa4722f19346cp-51L, 0x7f9631c5e7f07p-51L, -6.2122796286154679676173624516405339768606e-30L, 1.4904138780720095276446375492434049214172L),
6257 TEST_c_c (clog, 0x10673dd0f2481p-51L, 0x7ef1d17cefbd2p-51L, 3.2047474274603604594851472963586149973093e-29L, 1.4422922682185099608731642353544207976604L),
6258 TEST_c_c (clog, 0x8ecbf810c4ae6p-52L, 0xd479468b09a37p-52L, -9.7375017988218644730510244778042114638107e-30L, 0.9790637929494922564724108399524154766631L),
6259 TEST_c_c (clog, 0x5b06b680ea2ccp-52L, 0xef452b965da9fp-52L, 8.3076914081087805757422664530653247447136e-30L, 1.2072712126771536614482822173033535043206L),
6260 TEST_c_c (clog, 0x659b70ab7971bp-53L, 0x1f5d111e08abecp-53L, -2.5083311595699359750201056724289010648701e-30L, 1.3710185432462268491534742969536240564640L),
6261 TEST_c_c (clog, 0x15cfbd1990d1ffp-53L, 0x176a3973e09a9ap-53L, 1.0168910106364605304135563536838075568606e-30L, 0.8208373755522359859870890246475340086663L),
6262 TEST_c_c (clog, 0x1367a310575591p-54L, 0x3cfcc0a0541f60p-54L, 5.0844550531823026520677817684239496041087e-32L, 1.2627468605458094918919206628466016525397L),
6263 TEST_c_c (clog, 0x55cb6d0c83af5p-55L, 0x7fe33c0c7c4e90p-55L, -5.2000108498455368032511404449795741611813e-32L, 1.5288921536982513453421343495466824420259L),
6264 #endif
6265 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
6266 TEST_c_c (clog, 0x298c62cb546588a7p-63L, 0x7911b1dfcc4ecdaep-63L, -1.1931267660846218205882675852805793644095e-36L, 1.2402109774337032400594953899784058127412L),
6267 TEST_c_c (clog, 0x4d9c37e2b5cb4533p-63L, 0x65c98be2385a042ep-63L, 6.4064442119814669184296141278612389400075e-37L, 0.9193591364645830864185131402313014890145L),
6268 TEST_c_c (clog, 0x602fd5037c4792efp-64L, 0xed3e2086dcca80b8p-64L, -2.3362950222592964220878638677292132852104e-37L, 1.1856121127236268105413184264288408265852L),
6269 TEST_c_c (clog, 0x6b10b4f3520217b6p-64L, 0xe8893cbb449253a1p-64L, 2.4244570985709679851855191080208817099132e-37L, 1.1393074519572050614551047548718495655972L),
6270 TEST_c_c (clog, 0x81b7efa81fc35ad1p-65L, 0x1ef4b835f1c79d812p-65L, -9.9182335850630508484862145328126979066934e-39L, 1.3146479888794807046338799047003947008804L),
6271 #endif
6272 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
6273 TEST_c_c (clog, 0x3f96469050f650869c2p-75L, 0x6f16b2c9c8b05988335p-75L, -1.0509738482436128031927971874674370984602e-45L, 1.0509191467640012308402149909370784281448L),
6274 TEST_c_c (clog, 0x3157fc1d73233e580c8p-75L, 0x761b52ccd435d7c7f5fp-75L, 1.3487497719126364307640897239165442763573e-43L, 1.1750493008528425228929764149024375035382L),
6275 TEST_c_c (clog, 0x155f8afc4c48685bf63610p-85L, 0x17d0cf2652cdbeb1294e19p-85L, -4.7775669192897997174762089350332738583822e-50L, 0.8393953487996880419413728440067635213372L),
6276 TEST_c_c (clog, 0x13836d58a13448d750b4b9p-85L, 0x195ca7bc3ab4f9161edbe6p-85L, 2.8398125044729578740243199963484494962411e-50L, 0.9149964976334130461795060758257083099706L),
6277 TEST_c_c (clog, 0x1df515eb171a808b9e400266p-95L, 0x7c71eb0cd4688dfe98581c77p-95L, -3.5048022044913950094635368750889659723004e-57L, 1.3345633256521815205858155673950177421079L),
6278 TEST_c_c (clog, 0xe33f66c9542ca25cc43c867p-95L, 0x7f35a68ebd3704a43c465864p-95L, 4.1101771307217268747345114262406964584250e-56L, 1.4596065864518742494094402406719567059585L),
6279 TEST_c_c (clog, 0x6771f22c64ed551b857c128b4cp-105L, 0x1f570e7a13cc3cf2f44fd793ea1p-105L, -1.4281333889622737316199756373421183559948e-62L, 1.3673546561165378090903506783353927980633L),
6280 TEST_c_c (clog, 0x15d8ab6ed05ca514086ac3a1e84p-105L, 0x1761e480aa094c0b10b34b09ce9p-105L, 1.0027319539522347477331743836657426754857e-62L, 0.8193464073721167323313606647411269414759L),
6281 TEST_c_c (clog, 0x187190c1a334497bdbde5a95f48p-106L, 0x3b25f08062d0a095c4cfbbc338dp-106L, -1.7471844652198029695350765775994001163767e-63L, 1.1789110097072986038243729592318526094314L),
6282 TEST_c_c (clog, 0x6241ef0da53f539f02fad67dabp-106L, 0x3fb46641182f7efd9caa769dac0p-106L, 4.3299788920664682288477984749202524623248e-63L, 1.4746938237585656250866370987773473745867L),
6283 #endif
6284 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
6285 TEST_c_c (clog, 0x3e1d0a105ac4ebeacd9c6952d34cp-112L, 0xf859b3d1b06d005dcbb5516d5479p-112L, -1.1683999374665377365054966073875064467108e-66L, 1.3257197596350832748781065387304444940172L),
6286 TEST_c_c (clog, 0x47017a2e36807acb1e5214b209dep-112L, 0xf5f4a550c9d75e3bb1839d865f0dp-112L, 1.5077923002544367932999503838191154621839e-65L, 1.2897445708311412721399861948957141824914L),
6287 TEST_c_c (clog, 0x148f818cb7a9258fca942ade2a0cap-113L, 0x18854a34780b8333ec53310ad7001p-113L, -7.1865869169568789348552370692485515571497e-67L, 0.8730167479365994646287897223471819363668L),
6288 TEST_c_c (clog, 0xfd95243681c055c2632286921092p-113L, 0x1bccabcd29ca2152860ec29e34ef7p-113L, 6.6255694866654064502633121109394710807528e-66L, 1.0526409614996288387567810726095850312049L),
6289 TEST_c_c (clog, 0xdb85c467ee2aadd5f425fe0f4b8dp-114L, 0x3e83162a0f95f1dcbf97dddf410eap-114L, 4.6017338806965821566734340588575402712716e-67L, 1.3547418904611758959096647942223384691728L),
6290 TEST_c_c (clog, 0x1415bcaf2105940d49a636e98ae59p-115L, 0x7e6a150adfcd1b0921d44b31f40f4p-115L, 2.5993421227864195179698176012564317527271e-67L, 1.4132318089683022770487383611430906982461L),
6291 #endif
6292 END_DATA (clog)
6293 };
6294
6295 static void
6296 clog_test (void)
6297 {
6298 errno = 0;
6299 FUNC(clog) (BUILD_COMPLEX (-2, -3));
6300 if (errno == ENOSYS)
6301 /* Function not implemented. */
6302 return;
6303
6304 START (clog);
6305 RUN_TEST_LOOP_c_c (clog, clog_test_data, );
6306 END (clog, complex);
6307 }
6308
6309
6310 static const struct test_c_c_data clog10_test_data[] =
6311 {
6312 START_DATA (clog10),
6313 TEST_c_c (clog10, minus_zero, 0, minus_infty, M_PIl, DIVIDE_BY_ZERO_EXCEPTION),
6314 TEST_c_c (clog10, minus_zero, minus_zero, minus_infty, -M_PIl, DIVIDE_BY_ZERO_EXCEPTION),
6315
6316 TEST_c_c (clog10, 0, 0, minus_infty, 0.0, DIVIDE_BY_ZERO_EXCEPTION),
6317 TEST_c_c (clog10, 0, minus_zero, minus_infty, minus_zero, DIVIDE_BY_ZERO_EXCEPTION),
6318
6319 TEST_c_c (clog10, minus_infty, plus_infty, plus_infty, M_PI_34_LOG10El),
6320
6321 TEST_c_c (clog10, plus_infty, plus_infty, plus_infty, M_PI4_LOG10El),
6322 TEST_c_c (clog10, plus_infty, minus_infty, plus_infty, -M_PI4_LOG10El),
6323
6324 TEST_c_c (clog10, 0, plus_infty, plus_infty, M_PI2_LOG10El),
6325 TEST_c_c (clog10, 3, plus_infty, plus_infty, M_PI2_LOG10El),
6326 TEST_c_c (clog10, minus_zero, plus_infty, plus_infty, M_PI2_LOG10El),
6327 TEST_c_c (clog10, -3, plus_infty, plus_infty, M_PI2_LOG10El),
6328 TEST_c_c (clog10, 0, minus_infty, plus_infty, -M_PI2_LOG10El),
6329 TEST_c_c (clog10, 3, minus_infty, plus_infty, -M_PI2_LOG10El),
6330 TEST_c_c (clog10, minus_zero, minus_infty, plus_infty, -M_PI2_LOG10El),
6331 TEST_c_c (clog10, -3, minus_infty, plus_infty, -M_PI2_LOG10El),
6332
6333 TEST_c_c (clog10, minus_infty, 0, plus_infty, M_PI_LOG10El),
6334 TEST_c_c (clog10, minus_infty, 1, plus_infty, M_PI_LOG10El),
6335 TEST_c_c (clog10, minus_infty, minus_zero, plus_infty, -M_PI_LOG10El),
6336 TEST_c_c (clog10, minus_infty, -1, plus_infty, -M_PI_LOG10El),
6337
6338 TEST_c_c (clog10, plus_infty, 0, plus_infty, 0.0),
6339 TEST_c_c (clog10, plus_infty, 1, plus_infty, 0.0),
6340 TEST_c_c (clog10, plus_infty, minus_zero, plus_infty, minus_zero),
6341 TEST_c_c (clog10, plus_infty, -1, plus_infty, minus_zero),
6342
6343 TEST_c_c (clog10, plus_infty, qnan_value, plus_infty, qnan_value),
6344 TEST_c_c (clog10, minus_infty, qnan_value, plus_infty, qnan_value),
6345
6346 TEST_c_c (clog10, qnan_value, plus_infty, plus_infty, qnan_value),
6347 TEST_c_c (clog10, qnan_value, minus_infty, plus_infty, qnan_value),
6348
6349 TEST_c_c (clog10, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6350 TEST_c_c (clog10, 3, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6351 TEST_c_c (clog10, minus_zero, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6352 TEST_c_c (clog10, -3, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6353
6354 TEST_c_c (clog10, qnan_value, 0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6355 TEST_c_c (clog10, qnan_value, 5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6356 TEST_c_c (clog10, qnan_value, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6357 TEST_c_c (clog10, qnan_value, -5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6358
6359 TEST_c_c (clog10, qnan_value, qnan_value, qnan_value, qnan_value),
6360
6361 TEST_c_c (clog10, 0.75L, 1.25L, 0.163679467193165171449476605077428975L, 0.447486970040493067069984724340855636L),
6362 TEST_c_c (clog10, -2, -3, 0.556971676153418384603252578971164214L, -0.937554462986374708541507952140189646L),
6363
6364 TEST_c_c (clog10, 0x1.fffffep+127L, 0x1.fffffep+127L, 38.68235441693561449174780668781319348761L, M_PI4_LOG10El),
6365 TEST_c_c (clog10, 0x1.fffffep+127L, 1.0L, 38.53183941910362389414093724045094697423L, 1.276276851248440096917018665609900318458e-39L, UNDERFLOW_EXCEPTION_FLOAT),
6366 TEST_c_c (clog10, 0x1p-149L, 0x1p-149L, -44.70295435610120748924022586658721447508L, M_PI4_LOG10El),
6367 TEST_c_c (clog10, 0x1p-147L, 0x1p-147L, -44.10089436477324509881274807713822842154L, M_PI4_LOG10El),
6368
6369 #ifndef TEST_FLOAT
6370 TEST_c_c (clog10, 0x1.fffffffffffffp+1023L, 0x1.fffffffffffffp+1023L, 308.4052305577487344482591243175787477115L, M_PI4_LOG10El),
6371 TEST_c_c (clog10, 0x1.fffffffffffffp+1023L, 0x1p+1023L, 308.3031705664207720674749211936626341569L, 0.2013595981366865903254995612594728746470L),
6372 TEST_c_c (clog10, 0x1p-1074L, 0x1p-1074L, -323.1557003452838130619487034867432642357L, M_PI4_LOG10El),
6373 TEST_c_c (clog10, 0x1p-1073L, 0x1p-1073L, -322.8546703496198318667349645920187712089L, M_PI4_LOG10El),
6374 #endif
6375
6376 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
6377 TEST_c_c (clog10, 0x1.fp+16383L, 0x1.fp+16383L, 4932.212175672014259683102930239951947672L, M_PI4_LOG10El),
6378 TEST_c_c (clog10, 0x1.fp+16383L, 0x1p+16383L, 4932.112944269463028900262609694408579449L, 0.2069271710841128115912940666587802677383L),
6379 TEST_c_c (clog10, 0x1p-16440L, 0x1p-16441L, -4948.884673709346821106688037612752099609L, 0.2013595981366865710389502301937289472543L),
6380 #endif
6381
6382 TEST_c_c (clog10, 0x1p-149L, 0x1.fp+127L, 38.51805116050395969095658815123105801479L, 0.6821881769209206737428918127156778851051L),
6383 TEST_c_c (clog10, -0x1p-149L, 0x1.fp+127L, 38.51805116050395969095658815123105801479L, 0.6821881769209206737428918127156778851051L),
6384 TEST_c_c (clog10, 0x1p-149L, -0x1.fp+127L, 38.51805116050395969095658815123105801479L, -0.6821881769209206737428918127156778851051L),
6385 TEST_c_c (clog10, -0x1p-149L, -0x1.fp+127L, 38.51805116050395969095658815123105801479L, -0.6821881769209206737428918127156778851051L),
6386 TEST_c_c (clog10, -0x1.fp+127L, 0x1p-149L, 38.51805116050395969095658815123105801479L, 1.364376353841841347485783625431355770210L),
6387 TEST_c_c (clog10, -0x1.fp+127L, -0x1p-149L, 38.51805116050395969095658815123105801479L, -1.364376353841841347485783625431355770210L),
6388 #ifdef TEST_FLOAT
6389 TEST_c_c (clog10, 0x1.fp+127L, 0x1p-149L, 38.51805116050395969095658815123105801479L, plus_zero, UNDERFLOW_EXCEPTION),
6390 TEST_c_c (clog10, 0x1.fp+127L, -0x1p-149L, 38.51805116050395969095658815123105801479L, minus_zero, UNDERFLOW_EXCEPTION),
6391 #endif
6392
6393 #ifndef TEST_FLOAT
6394 TEST_c_c (clog10, 0x1p-1074L, 0x1.fp+1023L, 308.2409272754311106024666378243768099991L, 0.6821881769209206737428918127156778851051L),
6395 TEST_c_c (clog10, -0x1p-1074L, 0x1.fp+1023L, 308.2409272754311106024666378243768099991L, 0.6821881769209206737428918127156778851051L),
6396 TEST_c_c (clog10, 0x1p-1074L, -0x1.fp+1023L, 308.2409272754311106024666378243768099991L, -0.6821881769209206737428918127156778851051L),
6397 TEST_c_c (clog10, -0x1p-1074L, -0x1.fp+1023L, 308.2409272754311106024666378243768099991L, -0.6821881769209206737428918127156778851051L),
6398 TEST_c_c (clog10, -0x1.fp+1023L, 0x1p-1074L, 308.2409272754311106024666378243768099991L, 1.364376353841841347485783625431355770210L),
6399 TEST_c_c (clog10, -0x1.fp+1023L, -0x1p-1074L, 308.2409272754311106024666378243768099991L, -1.364376353841841347485783625431355770210L),
6400 #endif
6401 #if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
6402 TEST_c_c (clog10, 0x1.fp+1023L, 0x1p-1074L, 308.2409272754311106024666378243768099991L, plus_zero, UNDERFLOW_EXCEPTION),
6403 TEST_c_c (clog10, 0x1.fp+1023L, -0x1p-1074L, 308.2409272754311106024666378243768099991L, minus_zero, UNDERFLOW_EXCEPTION),
6404 #endif
6405
6406 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
6407 TEST_c_c (clog10, 0x1p-16445L, 0x1.fp+16383L, 4932.061660674182269085496060792589701158L, 0.6821881769209206737428918127156778851051L),
6408 TEST_c_c (clog10, -0x1p-16445L, 0x1.fp+16383L, 4932.061660674182269085496060792589701158L, 0.6821881769209206737428918127156778851051L),
6409 TEST_c_c (clog10, 0x1p-16445L, -0x1.fp+16383L, 4932.061660674182269085496060792589701158L, -0.6821881769209206737428918127156778851051L),
6410 TEST_c_c (clog10, -0x1p-16445L, -0x1.fp+16383L, 4932.061660674182269085496060792589701158L, -0.6821881769209206737428918127156778851051L),
6411 TEST_c_c (clog10, -0x1.fp+16383L, 0x1p-16445L, 4932.061660674182269085496060792589701158L, 1.364376353841841347485783625431355770210L),
6412 TEST_c_c (clog10, -0x1.fp+16383L, -0x1p-16445L, 4932.061660674182269085496060792589701158L, -1.364376353841841347485783625431355770210L),
6413 TEST_c_c (clog10, 0x1.fp+16383L, 0x1p-16445L, 4932.061660674182269085496060792589701158L, plus_zero, UNDERFLOW_EXCEPTION),
6414 TEST_c_c (clog10, 0x1.fp+16383L, -0x1p-16445L, 4932.061660674182269085496060792589701158L, minus_zero, UNDERFLOW_EXCEPTION),
6415 # if LDBL_MANT_DIG >= 113
6416 TEST_c_c (clog10, 0x1p-16494L, 0x1.fp+16383L, 4932.061660674182269085496060792589701158L, 0.6821881769209206737428918127156778851051L),
6417 TEST_c_c (clog10, -0x1p-16494L, 0x1.fp+16383L, 4932.061660674182269085496060792589701158L, 0.6821881769209206737428918127156778851051L),
6418 TEST_c_c (clog10, 0x1p-16494L, -0x1.fp+16383L, 4932.061660674182269085496060792589701158L, -0.6821881769209206737428918127156778851051L),
6419 TEST_c_c (clog10, -0x1p-16494L, -0x1.fp+16383L, 4932.061660674182269085496060792589701158L, -0.6821881769209206737428918127156778851051L),
6420 TEST_c_c (clog10, -0x1.fp+16383L, 0x1p-16494L, 4932.061660674182269085496060792589701158L, 1.364376353841841347485783625431355770210L),
6421 TEST_c_c (clog10, -0x1.fp+16383L, -0x1p-16494L, 4932.061660674182269085496060792589701158L, -1.364376353841841347485783625431355770210L),
6422 TEST_c_c (clog10, 0x1.fp+16383L, 0x1p-16494L, 4932.061660674182269085496060792589701158L, plus_zero, UNDERFLOW_EXCEPTION),
6423 TEST_c_c (clog10, 0x1.fp+16383L, -0x1p-16494L, 4932.061660674182269085496060792589701158L, minus_zero, UNDERFLOW_EXCEPTION),
6424 # endif
6425 #endif
6426
6427 TEST_c_c (clog10, 1.0L, 0x1.234566p-10L, 2.680828048441605163181684680300513080769e-7L, 4.825491868832381486767558728169977751564e-4L),
6428 TEST_c_c (clog10, -1.0L, 0x1.234566p-20L, 2.556638434669064077889576526006849923281e-13L, 1.364375882602207106407956770293808181427L),
6429 TEST_c_c (clog10, 0x1.234566p-30L, 1.0L, 2.438200411482400072282924063740535840474e-19L, 6.821881764607257184291586401763604544928e-1L),
6430 TEST_c_c (clog10, -0x1.234566p-40L, -1.0L, 2.325249110681915353442924915876654139373e-25L, -6.821881769213700828789403802671540158935e-1L),
6431 TEST_c_c (clog10, 0x1.234566p-50L, 1.0L, 2.217530356103816369479108963807448194409e-31L, 6.821881769209202348667823902864283966959e-1L),
6432 TEST_c_c (clog10, 0x1.234566p-60L, 1.0L, 2.114801746467415208319767917450504756866e-37L, 6.821881769209206733143018621078368211515e-1L),
6433 TEST_c_c (clog10, 0x1p-61L, 1.0L, 4.084085680564517578238994467153626207224e-38L, 6.821881769209206735545466044044889962925e-1L),
6434 TEST_c_c (clog10, 0x1p-62L, 1.0L, 1.021021420141129394559748616788406551878e-38L, 6.821881769209206736487192085600834406988e-1L, UNDERFLOW_EXCEPTION_FLOAT),
6435 TEST_c_c (clog10, 0x1p-63L, 1.0L, 2.552553550352823486399371541971016379740e-39L, 6.821881769209206736958055106378806629019e-1L, UNDERFLOW_EXCEPTION_FLOAT),
6436 #ifndef TEST_FLOAT
6437 TEST_c_c (clog10, 0x1p-509L, 1.0L, 7.730698388614835910296270976605350994446e-308L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
6438 TEST_c_c (clog10, 0x1p-510L, 1.0L, 1.932674597153708977574067744151337748612e-308L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
6439 TEST_c_c (clog10, 0x1p-511L, 1.0L, 4.831686492884272443935169360378344371529e-309L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
6440 #endif
6441 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
6442 TEST_c_c (clog10, 0x1p-8189L, 1.0L, 1.168114274114528946314738738025008370069e-4931L, 6.821881769209206737428918127156778851051e-1L),
6443 TEST_c_c (clog10, 0x1p-8190L, 1.0L, 2.920285685286322365786846845062520925172e-4932L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION),
6444 TEST_c_c (clog10, 0x1p-8191L, 1.0L, 7.300714213215805914467117112656302312931e-4933L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION),
6445 #endif
6446
6447 TEST_c_c (clog10, 0x1.000566p0L, 0x1.234p-10L, 3.604093470239754109961125085078190708674e-5L, 4.824745078422174667425851670822596859720e-4L),
6448 TEST_c_c (clog10, 0x1.000566p0L, 0x1.234p-100L, 3.577293486783822178310971763308187385546e-5L, 3.897399639875661463735636919790792140598e-31L),
6449 #ifndef TEST_FLOAT
6450 TEST_c_c (clog10, -0x1.0000000123456p0L, 0x1.2345678p-30L, 1.150487028947346337782682105935961875822e-10L, 1.364376353381646356131680448946397884147L),
6451 TEST_c_c (clog10, -0x1.0000000123456p0L, 0x1.2345678p-1000L, 1.150487026509145544402795327729455391948e-10L, 1.364376353841841347485783625431355770210L),
6452 #endif
6453 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
6454 TEST_c_c (clog10, 0x1.00000000000000123456789abcp0L, 0x1.23456789p-60L, 4.285899851347756188767674032946882584784e-19L, 4.285899850759344225805480528847018395861e-19L),
6455 TEST_c_c (clog10, 0x1.00000000000000123456789abcp0L, 0x1.23456789p-1000L, 4.285899851347756186652871946325962330640e-19L, 4.611541215247321502041995872887317363241e-302L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
6456 #endif
6457
6458 TEST_c_c (clog10, 0x0.ffffffp0L, 0x0.ffffffp-100L, -2.588596909321764128428416045209904492216e-8L, 3.425979381266895667295625489912064603415e-31L),
6459 #ifndef TEST_FLOAT
6460 TEST_c_c (clog10, 0x0.fffffffffffff8p0L, 0x0.fffffffffffff8p-1000L, -4.821637332766435821255375046554377090472e-17L, 4.053112396770095089737411317782466262176e-302L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
6461 #endif
6462 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
6463 TEST_c_c (clog10, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp-15000L, -2.354315103889861110220423157644627849164e-20L, 1.541165759405643564697852372112893034397e-4516L),
6464 #endif
6465
6466 TEST_c_c (clog10, 0x1a6p-10L, 0x3a5p-10L, -6.2126412844802358329771948751248003038444e-07L, 0.4977135139537443711784513409096950995985L),
6467 TEST_c_c (clog10, 0xf2p-10L, 0x3e3p-10L, 2.6921240173351112953324592659528481616879e-06L, 0.5785726025799636431142862788413361783862L),
6468 TEST_c_c (clog10, 0x4d4ep-15L, 0x6605p-15L, -7.0781945783414996953799915941870192015212e-09L, 0.4005747524909781155537088181659175147564L),
6469 TEST_c_c (clog10, 0x2818p-15L, 0x798fp-15L, 6.6737261053986614395049481326819059203910e-09L, 0.5438241985991753781478398141908629586460L),
6470 TEST_c_c (clog10, 0x9b57bp-20L, 0xcb7b4p-20L, -1.7182001068739620267773842120965071561416e-11L, 0.3990121149225253562859800593935899629087L),
6471 TEST_c_c (clog10, 0x2731p-20L, 0xfffd0p-20L, 1.9156943718715958194239364991329064049438e-11L, 0.6780326907904082601285090019969008967595L),
6472 TEST_c_c (clog10, 0x2ede88p-23L, 0x771c3fp-23L, -1.9440841725722970687903291200493082253766e-13L, 0.5193774116724956222518530053006822210323L),
6473 TEST_c_c (clog10, 0x11682p-23L, 0x7ffed1p-23L, 5.0916490233953865181284669870035717560498e-13L, 0.6784968969384861816694467029319146542069L),
6474 TEST_c_c (clog10, 0xa1f2c1p-24L, 0xc643aep-24L, -4.5516256421319921959681423447271490869664e-14L, 0.3847315790697197749315054516562206543710L),
6475 TEST_c_c (clog10, 0x659feap-24L, 0xeaf6f9p-24L, 1.6200701438094619117335617123525612051457e-14L, 0.5049027913635038013499728086604870749732L),
6476 #ifndef TEST_FLOAT
6477 TEST_c_c (clog10, 0x4447d7175p-35L, 0x6c445e00ap-35L, -6.4375803621988389731799033530075237868110e-21L, 0.4378257977686804492768642780897650927167L),
6478 TEST_c_c (clog10, 0x2dd46725bp-35L, 0x7783a1284p-35L, 1.9312741086596516918394613098872836703188e-20L, 0.5231613813514771042838490538484014771862L),
6479 TEST_c_c (clog10, 0x164c74eea876p-45L, 0x16f393482f77p-45L, -1.3155760824064879362415202279780039150764e-26L, 0.3473590599762514228227328130640352044313L),
6480 TEST_c_c (clog10, 0xfe961079616p-45L, 0x1bc37e09e6d1p-45L, 2.3329549194675052736016290082882121135546e-26L, 0.4561756099441139182878993697611751382976L),
6481 TEST_c_c (clog10, 0xa4722f19346cp-51L, 0x7f9631c5e7f07p-51L, -2.6979587627476803379953050733225113494503e-30L, 0.6472785229986997177606324374555347813105L),
6482 TEST_c_c (clog10, 0x10673dd0f2481p-51L, 0x7ef1d17cefbd2p-51L, 1.3918041236396763648388478552321724382899e-29L, 0.6263795733790237053262025311642907438291L),
6483 TEST_c_c (clog10, 0x8ecbf810c4ae6p-52L, 0xd479468b09a37p-52L, -4.2289432987513243393180377141513840878196e-30L, 0.4252020027092323591068799049905597805296L),
6484 TEST_c_c (clog10, 0x5b06b680ea2ccp-52L, 0xef452b965da9fp-52L, 3.6079845358966994996207055940336690133424e-30L, 0.5243112258263349992771652393178033846555L),
6485 TEST_c_c (clog10, 0x659b70ab7971bp-53L, 0x1f5d111e08abecp-53L, -1.0893543813872082317104059174982092534059e-30L, 0.5954257879188711495921161433751775633232L),
6486 TEST_c_c (clog10, 0x15cfbd1990d1ffp-53L, 0x176a3973e09a9ap-53L, 4.4163015461643576961232672330852798804976e-31L, 0.3564851427422832755956993418877523303529L),
6487 TEST_c_c (clog10, 0x1367a310575591p-54L, 0x3cfcc0a0541f60p-54L, 2.2081507730821788480616336165447731164865e-32L, 0.5484039935757001196548030312819898864760L),
6488 TEST_c_c (clog10, 0x55cb6d0c83af5p-55L, 0x7fe33c0c7c4e90p-55L, -2.2583360179249556400630343805573865814771e-32L, 0.6639894257763289307423302343317622430835L),
6489 #endif
6490 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
6491 TEST_c_c (clog10, 0x298c62cb546588a7p-63L, 0x7911b1dfcc4ecdaep-63L, -5.1816837072162316773907242302011632570857e-37L, 0.5386167838952956925896424154370364458140L),
6492 TEST_c_c (clog10, 0x4d9c37e2b5cb4533p-63L, 0x65c98be2385a042ep-63L, 2.7822833698845776001753149807484078521508e-37L, 0.3992725998539071066769046272515417679815L),
6493 TEST_c_c (clog10, 0x602fd5037c4792efp-64L, 0xed3e2086dcca80b8p-64L, -1.0146400362652473358437501879334790111898e-37L, 0.5149047982335273098246594109614460842099L),
6494 TEST_c_c (clog10, 0x6b10b4f3520217b6p-64L, 0xe8893cbb449253a1p-64L, 1.0529283395205396881397407610630442563938e-37L, 0.4947949395762683446121140513971996916447L),
6495 TEST_c_c (clog10, 0x81b7efa81fc35ad1p-65L, 0x1ef4b835f1c79d812p-65L, -4.3074341162203896332989394770760901408798e-39L, 0.5709443672155660428417571212549720987784L),
6496 #endif
6497 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
6498 TEST_c_c (clog10, 0x3f96469050f650869c2p-75L, 0x6f16b2c9c8b05988335p-75L, -4.5643214291682663316715446865040356750881e-46L, 0.4564083863660793840592614609053162690362L),
6499 TEST_c_c (clog10, 0x3157fc1d73233e580c8p-75L, 0x761b52ccd435d7c7f5fp-75L, 5.8575458340992751256451490143468457830297e-44L, 0.5103174273246635294300470585396890237265L),
6500 TEST_c_c (clog10, 0x155f8afc4c48685bf63610p-85L, 0x17d0cf2652cdbeb1294e19p-85L, -2.0748709499710785084693619097712106753591e-50L, 0.3645447681189598740620098186365764884771L),
6501 TEST_c_c (clog10, 0x13836d58a13448d750b4b9p-85L, 0x195ca7bc3ab4f9161edbe6p-85L, 1.2333149003324592532859843519619084433953e-50L, 0.3973779298829931059309198145608711073016L),
6502 TEST_c_c (clog10, 0x1df515eb171a808b9e400266p-95L, 0x7c71eb0cd4688dfe98581c77p-95L, -1.5221162575729652613635150540947625639689e-57L, 0.5795934880811949230121092882659698986043L),
6503 TEST_c_c (clog10, 0xe33f66c9542ca25cc43c867p-95L, 0x7f35a68ebd3704a43c465864p-95L, 1.7850272475173865337808494725293124613817e-56L, 0.6338990862456906754888183278564382516852L),
6504 TEST_c_c (clog10, 0x6771f22c64ed551b857c128b4cp-105L, 0x1f570e7a13cc3cf2f44fd793ea1p-105L, -6.2023045024810589256360494043570293518879e-63L, 0.5938345819561308555003145899438513900776L),
6505 TEST_c_c (clog10, 0x15d8ab6ed05ca514086ac3a1e84p-105L, 0x1761e480aa094c0b10b34b09ce9p-105L, 4.3548095442952115860848857519953610343042e-63L, 0.3558376234889641500775150477035448866763L),
6506 TEST_c_c (clog10, 0x187190c1a334497bdbde5a95f48p-106L, 0x3b25f08062d0a095c4cfbbc338dp-106L, -7.5879257211204444302994221436282805900756e-64L, 0.5119945461708707332160859198685423099187L),
6507 TEST_c_c (clog10, 0x6241ef0da53f539f02fad67dabp-106L, 0x3fb46641182f7efd9caa769dac0p-106L, 1.8804859395820231849002915747252695375405e-63L, 0.6404513901551516189871978418046651877394L),
6508 #endif
6509 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
6510 TEST_c_c (clog10, 0x3e1d0a105ac4ebeacd9c6952d34cp-112L, 0xf859b3d1b06d005dcbb5516d5479p-112L, -5.0742964549782184008668435276046798273476e-67L, 0.5757527761596220360985719127090110408283L),
6511 TEST_c_c (clog10, 0x47017a2e36807acb1e5214b209dep-112L, 0xf5f4a550c9d75e3bb1839d865f0dp-112L, 6.5482587585671294601662599808612773010057e-66L, 0.5601289501766423782280643144987875760229L),
6512 TEST_c_c (clog10, 0x148f818cb7a9258fca942ade2a0cap-113L, 0x18854a34780b8333ec53310ad7001p-113L, -3.1210950417524756037077807411854181477733e-67L, 0.3791463562379872585396164879981280044658L),
6513 TEST_c_c (clog10, 0xfd95243681c055c2632286921092p-113L, 0x1bccabcd29ca2152860ec29e34ef7p-113L, 2.8774482675253468630312378575186855052697e-66L, 0.4571561610046221605554903008571429975493L),
6514 TEST_c_c (clog10, 0xdb85c467ee2aadd5f425fe0f4b8dp-114L, 0x3e83162a0f95f1dcbf97dddf410eap-114L, 1.9985076315737626043096596036300177494613e-67L, 0.5883569274304683249184005177865521205198L),
6515 TEST_c_c (clog10, 0x1415bcaf2105940d49a636e98ae59p-115L, 0x7e6a150adfcd1b0921d44b31f40f4p-115L, 1.1288799405048268615023706955013387413519e-67L, 0.6137587762850841972073301550420510507903L),
6516 #endif
6517 END_DATA (clog10)
6518 };
6519
6520 static void
6521 clog10_test (void)
6522 {
6523 errno = 0;
6524 FUNC(clog10) (BUILD_COMPLEX (0.7L, 1.2L));
6525 if (errno == ENOSYS)
6526 /* Function not implemented. */
6527 return;
6528
6529 START (clog10);
6530 RUN_TEST_LOOP_c_c (clog10, clog10_test_data, );
6531 END (clog10, complex);
6532 }
6533
6534
6535 static const struct test_c_c_data conj_test_data[] =
6536 {
6537 START_DATA (conj),
6538 TEST_c_c (conj, 0.0, 0.0, 0.0, minus_zero),
6539 TEST_c_c (conj, 0.0, minus_zero, 0.0, 0.0),
6540 TEST_c_c (conj, qnan_value, qnan_value, qnan_value, qnan_value),
6541 TEST_c_c (conj, plus_infty, minus_infty, plus_infty, plus_infty),
6542 TEST_c_c (conj, plus_infty, plus_infty, plus_infty, minus_infty),
6543 TEST_c_c (conj, 1.0, 2.0, 1.0, -2.0),
6544 TEST_c_c (conj, 3.0, -4.0, 3.0, 4.0),
6545 END_DATA (conj)
6546 };
6547
6548 static void
6549 conj_test (void)
6550 {
6551 START (conj);
6552 RUN_TEST_LOOP_c_c (conj, conj_test_data, );
6553 END (conj, complex);
6554 }
6555
6556
6557 static const struct test_ff_f_data copysign_test_data[] =
6558 {
6559 START_DATA (copysign),
6560 TEST_ff_f (copysign, 0, 4, 0),
6561 TEST_ff_f (copysign, 0, -4, minus_zero),
6562 TEST_ff_f (copysign, minus_zero, 4, 0),
6563 TEST_ff_f (copysign, minus_zero, -4, minus_zero),
6564
6565 TEST_ff_f (copysign, plus_infty, 0, plus_infty),
6566 TEST_ff_f (copysign, plus_infty, minus_zero, minus_infty),
6567 TEST_ff_f (copysign, minus_infty, 0, plus_infty),
6568 TEST_ff_f (copysign, minus_infty, minus_zero, minus_infty),
6569
6570 TEST_ff_f (copysign, 0, plus_infty, 0),
6571 TEST_ff_f (copysign, 0, minus_zero, minus_zero),
6572 TEST_ff_f (copysign, minus_zero, plus_infty, 0),
6573 TEST_ff_f (copysign, minus_zero, minus_zero, minus_zero),
6574
6575 /* XXX More correctly we would have to check the sign of the NaN. */
6576 TEST_ff_f (copysign, qnan_value, 0, qnan_value),
6577 TEST_ff_f (copysign, qnan_value, minus_zero, qnan_value),
6578 TEST_ff_f (copysign, -qnan_value, 0, qnan_value),
6579 TEST_ff_f (copysign, -qnan_value, minus_zero, qnan_value),
6580 END_DATA (copysign)
6581 };
6582
6583 static void
6584 copysign_test (void)
6585 {
6586 START (copysign);
6587 RUN_TEST_LOOP_ff_f (copysign, copysign_test_data, );
6588 END (copysign);
6589 }
6590
6591
6592 static const struct test_f_f_data cos_test_data[] =
6593 {
6594 START_DATA (cos),
6595 TEST_f_f (cos, 0, 1),
6596 TEST_f_f (cos, minus_zero, 1),
6597 TEST_f_f (cos, plus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
6598 TEST_f_f (cos, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
6599 TEST_f_f (cos, qnan_value, qnan_value, ERRNO_UNCHANGED),
6600
6601 TEST_f_f (cos, M_PI_6l * 2.0, 0.5),
6602 TEST_f_f (cos, M_PI_6l * 4.0, -0.5),
6603
6604 /* The value of M_PI_2l is never exactly PI/2, and therefore the
6605 answer is never exactly zero. The answer is equal to the error
6606 in rounding PI/2 for the type used. Thus the answer is unique
6607 to each type. */
6608 #ifdef TEST_FLOAT
6609 /* 32-bit float. */
6610 TEST_f_f (cos, M_PI_2l, -0x1.777a5cp-25L),
6611 #endif
6612 #if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MANT_DIG == 53)
6613 /* 64-bit double or 64-bit long double. */
6614 TEST_f_f (cos, M_PI_2l, 0x1.1a62633145c07p-54L),
6615 #endif
6616 #if defined TEST_LDOUBLE && LDBL_MANT_DIG == 64
6617 /* 96-bit long double. */
6618 TEST_f_f (cos, M_PI_2l, -0xe.ce675d1fc8f8cbbp-69L),
6619 #endif
6620 #if defined TEST_LDOUBLE && LDBL_MANT_DIG == 106
6621 /* 128-bit IBM long double. */
6622 TEST_f_f (cos, M_PI_2l, 0x1.c1cd129024e088a67cc74020bcp-107L),
6623 #endif
6624 #if defined TEST_LDOUBLE && LDBL_MANT_DIG == 113
6625 /* 128-bit long double. */
6626 TEST_f_f (cos, M_PI_2l, 0x1.cd129024e088a67cc74020bbea64p-115L),
6627 #endif
6628
6629 TEST_f_f (cos, 0.75L, 0.731688868873820886311838753000084544L),
6630
6631 TEST_f_f (cos, 0x1p65, 0.99888622066058013610642172179340364209972L),
6632 TEST_f_f (cos, -0x1p65, 0.99888622066058013610642172179340364209972L),
6633
6634 #ifdef TEST_DOUBLE
6635 TEST_f_f (cos, 0.80190127184058835, 0.69534156199418473),
6636 #endif
6637
6638 TEST_f_f (cos, 0x1.442f74p+15, 2.4407839902314016628485779006274989801517e-06L),
6639
6640 #ifndef TEST_FLOAT
6641 TEST_f_f (cos, 1e22, 0.5232147853951389454975944733847094921409L),
6642 TEST_f_f (cos, 0x1p1023, -0.826369834614147994500785680811743734805L),
6643 #endif
6644
6645 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
6646 TEST_f_f (cos, 0x1p16383L, 0.9210843909921906206874509522505756251609L),
6647 #endif
6648
6649 TEST_f_f (cos, 0x1p+120, -9.25879022854837867303861764107414946730833e-01L),
6650 TEST_f_f (cos, 0x1p+127, 7.81914638714960072263910298466369236613162e-01L),
6651 TEST_f_f (cos, 0x1.fffff8p+127, 9.98819362551949040703862043664101081064641e-01L),
6652 TEST_f_f (cos, 0x1.fffffep+127, 8.53021039830304158051791467692161107353094e-01L),
6653 TEST_f_f (cos, 0x1p+50, 8.68095904660550604334592502063501320395739e-01L),
6654 TEST_f_f (cos, 0x1p+28, -1.65568979490578758865468278195361551113358e-01L),
6655 END_DATA (cos)
6656 };
6657
6658 static void
6659 cos_test (void)
6660 {
6661 errno = 0;
6662 FUNC(cos) (0);
6663 if (errno == ENOSYS)
6664 /* Function not implemented. */
6665 return;
6666
6667 START (cos);
6668 RUN_TEST_LOOP_f_f (cos, cos_test_data, );
6669 END (cos);
6670 }
6671
6672
6673 static const struct test_f_f_data cos_tonearest_test_data[] =
6674 {
6675 START_DATA (cos_tonearest),
6676 TEST_f_f (cos, 1, 0.5403023058681397174009366074429766037323L),
6677 TEST_f_f (cos, 2, -0.4161468365471423869975682295007621897660L),
6678 TEST_f_f (cos, 3, -0.9899924966004454572715727947312613023937L),
6679 TEST_f_f (cos, 4, -0.6536436208636119146391681830977503814241L),
6680 TEST_f_f (cos, 5, 0.2836621854632262644666391715135573083344L),
6681 TEST_f_f (cos, 6, 0.9601702866503660205456522979229244054519L),
6682 TEST_f_f (cos, 7, 0.7539022543433046381411975217191820122183L),
6683 TEST_f_f (cos, 8, -0.1455000338086135258688413818311946826093L),
6684 TEST_f_f (cos, 9, -0.9111302618846769883682947111811653112463L),
6685 TEST_f_f (cos, 10, -0.8390715290764524522588639478240648345199L),
6686 END_DATA (cos_tonearest)
6687 };
6688
6689 static void
6690 cos_test_tonearest (void)
6691 {
6692 errno = 0;
6693 FUNC(cos) (0);
6694 if (errno == ENOSYS)
6695 /* Function not implemented. */
6696 return;
6697
6698 START (cos_tonearest);
6699 RUN_TEST_LOOP_f_f (cos, cos_tonearest_test_data, FE_TONEAREST);
6700 END (cos_tonearest);
6701 }
6702
6703
6704 static const struct test_f_f_data cos_towardzero_test_data[] =
6705 {
6706 START_DATA (cos_towardzero),
6707 TEST_f_f (cos, 1, 0.5403023058681397174009366074429766037323L),
6708 TEST_f_f (cos, 2, -0.4161468365471423869975682295007621897660L),
6709 TEST_f_f (cos, 3, -0.9899924966004454572715727947312613023937L),
6710 TEST_f_f (cos, 4, -0.6536436208636119146391681830977503814241L),
6711 TEST_f_f (cos, 5, 0.2836621854632262644666391715135573083344L),
6712 TEST_f_f (cos, 6, 0.9601702866503660205456522979229244054519L),
6713 TEST_f_f (cos, 7, 0.7539022543433046381411975217191820122183L),
6714 TEST_f_f (cos, 8, -0.1455000338086135258688413818311946826093L),
6715 TEST_f_f (cos, 9, -0.9111302618846769883682947111811653112463L),
6716 TEST_f_f (cos, 10, -0.8390715290764524522588639478240648345199L),
6717 END_DATA (cos_towardzero)
6718 };
6719
6720 static void
6721 cos_test_towardzero (void)
6722 {
6723 errno = 0;
6724 FUNC(cos) (0);
6725 if (errno == ENOSYS)
6726 /* Function not implemented. */
6727 return;
6728
6729 START (cos_towardzero);
6730 RUN_TEST_LOOP_f_f (cos, cos_towardzero_test_data, FE_TOWARDZERO);
6731 END (cos_towardzero);
6732 }
6733
6734
6735 static const struct test_f_f_data cos_downward_test_data[] =
6736 {
6737 START_DATA (cos_downward),
6738 TEST_f_f (cos, 1, 0.5403023058681397174009366074429766037323L),
6739 TEST_f_f (cos, 2, -0.4161468365471423869975682295007621897660L),
6740 TEST_f_f (cos, 3, -0.9899924966004454572715727947312613023937L),
6741 TEST_f_f (cos, 4, -0.6536436208636119146391681830977503814241L),
6742 TEST_f_f (cos, 5, 0.2836621854632262644666391715135573083344L),
6743 TEST_f_f (cos, 6, 0.9601702866503660205456522979229244054519L),
6744 TEST_f_f (cos, 7, 0.7539022543433046381411975217191820122183L),
6745 TEST_f_f (cos, 8, -0.1455000338086135258688413818311946826093L),
6746 TEST_f_f (cos, 9, -0.9111302618846769883682947111811653112463L),
6747 TEST_f_f (cos, 10, -0.8390715290764524522588639478240648345199L),
6748 END_DATA (cos_downward)
6749 };
6750
6751 static void
6752 cos_test_downward (void)
6753 {
6754 errno = 0;
6755 FUNC(cos) (0);
6756 if (errno == ENOSYS)
6757 /* Function not implemented. */
6758 return;
6759
6760 START (cos_downward);
6761 RUN_TEST_LOOP_f_f (cos, cos_downward_test_data, FE_DOWNWARD);
6762 END (cos_downward);
6763 }
6764
6765
6766 static const struct test_f_f_data cos_upward_test_data[] =
6767 {
6768 START_DATA (cos_upward),
6769 TEST_f_f (cos, 1, 0.5403023058681397174009366074429766037323L),
6770 TEST_f_f (cos, 2, -0.4161468365471423869975682295007621897660L),
6771 TEST_f_f (cos, 3, -0.9899924966004454572715727947312613023937L),
6772 TEST_f_f (cos, 4, -0.6536436208636119146391681830977503814241L),
6773 TEST_f_f (cos, 5, 0.2836621854632262644666391715135573083344L),
6774 TEST_f_f (cos, 6, 0.9601702866503660205456522979229244054519L),
6775 TEST_f_f (cos, 7, 0.7539022543433046381411975217191820122183L),
6776 TEST_f_f (cos, 8, -0.1455000338086135258688413818311946826093L),
6777 TEST_f_f (cos, 9, -0.9111302618846769883682947111811653112463L),
6778 TEST_f_f (cos, 10, -0.8390715290764524522588639478240648345199L),
6779 END_DATA (cos_upward)
6780 };
6781
6782 static void
6783 cos_test_upward (void)
6784 {
6785 errno = 0;
6786 FUNC(cos) (0);
6787 if (errno == ENOSYS)
6788 /* Function not implemented. */
6789 return;
6790
6791 START (cos_upward);
6792 RUN_TEST_LOOP_f_f (cos, cos_upward_test_data, FE_UPWARD);
6793 END (cos_upward);
6794 }
6795
6796
6797 static const struct test_f_f_data cosh_test_data[] =
6798 {
6799 START_DATA (cosh),
6800 TEST_f_f (cosh, 0, 1),
6801 TEST_f_f (cosh, minus_zero, 1),
6802
6803 #ifndef TEST_INLINE
6804 TEST_f_f (cosh, plus_infty, plus_infty),
6805 TEST_f_f (cosh, minus_infty, plus_infty),
6806 #endif
6807 TEST_f_f (cosh, qnan_value, qnan_value),
6808
6809 TEST_f_f (cosh, 0.75L, 1.29468328467684468784170818539018176L),
6810
6811 #ifndef TEST_FLOAT
6812 TEST_f_f (cosh, 709.8893558127259666434838436543941497802734375L, 9.9999998999995070652573675944761818416035e+307L),
6813 TEST_f_f (cosh, -709.8893558127259666434838436543941497802734375L, 9.9999998999995070652573675944761818416035e+307L),
6814 #endif
6815 END_DATA (cosh)
6816 };
6817
6818 static void
6819 cosh_test (void)
6820 {
6821 errno = 0;
6822 FUNC(cosh) (0.7L);
6823 if (errno == ENOSYS)
6824 /* Function not implemented. */
6825 return;
6826
6827 START (cosh);
6828 RUN_TEST_LOOP_f_f (cosh, cosh_test_data, );
6829 END (cosh);
6830 }
6831
6832
6833 static const struct test_f_f_data cosh_tonearest_test_data[] =
6834 {
6835 START_DATA (cosh_tonearest),
6836 TEST_f_f (cosh, 22, 1792456423.065795780980053377632656584997L),
6837 TEST_f_f (cosh, 23, 4872401723.124451300068625740569997090344L),
6838 TEST_f_f (cosh, 24, 13244561064.92173614708845674912733665919L),
6839 END_DATA (cosh_tonearest)
6840 };
6841
6842 static void
6843 cosh_test_tonearest (void)
6844 {
6845 errno = 0;
6846 FUNC(cosh) (0);
6847 if (errno == ENOSYS)
6848 /* Function not implemented. */
6849 return;
6850
6851 START (cosh_tonearest);
6852 RUN_TEST_LOOP_f_f (cosh, cosh_tonearest_test_data, FE_TONEAREST);
6853 END (cosh_tonearest);
6854 }
6855
6856
6857 static const struct test_f_f_data cosh_towardzero_test_data[] =
6858 {
6859 START_DATA (cosh_towardzero),
6860 TEST_f_f (cosh, 22, 1792456423.065795780980053377632656584997L),
6861 TEST_f_f (cosh, 23, 4872401723.124451300068625740569997090344L),
6862 TEST_f_f (cosh, 24, 13244561064.92173614708845674912733665919L),
6863 END_DATA (cosh_towardzero)
6864 };
6865
6866 static void
6867 cosh_test_towardzero (void)
6868 {
6869 errno = 0;
6870 FUNC(cosh) (0);
6871 if (errno == ENOSYS)
6872 /* Function not implemented. */
6873 return;
6874
6875 START (cosh_towardzero);
6876 RUN_TEST_LOOP_f_f (cosh, cosh_towardzero_test_data, FE_TOWARDZERO);
6877 END (cosh_towardzero);
6878 }
6879
6880
6881 static const struct test_f_f_data cosh_downward_test_data[] =
6882 {
6883 START_DATA (cosh_downward),
6884 TEST_f_f (cosh, 22, 1792456423.065795780980053377632656584997L),
6885 TEST_f_f (cosh, 23, 4872401723.124451300068625740569997090344L),
6886 TEST_f_f (cosh, 24, 13244561064.92173614708845674912733665919L),
6887 END_DATA (cosh_downward)
6888 };
6889
6890 static void
6891 cosh_test_downward (void)
6892 {
6893 errno = 0;
6894 FUNC(cosh) (0);
6895 if (errno == ENOSYS)
6896 /* Function not implemented. */
6897 return;
6898
6899 START (cosh_downward);
6900 RUN_TEST_LOOP_f_f (cosh, cosh_downward_test_data, FE_DOWNWARD);
6901 END (cosh_downward);
6902 }
6903
6904
6905 static const struct test_f_f_data cosh_upward_test_data[] =
6906 {
6907 START_DATA (cosh_upward),
6908 TEST_f_f (cosh, 22, 1792456423.065795780980053377632656584997L),
6909 TEST_f_f (cosh, 23, 4872401723.124451300068625740569997090344L),
6910 TEST_f_f (cosh, 24, 13244561064.92173614708845674912733665919L),
6911 END_DATA (cosh_upward)
6912 };
6913
6914 static void
6915 cosh_test_upward (void)
6916 {
6917 errno = 0;
6918 FUNC(cosh) (0);
6919 if (errno == ENOSYS)
6920 /* Function not implemented. */
6921 return;
6922
6923 START (cosh_upward);
6924 RUN_TEST_LOOP_f_f (cosh, cosh_upward_test_data, FE_UPWARD);
6925 END (cosh_upward);
6926 }
6927
6928
6929 static void
6930 cpow_test (void)
6931 {
6932 errno = 0;
6933 FUNC(cpow) (BUILD_COMPLEX (1, 0), BUILD_COMPLEX (0, 0));
6934 if (errno == ENOSYS)
6935 /* Function not implemented. */
6936 return;
6937
6938 START (cpow);
6939
6940 TEST_cc_c (cpow, 1, 0, 0, 0, 1.0, 0.0);
6941 TEST_cc_c (cpow, 2, 0, 10, 0, 1024.0, 0.0);
6942
6943 TEST_cc_c (cpow, M_El, 0, 0, 2 * M_PIl, 1.0, 0.0);
6944 TEST_cc_c (cpow, 2, 3, 4, 0, -119.0, -120.0);
6945
6946 TEST_cc_c (cpow, qnan_value, qnan_value, qnan_value, qnan_value, qnan_value, qnan_value);
6947
6948 TEST_cc_c (cpow, 0.75L, 1.25L, 0.75L, 1.25L, 0.117506293914473555420279832210420483L, 0.346552747708338676483025352060418001L);
6949 TEST_cc_c (cpow, 0.75L, 1.25L, 1.0L, 1.0L, 0.0846958290317209430433805274189191353L, 0.513285749182902449043287190519090481L);
6950 TEST_cc_c (cpow, 0.75L, 1.25L, 1.0L, 0.0L, 0.75L, 1.25L);
6951 TEST_cc_c (cpow, 0.75L, 1.25L, 0.0L, 1.0L, 0.331825439177608832276067945276730566L, 0.131338600281188544930936345230903032L);
6952
6953 END (cpow, complex);
6954 }
6955
6956
6957 static const struct test_c_c_data cproj_test_data[] =
6958 {
6959 START_DATA (cproj),
6960 TEST_c_c (cproj, 0.0, 0.0, 0.0, 0.0),
6961 TEST_c_c (cproj, minus_zero, minus_zero, minus_zero, minus_zero),
6962 TEST_c_c (cproj, 0.0, minus_zero, 0.0, minus_zero),
6963 TEST_c_c (cproj, minus_zero, 0.0, minus_zero, 0.0),
6964
6965 TEST_c_c (cproj, qnan_value, qnan_value, qnan_value, qnan_value),
6966
6967 TEST_c_c (cproj, plus_infty, plus_infty, plus_infty, 0.0),
6968 TEST_c_c (cproj, plus_infty, minus_infty, plus_infty, minus_zero),
6969 TEST_c_c (cproj, minus_infty, plus_infty, plus_infty, 0.0),
6970 TEST_c_c (cproj, minus_infty, minus_infty, plus_infty, minus_zero),
6971
6972 TEST_c_c (cproj, 1.0, 0.0, 1.0, 0.0),
6973 TEST_c_c (cproj, 2.0, 3.0, 2.0, 3.0),
6974 END_DATA (cproj)
6975 };
6976
6977 static void
6978 cproj_test (void)
6979 {
6980 START (cproj);
6981 RUN_TEST_LOOP_c_c (cproj, cproj_test_data, );
6982 END (cproj, complex);
6983 }
6984
6985
6986 static void
6987 creal_test (void)
6988 {
6989 START (creal);
6990 TEST_c_f (creal, 0.0, 1.0, 0.0);
6991 TEST_c_f (creal, minus_zero, 1.0, minus_zero);
6992 TEST_c_f (creal, qnan_value, 1.0, qnan_value);
6993 TEST_c_f (creal, qnan_value, qnan_value, qnan_value);
6994 TEST_c_f (creal, plus_infty, 1.0, plus_infty);
6995 TEST_c_f (creal, minus_infty, 1.0, minus_infty);
6996 TEST_c_f (creal, 2.0, 3.0, 2.0);
6997
6998 END (creal);
6999 }
7000
7001 static const struct test_c_c_data csin_test_data[] =
7002 {
7003 START_DATA (csin),
7004 TEST_c_c (csin, 0.0, 0.0, 0.0, 0.0),
7005 TEST_c_c (csin, minus_zero, 0.0, minus_zero, 0.0),
7006 TEST_c_c (csin, 0.0, minus_zero, 0, minus_zero),
7007 TEST_c_c (csin, minus_zero, minus_zero, minus_zero, minus_zero),
7008
7009 TEST_c_c (csin, 0.0, plus_infty, 0.0, plus_infty),
7010 TEST_c_c (csin, minus_zero, plus_infty, minus_zero, plus_infty),
7011 TEST_c_c (csin, 0.0, minus_infty, 0.0, minus_infty),
7012 TEST_c_c (csin, minus_zero, minus_infty, minus_zero, minus_infty),
7013
7014 TEST_c_c (csin, plus_infty, 0.0, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7015 TEST_c_c (csin, minus_infty, 0.0, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7016 TEST_c_c (csin, plus_infty, minus_zero, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7017 TEST_c_c (csin, minus_infty, minus_zero, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7018
7019 TEST_c_c (csin, plus_infty, plus_infty, qnan_value, plus_infty, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7020 TEST_c_c (csin, minus_infty, plus_infty, qnan_value, plus_infty, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7021 TEST_c_c (csin, plus_infty, minus_infty, qnan_value, plus_infty, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7022 TEST_c_c (csin, minus_infty, minus_infty, qnan_value, plus_infty, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7023
7024 TEST_c_c (csin, plus_infty, 6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
7025 TEST_c_c (csin, plus_infty, -6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
7026 TEST_c_c (csin, minus_infty, 6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
7027 TEST_c_c (csin, minus_infty, -6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
7028
7029 TEST_c_c (csin, 4.625, plus_infty, minus_infty, minus_infty),
7030 TEST_c_c (csin, 4.625, minus_infty, minus_infty, plus_infty),
7031 TEST_c_c (csin, -4.625, plus_infty, plus_infty, minus_infty),
7032 TEST_c_c (csin, -4.625, minus_infty, plus_infty, plus_infty),
7033
7034 TEST_c_c (csin, qnan_value, 0.0, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
7035 TEST_c_c (csin, qnan_value, minus_zero, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
7036
7037 TEST_c_c (csin, qnan_value, plus_infty, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
7038 TEST_c_c (csin, qnan_value, minus_infty, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
7039
7040 TEST_c_c (csin, qnan_value, 9.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7041 TEST_c_c (csin, qnan_value, -9.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7042
7043 TEST_c_c (csin, 0.0, qnan_value, 0.0, qnan_value),
7044 TEST_c_c (csin, minus_zero, qnan_value, minus_zero, qnan_value),
7045
7046 TEST_c_c (csin, 10.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7047 TEST_c_c (csin, qnan_value, -10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7048
7049 TEST_c_c (csin, plus_infty, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7050 TEST_c_c (csin, minus_infty, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7051
7052 TEST_c_c (csin, qnan_value, qnan_value, qnan_value, qnan_value),
7053
7054 TEST_c_c (csin, 0.75L, 1.25L, 1.28722291002649188575873510790565441L, 1.17210635989270256101081285116138863L),
7055 TEST_c_c (csin, -2, -3, -9.15449914691142957346729954460983256L, 4.16890695996656435075481305885375484L),
7056
7057 TEST_c_c (csin, 0.75, 89.5, 2.522786001038096774676288412995370563339e38L, 2.708024460708609732016532185663087200560e38L),
7058 TEST_c_c (csin, 0.75, -89.5, 2.522786001038096774676288412995370563339e38L, -2.708024460708609732016532185663087200560e38L),
7059 TEST_c_c (csin, -0.75, 89.5, -2.522786001038096774676288412995370563339e38L, 2.708024460708609732016532185663087200560e38L),
7060 TEST_c_c (csin, -0.75, -89.5, -2.522786001038096774676288412995370563339e38L, -2.708024460708609732016532185663087200560e38L),
7061
7062 #ifndef TEST_FLOAT
7063 TEST_c_c (csin, 0.75, 710.5, 1.255317763348154410745082950806112487736e308L, 1.347490911916428129246890157395342279438e308L),
7064 TEST_c_c (csin, 0.75, -710.5, 1.255317763348154410745082950806112487736e308L, -1.347490911916428129246890157395342279438e308L),
7065 TEST_c_c (csin, -0.75, 710.5, -1.255317763348154410745082950806112487736e308L, 1.347490911916428129246890157395342279438e308L),
7066 TEST_c_c (csin, -0.75, -710.5, -1.255317763348154410745082950806112487736e308L, -1.347490911916428129246890157395342279438e308L),
7067 #endif
7068
7069 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
7070 TEST_c_c (csin, 0.75, 11357.25, 8.385498349388321535962327491346664141020e4931L, 9.001213196851067077465606717616495588201e4931L),
7071 TEST_c_c (csin, 0.75, -11357.25, 8.385498349388321535962327491346664141020e4931L, -9.001213196851067077465606717616495588201e4931L),
7072 TEST_c_c (csin, -0.75, 11357.25, -8.385498349388321535962327491346664141020e4931L, 9.001213196851067077465606717616495588201e4931L),
7073 TEST_c_c (csin, -0.75, -11357.25, -8.385498349388321535962327491346664141020e4931L, -9.001213196851067077465606717616495588201e4931L),
7074 #endif
7075
7076 #ifdef TEST_FLOAT
7077 TEST_c_c (csin, 0x1p-149, 180, 1.043535896672617552965983803453927655332e33L, plus_infty, OVERFLOW_EXCEPTION),
7078 #endif
7079
7080 #if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
7081 TEST_c_c (csin, 0x1p-1074, 1440, 5.981479269486130556466515778180916082415e301L, plus_infty, OVERFLOW_EXCEPTION),
7082 #endif
7083
7084 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
7085 TEST_c_c (csin, 0x1p-16434L, 22730, 1.217853148905605987081057582351152052687e4924L, plus_infty, OVERFLOW_EXCEPTION),
7086 #endif
7087
7088 TEST_c_c (csin, min_subnorm_value, min_value, min_subnorm_value, min_value, UNDERFLOW_EXCEPTION),
7089 TEST_c_c (csin, min_value, min_subnorm_value, min_value, min_subnorm_value, UNDERFLOW_EXCEPTION),
7090 END_DATA (csin)
7091 };
7092
7093 static void
7094 csin_test (void)
7095 {
7096 errno = 0;
7097 FUNC(csin) (BUILD_COMPLEX (0.7L, 1.2L));
7098 if (errno == ENOSYS)
7099 /* Function not implemented. */
7100 return;
7101
7102 START (csin);
7103 RUN_TEST_LOOP_c_c (csin, csin_test_data, );
7104 END (csin, complex);
7105 }
7106
7107
7108 static const struct test_c_c_data csinh_test_data[] =
7109 {
7110 START_DATA (csinh),
7111 TEST_c_c (csinh, 0.0, 0.0, 0.0, 0.0),
7112 TEST_c_c (csinh, minus_zero, 0.0, minus_zero, 0.0),
7113 TEST_c_c (csinh, 0.0, minus_zero, 0.0, minus_zero),
7114 TEST_c_c (csinh, minus_zero, minus_zero, minus_zero, minus_zero),
7115
7116 TEST_c_c (csinh, 0.0, plus_infty, 0.0, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7117 TEST_c_c (csinh, minus_zero, plus_infty, 0.0, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7118 TEST_c_c (csinh, 0.0, minus_infty, 0.0, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7119 TEST_c_c (csinh, minus_zero, minus_infty, 0.0, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7120
7121 TEST_c_c (csinh, plus_infty, 0.0, plus_infty, 0.0),
7122 TEST_c_c (csinh, minus_infty, 0.0, minus_infty, 0.0),
7123 TEST_c_c (csinh, plus_infty, minus_zero, plus_infty, minus_zero),
7124 TEST_c_c (csinh, minus_infty, minus_zero, minus_infty, minus_zero),
7125
7126 TEST_c_c (csinh, plus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7127 TEST_c_c (csinh, minus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7128 TEST_c_c (csinh, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7129 TEST_c_c (csinh, minus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7130
7131 TEST_c_c (csinh, plus_infty, 4.625, minus_infty, minus_infty),
7132 TEST_c_c (csinh, minus_infty, 4.625, plus_infty, minus_infty),
7133 TEST_c_c (csinh, plus_infty, -4.625, minus_infty, plus_infty),
7134 TEST_c_c (csinh, minus_infty, -4.625, plus_infty, plus_infty),
7135
7136 TEST_c_c (csinh, 6.75, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7137 TEST_c_c (csinh, -6.75, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7138 TEST_c_c (csinh, 6.75, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7139 TEST_c_c (csinh, -6.75, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7140
7141 TEST_c_c (csinh, 0.0, qnan_value, 0.0, qnan_value, IGNORE_ZERO_INF_SIGN),
7142 TEST_c_c (csinh, minus_zero, qnan_value, 0.0, qnan_value, IGNORE_ZERO_INF_SIGN),
7143
7144 TEST_c_c (csinh, plus_infty, qnan_value, plus_infty, qnan_value, IGNORE_ZERO_INF_SIGN),
7145 TEST_c_c (csinh, minus_infty, qnan_value, plus_infty, qnan_value, IGNORE_ZERO_INF_SIGN),
7146
7147 TEST_c_c (csinh, 9.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7148 TEST_c_c (csinh, -9.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7149
7150 TEST_c_c (csinh, qnan_value, 0.0, qnan_value, 0.0),
7151 TEST_c_c (csinh, qnan_value, minus_zero, qnan_value, minus_zero),
7152
7153 TEST_c_c (csinh, qnan_value, 10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7154 TEST_c_c (csinh, qnan_value, -10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7155
7156 TEST_c_c (csinh, qnan_value, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7157 TEST_c_c (csinh, qnan_value, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7158
7159 TEST_c_c (csinh, qnan_value, qnan_value, qnan_value, qnan_value),
7160
7161 TEST_c_c (csinh, 0.75L, 1.25L, 0.259294854551162779153349830618433028L, 1.22863452409509552219214606515777594L),
7162 TEST_c_c (csinh, -2, -3, 3.59056458998577995201256544779481679L, -0.530921086248519805267040090660676560L),
7163
7164 TEST_c_c (csinh, 89.5, 0.75, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
7165 TEST_c_c (csinh, -89.5, 0.75, -2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
7166 TEST_c_c (csinh, 89.5, -0.75, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
7167 TEST_c_c (csinh, -89.5, -0.75, -2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
7168
7169 #ifndef TEST_FLOAT
7170 TEST_c_c (csinh, 710.5, 0.75, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
7171 TEST_c_c (csinh, -710.5, 0.75, -1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
7172 TEST_c_c (csinh, 710.5, -0.75, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
7173 TEST_c_c (csinh, -710.5, -0.75, -1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
7174 #endif
7175
7176 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
7177 TEST_c_c (csinh, 11357.25, 0.75, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
7178 TEST_c_c (csinh, -11357.25, 0.75, -9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
7179 TEST_c_c (csinh, 11357.25, -0.75, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
7180 TEST_c_c (csinh, -11357.25, -0.75, -9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
7181 #endif
7182
7183 #ifdef TEST_FLOAT
7184 TEST_c_c (csinh, 180, 0x1p-149, plus_infty, 1.043535896672617552965983803453927655332e33L, OVERFLOW_EXCEPTION),
7185 #endif
7186
7187 #if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
7188 TEST_c_c (csinh, 1440, 0x1p-1074, plus_infty, 5.981479269486130556466515778180916082415e301L, OVERFLOW_EXCEPTION),
7189 #endif
7190
7191 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
7192 TEST_c_c (csinh, 22730, 0x1p-16434L, plus_infty, 1.217853148905605987081057582351152052687e4924L, OVERFLOW_EXCEPTION),
7193 #endif
7194
7195 TEST_c_c (csinh, min_subnorm_value, min_value, min_subnorm_value, min_value, UNDERFLOW_EXCEPTION),
7196 TEST_c_c (csinh, min_value, min_subnorm_value, min_value, min_subnorm_value, UNDERFLOW_EXCEPTION),
7197 END_DATA (csinh)
7198 };
7199
7200 static void
7201 csinh_test (void)
7202 {
7203 errno = 0;
7204 FUNC(csinh) (BUILD_COMPLEX (0.7L, 1.2L));
7205 if (errno == ENOSYS)
7206 /* Function not implemented. */
7207 return;
7208
7209 START (csinh);
7210 RUN_TEST_LOOP_c_c (csinh, csinh_test_data, );
7211 END (csinh, complex);
7212 }
7213
7214
7215 static const struct test_c_c_data csqrt_test_data[] =
7216 {
7217 START_DATA (csqrt),
7218 TEST_c_c (csqrt, 0, 0, 0.0, 0.0),
7219 TEST_c_c (csqrt, 0, minus_zero, 0, minus_zero),
7220 TEST_c_c (csqrt, minus_zero, 0, 0.0, 0.0),
7221 TEST_c_c (csqrt, minus_zero, minus_zero, 0.0, minus_zero),
7222
7223 TEST_c_c (csqrt, minus_infty, 0, 0.0, plus_infty),
7224 TEST_c_c (csqrt, minus_infty, 6, 0.0, plus_infty),
7225 TEST_c_c (csqrt, minus_infty, minus_zero, 0.0, minus_infty),
7226 TEST_c_c (csqrt, minus_infty, -6, 0.0, minus_infty),
7227
7228 TEST_c_c (csqrt, plus_infty, 0, plus_infty, 0.0),
7229 TEST_c_c (csqrt, plus_infty, 6, plus_infty, 0.0),
7230 TEST_c_c (csqrt, plus_infty, minus_zero, plus_infty, minus_zero),
7231 TEST_c_c (csqrt, plus_infty, -6, plus_infty, minus_zero),
7232
7233 TEST_c_c (csqrt, 0, plus_infty, plus_infty, plus_infty),
7234 TEST_c_c (csqrt, 4, plus_infty, plus_infty, plus_infty),
7235 TEST_c_c (csqrt, plus_infty, plus_infty, plus_infty, plus_infty),
7236 TEST_c_c (csqrt, minus_zero, plus_infty, plus_infty, plus_infty),
7237 TEST_c_c (csqrt, -4, plus_infty, plus_infty, plus_infty),
7238 TEST_c_c (csqrt, minus_infty, plus_infty, plus_infty, plus_infty),
7239 TEST_c_c (csqrt, 0, minus_infty, plus_infty, minus_infty),
7240 TEST_c_c (csqrt, 4, minus_infty, plus_infty, minus_infty),
7241 TEST_c_c (csqrt, plus_infty, minus_infty, plus_infty, minus_infty),
7242 TEST_c_c (csqrt, minus_zero, minus_infty, plus_infty, minus_infty),
7243 TEST_c_c (csqrt, -4, minus_infty, plus_infty, minus_infty),
7244 TEST_c_c (csqrt, minus_infty, minus_infty, plus_infty, minus_infty),
7245
7246 TEST_c_c (csqrt, minus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
7247
7248 TEST_c_c (csqrt, plus_infty, qnan_value, plus_infty, qnan_value),
7249
7250 TEST_c_c (csqrt, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7251 TEST_c_c (csqrt, 1, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7252 TEST_c_c (csqrt, minus_zero, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7253 TEST_c_c (csqrt, -1, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7254
7255 TEST_c_c (csqrt, qnan_value, 0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7256 TEST_c_c (csqrt, qnan_value, 8, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7257 TEST_c_c (csqrt, qnan_value, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7258 TEST_c_c (csqrt, qnan_value, -8, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7259
7260 TEST_c_c (csqrt, qnan_value, qnan_value, qnan_value, qnan_value),
7261
7262 TEST_c_c (csqrt, 16.0, -30.0, 5.0, -3.0),
7263 TEST_c_c (csqrt, -1, 0, 0.0, 1.0),
7264 TEST_c_c (csqrt, 0, 2, 1.0, 1.0),
7265 TEST_c_c (csqrt, 119, 120, 12.0, 5.0),
7266 TEST_c_c (csqrt, 0.75L, 1.25L, 1.05065169626078392338656675760808326L, 0.594868882070379067881984030639932657L),
7267 TEST_c_c (csqrt, -2, -3, 0.89597747612983812471573375529004348L, -1.6741492280355400404480393008490519L),
7268 TEST_c_c (csqrt, -2, 3, 0.89597747612983812471573375529004348L, 1.6741492280355400404480393008490519L),
7269 /* Principal square root should be returned (i.e., non-negative real
7270 part). */
7271 TEST_c_c (csqrt, 0, -1, M_SQRT1_2l, -M_SQRT1_2l),
7272
7273 TEST_c_c (csqrt, 0x1.fffffep+127L, 0x1.fffffep+127L, 2.026714405498316804978751017492482558075e+19L, 8.394925938143272988211878516208015586281e+18L),
7274 TEST_c_c (csqrt, 0x1.fffffep+127L, 1.0L, 1.844674352395372953599975585936590505260e+19L, 2.710505511993121390769065968615872097053e-20L),
7275 TEST_c_c (csqrt, 0x1p-149L, 0x1p-149L, 4.112805464342778798097003462770175200803e-23L, 1.703579802732953750368659735601389709551e-23L),
7276 TEST_c_c (csqrt, 0x1p-147L, 0x1p-147L, 8.225610928685557596194006925540350401606e-23L, 3.407159605465907500737319471202779419102e-23L),
7277
7278 TEST_c_c (csqrt, plus_zero, 0x1p-149L, 2.646977960169688559588507814623881131411e-23L, 2.646977960169688559588507814623881131411e-23L),
7279 TEST_c_c (csqrt, 0x1p-50L, 0x1p-149L, 2.980232238769531250000000000000000000000e-8L, 2.350988701644575015937473074444491355637e-38L),
7280 #ifdef TEST_FLOAT
7281 TEST_c_c (csqrt, 0x1p+127L, 0x1p-149L, 1.304381782533278221234957180625250836888e19L, plus_zero, UNDERFLOW_EXCEPTION),
7282 #endif
7283 TEST_c_c (csqrt, 0x1p-149L, 0x1p+127L, 9.223372036854775808000000000000000000000e18L, 9.223372036854775808000000000000000000000e18L),
7284 TEST_c_c (csqrt, 0x1.000002p-126L, 0x1.000002p-126L, 1.191195773697904627170323731331667740087e-19L, 4.934094449071842328766868579214125217132e-20L),
7285 TEST_c_c (csqrt, -0x1.000002p-126L, -0x1.000002p-126L, 4.934094449071842328766868579214125217132e-20L, -1.191195773697904627170323731331667740087e-19L),
7286
7287 #ifndef TEST_FLOAT
7288 TEST_c_c (csqrt, 0x1.fffffffffffffp+1023L, 0x1.fffffffffffffp+1023L, 1.473094556905565378990473658199034571917e+154L, 6.101757441282702188537080005372547713595e+153L),
7289 TEST_c_c (csqrt, 0x1.fffffffffffffp+1023L, 0x1p+1023L, 1.379778091031440685006200821918878702861e+154L, 3.257214233483129514781233066898042490248e+153L),
7290 TEST_c_c (csqrt, 0x1p-1074L, 0x1p-1074L, 2.442109726130830256743814843868934877597e-162L, 1.011554969366634726113090867589031782487e-162L),
7291 TEST_c_c (csqrt, 0x1p-1073L, 0x1p-1073L, 3.453664695497464982856905711457966660085e-162L, 1.430554756764195530630723976279903095110e-162L),
7292
7293 TEST_c_c (csqrt, plus_zero, 0x1p-1074L, 1.571727784702628688909515672805082228285e-162L, 1.571727784702628688909515672805082228285e-162L),
7294 TEST_c_c (csqrt, 0x1p-500L, 0x1p-1074L, 5.527147875260444560247265192192255725514e-76L, 4.469444793151709302716387622440056066334e-249L),
7295 #if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
7296 TEST_c_c (csqrt, 0x1p+1023L, 0x1p-1074L, 9.480751908109176726832526455652159260085e153L, plus_zero, UNDERFLOW_EXCEPTION),
7297 #endif
7298 TEST_c_c (csqrt, 0x1p-1074L, 0x1p+1023L, 6.703903964971298549787012499102923063740e153L, 6.703903964971298549787012499102923063740e153L),
7299 TEST_c_c (csqrt, 0x1.0000000000001p-1022L, 0x1.0000000000001p-1022L, 1.638872094839911521020410942677082920935e-154L, 6.788430486774966350907249113759995429568e-155L),
7300 TEST_c_c (csqrt, -0x1.0000000000001p-1022L, -0x1.0000000000001p-1022L, 6.788430486774966350907249113759995429568e-155L, -1.638872094839911521020410942677082920935e-154L),
7301 #endif
7302
7303 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
7304 TEST_c_c (csqrt, 0x1.fp+16383L, 0x1.fp+16383L, 1.179514222452201722651836720466795901016e+2466L, 4.885707879516577666702435054303191575148e+2465L),
7305 TEST_c_c (csqrt, 0x1.fp+16383L, 0x1p+16383L, 1.106698967236475180613254276996359485630e+2466L, 2.687568007603946993388538156299100955642e+2465L),
7306 TEST_c_c (csqrt, 0x1p-16440L, 0x1p-16441L, 3.514690655930285351254618340783294558136e-2475L, 8.297059146828716918029689466551384219370e-2476L),
7307
7308 TEST_c_c (csqrt, plus_zero, 0x1p-16445L, 4.269191686890197837775136325621239761720e-2476L, 4.269191686890197837775136325621239761720e-2476L),
7309 TEST_c_c (csqrt, 0x1p-5000L, 0x1p-16445L, 2.660791472672778409283210520357607795518e-753L, 6.849840675828785164910701384823702064234e-4199L),
7310 TEST_c_c (csqrt, 0x1p+16383L, 0x1p-16445L, 7.712754032630730034273323365543179095045e2465L, plus_zero, UNDERFLOW_EXCEPTION),
7311 TEST_c_c (csqrt, 0x1p-16445L, 0x1p+16383L, 5.453740678097079647314921223668914312241e2465L, 5.453740678097079647314921223668914312241e2465L),
7312 TEST_c_c (csqrt, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-16382L, 2.014551439675644900131815801350165472778e-2466L, 8.344545284118961664300307045791497724440e-2467L),
7313 TEST_c_c (csqrt, -0x1.0000000000000002p-16382L, -0x1.0000000000000002p-16382L, 8.344545284118961664300307045791497724440e-2467L, -2.014551439675644900131815801350165472778e-2466L),
7314
7315 # if LDBL_MANT_DIG >= 113
7316 TEST_c_c (csqrt, plus_zero, 0x1p-16494L, 1.799329752913293143453817328207572571442e-2483L, 1.799329752913293143453817328207572571442e-2483L),
7317 TEST_c_c (csqrt, 0x1p-5000L, 0x1p-16494L, 2.660791472672778409283210520357607795518e-753L, 1.216776133331049643422030716668249905907e-4213L),
7318 TEST_c_c (csqrt, 0x1p+16383L, 0x1p-16494L, 7.712754032630730034273323365543179095045e2465L, plus_zero, UNDERFLOW_EXCEPTION),
7319 TEST_c_c (csqrt, 0x1p-16494L, 0x1p+16383L, 5.453740678097079647314921223668914312241e2465L, 5.453740678097079647314921223668914312241e2465L),
7320 TEST_c_c (csqrt, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-16382L, 2.014551439675644900022606748976158925145e-2466L, 8.344545284118961663847948339519226074126e-2467L),
7321 TEST_c_c (csqrt, -0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-16382L, 8.344545284118961663847948339519226074126e-2467L, -2.014551439675644900022606748976158925145e-2466L),
7322 # endif
7323 #endif
7324 END_DATA (csqrt)
7325 };
7326
7327 static void
7328 csqrt_test (void)
7329 {
7330 errno = 0;
7331 FUNC(csqrt) (BUILD_COMPLEX (-1, 0));
7332 if (errno == ENOSYS)
7333 /* Function not implemented. */
7334 return;
7335
7336 START (csqrt);
7337 RUN_TEST_LOOP_c_c (csqrt, csqrt_test_data, );
7338 END (csqrt, complex);
7339 }
7340
7341 static const struct test_c_c_data ctan_test_data[] =
7342 {
7343 START_DATA (ctan),
7344 TEST_c_c (ctan, 0, 0, 0.0, 0.0),
7345 TEST_c_c (ctan, 0, minus_zero, 0.0, minus_zero),
7346 TEST_c_c (ctan, minus_zero, 0, minus_zero, 0.0),
7347 TEST_c_c (ctan, minus_zero, minus_zero, minus_zero, minus_zero),
7348
7349 TEST_c_c (ctan, 0, plus_infty, 0.0, 1.0),
7350 TEST_c_c (ctan, 1, plus_infty, 0.0, 1.0),
7351 TEST_c_c (ctan, minus_zero, plus_infty, minus_zero, 1.0),
7352 TEST_c_c (ctan, -1, plus_infty, minus_zero, 1.0),
7353
7354 TEST_c_c (ctan, 0, minus_infty, 0.0, -1.0),
7355 TEST_c_c (ctan, 1, minus_infty, 0.0, -1.0),
7356 TEST_c_c (ctan, minus_zero, minus_infty, minus_zero, -1.0),
7357 TEST_c_c (ctan, -1, minus_infty, minus_zero, -1.0),
7358
7359 TEST_c_c (ctan, plus_infty, 0, qnan_value, qnan_value, INVALID_EXCEPTION),
7360 TEST_c_c (ctan, plus_infty, 2, qnan_value, qnan_value, INVALID_EXCEPTION),
7361 TEST_c_c (ctan, minus_infty, 0, qnan_value, qnan_value, INVALID_EXCEPTION),
7362 TEST_c_c (ctan, minus_infty, 2, qnan_value, qnan_value, INVALID_EXCEPTION),
7363 TEST_c_c (ctan, plus_infty, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION),
7364 TEST_c_c (ctan, plus_infty, -2, qnan_value, qnan_value, INVALID_EXCEPTION),
7365 TEST_c_c (ctan, minus_infty, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION),
7366 TEST_c_c (ctan, minus_infty, -2, qnan_value, qnan_value, INVALID_EXCEPTION),
7367
7368 TEST_c_c (ctan, qnan_value, plus_infty, 0.0, 1.0, IGNORE_ZERO_INF_SIGN),
7369 TEST_c_c (ctan, qnan_value, minus_infty, 0.0, -1.0, IGNORE_ZERO_INF_SIGN),
7370
7371 TEST_c_c (ctan, 0, qnan_value, 0.0, qnan_value),
7372 TEST_c_c (ctan, minus_zero, qnan_value, minus_zero, qnan_value),
7373
7374 TEST_c_c (ctan, 0.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7375 TEST_c_c (ctan, -4.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7376
7377 TEST_c_c (ctan, qnan_value, 0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7378 TEST_c_c (ctan, qnan_value, 5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7379 TEST_c_c (ctan, qnan_value, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7380 TEST_c_c (ctan, qnan_value, -0.25, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7381
7382 TEST_c_c (ctan, qnan_value, qnan_value, qnan_value, qnan_value),
7383
7384 TEST_c_c (ctan, 0.75L, 1.25L, 0.160807785916206426725166058173438663L, 0.975363285031235646193581759755216379L),
7385 TEST_c_c (ctan, -2, -3, 0.376402564150424829275122113032269084e-2L, -1.00323862735360980144635859782192726L),
7386
7387 TEST_c_c (ctan, 1, 45, 1.490158918874345552942703234806348520895e-39L, 1.000000000000000000000000000000000000001L, UNDERFLOW_EXCEPTION_FLOAT),
7388 TEST_c_c (ctan, 1, 47, 2.729321264492904590777293425576722354636e-41L, 1.0, UNDERFLOW_EXCEPTION_FLOAT),
7389
7390 #ifndef TEST_FLOAT
7391 TEST_c_c (ctan, 1, 355, 8.140551093483276762350406321792653551513e-309L, 1.0, UNDERFLOW_EXCEPTION_DOUBLE),
7392 TEST_c_c (ctan, 1, 365, 1.677892637497921890115075995898773550884e-317L, 1.0, UNDERFLOW_EXCEPTION_DOUBLE),
7393 #endif
7394
7395 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
7396 TEST_c_c (ctan, 1, 5680, 4.725214596136812019616700920476949798307e-4934L, 1.0, UNDERFLOW_EXCEPTION),
7397 TEST_c_c (ctan, 1, 5690, 9.739393181626937151720816611272607059057e-4943L, 1.0, UNDERFLOW_EXCEPTION),
7398 #endif
7399
7400 TEST_c_c (ctan, 0x3.243f6cp-1, 0, -2.287733242885645987394874673945769518150e7L, 0.0),
7401
7402 TEST_c_c (ctan, 0x1p127, 1, 0.2446359391192790896381501310437708987204L, 0.9101334047676183761532873794426475906201L),
7403
7404 #ifndef TEST_FLOAT
7405 TEST_c_c (ctan, 0x1p1023, 1, -0.2254627924997545057926782581695274244229L, 0.8786063118883068695462540226219865087189L),
7406 #endif
7407
7408 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
7409 TEST_c_c (ctan, 0x1p16383L, 1, 0.1608598776370396607204448234354670036772L, 0.8133818522051542536316746743877629761488L),
7410 #endif
7411
7412 TEST_c_c (ctan, 50000, 50000, plus_zero, 1.0, UNDERFLOW_EXCEPTION),
7413 TEST_c_c (ctan, 50000, -50000, plus_zero, -1.0, UNDERFLOW_EXCEPTION),
7414 TEST_c_c (ctan, -50000, 50000, minus_zero, 1.0, UNDERFLOW_EXCEPTION),
7415 TEST_c_c (ctan, -50000, -50000, minus_zero, -1.0, UNDERFLOW_EXCEPTION),
7416 END_DATA (ctan)
7417 };
7418
7419 static void
7420 ctan_test (void)
7421 {
7422 errno = 0;
7423 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7424 if (errno == ENOSYS)
7425 /* Function not implemented. */
7426 return;
7427
7428 START (ctan);
7429 RUN_TEST_LOOP_c_c (ctan, ctan_test_data, );
7430 END (ctan, complex);
7431 }
7432
7433
7434 static const struct test_c_c_data ctan_tonearest_test_data[] =
7435 {
7436 START_DATA (ctan_tonearest),
7437 TEST_c_c (ctan, 0x1.921fb6p+0, 0x1p-149, -2.287733242885645987394874673945769518150e7L, 7.334008549954377778731880988481078535821e-31L),
7438
7439 #ifndef TEST_FLOAT
7440 TEST_c_c (ctan, 0x1.921fb54442d18p+0, 0x1p-1074, 1.633123935319536975596773704152891653086e16L, 1.317719414943508315995636961402669067843e-291L),
7441 #endif
7442
7443 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
7444 TEST_c_c (ctan, 0x1.921fb54442d1846ap+0L, 0x1p-16445L, -3.986797629811710706723242948653362815645e19L, 5.793882568875674066286163141055208625180e-4912L),
7445 #endif
7446 END_DATA (ctan_tonearest)
7447 };
7448
7449 static void
7450 ctan_test_tonearest (void)
7451 {
7452 errno = 0;
7453 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7454 if (errno == ENOSYS)
7455 /* Function not implemented. */
7456 return;
7457
7458 START (ctan_tonearest);
7459 RUN_TEST_LOOP_c_c (ctan, ctan_tonearest_test_data, FE_TONEAREST);
7460 END (ctan_tonearest, complex);
7461 }
7462
7463
7464 static const struct test_c_c_data ctan_towardzero_test_data[] =
7465 {
7466 START_DATA (ctan_towardzero),
7467 TEST_c_c (ctan, 0x1.921fb6p+0, 0x1p-149, -2.287733242885645987394874673945769518150e7L, 7.334008549954377778731880988481078535821e-31L),
7468
7469 #ifndef TEST_FLOAT
7470 TEST_c_c (ctan, 0x1.921fb54442d18p+0, 0x1p-1074, 1.633123935319536975596773704152891653086e16L, 1.317719414943508315995636961402669067843e-291L),
7471 #endif
7472
7473 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
7474 TEST_c_c (ctan, 0x1.921fb54442d1846ap+0L, 0x1p-16445L, -3.986797629811710706723242948653362815645e19L, 5.793882568875674066286163141055208625180e-4912L),
7475 #endif
7476 END_DATA (ctan_towardzero)
7477 };
7478
7479 static void
7480 ctan_test_towardzero (void)
7481 {
7482 errno = 0;
7483 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7484 if (errno == ENOSYS)
7485 /* Function not implemented. */
7486 return;
7487
7488 START (ctan_towardzero);
7489 RUN_TEST_LOOP_c_c (ctan, ctan_towardzero_test_data, FE_TOWARDZERO);
7490 END (ctan_towardzero, complex);
7491 }
7492
7493
7494 static const struct test_c_c_data ctan_downward_test_data[] =
7495 {
7496 START_DATA (ctan_downward),
7497 TEST_c_c (ctan, 0x1.921fb6p+0, 0x1p-149, -2.287733242885645987394874673945769518150e7L, 7.334008549954377778731880988481078535821e-31L),
7498
7499 #ifndef TEST_FLOAT
7500 TEST_c_c (ctan, 0x1.921fb54442d18p+0, 0x1p-1074, 1.633123935319536975596773704152891653086e16L, 1.317719414943508315995636961402669067843e-291L),
7501 #endif
7502
7503 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
7504 TEST_c_c (ctan, 0x1.921fb54442d1846ap+0L, 0x1p-16445L, -3.986797629811710706723242948653362815645e19L, 5.793882568875674066286163141055208625180e-4912L),
7505 #endif
7506 END_DATA (ctan_downward)
7507 };
7508
7509 static void
7510 ctan_test_downward (void)
7511 {
7512 errno = 0;
7513 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7514 if (errno == ENOSYS)
7515 /* Function not implemented. */
7516 return;
7517
7518 START (ctan_downward);
7519 RUN_TEST_LOOP_c_c (ctan, ctan_downward_test_data, FE_DOWNWARD);
7520 END (ctan_downward, complex);
7521 }
7522
7523
7524 static const struct test_c_c_data ctan_upward_test_data[] =
7525 {
7526 START_DATA (ctan_upward),
7527 TEST_c_c (ctan, 0x1.921fb6p+0, 0x1p-149, -2.287733242885645987394874673945769518150e7L, 7.334008549954377778731880988481078535821e-31L),
7528
7529 #ifndef TEST_FLOAT
7530 TEST_c_c (ctan, 0x1.921fb54442d18p+0, 0x1p-1074, 1.633123935319536975596773704152891653086e16L, 1.317719414943508315995636961402669067843e-291L),
7531 #endif
7532
7533 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
7534 TEST_c_c (ctan, 0x1.921fb54442d1846ap+0L, 0x1p-16445L, -3.986797629811710706723242948653362815645e19L, 5.793882568875674066286163141055208625180e-4912L),
7535 #endif
7536 END_DATA (ctan_upward)
7537 };
7538
7539 static void
7540 ctan_test_upward (void)
7541 {
7542 errno = 0;
7543 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7544 if (errno == ENOSYS)
7545 /* Function not implemented. */
7546 return;
7547
7548 START (ctan_upward);
7549 RUN_TEST_LOOP_c_c (ctan, ctan_upward_test_data, FE_UPWARD);
7550 END (ctan_upward, complex);
7551 }
7552
7553
7554 static const struct test_c_c_data ctanh_test_data[] =
7555 {
7556 START_DATA (ctanh),
7557 TEST_c_c (ctanh, 0, 0, 0.0, 0.0),
7558 TEST_c_c (ctanh, 0, minus_zero, 0.0, minus_zero),
7559 TEST_c_c (ctanh, minus_zero, 0, minus_zero, 0.0),
7560 TEST_c_c (ctanh, minus_zero, minus_zero, minus_zero, minus_zero),
7561
7562 TEST_c_c (ctanh, plus_infty, 0, 1.0, 0.0),
7563 TEST_c_c (ctanh, plus_infty, 1, 1.0, 0.0),
7564 TEST_c_c (ctanh, plus_infty, minus_zero, 1.0, minus_zero),
7565 TEST_c_c (ctanh, plus_infty, -1, 1.0, minus_zero),
7566 TEST_c_c (ctanh, minus_infty, 0, -1.0, 0.0),
7567 TEST_c_c (ctanh, minus_infty, 1, -1.0, 0.0),
7568 TEST_c_c (ctanh, minus_infty, minus_zero, -1.0, minus_zero),
7569 TEST_c_c (ctanh, minus_infty, -1, -1.0, minus_zero),
7570
7571 TEST_c_c (ctanh, 0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7572 TEST_c_c (ctanh, 2, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7573 TEST_c_c (ctanh, 0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7574 TEST_c_c (ctanh, 2, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7575 TEST_c_c (ctanh, minus_zero, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7576 TEST_c_c (ctanh, -2, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7577 TEST_c_c (ctanh, minus_zero, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7578 TEST_c_c (ctanh, -2, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7579
7580 TEST_c_c (ctanh, plus_infty, qnan_value, 1.0, 0.0, IGNORE_ZERO_INF_SIGN),
7581 TEST_c_c (ctanh, minus_infty, qnan_value, -1.0, 0.0, IGNORE_ZERO_INF_SIGN),
7582
7583 TEST_c_c (ctanh, qnan_value, 0, qnan_value, 0.0),
7584 TEST_c_c (ctanh, qnan_value, minus_zero, qnan_value, minus_zero),
7585
7586 TEST_c_c (ctanh, qnan_value, 0.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7587 TEST_c_c (ctanh, qnan_value, -4.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7588
7589 TEST_c_c (ctanh, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7590 TEST_c_c (ctanh, 5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7591 TEST_c_c (ctanh, minus_zero, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7592 TEST_c_c (ctanh, -0.25, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7593
7594 TEST_c_c (ctanh, qnan_value, qnan_value, qnan_value, qnan_value),
7595
7596 TEST_c_c (ctanh, 0, M_PI_4l, 0.0, 1.0),
7597
7598 TEST_c_c (ctanh, 0.75L, 1.25L, 1.37260757053378320258048606571226857L, 0.385795952609750664177596760720790220L),
7599 TEST_c_c (ctanh, -2, -3, -0.965385879022133124278480269394560686L, 0.988437503832249372031403430350121098e-2L),
7600
7601 TEST_c_c (ctanh, 45, 1, 1.000000000000000000000000000000000000001L, 1.490158918874345552942703234806348520895e-39L, UNDERFLOW_EXCEPTION_FLOAT),
7602 TEST_c_c (ctanh, 47, 1, 1.0, 2.729321264492904590777293425576722354636e-41L, UNDERFLOW_EXCEPTION_FLOAT),
7603
7604 #ifndef TEST_FLOAT
7605 TEST_c_c (ctanh, 355, 1, 1.0, 8.140551093483276762350406321792653551513e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
7606 TEST_c_c (ctanh, 365, 1, 1.0, 1.677892637497921890115075995898773550884e-317L, UNDERFLOW_EXCEPTION_DOUBLE),
7607 #endif
7608
7609 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
7610 TEST_c_c (ctanh, 5680, 1, 1.0, 4.725214596136812019616700920476949798307e-4934L, UNDERFLOW_EXCEPTION),
7611 TEST_c_c (ctanh, 5690, 1, 1.0, 9.739393181626937151720816611272607059057e-4943L, UNDERFLOW_EXCEPTION),
7612 #endif
7613
7614 TEST_c_c (ctanh, 0, 0x3.243f6cp-1, 0.0, -2.287733242885645987394874673945769518150e7L),
7615
7616 TEST_c_c (ctanh, 1, 0x1p127, 0.9101334047676183761532873794426475906201L, 0.2446359391192790896381501310437708987204L),
7617
7618 #ifndef TEST_FLOAT
7619 TEST_c_c (ctanh, 1, 0x1p1023, 0.8786063118883068695462540226219865087189L, -0.2254627924997545057926782581695274244229L),
7620 #endif
7621
7622 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
7623 TEST_c_c (ctanh, 1, 0x1p16383L, 0.8133818522051542536316746743877629761488L, 0.1608598776370396607204448234354670036772L),
7624 #endif
7625
7626 TEST_c_c (ctanh, 50000, 50000, 1.0, plus_zero, UNDERFLOW_EXCEPTION),
7627 TEST_c_c (ctanh, 50000, -50000, 1.0, minus_zero, UNDERFLOW_EXCEPTION),
7628 TEST_c_c (ctanh, -50000, 50000, -1.0, plus_zero, UNDERFLOW_EXCEPTION),
7629 TEST_c_c (ctanh, -50000, -50000, -1.0, minus_zero, UNDERFLOW_EXCEPTION),
7630 END_DATA (ctanh)
7631 };
7632
7633 static void
7634 ctanh_test (void)
7635 {
7636 errno = 0;
7637 FUNC(ctanh) (BUILD_COMPLEX (0, 0));
7638 if (errno == ENOSYS)
7639 /* Function not implemented. */
7640 return;
7641
7642 START (ctanh);
7643 RUN_TEST_LOOP_c_c (ctanh, ctanh_test_data, );
7644 END (ctanh, complex);
7645 }
7646
7647
7648 static const struct test_c_c_data ctanh_tonearest_test_data[] =
7649 {
7650 START_DATA (ctanh_tonearest),
7651 TEST_c_c (ctanh, 0x1p-149, 0x1.921fb6p+0, 7.334008549954377778731880988481078535821e-31L, -2.287733242885645987394874673945769518150e7L),
7652
7653 #ifndef TEST_FLOAT
7654 TEST_c_c (ctanh, 0x1p-1074, 0x1.921fb54442d18p+0, 1.317719414943508315995636961402669067843e-291L, 1.633123935319536975596773704152891653086e16L),
7655 #endif
7656
7657 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
7658 TEST_c_c (ctanh, 0x1p-16445L, 0x1.921fb54442d1846ap+0L, 5.793882568875674066286163141055208625180e-4912L, -3.986797629811710706723242948653362815645e19L),
7659 #endif
7660 END_DATA (ctanh_tonearest)
7661 };
7662
7663 static void
7664 ctanh_test_tonearest (void)
7665 {
7666 errno = 0;
7667 FUNC(ctanh) (BUILD_COMPLEX (0.7L, 1.2L));
7668 if (errno == ENOSYS)
7669 /* Function not implemented. */
7670 return;
7671
7672 START (ctanh_tonearest);
7673 RUN_TEST_LOOP_c_c (ctanh, ctanh_tonearest_test_data, FE_TONEAREST);
7674 END (ctanh_tonearest, complex);
7675 }
7676
7677
7678 static const struct test_c_c_data ctanh_towardzero_test_data[] =
7679 {
7680 START_DATA (ctanh_towardzero),
7681 TEST_c_c (ctanh, 0x1p-149, 0x1.921fb6p+0, 7.334008549954377778731880988481078535821e-31L, -2.287733242885645987394874673945769518150e7L),
7682
7683 #ifndef TEST_FLOAT
7684 TEST_c_c (ctanh, 0x1p-1074, 0x1.921fb54442d18p+0, 1.317719414943508315995636961402669067843e-291L, 1.633123935319536975596773704152891653086e16L),
7685 #endif
7686
7687 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
7688 TEST_c_c (ctanh, 0x1p-16445L, 0x1.921fb54442d1846ap+0L, 5.793882568875674066286163141055208625180e-4912L, -3.986797629811710706723242948653362815645e19L),
7689 #endif
7690 END_DATA (ctanh_towardzero)
7691 };
7692
7693 static void
7694 ctanh_test_towardzero (void)
7695 {
7696 errno = 0;
7697 FUNC(ctanh) (BUILD_COMPLEX (0.7L, 1.2L));
7698 if (errno == ENOSYS)
7699 /* Function not implemented. */
7700 return;
7701
7702 START (ctanh_towardzero);
7703 RUN_TEST_LOOP_c_c (ctanh, ctanh_towardzero_test_data, FE_TOWARDZERO);
7704 END (ctanh_towardzero, complex);
7705 }
7706
7707
7708 static const struct test_c_c_data ctanh_downward_test_data[] =
7709 {
7710 START_DATA (ctanh_downward),
7711 TEST_c_c (ctanh, 0x1p-149, 0x1.921fb6p+0, 7.334008549954377778731880988481078535821e-31L, -2.287733242885645987394874673945769518150e7L),
7712
7713 #ifndef TEST_FLOAT
7714 TEST_c_c (ctanh, 0x1p-1074, 0x1.921fb54442d18p+0, 1.317719414943508315995636961402669067843e-291L, 1.633123935319536975596773704152891653086e16L),
7715 #endif
7716
7717 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
7718 TEST_c_c (ctanh, 0x1p-16445L, 0x1.921fb54442d1846ap+0L, 5.793882568875674066286163141055208625180e-4912L, -3.986797629811710706723242948653362815645e19L),
7719 #endif
7720 END_DATA (ctanh_downward)
7721 };
7722
7723 static void
7724 ctanh_test_downward (void)
7725 {
7726 errno = 0;
7727 FUNC(ctanh) (BUILD_COMPLEX (0.7L, 1.2L));
7728 if (errno == ENOSYS)
7729 /* Function not implemented. */
7730 return;
7731
7732 START (ctanh_downward);
7733 RUN_TEST_LOOP_c_c (ctanh, ctanh_downward_test_data, FE_DOWNWARD);
7734 END (ctanh_downward, complex);
7735 }
7736
7737
7738 static const struct test_c_c_data ctanh_upward_test_data[] =
7739 {
7740 START_DATA (ctanh_upward),
7741 TEST_c_c (ctanh, 0x1p-149, 0x1.921fb6p+0, 7.334008549954377778731880988481078535821e-31L, -2.287733242885645987394874673945769518150e7L),
7742
7743 #ifndef TEST_FLOAT
7744 TEST_c_c (ctanh, 0x1p-1074, 0x1.921fb54442d18p+0, 1.317719414943508315995636961402669067843e-291L, 1.633123935319536975596773704152891653086e16L),
7745 #endif
7746
7747 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
7748 TEST_c_c (ctanh, 0x1p-16445L, 0x1.921fb54442d1846ap+0L, 5.793882568875674066286163141055208625180e-4912L, -3.986797629811710706723242948653362815645e19L),
7749 #endif
7750 END_DATA (ctanh_upward)
7751 };
7752
7753 static void
7754 ctanh_test_upward (void)
7755 {
7756 errno = 0;
7757 FUNC(ctanh) (BUILD_COMPLEX (0.7L, 1.2L));
7758 if (errno == ENOSYS)
7759 /* Function not implemented. */
7760 return;
7761
7762 START (ctanh_upward);
7763 RUN_TEST_LOOP_c_c (ctanh, ctanh_upward_test_data, FE_UPWARD);
7764 END (ctanh_upward, complex);
7765 }
7766
7767
7768 static const struct test_f_f_data erf_test_data[] =
7769 {
7770 START_DATA (erf),
7771 TEST_f_f (erf, 0, 0),
7772 TEST_f_f (erf, minus_zero, minus_zero),
7773 TEST_f_f (erf, plus_infty, 1),
7774 TEST_f_f (erf, minus_infty, -1),
7775 TEST_f_f (erf, qnan_value, qnan_value),
7776
7777 TEST_f_f (erf, 0.125L, 0.140316204801333817393029446521623398L),
7778 TEST_f_f (erf, 0.75L, 0.711155633653515131598937834591410777L),
7779 TEST_f_f (erf, 1.25L, 0.922900128256458230136523481197281140L),
7780 TEST_f_f (erf, 2.0L, 0.995322265018952734162069256367252929L),
7781 TEST_f_f (erf, 4.125L, 0.999999994576599200434933994687765914L),
7782 TEST_f_f (erf, 27.0L, 1.0L),
7783 END_DATA (erf)
7784 };
7785
7786 static void
7787 erf_test (void)
7788 {
7789 errno = 0;
7790 FUNC(erf) (0);
7791 if (errno == ENOSYS)
7792 /* Function not implemented. */
7793 return;
7794
7795 START (erf);
7796 RUN_TEST_LOOP_f_f (erf, erf_test_data, );
7797 END (erf);
7798 }
7799
7800
7801 static const struct test_f_f_data erfc_test_data[] =
7802 {
7803 START_DATA (erfc),
7804 TEST_f_f (erfc, plus_infty, 0.0),
7805 TEST_f_f (erfc, minus_infty, 2.0),
7806 TEST_f_f (erfc, 0.0, 1.0),
7807 TEST_f_f (erfc, minus_zero, 1.0),
7808 TEST_f_f (erfc, qnan_value, qnan_value),
7809
7810 TEST_f_f (erfc, 0.125L, 0.859683795198666182606970553478376602L),
7811 TEST_f_f (erfc, 0.75L, 0.288844366346484868401062165408589223L),
7812 TEST_f_f (erfc, 1.25L, 0.0770998717435417698634765188027188596L),
7813 TEST_f_f (erfc, 2.0L, 0.00467773498104726583793074363274707139L),
7814 TEST_f_f (erfc, 0x1.f7303cp+1L, 2.705500297238986897105236321218861842255e-8L),
7815 TEST_f_f (erfc, 4.125L, 0.542340079956506600531223408575531062e-8L),
7816 TEST_f_f (erfc, 0x1.ffa002p+2L, 1.233585992097580296336099501489175967033e-29L),
7817 TEST_f_f (erfc, 0x1.ffffc8p+2L, 1.122671365033056305522366683719541099329e-29L),
7818 #ifdef TEST_LDOUBLE
7819 /* The result can only be represented in long double. */
7820 # if LDBL_MIN_10_EXP < -319
7821 TEST_f_f (erfc, 27.0L, 0.523704892378925568501606768284954709e-318L),
7822 # endif
7823 # if LDBL_MANT_DIG >= 106
7824 TEST_f_f (erfc, 0x1.ffff56789abcdef0123456789a8p+2L, 1.123161416304655390092138725253789378459e-29L),
7825 # endif
7826 #endif
7827 END_DATA (erfc)
7828 };
7829
7830 static void
7831 erfc_test (void)
7832 {
7833 errno = 0;
7834 FUNC(erfc) (0);
7835 if (errno == ENOSYS)
7836 /* Function not implemented. */
7837 return;
7838
7839 START (erfc);
7840 RUN_TEST_LOOP_f_f (erfc, erfc_test_data, );
7841 END (erfc);
7842 }
7843
7844
7845 static const struct test_f_f_data exp_test_data[] =
7846 {
7847 START_DATA (exp),
7848 TEST_f_f (exp, 0, 1),
7849 TEST_f_f (exp, minus_zero, 1),
7850
7851 #ifndef TEST_INLINE
7852 TEST_f_f (exp, plus_infty, plus_infty),
7853 TEST_f_f (exp, minus_infty, 0),
7854 #endif
7855 TEST_f_f (exp, qnan_value, qnan_value),
7856 TEST_f_f (exp, 1, M_El),
7857
7858 TEST_f_f (exp, 2, M_E2l),
7859 TEST_f_f (exp, 3, M_E3l),
7860 TEST_f_f (exp, 0.75L, 2.11700001661267466854536981983709561L),
7861 TEST_f_f (exp, 50.0L, 5184705528587072464087.45332293348538L),
7862 TEST_f_f (exp, 88.72269439697265625L, 3.40233126623160774937554134772290447915e38L),
7863 #ifndef TEST_FLOAT
7864 TEST_f_f (exp, 709.75L, 1.739836873264160557698252711673830393864768e+308L),
7865 #endif
7866 #if defined TEST_LDOUBLE && __LDBL_MAX_EXP__ > 1024
7867 /* The result can only be represented in sane long double. */
7868 TEST_f_f (exp, 1000.0L, 0.197007111401704699388887935224332313e435L),
7869 #endif
7870
7871 #if !(defined TEST_LDOUBLE && LDBL_MAX_EXP > 1024)
7872 TEST_f_f (exp, 710, plus_infty, OVERFLOW_EXCEPTION),
7873 TEST_f_f (exp, -1234, plus_zero, UNDERFLOW_EXCEPTION),
7874 #endif
7875 TEST_f_f (exp, 1e5, plus_infty, OVERFLOW_EXCEPTION),
7876 TEST_f_f (exp, max_value, plus_infty, OVERFLOW_EXCEPTION),
7877 TEST_f_f (exp, -max_value, 0, UNDERFLOW_EXCEPTION),
7878 END_DATA (exp)
7879 };
7880
7881 static void
7882 exp_test (void)
7883 {
7884 errno = 0;
7885 FUNC(exp) (0);
7886 if (errno == ENOSYS)
7887 /* Function not implemented. */
7888 return;
7889
7890 START (exp);
7891 RUN_TEST_LOOP_f_f (exp, exp_test_data, );
7892 END (exp);
7893 }
7894
7895
7896 static const struct test_f_f_data exp_tonearest_test_data[] =
7897 {
7898 START_DATA (exp_tonearest),
7899 TEST_f_f (exp, 1, M_El),
7900 TEST_f_f (exp, 2, M_E2l),
7901 TEST_f_f (exp, 3, M_E3l),
7902 END_DATA (exp_tonearest)
7903 };
7904
7905 static void
7906 exp_test_tonearest (void)
7907 {
7908 errno = 0;
7909 FUNC(exp) (0);
7910 if (errno == ENOSYS)
7911 /* Function not implemented. */
7912 return;
7913
7914 START (exp_tonearest);
7915 RUN_TEST_LOOP_f_f (exp, exp_tonearest_test_data, FE_TONEAREST);
7916 END (exp_tonearest);
7917 }
7918
7919
7920 static const struct test_f_f_data exp_towardzero_test_data[] =
7921 {
7922 START_DATA (exp_towardzero),
7923 TEST_f_f (exp, 1, M_El),
7924 TEST_f_f (exp, 2, M_E2l),
7925 TEST_f_f (exp, 3, M_E3l),
7926 END_DATA (exp_towardzero)
7927 };
7928
7929 static void
7930 exp_test_towardzero (void)
7931 {
7932 errno = 0;
7933 FUNC(exp) (0);
7934 if (errno == ENOSYS)
7935 /* Function not implemented. */
7936 return;
7937
7938 START (exp_towardzero);
7939 RUN_TEST_LOOP_f_f (exp, exp_towardzero_test_data, FE_TOWARDZERO);
7940 END (exp_towardzero);
7941 }
7942
7943
7944 static const struct test_f_f_data exp_downward_test_data[] =
7945 {
7946 START_DATA (exp_downward),
7947 TEST_f_f (exp, 1, M_El),
7948 TEST_f_f (exp, 2, M_E2l),
7949 TEST_f_f (exp, 3, M_E3l),
7950 END_DATA (exp_downward)
7951 };
7952
7953 static void
7954 exp_test_downward (void)
7955 {
7956 errno = 0;
7957 FUNC(exp) (0);
7958 if (errno == ENOSYS)
7959 /* Function not implemented. */
7960 return;
7961
7962 START (exp_downward);
7963 RUN_TEST_LOOP_f_f (exp, exp_downward_test_data, FE_DOWNWARD);
7964 END (exp_downward);
7965 }
7966
7967
7968 static const struct test_f_f_data exp_upward_test_data[] =
7969 {
7970 START_DATA (exp_upward),
7971 TEST_f_f (exp, 1, M_El),
7972 TEST_f_f (exp, 2, M_E2l),
7973 TEST_f_f (exp, 3, M_E3l),
7974 END_DATA (exp_upward)
7975 };
7976
7977 static void
7978 exp_test_upward (void)
7979 {
7980 errno = 0;
7981 FUNC(exp) (0);
7982 if (errno == ENOSYS)
7983 /* Function not implemented. */
7984 return;
7985
7986 START (exp_upward);
7987 RUN_TEST_LOOP_f_f (exp, exp_upward_test_data, FE_UPWARD);
7988 END (exp_upward);
7989 }
7990
7991
7992 static const struct test_f_f_data exp10_test_data[] =
7993 {
7994 START_DATA (exp10),
7995 TEST_f_f (exp10, 0, 1),
7996 TEST_f_f (exp10, minus_zero, 1),
7997
7998 TEST_f_f (exp10, plus_infty, plus_infty),
7999 TEST_f_f (exp10, minus_infty, 0),
8000 TEST_f_f (exp10, qnan_value, qnan_value),
8001 TEST_f_f (exp10, 3, 1000),
8002 TEST_f_f (exp10, -1, 0.1L),
8003 TEST_f_f (exp10, 36, 1.0e36L),
8004 TEST_f_f (exp10, -36, 1.0e-36L),
8005 #ifndef TEST_FLOAT
8006 TEST_f_f (exp10, 305, 1.0e305L),
8007 TEST_f_f (exp10, -305, 1.0e-305L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
8008 #endif
8009 #if defined TEST_LDOUBLE && LDBL_MAX_10_EXP >= 4932
8010 TEST_f_f (exp10, 4932, 1.0e4932L),
8011 TEST_f_f (exp10, -4932, 1.0e-4932L, UNDERFLOW_EXCEPTION),
8012 #endif
8013 TEST_f_f (exp10, 1e6, plus_infty, OVERFLOW_EXCEPTION),
8014 TEST_f_f (exp10, -1e6, 0, UNDERFLOW_EXCEPTION),
8015 TEST_f_f (exp10, max_value, plus_infty, OVERFLOW_EXCEPTION),
8016 TEST_f_f (exp10, -max_value, 0, UNDERFLOW_EXCEPTION),
8017 TEST_f_f (exp10, 0.75L, 5.62341325190349080394951039776481231L),
8018 END_DATA (exp10)
8019 };
8020
8021 static void
8022 exp10_test (void)
8023 {
8024 errno = 0;
8025 FUNC(exp10) (0);
8026 if (errno == ENOSYS)
8027 /* Function not implemented. */
8028 return;
8029
8030 START (exp10);
8031 RUN_TEST_LOOP_f_f (exp10, exp10_test_data, );
8032 END (exp10);
8033 }
8034
8035
8036 static const struct test_f_f_data exp2_test_data[] =
8037 {
8038 START_DATA (exp2),
8039 TEST_f_f (exp2, 0, 1),
8040 TEST_f_f (exp2, minus_zero, 1),
8041 TEST_f_f (exp2, plus_infty, plus_infty),
8042 TEST_f_f (exp2, minus_infty, 0),
8043 TEST_f_f (exp2, qnan_value, qnan_value),
8044
8045 TEST_f_f (exp2, 10, 1024),
8046 TEST_f_f (exp2, -1, 0.5),
8047 TEST_f_f (exp2, 1e6, plus_infty, OVERFLOW_EXCEPTION),
8048 TEST_f_f (exp2, -1e6, 0, UNDERFLOW_EXCEPTION),
8049 TEST_f_f (exp2, max_value, plus_infty, OVERFLOW_EXCEPTION),
8050 TEST_f_f (exp2, -max_value, 0, UNDERFLOW_EXCEPTION),
8051 TEST_f_f (exp2, 0.75L, 1.68179283050742908606225095246642979L),
8052
8053 TEST_f_f (exp2, 100.5, 1.792728671193156477399422023278661496394e+30L),
8054 TEST_f_f (exp2, 127, 0x1p127),
8055 TEST_f_f (exp2, -149, 0x1p-149),
8056
8057 #ifndef TEST_FLOAT
8058 TEST_f_f (exp2, 1000.25, 1.274245659452564874772384918171765416737e+301L),
8059 TEST_f_f (exp2, 1023, 0x1p1023),
8060 TEST_f_f (exp2, -1074, 0x1p-1074),
8061 #endif
8062
8063 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
8064 TEST_f_f (exp2, 16383, 0x1p16383L),
8065 TEST_f_f (exp2, -16400, 0x1p-16400L),
8066 #endif
8067 END_DATA (exp2)
8068 };
8069
8070 static void
8071 exp2_test (void)
8072 {
8073 errno = 0;
8074 FUNC(exp2) (0);
8075 if (errno == ENOSYS)
8076 /* Function not implemented. */
8077 return;
8078
8079 START (exp2);
8080 RUN_TEST_LOOP_f_f (exp2, exp2_test_data, );
8081 END (exp2);
8082 }
8083
8084
8085 static const struct test_f_f_data expm1_test_data[] =
8086 {
8087 START_DATA (expm1),
8088 TEST_f_f (expm1, 0, 0),
8089 TEST_f_f (expm1, minus_zero, minus_zero),
8090
8091 #ifndef TEST_INLINE
8092 TEST_f_f (expm1, plus_infty, plus_infty),
8093 TEST_f_f (expm1, minus_infty, -1),
8094 #endif
8095 TEST_f_f (expm1, qnan_value, qnan_value),
8096
8097 TEST_f_f (expm1, 1, M_El - 1.0),
8098 TEST_f_f (expm1, 0.75L, 1.11700001661267466854536981983709561L),
8099
8100 TEST_f_f (expm1, 50.0L, 5.1847055285870724640864533229334853848275e+21L),
8101
8102 #ifndef TEST_FLOAT
8103 TEST_f_f (expm1, 127.0L, 1.4302079958348104463583671072905261080748e+55L),
8104 TEST_f_f (expm1, 500.0L, 1.4035922178528374107397703328409120821806e+217L),
8105 #endif
8106
8107 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
8108 TEST_f_f (expm1, 11356.25L, 9.05128237311923300051376115753226014206e+4931L),
8109 #endif
8110
8111 TEST_f_f (expm1, -10.0, -0.9999546000702375151484644084844394493898L),
8112 TEST_f_f (expm1, -16.0, -0.9999998874648252807408854862248209398728L),
8113 TEST_f_f (expm1, -17.0, -0.9999999586006228121483334034897228104472L),
8114 TEST_f_f (expm1, -18.0, -0.9999999847700202552873715638633707664826L),
8115 TEST_f_f (expm1, -36.0, -0.9999999999999997680477169756430611687736L),
8116 TEST_f_f (expm1, -37.0, -0.9999999999999999146695237425593420572195L),
8117 TEST_f_f (expm1, -38.0, -0.9999999999999999686086720795197037129104L),
8118 TEST_f_f (expm1, -44.0, -0.9999999999999999999221886775886620348429L),
8119 TEST_f_f (expm1, -45.0, -0.9999999999999999999713748141945060635553L),
8120 TEST_f_f (expm1, -46.0, -0.9999999999999999999894693826424461876212L),
8121 TEST_f_f (expm1, -73.0, -0.9999999999999999999999999999999802074012L),
8122 TEST_f_f (expm1, -74.0, -0.9999999999999999999999999999999927187098L),
8123 TEST_f_f (expm1, -75.0, -0.9999999999999999999999999999999973213630L),
8124 TEST_f_f (expm1, -78.0, -0.9999999999999999999999999999999998666385L),
8125 TEST_f_f (expm1, -79.0, -0.9999999999999999999999999999999999509391L),
8126 TEST_f_f (expm1, -80.0, -0.9999999999999999999999999999999999819515L),
8127 TEST_f_f (expm1, -100.0, -1.0),
8128 TEST_f_f (expm1, -1000.0, -1.0),
8129 TEST_f_f (expm1, -10000.0, -1.0),
8130 TEST_f_f (expm1, -100000.0, -1.0),
8131
8132 TEST_f_f (expm1, 100000.0, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
8133 TEST_f_f (expm1, max_value, plus_infty, OVERFLOW_EXCEPTION),
8134 TEST_f_f (expm1, -max_value, -1),
8135 END_DATA (expm1)
8136 };
8137
8138 static void
8139 expm1_test (void)
8140 {
8141 errno = 0;
8142 FUNC(expm1) (0);
8143 if (errno == ENOSYS)
8144 /* Function not implemented. */
8145 return;
8146
8147 START (expm1);
8148 RUN_TEST_LOOP_f_f (expm1, expm1_test_data, );
8149 END (expm1);
8150 }
8151
8152
8153 static const struct test_f_f_data fabs_test_data[] =
8154 {
8155 START_DATA (fabs),
8156 TEST_f_f (fabs, 0, 0),
8157 TEST_f_f (fabs, minus_zero, 0),
8158
8159 TEST_f_f (fabs, plus_infty, plus_infty),
8160 TEST_f_f (fabs, minus_infty, plus_infty),
8161 TEST_f_f (fabs, qnan_value, qnan_value),
8162
8163 TEST_f_f (fabs, 38.0, 38.0),
8164 TEST_f_f (fabs, -M_El, M_El),
8165 END_DATA (fabs)
8166 };
8167
8168 static void
8169 fabs_test (void)
8170 {
8171 START (fabs);
8172 RUN_TEST_LOOP_f_f (fabs, fabs_test_data, );
8173 END (fabs);
8174 }
8175
8176
8177 static const struct test_ff_f_data fdim_test_data[] =
8178 {
8179 START_DATA (fdim),
8180 TEST_ff_f (fdim, 0, 0, 0),
8181 TEST_ff_f (fdim, 9, 0, 9),
8182 TEST_ff_f (fdim, 0, 9, 0),
8183 TEST_ff_f (fdim, -9, 0, 0),
8184 TEST_ff_f (fdim, 0, -9, 9),
8185
8186 TEST_ff_f (fdim, plus_infty, 9, plus_infty),
8187 TEST_ff_f (fdim, plus_infty, -9, plus_infty),
8188 TEST_ff_f (fdim, minus_infty, 9, 0),
8189 TEST_ff_f (fdim, minus_infty, -9, 0),
8190 TEST_ff_f (fdim, 9, minus_infty, plus_infty),
8191 TEST_ff_f (fdim, -9, minus_infty, plus_infty),
8192 TEST_ff_f (fdim, 9, plus_infty, 0),
8193 TEST_ff_f (fdim, -9, plus_infty, 0),
8194
8195 TEST_ff_f (fdim, 0, qnan_value, qnan_value),
8196 TEST_ff_f (fdim, 9, qnan_value, qnan_value),
8197 TEST_ff_f (fdim, -9, qnan_value, qnan_value),
8198 TEST_ff_f (fdim, qnan_value, 9, qnan_value),
8199 TEST_ff_f (fdim, qnan_value, -9, qnan_value),
8200 TEST_ff_f (fdim, plus_infty, qnan_value, qnan_value),
8201 TEST_ff_f (fdim, minus_infty, qnan_value, qnan_value),
8202 TEST_ff_f (fdim, qnan_value, plus_infty, qnan_value),
8203 TEST_ff_f (fdim, qnan_value, minus_infty, qnan_value),
8204 TEST_ff_f (fdim, qnan_value, qnan_value, qnan_value),
8205
8206 TEST_ff_f (fdim, plus_infty, plus_infty, 0),
8207 END_DATA (fdim)
8208 };
8209
8210 static void
8211 fdim_test (void)
8212 {
8213 START (fdim);
8214 RUN_TEST_LOOP_ff_f (fdim, fdim_test_data, );
8215 END (fdim);
8216 }
8217
8218
8219 static void
8220 finite_test (void)
8221 {
8222 START (finite);
8223
8224 TEST_f_b (finite, 0, 1);
8225 TEST_f_b (finite, minus_zero, 1);
8226 TEST_f_b (finite, 10, 1);
8227 TEST_f_b (finite, min_subnorm_value, 1);
8228 TEST_f_b (finite, plus_infty, 0);
8229 TEST_f_b (finite, minus_infty, 0);
8230 TEST_f_b (finite, qnan_value, 0);
8231
8232 END (finite);
8233 }
8234
8235
8236 static const struct test_f_f_data floor_test_data[] =
8237 {
8238 START_DATA (floor),
8239 TEST_f_f (floor, 0.0, 0.0),
8240 TEST_f_f (floor, minus_zero, minus_zero),
8241 TEST_f_f (floor, plus_infty, plus_infty),
8242 TEST_f_f (floor, minus_infty, minus_infty),
8243 TEST_f_f (floor, qnan_value, qnan_value),
8244
8245 TEST_f_f (floor, M_PIl, 3.0),
8246 TEST_f_f (floor, -M_PIl, -4.0),
8247
8248 TEST_f_f (floor, 0.1, 0.0),
8249 TEST_f_f (floor, 0.25, 0.0),
8250 TEST_f_f (floor, 0.625, 0.0),
8251 TEST_f_f (floor, -0.1, -1.0),
8252 TEST_f_f (floor, -0.25, -1.0),
8253 TEST_f_f (floor, -0.625, -1.0),
8254
8255 #ifdef TEST_LDOUBLE
8256 /* The result can only be represented in long double. */
8257 TEST_f_f (floor, 4503599627370495.5L, 4503599627370495.0L),
8258 TEST_f_f (floor, 4503599627370496.25L, 4503599627370496.0L),
8259 TEST_f_f (floor, 4503599627370496.5L, 4503599627370496.0L),
8260 TEST_f_f (floor, 4503599627370496.75L, 4503599627370496.0L),
8261 TEST_f_f (floor, 4503599627370497.5L, 4503599627370497.0L),
8262 # if LDBL_MANT_DIG > 100
8263 TEST_f_f (floor, 4503599627370494.5000000000001L, 4503599627370494.0L),
8264 TEST_f_f (floor, 4503599627370495.5000000000001L, 4503599627370495.0L),
8265 TEST_f_f (floor, 4503599627370496.5000000000001L, 4503599627370496.0L),
8266 # endif
8267
8268 TEST_f_f (floor, -4503599627370495.5L, -4503599627370496.0L),
8269 TEST_f_f (floor, -4503599627370496.25L, -4503599627370497.0L),
8270 TEST_f_f (floor, -4503599627370496.5L, -4503599627370497.0L),
8271 TEST_f_f (floor, -4503599627370496.75L, -4503599627370497.0L),
8272 TEST_f_f (floor, -4503599627370497.5L, -4503599627370498.0L),
8273 # if LDBL_MANT_DIG > 100
8274 TEST_f_f (floor, -4503599627370494.5000000000001L, -4503599627370495.0L),
8275 TEST_f_f (floor, -4503599627370495.5000000000001L, -4503599627370496.0L),
8276 TEST_f_f (floor, -4503599627370496.5000000000001L, -4503599627370497.0L),
8277 # endif
8278
8279 TEST_f_f (floor, 9007199254740991.5L, 9007199254740991.0L),
8280 TEST_f_f (floor, 9007199254740992.25L, 9007199254740992.0L),
8281 TEST_f_f (floor, 9007199254740992.5L, 9007199254740992.0L),
8282 TEST_f_f (floor, 9007199254740992.75L, 9007199254740992.0L),
8283 TEST_f_f (floor, 9007199254740993.5L, 9007199254740993.0L),
8284
8285 # if LDBL_MANT_DIG > 100
8286 TEST_f_f (floor, 9007199254740991.0000000000001L, 9007199254740991.0L),
8287 TEST_f_f (floor, 9007199254740992.0000000000001L, 9007199254740992.0L),
8288 TEST_f_f (floor, 9007199254740993.0000000000001L, 9007199254740993.0L),
8289 TEST_f_f (floor, 9007199254740991.5000000000001L, 9007199254740991.0L),
8290 TEST_f_f (floor, 9007199254740992.5000000000001L, 9007199254740992.0L),
8291 TEST_f_f (floor, 9007199254740993.5000000000001L, 9007199254740993.0L),
8292 # endif
8293
8294 TEST_f_f (floor, -9007199254740991.5L, -9007199254740992.0L),
8295 TEST_f_f (floor, -9007199254740992.25L, -9007199254740993.0L),
8296 TEST_f_f (floor, -9007199254740992.5L, -9007199254740993.0L),
8297 TEST_f_f (floor, -9007199254740992.75L, -9007199254740993.0L),
8298 TEST_f_f (floor, -9007199254740993.5L, -9007199254740994.0L),
8299
8300 # if LDBL_MANT_DIG > 100
8301 TEST_f_f (floor, -9007199254740991.0000000000001L, -9007199254740992.0L),
8302 TEST_f_f (floor, -9007199254740992.0000000000001L, -9007199254740993.0L),
8303 TEST_f_f (floor, -9007199254740993.0000000000001L, -9007199254740994.0L),
8304 TEST_f_f (floor, -9007199254740991.5000000000001L, -9007199254740992.0L),
8305 TEST_f_f (floor, -9007199254740992.5000000000001L, -9007199254740993.0L),
8306 TEST_f_f (floor, -9007199254740993.5000000000001L, -9007199254740994.0L),
8307 # endif
8308
8309 TEST_f_f (floor, 72057594037927935.5L, 72057594037927935.0L),
8310 TEST_f_f (floor, 72057594037927936.25L, 72057594037927936.0L),
8311 TEST_f_f (floor, 72057594037927936.5L, 72057594037927936.0L),
8312 TEST_f_f (floor, 72057594037927936.75L, 72057594037927936.0L),
8313 TEST_f_f (floor, 72057594037927937.5L, 72057594037927937.0L),
8314
8315 TEST_f_f (floor, -72057594037927935.5L, -72057594037927936.0L),
8316 TEST_f_f (floor, -72057594037927936.25L, -72057594037927937.0L),
8317 TEST_f_f (floor, -72057594037927936.5L, -72057594037927937.0L),
8318 TEST_f_f (floor, -72057594037927936.75L, -72057594037927937.0L),
8319 TEST_f_f (floor, -72057594037927937.5L, -72057594037927938.0L),
8320
8321 TEST_f_f (floor, 10141204801825835211973625643007.5L, 10141204801825835211973625643007.0L),
8322 TEST_f_f (floor, 10141204801825835211973625643008.25L, 10141204801825835211973625643008.0L),
8323 TEST_f_f (floor, 10141204801825835211973625643008.5L, 10141204801825835211973625643008.0L),
8324 TEST_f_f (floor, 10141204801825835211973625643008.75L, 10141204801825835211973625643008.0L),
8325 TEST_f_f (floor, 10141204801825835211973625643009.5L, 10141204801825835211973625643009.0L),
8326
8327 TEST_f_f (floor, 0xf.ffffffffffffff8p+47L, 0xf.fffffffffffep+47L),
8328 TEST_f_f (floor, -0x8.000000000000004p+48L, -0x8.000000000001p+48L),
8329 #endif
8330 END_DATA (floor)
8331 };
8332
8333 static void
8334 floor_test (void)
8335 {
8336 START (floor);
8337 RUN_TEST_LOOP_f_f (floor, floor_test_data, );
8338 END (floor);
8339 }
8340
8341
8342 static const struct test_fff_f_data fma_test_data[] =
8343 {
8344 START_DATA (fma),
8345 TEST_fff_f (fma, 1.0, 2.0, 3.0, 5.0),
8346 TEST_fff_f (fma, qnan_value, 2.0, 3.0, qnan_value),
8347 TEST_fff_f (fma, 1.0, qnan_value, 3.0, qnan_value),
8348 TEST_fff_f (fma, 1.0, 2.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8349 TEST_fff_f (fma, plus_infty, 0.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8350 TEST_fff_f (fma, minus_infty, 0.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8351 TEST_fff_f (fma, 0.0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8352 TEST_fff_f (fma, 0.0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8353 TEST_fff_f (fma, plus_infty, 0.0, 1.0, qnan_value, INVALID_EXCEPTION),
8354 TEST_fff_f (fma, minus_infty, 0.0, 1.0, qnan_value, INVALID_EXCEPTION),
8355 TEST_fff_f (fma, 0.0, plus_infty, 1.0, qnan_value, INVALID_EXCEPTION),
8356 TEST_fff_f (fma, 0.0, minus_infty, 1.0, qnan_value, INVALID_EXCEPTION),
8357
8358 TEST_fff_f (fma, plus_infty, plus_infty, minus_infty, qnan_value, INVALID_EXCEPTION),
8359 TEST_fff_f (fma, minus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8360 TEST_fff_f (fma, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8361 TEST_fff_f (fma, minus_infty, minus_infty, minus_infty, qnan_value, INVALID_EXCEPTION),
8362 TEST_fff_f (fma, plus_infty, 3.5L, minus_infty, qnan_value, INVALID_EXCEPTION),
8363 TEST_fff_f (fma, minus_infty, -7.5L, minus_infty, qnan_value, INVALID_EXCEPTION),
8364 TEST_fff_f (fma, -13.5L, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8365 TEST_fff_f (fma, minus_infty, 7.5L, plus_infty, qnan_value, INVALID_EXCEPTION),
8366
8367 TEST_fff_f (fma, 1.25L, 0.75L, 0.0625L, 1.0L),
8368
8369 TEST_fff_f (fma, -max_value, -max_value, minus_infty, minus_infty),
8370 TEST_fff_f (fma, max_value / 2, max_value / 2, minus_infty, minus_infty),
8371 TEST_fff_f (fma, -max_value, max_value, plus_infty, plus_infty),
8372 TEST_fff_f (fma, max_value / 2, -max_value / 4, plus_infty, plus_infty),
8373 TEST_fff_f (fma, plus_infty, 4, plus_infty, plus_infty),
8374 TEST_fff_f (fma, 2, minus_infty, minus_infty, minus_infty),
8375 TEST_fff_f (fma, minus_infty, minus_infty, plus_infty, plus_infty),
8376 TEST_fff_f (fma, plus_infty, minus_infty, minus_infty, minus_infty),
8377
8378 TEST_fff_f (fma, plus_zero, plus_zero, plus_zero, plus_zero),
8379 TEST_fff_f (fma, plus_zero, plus_zero, minus_zero, plus_zero),
8380 TEST_fff_f (fma, plus_zero, minus_zero, plus_zero, plus_zero),
8381 TEST_fff_f (fma, plus_zero, minus_zero, minus_zero, minus_zero),
8382 TEST_fff_f (fma, minus_zero, plus_zero, plus_zero, plus_zero),
8383 TEST_fff_f (fma, minus_zero, plus_zero, minus_zero, minus_zero),
8384 TEST_fff_f (fma, minus_zero, minus_zero, plus_zero, plus_zero),
8385 TEST_fff_f (fma, minus_zero, minus_zero, minus_zero, plus_zero),
8386 TEST_fff_f (fma, 1.0, plus_zero, plus_zero, plus_zero),
8387 TEST_fff_f (fma, 1.0, plus_zero, minus_zero, plus_zero),
8388 TEST_fff_f (fma, 1.0, minus_zero, plus_zero, plus_zero),
8389 TEST_fff_f (fma, 1.0, minus_zero, minus_zero, minus_zero),
8390 TEST_fff_f (fma, -1.0, plus_zero, plus_zero, plus_zero),
8391 TEST_fff_f (fma, -1.0, plus_zero, minus_zero, minus_zero),
8392 TEST_fff_f (fma, -1.0, minus_zero, plus_zero, plus_zero),
8393 TEST_fff_f (fma, -1.0, minus_zero, minus_zero, plus_zero),
8394 TEST_fff_f (fma, plus_zero, 1.0, plus_zero, plus_zero),
8395 TEST_fff_f (fma, plus_zero, 1.0, minus_zero, plus_zero),
8396 TEST_fff_f (fma, plus_zero, -1.0, plus_zero, plus_zero),
8397 TEST_fff_f (fma, plus_zero, -1.0, minus_zero, minus_zero),
8398 TEST_fff_f (fma, minus_zero, 1.0, plus_zero, plus_zero),
8399 TEST_fff_f (fma, minus_zero, 1.0, minus_zero, minus_zero),
8400 TEST_fff_f (fma, minus_zero, -1.0, plus_zero, plus_zero),
8401 TEST_fff_f (fma, minus_zero, -1.0, minus_zero, plus_zero),
8402
8403 TEST_fff_f (fma, 1.0, 1.0, -1.0, plus_zero),
8404 TEST_fff_f (fma, 1.0, -1.0, 1.0, plus_zero),
8405 TEST_fff_f (fma, -1.0, 1.0, 1.0, plus_zero),
8406 TEST_fff_f (fma, -1.0, -1.0, -1.0, plus_zero),
8407
8408 TEST_fff_f (fma, min_value, min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8409 TEST_fff_f (fma, min_value, min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8410 TEST_fff_f (fma, min_value, -min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8411 TEST_fff_f (fma, min_value, -min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8412 TEST_fff_f (fma, -min_value, min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8413 TEST_fff_f (fma, -min_value, min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8414 TEST_fff_f (fma, -min_value, -min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8415 TEST_fff_f (fma, -min_value, -min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8416
8417 TEST_fff_f (fma, max_value, max_value, min_value, plus_infty, OVERFLOW_EXCEPTION),
8418 TEST_fff_f (fma, max_value, max_value, -min_value, plus_infty, OVERFLOW_EXCEPTION),
8419 TEST_fff_f (fma, max_value, -max_value, min_value, minus_infty, OVERFLOW_EXCEPTION),
8420 TEST_fff_f (fma, max_value, -max_value, -min_value, minus_infty, OVERFLOW_EXCEPTION),
8421 TEST_fff_f (fma, -max_value, max_value, min_value, minus_infty, OVERFLOW_EXCEPTION),
8422 TEST_fff_f (fma, -max_value, max_value, -min_value, minus_infty, OVERFLOW_EXCEPTION),
8423 TEST_fff_f (fma, -max_value, -max_value, min_value, plus_infty, OVERFLOW_EXCEPTION),
8424 TEST_fff_f (fma, -max_value, -max_value, -min_value, plus_infty, OVERFLOW_EXCEPTION),
8425
8426 #if defined (TEST_FLOAT) && FLT_MANT_DIG == 24
8427 TEST_fff_f (fma, 0x1.7ff8p+13, 0x1.000002p+0, 0x1.ffffp-24, 0x1.7ff802p+13),
8428 TEST_fff_f (fma, 0x1.fffp+0, 0x1.00001p+0, -0x1.fffp+0, 0x1.fffp-20),
8429 TEST_fff_f (fma, 0x1.9abcdep+127, 0x0.9abcdep-126, -0x1.f08948p+0, 0x1.bb421p-25),
8430 TEST_fff_f (fma, 0x1.9abcdep+100, 0x0.9abcdep-126, -0x1.f08948p-27, 0x1.bb421p-52),
8431 TEST_fff_f (fma, 0x1.fffffep+127, 0x1.001p+0, -0x1.fffffep+127, 0x1.fffffep+115),
8432 TEST_fff_f (fma, -0x1.fffffep+127, 0x1.fffffep+0, 0x1.fffffep+127, -0x1.fffffap+127),
8433 TEST_fff_f (fma, 0x1.fffffep+127, 2.0, -0x1.fffffep+127, 0x1.fffffep+127),
8434 TEST_fff_f (fma, 0x1.4p-126, 0x1.000004p-1, 0x1p-128, 0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8435 TEST_fff_f (fma, -0x1.4p-126, 0x1.000004p-1, -0x1p-128, -0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8436 TEST_fff_f (fma, 0x1.fffff8p-126, 0x1.000002p-1, 0x1p-149, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8437 TEST_fff_f (fma, -0x1.fffff8p-126, 0x1.000002p-1, -0x1p-149, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8438 TEST_fff_f (fma, 0x1p-149, 0x1p-1, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION),
8439 TEST_fff_f (fma, -0x1p-149, 0x1p-1, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION),
8440 TEST_fff_f (fma, 0x1p-149, 0x1.1p-1, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION),
8441 TEST_fff_f (fma, -0x1p-149, 0x1.1p-1, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION),
8442 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p127, 0x1p127),
8443 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p127, 0x1p127),
8444 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p127, -0x1p127),
8445 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p127, -0x1p127),
8446 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-126, 0x1p-126),
8447 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-126, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8448 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-126, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8449 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-126, -0x1p-126),
8450 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8451 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8452 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8453 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8454 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
8455 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
8456 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
8457 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
8458 TEST_fff_f (fma, 0x0.fffp0, 0x0.fffp0, -0x0.ffep0, 0x1p-24),
8459 TEST_fff_f (fma, 0x0.fffp0, -0x0.fffp0, 0x0.ffep0, -0x1p-24),
8460 TEST_fff_f (fma, -0x0.fffp0, 0x0.fffp0, 0x0.ffep0, -0x1p-24),
8461 TEST_fff_f (fma, -0x0.fffp0, -0x0.fffp0, -0x0.ffep0, 0x1p-24),
8462 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p127, 0x1p127),
8463 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p127, 0x1p127),
8464 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p127, -0x1p127),
8465 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p127, -0x1p127),
8466 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p103, 0x1p103),
8467 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p103, 0x1p103),
8468 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p103, -0x1p103),
8469 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p103, -0x1p103),
8470 #endif
8471 #if defined (TEST_DOUBLE) && DBL_MANT_DIG == 53
8472 TEST_fff_f (fma, 0x1.7fp+13, 0x1.0000000000001p+0, 0x1.ffep-48, 0x1.7f00000000001p+13),
8473 TEST_fff_f (fma, 0x1.fffp+0, 0x1.0000000000001p+0, -0x1.fffp+0, 0x1.fffp-52),
8474 TEST_fff_f (fma, 0x1.0000002p+0, 0x1.ffffffcp-1, 0x1p-300, 1.0),
8475 TEST_fff_f (fma, 0x1.0000002p+0, 0x1.ffffffcp-1, -0x1p-300, 0x1.fffffffffffffp-1),
8476 TEST_fff_f (fma, 0x1.deadbeef2feedp+1023, 0x0.deadbeef2feedp-1022, -0x1.a05f8c01a4bfbp+1, 0x1.0989687bc9da4p-53),
8477 TEST_fff_f (fma, 0x1.deadbeef2feedp+900, 0x0.deadbeef2feedp-1022, -0x1.a05f8c01a4bfbp-122, 0x1.0989687bc9da4p-176),
8478 TEST_fff_f (fma, 0x1.fffffffffffffp+1023, 0x1.001p+0, -0x1.fffffffffffffp+1023, 0x1.fffffffffffffp+1011),
8479 TEST_fff_f (fma, -0x1.fffffffffffffp+1023, 0x1.fffffffffffffp+0, 0x1.fffffffffffffp+1023, -0x1.ffffffffffffdp+1023),
8480 TEST_fff_f (fma, 0x1.fffffffffffffp+1023, 2.0, -0x1.fffffffffffffp+1023, 0x1.fffffffffffffp+1023),
8481 TEST_fff_f (fma, 0x1.6a09e667f3bccp-538, 0x1.6a09e667f3bccp-538, 0.0, 0.0, UNDERFLOW_EXCEPTION),
8482 TEST_fff_f (fma, 0x1.deadbeef2feedp-495, 0x1.deadbeef2feedp-495, -0x1.bf86a5786a574p-989, 0x0.0000042625a1fp-1022, UNDERFLOW_EXCEPTION),
8483 TEST_fff_f (fma, 0x1.deadbeef2feedp-503, 0x1.deadbeef2feedp-503, -0x1.bf86a5786a574p-1005, 0x0.0000000004262p-1022, UNDERFLOW_EXCEPTION),
8484 TEST_fff_f (fma, 0x1p-537, 0x1p-538, 0x1p-1074, 0x0.0000000000002p-1022, UNDERFLOW_EXCEPTION),
8485 TEST_fff_f (fma, 0x1.7fffff8p-968, 0x1p-106, 0x0.000001p-1022, 0x0.0000010000001p-1022, UNDERFLOW_EXCEPTION),
8486 TEST_fff_f (fma, 0x1.4000004p-967, 0x1p-106, 0x0.000001p-1022, 0x0.0000010000003p-1022, UNDERFLOW_EXCEPTION),
8487 TEST_fff_f (fma, 0x1.4p-967, -0x1p-106, -0x0.000001p-1022, -0x0.0000010000002p-1022, UNDERFLOW_EXCEPTION),
8488 TEST_fff_f (fma, -0x1.19cab66d73e17p-959, 0x1.c7108a8c5ff51p-107, -0x0.80b0ad65d9b64p-1022, -0x0.80b0ad65d9d59p-1022, UNDERFLOW_EXCEPTION),
8489 TEST_fff_f (fma, -0x1.d2eaed6e8e9d3p-979, -0x1.4e066c62ac9ddp-63, -0x0.9245e6b003454p-1022, -0x0.9245c09c5fb5dp-1022, UNDERFLOW_EXCEPTION),
8490 TEST_fff_f (fma, 0x1.153d650bb9f06p-907, 0x1.2d01230d48407p-125, -0x0.b278d5acfc3cp-1022, -0x0.b22757123bbe9p-1022, UNDERFLOW_EXCEPTION),
8491 TEST_fff_f (fma, -0x1.fffffffffffffp-711, 0x1.fffffffffffffp-275, 0x1.fffffe00007ffp-983, 0x1.7ffffe00007ffp-983),
8492 TEST_fff_f (fma, 0x1.4p-1022, 0x1.0000000000002p-1, 0x1p-1024, 0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8493 TEST_fff_f (fma, -0x1.4p-1022, 0x1.0000000000002p-1, -0x1p-1024, -0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8494 TEST_fff_f (fma, 0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, 0x1p-1074, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8495 TEST_fff_f (fma, -0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, -0x1p-1074, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8496 TEST_fff_f (fma, 0x1p-1074, 0x1p-1, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION),
8497 TEST_fff_f (fma, -0x1p-1074, 0x1p-1, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION),
8498 TEST_fff_f (fma, 0x1p-1074, 0x1.1p-1, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION),
8499 TEST_fff_f (fma, -0x1p-1074, 0x1.1p-1, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION),
8500 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p1023, 0x1p1023),
8501 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p1023, 0x1p1023),
8502 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p1023, -0x1p1023),
8503 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p1023, -0x1p1023),
8504 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1022, 0x1p-1022),
8505 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1022, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8506 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1022, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8507 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1022, -0x1p-1022),
8508 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8509 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8510 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8511 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8512 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
8513 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
8514 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
8515 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
8516 TEST_fff_f (fma, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8517 TEST_fff_f (fma, 0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8518 TEST_fff_f (fma, -0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8519 TEST_fff_f (fma, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8520 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
8521 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
8522 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
8523 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
8524 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p970, 0x1p970),
8525 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p970, 0x1p970),
8526 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p970, -0x1p970),
8527 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p970, -0x1p970),
8528 #endif
8529 #if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 64
8530 TEST_fff_f (fma, -0x8.03fcp+3696L, 0xf.fffffffffffffffp-6140L, 0x8.3ffffffffffffffp-2450L, -0x8.01ecp-2440L),
8531 TEST_fff_f (fma, 0x9.fcp+2033L, -0x8.000e1f000ff800fp-3613L, -0xf.fffffffffffc0ffp-1579L, -0xd.fc119fb093ed092p-1577L),
8532 TEST_fff_f (fma, 0xc.7fc000003ffffffp-1194L, 0x8.1e0003fffffffffp+15327L, -0x8.fffep+14072L, 0xc.ae9f164020effffp+14136L),
8533 TEST_fff_f (fma, -0x8.0001fc000000003p+1798L, 0xcp-2230L, 0x8.f7e000000000007p-468L, -0xc.0002f9ffee10404p-429L),
8534 TEST_fff_f (fma, 0xc.0000000000007ffp+10130L, -0x8.000000000000001p+4430L, 0xc.07000000001ffffp+14513L, -0xb.fffffffffffd7e4p+14563L),
8535 TEST_fff_f (fma, 0xb.ffffp-4777L, 0x8.000000fffffffffp-11612L, -0x0.3800fff8p-16385L, 0x5.c7fe80c7ffeffffp-16385L, UNDERFLOW_EXCEPTION),
8536 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000004p-1L, 0x1p-16384L, 0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8537 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000004p-1L, -0x1p-16384L, -0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8538 TEST_fff_f (fma, 0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, 0x1p-16445L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8539 TEST_fff_f (fma, -0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, -0x1p-16445L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8540 TEST_fff_f (fma, 0x1p-16445L, 0x1p-1L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
8541 TEST_fff_f (fma, -0x1p-16445L, 0x1p-1L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8542 TEST_fff_f (fma, 0x1p-16445L, 0x1.1p-1L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
8543 TEST_fff_f (fma, -0x1p-16445L, 0x1.1p-1L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8544 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p16383L, 0x1p16383L),
8545 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p16383L, 0x1p16383L),
8546 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p16383L, -0x1p16383L),
8547 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p16383L, -0x1p16383L),
8548 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16382L, 0x1p-16382L),
8549 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8550 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8551 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16382L, -0x1p-16382L),
8552 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8553 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8554 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8555 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8556 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
8557 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
8558 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
8559 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
8560 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
8561 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
8562 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
8563 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
8564 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
8565 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
8566 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
8567 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
8568 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
8569 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
8570 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
8571 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
8572 #endif
8573 #if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 113
8574 TEST_fff_f (fma, 0x1.bb2de33e02ccbbfa6e245a7c1f71p-2584L, -0x1.6b500daf0580d987f1bc0cadfcddp-13777L, 0x1.613cd91d9fed34b33820e5ab9d8dp-16378L, -0x1.3a79fb50eb9ce887cffa0f09bd9fp-16360L),
8575 TEST_fff_f (fma, -0x1.f949b880cacb0f0c61540105321dp-5954L, -0x1.3876cec84b4140f3bd6198731b7ep-10525L, -0x0.a5dc1c6cfbc498c54fb0b504bf19p-16382L, -0x0.a5dc1c6cfbc498c54fb0b5038abbp-16382L, UNDERFLOW_EXCEPTION),
8576 TEST_fff_f (fma, -0x1.0000fffffffffp-16221L, 0x1.0000001fffff8007fep-239L, 0x0.ff87ffffffffffffe000003fffffp-16382L, 0x0.ff87ffffffffffffdffc003bff7fp-16382L, UNDERFLOW_EXCEPTION),
8577 TEST_fff_f (fma, -0x1.ac79c9376ef447f3827c9e9de008p-2228L, -0x1.5ba830022b6139e21fbe7270cad8p-6314L, 0x1.e8282b6a26bb6a9daf5c8e73e9f9p-8616L, 0x1.22f14a0253878a730cd1aee373adp-8541L),
8578 TEST_fff_f (fma, -0x1.c69749ec574caaa2ab8e97ddb9f3p+2652L, 0x1.f34235ff9d095449c29b4831b62dp+3311L, 0x1.fbe4302df23354dbd0c4d3cfe606p+5879L, -0x1.bb473bfdfb7a6e18886ce6e57eafp+5964L),
8579 TEST_fff_f (fma, -0x1.ca8835fc6ecfb5398625fc891be5p-1686L, 0x1.621e1972bbe2180e5be9dd7d8df5p-7671L, -0x1.7d2d21b73b52cf20dec2a83902a4p-9395L, -0x1.3d2322191c9c88bc68a62ab8042cp-9356L),
8580 TEST_fff_f (fma, -0x1.55cff679ec49c2541fab41fc843ep-11819L, 0x1.e60e9f464f9e8df0509647c7c971p+12325L, 0x1.eaa2a7649d765c2f564f7a5beca7p+454L, -0x1.447e29fa7e406a285f4e350fcf86p+507L),
8581 TEST_fff_f (fma, 0x1.f0e7b1454908576f2537d863cf9bp+11432L, 0x1.cdce52f09d4ca76e68706f34b5d5p-1417L, -0x1.2e986187c70f146235ea2066e486p+9979L, 0x1.c030dad3cc5643f3dd0f5619f661p+10016L),
8582 TEST_fff_f (fma, 0x1.f102f7da4a57a3a4aab620e29452p-3098L, -0x1.cc06a4ff40248f9e2dcc4b6afd84p-11727L, 0x1.d512a11126b5ac8ed8973b8580c8p-14849L, -0x1.be8f1cf737ab4d1c31c54f5ec23bp-14824L),
8583 TEST_fff_f (fma, -0x1.fc47ac7434b993cd8dcb2b431f25p-3816L, 0x1.fbc9750da8468852d84558e1db6dp-5773L, -0x1.00a98abf783f75c40fe5b7a37d86p-9607L, -0x1.f81917b166f45e763cfcc057e2adp-9588L),
8584 TEST_fff_f (fma, 0x1.00000000000007ffffffffffffffp-9045L, -0x1.ffffffffffff80000001ffffffffp+4773L, -0x1.f8p-4316L, -0x1.00000000000f88000000fffffdffp-4271L),
8585 TEST_fff_f (fma, 0x1.4e922764c90701d4a2f21d01893dp-8683L, -0x1.955a12e2d7c9447c27fa022fc865p+212L, -0x1.e9634462eaef96528b90b6944578p-8521L, -0x1.08e1783184a371943d3598e10865p-8470L),
8586 TEST_fff_f (fma, 0x1.801181509c03bdbef10d6165588cp-15131L, 0x1.ad86f8e57d3d40bfa8007780af63p-368L, -0x1.6e9df0dab1c9f1d7a6043c390741p-15507L, 0x1.417c9b2b15e2ad57dc9e0e920844p-15498L),
8587 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, 0x1p-16384L, 0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
8588 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, -0x1p-16384L, -0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
8589 TEST_fff_f (fma, 0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, 0x1p-16494L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8590 TEST_fff_f (fma, -0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, -0x1p-16494L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8591 TEST_fff_f (fma, 0x1p-16494L, 0x1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
8592 TEST_fff_f (fma, -0x1p-16494L, 0x1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8593 TEST_fff_f (fma, 0x1p-16494L, 0x1.1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
8594 TEST_fff_f (fma, -0x1p-16494L, 0x1.1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8595 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p16383L, 0x1p16383L),
8596 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p16383L, 0x1p16383L),
8597 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p16383L, -0x1p16383L),
8598 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p16383L, -0x1p16383L),
8599 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16382L, 0x1p-16382L),
8600 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8601 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8602 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16382L, -0x1p-16382L),
8603 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8604 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8605 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8606 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8607 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
8608 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
8609 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
8610 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
8611 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
8612 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
8613 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
8614 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
8615 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
8616 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
8617 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
8618 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
8619 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
8620 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
8621 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
8622 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
8623 #endif
8624 END_DATA (fma)
8625 };
8626
8627 static void
8628 fma_test (void)
8629 {
8630 START (fma);
8631 RUN_TEST_LOOP_fff_f (fma, fma_test_data, );
8632 END (fma);
8633 }
8634
8635
8636 static const struct test_fff_f_data fma_towardzero_test_data[] =
8637 {
8638 START_DATA (fma_towardzero),
8639 TEST_fff_f (fma, plus_zero, plus_zero, plus_zero, plus_zero),
8640 TEST_fff_f (fma, plus_zero, plus_zero, minus_zero, plus_zero),
8641 TEST_fff_f (fma, plus_zero, minus_zero, plus_zero, plus_zero),
8642 TEST_fff_f (fma, plus_zero, minus_zero, minus_zero, minus_zero),
8643 TEST_fff_f (fma, minus_zero, plus_zero, plus_zero, plus_zero),
8644 TEST_fff_f (fma, minus_zero, plus_zero, minus_zero, minus_zero),
8645 TEST_fff_f (fma, minus_zero, minus_zero, plus_zero, plus_zero),
8646 TEST_fff_f (fma, minus_zero, minus_zero, minus_zero, plus_zero),
8647 TEST_fff_f (fma, 1.0, plus_zero, plus_zero, plus_zero),
8648 TEST_fff_f (fma, 1.0, plus_zero, minus_zero, plus_zero),
8649 TEST_fff_f (fma, 1.0, minus_zero, plus_zero, plus_zero),
8650 TEST_fff_f (fma, 1.0, minus_zero, minus_zero, minus_zero),
8651 TEST_fff_f (fma, -1.0, plus_zero, plus_zero, plus_zero),
8652 TEST_fff_f (fma, -1.0, plus_zero, minus_zero, minus_zero),
8653 TEST_fff_f (fma, -1.0, minus_zero, plus_zero, plus_zero),
8654 TEST_fff_f (fma, -1.0, minus_zero, minus_zero, plus_zero),
8655 TEST_fff_f (fma, plus_zero, 1.0, plus_zero, plus_zero),
8656 TEST_fff_f (fma, plus_zero, 1.0, minus_zero, plus_zero),
8657 TEST_fff_f (fma, plus_zero, -1.0, plus_zero, plus_zero),
8658 TEST_fff_f (fma, plus_zero, -1.0, minus_zero, minus_zero),
8659 TEST_fff_f (fma, minus_zero, 1.0, plus_zero, plus_zero),
8660 TEST_fff_f (fma, minus_zero, 1.0, minus_zero, minus_zero),
8661 TEST_fff_f (fma, minus_zero, -1.0, plus_zero, plus_zero),
8662 TEST_fff_f (fma, minus_zero, -1.0, minus_zero, plus_zero),
8663
8664 TEST_fff_f (fma, 1.0, 1.0, -1.0, plus_zero),
8665 TEST_fff_f (fma, 1.0, -1.0, 1.0, plus_zero),
8666 TEST_fff_f (fma, -1.0, 1.0, 1.0, plus_zero),
8667 TEST_fff_f (fma, -1.0, -1.0, -1.0, plus_zero),
8668
8669 TEST_fff_f (fma, min_value, min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8670 TEST_fff_f (fma, min_value, min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8671 TEST_fff_f (fma, min_value, -min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8672 TEST_fff_f (fma, min_value, -min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8673 TEST_fff_f (fma, -min_value, min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8674 TEST_fff_f (fma, -min_value, min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8675 TEST_fff_f (fma, -min_value, -min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8676 TEST_fff_f (fma, -min_value, -min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8677
8678 #if !(defined TEST_LDOUBLE && LDBL_MANT_DIG == 106) /* Bug 13304. */
8679 TEST_fff_f (fma, max_value, max_value, min_value, max_value, OVERFLOW_EXCEPTION),
8680 TEST_fff_f (fma, max_value, max_value, -min_value, max_value, OVERFLOW_EXCEPTION),
8681 TEST_fff_f (fma, max_value, -max_value, min_value, -max_value, OVERFLOW_EXCEPTION),
8682 TEST_fff_f (fma, max_value, -max_value, -min_value, -max_value, OVERFLOW_EXCEPTION),
8683 TEST_fff_f (fma, -max_value, max_value, min_value, -max_value, OVERFLOW_EXCEPTION),
8684 TEST_fff_f (fma, -max_value, max_value, -min_value, -max_value, OVERFLOW_EXCEPTION),
8685 TEST_fff_f (fma, -max_value, -max_value, min_value, max_value, OVERFLOW_EXCEPTION),
8686 TEST_fff_f (fma, -max_value, -max_value, -min_value, max_value, OVERFLOW_EXCEPTION),
8687 #endif
8688
8689 #if defined (TEST_FLOAT) && FLT_MANT_DIG == 24
8690 TEST_fff_f (fma, 0x1.4p-126, 0x1.000004p-1, 0x1p-128, 0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8691 TEST_fff_f (fma, -0x1.4p-126, 0x1.000004p-1, -0x1p-128, -0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8692 TEST_fff_f (fma, 0x1.fffff8p-126, 0x1.000002p-1, 0x1p-149, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8693 TEST_fff_f (fma, -0x1.fffff8p-126, 0x1.000002p-1, -0x1p-149, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8694 TEST_fff_f (fma, 0x1p-149, 0x1p-1, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8695 TEST_fff_f (fma, -0x1p-149, 0x1p-1, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8696 TEST_fff_f (fma, 0x1p-149, 0x1.1p-1, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8697 TEST_fff_f (fma, -0x1p-149, 0x1.1p-1, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8698 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p127, 0x1p127),
8699 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p127, 0x0.ffffffp127),
8700 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p127, -0x0.ffffffp127),
8701 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p127, -0x1p127),
8702 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-126, 0x1p-126),
8703 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8704 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8705 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-126, -0x1p-126),
8706 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8707 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x0.fffffep-126, 0x0.fffffcp-126, UNDERFLOW_EXCEPTION),
8708 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x0.fffffep-126, -0x0.fffffcp-126, UNDERFLOW_EXCEPTION),
8709 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8710 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
8711 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-149, plus_zero, UNDERFLOW_EXCEPTION),
8712 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-149, minus_zero, UNDERFLOW_EXCEPTION),
8713 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
8714 TEST_fff_f (fma, 0x0.fffp0, 0x0.fffp0, -0x0.ffep0, 0x1p-24),
8715 TEST_fff_f (fma, 0x0.fffp0, -0x0.fffp0, 0x0.ffep0, -0x1p-24),
8716 TEST_fff_f (fma, -0x0.fffp0, 0x0.fffp0, 0x0.ffep0, -0x1p-24),
8717 TEST_fff_f (fma, -0x0.fffp0, -0x0.fffp0, -0x0.ffep0, 0x1p-24),
8718 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p127, 0x1p127),
8719 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p127, 0x0.ffffffp127),
8720 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p127, -0x0.ffffffp127),
8721 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p127, -0x1p127),
8722 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p103, 0x1p103),
8723 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p103, 0x0.ffffffp103),
8724 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p103, -0x0.ffffffp103),
8725 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p103, -0x1p103),
8726 #endif
8727 #if defined (TEST_DOUBLE) && DBL_MANT_DIG == 53
8728 TEST_fff_f (fma, 0x1.4p-1022, 0x1.0000000000002p-1, 0x1p-1024, 0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8729 TEST_fff_f (fma, -0x1.4p-1022, 0x1.0000000000002p-1, -0x1p-1024, -0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8730 TEST_fff_f (fma, 0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, 0x1p-1074, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8731 TEST_fff_f (fma, -0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, -0x1p-1074, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8732 TEST_fff_f (fma, 0x1p-1074, 0x1p-1, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8733 TEST_fff_f (fma, -0x1p-1074, 0x1p-1, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8734 TEST_fff_f (fma, 0x1p-1074, 0x1.1p-1, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8735 TEST_fff_f (fma, -0x1p-1074, 0x1.1p-1, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8736 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p1023, 0x1p1023),
8737 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p1023, 0x0.fffffffffffff8p1023),
8738 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p1023, -0x0.fffffffffffff8p1023),
8739 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p1023, -0x1p1023),
8740 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1022, 0x1p-1022),
8741 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8742 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8743 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1022, -0x1p-1022),
8744 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8745 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.ffffffffffffep-1022, UNDERFLOW_EXCEPTION),
8746 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.ffffffffffffep-1022, UNDERFLOW_EXCEPTION),
8747 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8748 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
8749 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1074, plus_zero, UNDERFLOW_EXCEPTION),
8750 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1074, minus_zero, UNDERFLOW_EXCEPTION),
8751 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
8752 TEST_fff_f (fma, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8753 TEST_fff_f (fma, 0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8754 TEST_fff_f (fma, -0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8755 TEST_fff_f (fma, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8756 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
8757 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p1023, 0x0.fffffffffffff8p1023),
8758 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p1023, -0x0.fffffffffffff8p1023),
8759 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
8760 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p970, 0x1p970),
8761 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p970, 0x0.fffffffffffff8p970),
8762 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p970, -0x0.fffffffffffff8p970),
8763 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p970, -0x1p970),
8764 #endif
8765 #if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 64
8766 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000004p-1L, 0x1p-16384L, 0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8767 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000004p-1L, -0x1p-16384L, -0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8768 TEST_fff_f (fma, 0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8769 TEST_fff_f (fma, -0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8770 TEST_fff_f (fma, 0x1p-16445L, 0x1p-1L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8771 TEST_fff_f (fma, -0x1p-16445L, 0x1p-1L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8772 TEST_fff_f (fma, 0x1p-16445L, 0x1.1p-1L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8773 TEST_fff_f (fma, -0x1p-16445L, 0x1.1p-1L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8774 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p16383L, 0x1p16383L),
8775 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p16383L, 0x0.ffffffffffffffffp16383L),
8776 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p16383L, -0x0.ffffffffffffffffp16383L),
8777 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p16383L, -0x1p16383L),
8778 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16382L, 0x1p-16382L),
8779 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8780 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8781 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16382L, -0x1p-16382L),
8782 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8783 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffcp-16382L, UNDERFLOW_EXCEPTION),
8784 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffcp-16382L, UNDERFLOW_EXCEPTION),
8785 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8786 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
8787 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16445L, plus_zero, UNDERFLOW_EXCEPTION),
8788 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16445L, minus_zero, UNDERFLOW_EXCEPTION),
8789 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
8790 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
8791 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
8792 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
8793 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
8794 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
8795 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16383L, 0x0.ffffffffffffffffp16383L),
8796 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16383L, -0x0.ffffffffffffffffp16383L),
8797 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
8798 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
8799 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16319L, 0x0.ffffffffffffffffp16319L),
8800 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16319L, -0x0.ffffffffffffffffp16319L),
8801 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
8802 #endif
8803 #if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 113
8804 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, 0x1p-16384L, 0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
8805 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, -0x1p-16384L, -0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
8806 TEST_fff_f (fma, 0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8807 TEST_fff_f (fma, -0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8808 TEST_fff_f (fma, 0x1p-16494L, 0x1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8809 TEST_fff_f (fma, -0x1p-16494L, 0x1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8810 TEST_fff_f (fma, 0x1p-16494L, 0x1.1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8811 TEST_fff_f (fma, -0x1p-16494L, 0x1.1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8812 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p16383L, 0x1p16383L),
8813 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p16383L, 0x0.ffffffffffffffffffffffffffff8p16383L),
8814 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p16383L, -0x0.ffffffffffffffffffffffffffff8p16383L),
8815 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p16383L, -0x1p16383L),
8816 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16382L, 0x1p-16382L),
8817 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8818 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8819 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16382L, -0x1p-16382L),
8820 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8821 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.fffffffffffffffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8822 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.fffffffffffffffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8823 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8824 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
8825 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16494L, plus_zero, UNDERFLOW_EXCEPTION),
8826 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16494L, minus_zero, UNDERFLOW_EXCEPTION),
8827 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
8828 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
8829 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
8830 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
8831 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
8832 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
8833 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x0.ffffffffffffffffffffffffffff8p16383L),
8834 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x0.ffffffffffffffffffffffffffff8p16383L),
8835 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
8836 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
8837 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x0.ffffffffffffffffffffffffffff8p16319L),
8838 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x0.ffffffffffffffffffffffffffff8p16319L),
8839 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
8840 #endif
8841 END_DATA (fma_towardzero)
8842 };
8843
8844 static void
8845 fma_test_towardzero (void)
8846 {
8847 START (fma_towardzero);
8848 RUN_TEST_LOOP_fff_f (fma, fma_towardzero_test_data, FE_TOWARDZERO);
8849 END (fma_towardzero);
8850 }
8851
8852
8853 static const struct test_fff_f_data fma_downward_test_data[] =
8854 {
8855 START_DATA (fma_downward),
8856 TEST_fff_f (fma, plus_zero, plus_zero, plus_zero, plus_zero),
8857 TEST_fff_f (fma, plus_zero, plus_zero, minus_zero, minus_zero),
8858 TEST_fff_f (fma, plus_zero, minus_zero, plus_zero, minus_zero),
8859 TEST_fff_f (fma, plus_zero, minus_zero, minus_zero, minus_zero),
8860 TEST_fff_f (fma, minus_zero, plus_zero, plus_zero, minus_zero),
8861 TEST_fff_f (fma, minus_zero, plus_zero, minus_zero, minus_zero),
8862 TEST_fff_f (fma, minus_zero, minus_zero, plus_zero, plus_zero),
8863 TEST_fff_f (fma, minus_zero, minus_zero, minus_zero, minus_zero),
8864 TEST_fff_f (fma, 1.0, plus_zero, plus_zero, plus_zero),
8865 TEST_fff_f (fma, 1.0, plus_zero, minus_zero, minus_zero),
8866 TEST_fff_f (fma, 1.0, minus_zero, plus_zero, minus_zero),
8867 TEST_fff_f (fma, 1.0, minus_zero, minus_zero, minus_zero),
8868 TEST_fff_f (fma, -1.0, plus_zero, plus_zero, minus_zero),
8869 TEST_fff_f (fma, -1.0, plus_zero, minus_zero, minus_zero),
8870 TEST_fff_f (fma, -1.0, minus_zero, plus_zero, plus_zero),
8871 TEST_fff_f (fma, -1.0, minus_zero, minus_zero, minus_zero),
8872 TEST_fff_f (fma, plus_zero, 1.0, plus_zero, plus_zero),
8873 TEST_fff_f (fma, plus_zero, 1.0, minus_zero, minus_zero),
8874 TEST_fff_f (fma, plus_zero, -1.0, plus_zero, minus_zero),
8875 TEST_fff_f (fma, plus_zero, -1.0, minus_zero, minus_zero),
8876 TEST_fff_f (fma, minus_zero, 1.0, plus_zero, minus_zero),
8877 TEST_fff_f (fma, minus_zero, 1.0, minus_zero, minus_zero),
8878 TEST_fff_f (fma, minus_zero, -1.0, plus_zero, plus_zero),
8879 TEST_fff_f (fma, minus_zero, -1.0, minus_zero, minus_zero),
8880
8881 TEST_fff_f (fma, 1.0, 1.0, -1.0, minus_zero),
8882 TEST_fff_f (fma, 1.0, -1.0, 1.0, minus_zero),
8883 TEST_fff_f (fma, -1.0, 1.0, 1.0, minus_zero),
8884 TEST_fff_f (fma, -1.0, -1.0, -1.0, minus_zero),
8885
8886 TEST_fff_f (fma, min_value, min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8887 TEST_fff_f (fma, min_value, min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8888 TEST_fff_f (fma, min_value, -min_value, plus_zero, -min_subnorm_value, UNDERFLOW_EXCEPTION),
8889 TEST_fff_f (fma, min_value, -min_value, minus_zero, -min_subnorm_value, UNDERFLOW_EXCEPTION),
8890 TEST_fff_f (fma, -min_value, min_value, plus_zero, -min_subnorm_value, UNDERFLOW_EXCEPTION),
8891 TEST_fff_f (fma, -min_value, min_value, minus_zero, -min_subnorm_value, UNDERFLOW_EXCEPTION),
8892 TEST_fff_f (fma, -min_value, -min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8893 TEST_fff_f (fma, -min_value, -min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8894
8895 #if !(defined TEST_LDOUBLE && LDBL_MANT_DIG == 106) /* Bug 13304. */
8896 TEST_fff_f (fma, max_value, max_value, min_value, max_value, OVERFLOW_EXCEPTION),
8897 TEST_fff_f (fma, max_value, max_value, -min_value, max_value, OVERFLOW_EXCEPTION),
8898 TEST_fff_f (fma, max_value, -max_value, min_value, minus_infty, OVERFLOW_EXCEPTION),
8899 TEST_fff_f (fma, max_value, -max_value, -min_value, minus_infty, OVERFLOW_EXCEPTION),
8900 TEST_fff_f (fma, -max_value, max_value, min_value, minus_infty, OVERFLOW_EXCEPTION),
8901 TEST_fff_f (fma, -max_value, max_value, -min_value, minus_infty, OVERFLOW_EXCEPTION),
8902 TEST_fff_f (fma, -max_value, -max_value, min_value, max_value, OVERFLOW_EXCEPTION),
8903 TEST_fff_f (fma, -max_value, -max_value, -min_value, max_value, OVERFLOW_EXCEPTION),
8904 #endif
8905
8906 #if defined (TEST_FLOAT) && FLT_MANT_DIG == 24
8907 TEST_fff_f (fma, 0x1.4p-126, 0x1.000004p-1, 0x1p-128, 0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8908 TEST_fff_f (fma, -0x1.4p-126, 0x1.000004p-1, -0x1p-128, -0x1.c00008p-127, UNDERFLOW_EXCEPTION),
8909 TEST_fff_f (fma, 0x1.fffff8p-126, 0x1.000002p-1, 0x1p-149, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8910 TEST_fff_f (fma, -0x1.fffff8p-126, 0x1.000002p-1, -0x1p-149, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8911 TEST_fff_f (fma, 0x1p-149, 0x1p-1, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8912 TEST_fff_f (fma, -0x1p-149, 0x1p-1, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION),
8913 TEST_fff_f (fma, 0x1p-149, 0x1.1p-1, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8914 TEST_fff_f (fma, -0x1p-149, 0x1.1p-1, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8915 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p127, 0x1p127),
8916 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p127, 0x0.ffffffp127),
8917 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p127, -0x1p127),
8918 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p127, -0x1.000002p127),
8919 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-126, 0x1p-126),
8920 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8921 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-126, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8922 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-126, -0x1.000002p-126),
8923 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8924 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x0.fffffep-126, 0x0.fffffcp-126, UNDERFLOW_EXCEPTION),
8925 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8926 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION),
8927 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
8928 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-149, plus_zero, UNDERFLOW_EXCEPTION),
8929 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
8930 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-149, -0x1p-148, UNDERFLOW_EXCEPTION),
8931 TEST_fff_f (fma, 0x0.fffp0, 0x0.fffp0, -0x0.ffep0, 0x1p-24),
8932 TEST_fff_f (fma, 0x0.fffp0, -0x0.fffp0, 0x0.ffep0, -0x1p-24),
8933 TEST_fff_f (fma, -0x0.fffp0, 0x0.fffp0, 0x0.ffep0, -0x1p-24),
8934 TEST_fff_f (fma, -0x0.fffp0, -0x0.fffp0, -0x0.ffep0, 0x1p-24),
8935 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p127, 0x1p127),
8936 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p127, 0x0.ffffffp127),
8937 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p127, -0x1p127),
8938 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p127, -0x1.000002p127),
8939 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p103, 0x1p103),
8940 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p103, 0x0.ffffffp103),
8941 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p103, -0x1p103),
8942 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p103, -0x1.000002p103),
8943 #endif
8944 #if defined (TEST_DOUBLE) && DBL_MANT_DIG == 53
8945 TEST_fff_f (fma, 0x1.4p-1022, 0x1.0000000000002p-1, 0x1p-1024, 0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8946 TEST_fff_f (fma, -0x1.4p-1022, 0x1.0000000000002p-1, -0x1p-1024, -0x1.c000000000004p-1023, UNDERFLOW_EXCEPTION),
8947 TEST_fff_f (fma, 0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, 0x1p-1074, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8948 TEST_fff_f (fma, -0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, -0x1p-1074, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8949 TEST_fff_f (fma, 0x1p-1074, 0x1p-1, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8950 TEST_fff_f (fma, -0x1p-1074, 0x1p-1, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION),
8951 TEST_fff_f (fma, 0x1p-1074, 0x1.1p-1, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8952 TEST_fff_f (fma, -0x1p-1074, 0x1.1p-1, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8953 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p1023, 0x1p1023),
8954 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p1023, 0x0.fffffffffffff8p1023),
8955 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p1023, -0x1p1023),
8956 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p1023, -0x1.0000000000001p1023),
8957 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1022, 0x1p-1022),
8958 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8959 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1022, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8960 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1022, -0x1.0000000000001p-1022),
8961 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8962 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.ffffffffffffep-1022, UNDERFLOW_EXCEPTION),
8963 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8964 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION),
8965 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
8966 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1074, plus_zero, UNDERFLOW_EXCEPTION),
8967 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
8968 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1074, -0x1p-1073, UNDERFLOW_EXCEPTION),
8969 TEST_fff_f (fma, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8970 TEST_fff_f (fma, 0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8971 TEST_fff_f (fma, -0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8972 TEST_fff_f (fma, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8973 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
8974 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p1023, 0x0.fffffffffffff8p1023),
8975 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
8976 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p1023, -0x1.0000000000001p1023),
8977 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p970, 0x1p970),
8978 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p970, 0x0.fffffffffffff8p970),
8979 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p970, -0x1p970),
8980 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p970, -0x1.0000000000001p970),
8981 #endif
8982 #if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 64
8983 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000004p-1L, 0x1p-16384L, 0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8984 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000004p-1L, -0x1p-16384L, -0x1.c000000000000008p-16383L, UNDERFLOW_EXCEPTION),
8985 TEST_fff_f (fma, 0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8986 TEST_fff_f (fma, -0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, -0x1p-16445L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8987 TEST_fff_f (fma, 0x1p-16445L, 0x1p-1L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8988 TEST_fff_f (fma, -0x1p-16445L, 0x1p-1L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8989 TEST_fff_f (fma, 0x1p-16445L, 0x1.1p-1L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8990 TEST_fff_f (fma, -0x1p-16445L, 0x1.1p-1L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8991 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p16383L, 0x1p16383L),
8992 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p16383L, 0x0.ffffffffffffffffp16383L),
8993 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p16383L, -0x1p16383L),
8994 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p16383L, -0x1.0000000000000002p16383L),
8995 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16382L, 0x1p-16382L),
8996 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8997 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8998 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16382L, -0x1.0000000000000002p-16382L),
8999 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9000 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffcp-16382L, UNDERFLOW_EXCEPTION),
9001 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9002 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
9003 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
9004 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16445L, plus_zero, UNDERFLOW_EXCEPTION),
9005 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
9006 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, -0x1p-16444L, UNDERFLOW_EXCEPTION),
9007 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9008 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
9009 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
9010 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9011 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
9012 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16383L, 0x0.ffffffffffffffffp16383L),
9013 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
9014 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16383L, -0x1.0000000000000002p16383L),
9015 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
9016 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16319L, 0x0.ffffffffffffffffp16319L),
9017 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
9018 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16319L, -0x1.0000000000000002p16319L),
9019 #endif
9020 #if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 113
9021 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, 0x1p-16384L, 0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
9022 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, -0x1p-16384L, -0x1.c000000000000000000000000004p-16383L, UNDERFLOW_EXCEPTION),
9023 TEST_fff_f (fma, 0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9024 TEST_fff_f (fma, -0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, -0x1p-16494L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9025 TEST_fff_f (fma, 0x1p-16494L, 0x1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9026 TEST_fff_f (fma, -0x1p-16494L, 0x1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
9027 TEST_fff_f (fma, 0x1p-16494L, 0x1.1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9028 TEST_fff_f (fma, -0x1p-16494L, 0x1.1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9029 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p16383L, 0x1p16383L),
9030 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p16383L, 0x0.ffffffffffffffffffffffffffff8p16383L),
9031 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p16383L, -0x1p16383L),
9032 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p16383L, -0x1.0000000000000000000000000001p16383L),
9033 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16382L, 0x1p-16382L),
9034 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9035 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9036 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16382L, -0x1.0000000000000000000000000001p-16382L),
9037 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9038 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.fffffffffffffffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9039 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9040 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
9041 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
9042 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16494L, plus_zero, UNDERFLOW_EXCEPTION),
9043 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
9044 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, -0x1p-16493L, UNDERFLOW_EXCEPTION),
9045 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9046 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9047 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9048 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9049 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
9050 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x0.ffffffffffffffffffffffffffff8p16383L),
9051 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
9052 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1.0000000000000000000000000001p16383L),
9053 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
9054 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x0.ffffffffffffffffffffffffffff8p16319L),
9055 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
9056 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1.0000000000000000000000000001p16319L),
9057 #endif
9058 END_DATA (fma_downward)
9059 };
9060
9061 static void
9062 fma_test_downward (void)
9063 {
9064 START (fma_downward);
9065 RUN_TEST_LOOP_fff_f (fma, fma_downward_test_data, FE_DOWNWARD);
9066 END (fma_downward);
9067 }
9068
9069
9070 static const struct test_fff_f_data fma_upward_test_data[] =
9071 {
9072 START_DATA (fma_upward),
9073 TEST_fff_f (fma, plus_zero, plus_zero, plus_zero, plus_zero),
9074 TEST_fff_f (fma, plus_zero, plus_zero, minus_zero, plus_zero),
9075 TEST_fff_f (fma, plus_zero, minus_zero, plus_zero, plus_zero),
9076 TEST_fff_f (fma, plus_zero, minus_zero, minus_zero, minus_zero),
9077 TEST_fff_f (fma, minus_zero, plus_zero, plus_zero, plus_zero),
9078 TEST_fff_f (fma, minus_zero, plus_zero, minus_zero, minus_zero),
9079 TEST_fff_f (fma, minus_zero, minus_zero, plus_zero, plus_zero),
9080 TEST_fff_f (fma, minus_zero, minus_zero, minus_zero, plus_zero),
9081 TEST_fff_f (fma, 1.0, plus_zero, plus_zero, plus_zero),
9082 TEST_fff_f (fma, 1.0, plus_zero, minus_zero, plus_zero),
9083 TEST_fff_f (fma, 1.0, minus_zero, plus_zero, plus_zero),
9084 TEST_fff_f (fma, 1.0, minus_zero, minus_zero, minus_zero),
9085 TEST_fff_f (fma, -1.0, plus_zero, plus_zero, plus_zero),
9086 TEST_fff_f (fma, -1.0, plus_zero, minus_zero, minus_zero),
9087 TEST_fff_f (fma, -1.0, minus_zero, plus_zero, plus_zero),
9088 TEST_fff_f (fma, -1.0, minus_zero, minus_zero, plus_zero),
9089 TEST_fff_f (fma, plus_zero, 1.0, plus_zero, plus_zero),
9090 TEST_fff_f (fma, plus_zero, 1.0, minus_zero, plus_zero),
9091 TEST_fff_f (fma, plus_zero, -1.0, plus_zero, plus_zero),
9092 TEST_fff_f (fma, plus_zero, -1.0, minus_zero, minus_zero),
9093 TEST_fff_f (fma, minus_zero, 1.0, plus_zero, plus_zero),
9094 TEST_fff_f (fma, minus_zero, 1.0, minus_zero, minus_zero),
9095 TEST_fff_f (fma, minus_zero, -1.0, plus_zero, plus_zero),
9096 TEST_fff_f (fma, minus_zero, -1.0, minus_zero, plus_zero),
9097
9098 TEST_fff_f (fma, 1.0, 1.0, -1.0, plus_zero),
9099 TEST_fff_f (fma, 1.0, -1.0, 1.0, plus_zero),
9100 TEST_fff_f (fma, -1.0, 1.0, 1.0, plus_zero),
9101 TEST_fff_f (fma, -1.0, -1.0, -1.0, plus_zero),
9102
9103 TEST_fff_f (fma, min_value, min_value, plus_zero, min_subnorm_value, UNDERFLOW_EXCEPTION),
9104 TEST_fff_f (fma, min_value, min_value, minus_zero, min_subnorm_value, UNDERFLOW_EXCEPTION),
9105 TEST_fff_f (fma, min_value, -min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
9106 TEST_fff_f (fma, min_value, -min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
9107 TEST_fff_f (fma, -min_value, min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
9108 TEST_fff_f (fma, -min_value, min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
9109 TEST_fff_f (fma, -min_value, -min_value, plus_zero, min_subnorm_value, UNDERFLOW_EXCEPTION),
9110 TEST_fff_f (fma, -min_value, -min_value, minus_zero, min_subnorm_value, UNDERFLOW_EXCEPTION),
9111
9112 #if !(defined TEST_LDOUBLE && LDBL_MANT_DIG == 106) /* Bug 13304. */
9113 TEST_fff_f (fma, max_value, max_value, min_value, plus_infty, OVERFLOW_EXCEPTION),
9114 TEST_fff_f (fma, max_value, max_value, -min_value, plus_infty, OVERFLOW_EXCEPTION),
9115 TEST_fff_f (fma, max_value, -max_value, min_value, -max_value, OVERFLOW_EXCEPTION),
9116 TEST_fff_f (fma, max_value, -max_value, -min_value, -max_value, OVERFLOW_EXCEPTION),
9117 TEST_fff_f (fma, -max_value, max_value, min_value, -max_value, OVERFLOW_EXCEPTION),
9118 TEST_fff_f (fma, -max_value, max_value, -min_value, -max_value, OVERFLOW_EXCEPTION),
9119 TEST_fff_f (fma, -max_value, -max_value, min_value, plus_infty, OVERFLOW_EXCEPTION),
9120 TEST_fff_f (fma, -max_value, -max_value, -min_value, plus_infty, OVERFLOW_EXCEPTION),
9121 #endif
9122
9123 #if defined (TEST_FLOAT) && FLT_MANT_DIG == 24
9124 TEST_fff_f (fma, 0x1.4p-126, 0x1.000004p-1, 0x1p-128, 0x1.c00008p-127, UNDERFLOW_EXCEPTION),
9125 TEST_fff_f (fma, -0x1.4p-126, 0x1.000004p-1, -0x1p-128, -0x1.c00004p-127, UNDERFLOW_EXCEPTION),
9126 TEST_fff_f (fma, 0x1.fffff8p-126, 0x1.000002p-1, 0x1p-149, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9127 TEST_fff_f (fma, -0x1.fffff8p-126, 0x1.000002p-1, -0x1p-149, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9128 TEST_fff_f (fma, 0x1p-149, 0x1p-1, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION),
9129 TEST_fff_f (fma, -0x1p-149, 0x1p-1, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9130 TEST_fff_f (fma, 0x1p-149, 0x1.1p-1, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9131 TEST_fff_f (fma, -0x1p-149, 0x1.1p-1, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9132 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p127, 0x1.000002p127),
9133 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p127, 0x1p127),
9134 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p127, -0x0.ffffffp127),
9135 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p127, -0x1p127),
9136 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-126, 0x1.000002p-126),
9137 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-126, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9138 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9139 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-126, -0x1p-126),
9140 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION),
9141 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9142 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x0.fffffep-126, -0x0.fffffcp-126, UNDERFLOW_EXCEPTION),
9143 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9144 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-149, 0x1p-148, UNDERFLOW_EXCEPTION),
9145 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
9146 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-149, minus_zero, UNDERFLOW_EXCEPTION),
9147 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
9148 TEST_fff_f (fma, 0x0.fffp0, 0x0.fffp0, -0x0.ffep0, 0x1p-24),
9149 TEST_fff_f (fma, 0x0.fffp0, -0x0.fffp0, 0x0.ffep0, -0x1p-24),
9150 TEST_fff_f (fma, -0x0.fffp0, 0x0.fffp0, 0x0.ffep0, -0x1p-24),
9151 TEST_fff_f (fma, -0x0.fffp0, -0x0.fffp0, -0x0.ffep0, 0x1p-24),
9152 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p127, 0x1.000002p127),
9153 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p127, 0x1p127),
9154 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p127, -0x0.ffffffp127),
9155 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p127, -0x1p127),
9156 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p103, 0x1.000002p103),
9157 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p103, 0x1p103),
9158 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p103, -0x0.ffffffp103),
9159 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p103, -0x1p103),
9160 #endif
9161 #if defined (TEST_DOUBLE) && DBL_MANT_DIG == 53
9162 TEST_fff_f (fma, 0x1.4p-1022, 0x1.0000000000002p-1, 0x1p-1024, 0x1.c000000000004p-1023, UNDERFLOW_EXCEPTION),
9163 TEST_fff_f (fma, -0x1.4p-1022, 0x1.0000000000002p-1, -0x1p-1024, -0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
9164 TEST_fff_f (fma, 0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, 0x1p-1074, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9165 TEST_fff_f (fma, -0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, -0x1p-1074, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9166 TEST_fff_f (fma, 0x1p-1074, 0x1p-1, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION),
9167 TEST_fff_f (fma, -0x1p-1074, 0x1p-1, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9168 TEST_fff_f (fma, 0x1p-1074, 0x1.1p-1, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9169 TEST_fff_f (fma, -0x1p-1074, 0x1.1p-1, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9170 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p1023, 0x1.0000000000001p1023),
9171 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p1023, 0x1p1023),
9172 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p1023, -0x0.fffffffffffff8p1023),
9173 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p1023, -0x1p1023),
9174 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1022, 0x1.0000000000001p-1022),
9175 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1022, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9176 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9177 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1022, -0x1p-1022),
9178 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION),
9179 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9180 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.ffffffffffffep-1022, UNDERFLOW_EXCEPTION),
9181 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9182 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1074, 0x1p-1073, UNDERFLOW_EXCEPTION),
9183 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
9184 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1074, minus_zero, UNDERFLOW_EXCEPTION),
9185 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
9186 TEST_fff_f (fma, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
9187 TEST_fff_f (fma, 0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
9188 TEST_fff_f (fma, -0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
9189 TEST_fff_f (fma, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
9190 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p1023, 0x1.0000000000001p1023),
9191 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
9192 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p1023, -0x0.fffffffffffff8p1023),
9193 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
9194 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p970, 0x1.0000000000001p970),
9195 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p970, 0x1p970),
9196 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p970, -0x0.fffffffffffff8p970),
9197 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p970, -0x1p970),
9198 #endif
9199 #if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 64
9200 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000004p-1L, 0x1p-16384L, 0x1.c000000000000008p-16383L, UNDERFLOW_EXCEPTION),
9201 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000004p-1L, -0x1p-16384L, -0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
9202 TEST_fff_f (fma, 0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, 0x1p-16445L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9203 TEST_fff_f (fma, -0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9204 TEST_fff_f (fma, 0x1p-16445L, 0x1p-1L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
9205 TEST_fff_f (fma, -0x1p-16445L, 0x1p-1L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9206 TEST_fff_f (fma, 0x1p-16445L, 0x1.1p-1L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9207 TEST_fff_f (fma, -0x1p-16445L, 0x1.1p-1L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9208 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p16383L, 0x1.0000000000000002p16383L),
9209 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p16383L, 0x1p16383L),
9210 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p16383L, -0x0.ffffffffffffffffp16383L),
9211 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p16383L, -0x1p16383L),
9212 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16382L, 0x1.0000000000000002p-16382L),
9213 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9214 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9215 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16382L, -0x1p-16382L),
9216 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
9217 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9218 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffcp-16382L, UNDERFLOW_EXCEPTION),
9219 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9220 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, 0x1p-16444L, UNDERFLOW_EXCEPTION),
9221 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
9222 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16445L, minus_zero, UNDERFLOW_EXCEPTION),
9223 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
9224 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9225 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
9226 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
9227 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9228 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16383L, 0x1.0000000000000002p16383L),
9229 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
9230 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16383L, -0x0.ffffffffffffffffp16383L),
9231 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
9232 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16319L, 0x1.0000000000000002p16319L),
9233 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
9234 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16319L, -0x0.ffffffffffffffffp16319L),
9235 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
9236 #endif
9237 #if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 113
9238 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, 0x1p-16384L, 0x1.c000000000000000000000000004p-16383L, UNDERFLOW_EXCEPTION),
9239 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, -0x1p-16384L, -0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
9240 TEST_fff_f (fma, 0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, 0x1p-16494L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9241 TEST_fff_f (fma, -0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9242 TEST_fff_f (fma, 0x1p-16494L, 0x1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
9243 TEST_fff_f (fma, -0x1p-16494L, 0x1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9244 TEST_fff_f (fma, 0x1p-16494L, 0x1.1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9245 TEST_fff_f (fma, -0x1p-16494L, 0x1.1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9246 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p16383L, 0x1.0000000000000000000000000001p16383L),
9247 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p16383L, 0x1p16383L),
9248 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p16383L, -0x0.ffffffffffffffffffffffffffff8p16383L),
9249 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p16383L, -0x1p16383L),
9250 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16382L, 0x1.0000000000000000000000000001p-16382L),
9251 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9252 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9253 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16382L, -0x1p-16382L),
9254 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
9255 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9256 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.fffffffffffffffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9257 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9258 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, 0x1p-16493L, UNDERFLOW_EXCEPTION),
9259 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
9260 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16494L, minus_zero, UNDERFLOW_EXCEPTION),
9261 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
9262 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9263 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9264 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9265 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9266 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1.0000000000000000000000000001p16383L),
9267 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
9268 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x0.ffffffffffffffffffffffffffff8p16383L),
9269 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
9270 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1.0000000000000000000000000001p16319L),
9271 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
9272 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x0.ffffffffffffffffffffffffffff8p16319L),
9273 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
9274 #endif
9275 END_DATA (fma_upward)
9276 };
9277
9278 static void
9279 fma_test_upward (void)
9280 {
9281 START (fma_upward);
9282 RUN_TEST_LOOP_fff_f (fma, fma_upward_test_data, FE_UPWARD);
9283 END (fma_upward);
9284 }
9285
9286
9287 static const struct test_ff_f_data fmax_test_data[] =
9288 {
9289 START_DATA (fmax),
9290 TEST_ff_f (fmax, 0, 0, 0),
9291 TEST_ff_f (fmax, minus_zero, minus_zero, minus_zero),
9292 TEST_ff_f (fmax, 9, 0, 9),
9293 TEST_ff_f (fmax, 0, 9, 9),
9294 TEST_ff_f (fmax, -9, 0, 0),
9295 TEST_ff_f (fmax, 0, -9, 0),
9296
9297 TEST_ff_f (fmax, plus_infty, 9, plus_infty),
9298 TEST_ff_f (fmax, 0, plus_infty, plus_infty),
9299 TEST_ff_f (fmax, -9, plus_infty, plus_infty),
9300 TEST_ff_f (fmax, plus_infty, -9, plus_infty),
9301
9302 TEST_ff_f (fmax, minus_infty, 9, 9),
9303 TEST_ff_f (fmax, minus_infty, -9, -9),
9304 TEST_ff_f (fmax, 9, minus_infty, 9),
9305 TEST_ff_f (fmax, -9, minus_infty, -9),
9306
9307 TEST_ff_f (fmax, 0, qnan_value, 0),
9308 TEST_ff_f (fmax, 9, qnan_value, 9),
9309 TEST_ff_f (fmax, -9, qnan_value, -9),
9310 TEST_ff_f (fmax, qnan_value, 0, 0),
9311 TEST_ff_f (fmax, qnan_value, 9, 9),
9312 TEST_ff_f (fmax, qnan_value, -9, -9),
9313 TEST_ff_f (fmax, plus_infty, qnan_value, plus_infty),
9314 TEST_ff_f (fmax, minus_infty, qnan_value, minus_infty),
9315 TEST_ff_f (fmax, qnan_value, plus_infty, plus_infty),
9316 TEST_ff_f (fmax, qnan_value, minus_infty, minus_infty),
9317 TEST_ff_f (fmax, qnan_value, qnan_value, qnan_value),
9318 END_DATA (fmax)
9319 };
9320
9321 static void
9322 fmax_test (void)
9323 {
9324 START (fmax);
9325 RUN_TEST_LOOP_ff_f (fmax, fmax_test_data, );
9326 END (fmax);
9327 }
9328
9329
9330 static const struct test_ff_f_data fmin_test_data[] =
9331 {
9332 START_DATA (fmin),
9333 TEST_ff_f (fmin, 0, 0, 0),
9334 TEST_ff_f (fmin, minus_zero, minus_zero, minus_zero),
9335 TEST_ff_f (fmin, 9, 0, 0),
9336 TEST_ff_f (fmin, 0, 9, 0),
9337 TEST_ff_f (fmin, -9, 0, -9),
9338 TEST_ff_f (fmin, 0, -9, -9),
9339
9340 TEST_ff_f (fmin, plus_infty, 9, 9),
9341 TEST_ff_f (fmin, 9, plus_infty, 9),
9342 TEST_ff_f (fmin, plus_infty, -9, -9),
9343 TEST_ff_f (fmin, -9, plus_infty, -9),
9344 TEST_ff_f (fmin, minus_infty, 9, minus_infty),
9345 TEST_ff_f (fmin, minus_infty, -9, minus_infty),
9346 TEST_ff_f (fmin, 9, minus_infty, minus_infty),
9347 TEST_ff_f (fmin, -9, minus_infty, minus_infty),
9348
9349 TEST_ff_f (fmin, 0, qnan_value, 0),
9350 TEST_ff_f (fmin, 9, qnan_value, 9),
9351 TEST_ff_f (fmin, -9, qnan_value, -9),
9352 TEST_ff_f (fmin, qnan_value, 0, 0),
9353 TEST_ff_f (fmin, qnan_value, 9, 9),
9354 TEST_ff_f (fmin, qnan_value, -9, -9),
9355 TEST_ff_f (fmin, plus_infty, qnan_value, plus_infty),
9356 TEST_ff_f (fmin, minus_infty, qnan_value, minus_infty),
9357 TEST_ff_f (fmin, qnan_value, plus_infty, plus_infty),
9358 TEST_ff_f (fmin, qnan_value, minus_infty, minus_infty),
9359 TEST_ff_f (fmin, qnan_value, qnan_value, qnan_value),
9360 END_DATA (fmin)
9361 };
9362
9363 static void
9364 fmin_test (void)
9365 {
9366 START (fmin);
9367 RUN_TEST_LOOP_ff_f (fmin, fmin_test_data, );
9368 END (fmin);
9369 }
9370
9371
9372 static const struct test_ff_f_data fmod_test_data[] =
9373 {
9374 START_DATA (fmod),
9375 /* fmod (+0, y) == +0 for y != 0. */
9376 TEST_ff_f (fmod, 0, 3, 0),
9377
9378 /* fmod (-0, y) == -0 for y != 0. */
9379 TEST_ff_f (fmod, minus_zero, 3, minus_zero),
9380
9381 /* fmod (+inf, y) == qNaN plus invalid exception. */
9382 TEST_ff_f (fmod, plus_infty, 3, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
9383 /* fmod (-inf, y) == qNaN plus invalid exception. */
9384 TEST_ff_f (fmod, minus_infty, 3, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
9385 /* fmod (x, +0) == qNaN plus invalid exception. */
9386 TEST_ff_f (fmod, 3, 0, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
9387 /* fmod (x, -0) == qNaN plus invalid exception. */
9388 TEST_ff_f (fmod, 3, minus_zero, qnan_value, INVALID_EXCEPTION),
9389
9390 /* fmod (x, +inf) == x for x not infinite. */
9391 TEST_ff_f (fmod, 3.0, plus_infty, 3.0),
9392 /* fmod (x, -inf) == x for x not infinite. */
9393 TEST_ff_f (fmod, 3.0, minus_infty, 3.0),
9394
9395 TEST_ff_f (fmod, qnan_value, qnan_value, qnan_value),
9396
9397 TEST_ff_f (fmod, 6.5, 2.25L, 2.0L),
9398 TEST_ff_f (fmod, -6.5, 2.25L, -2.0L),
9399 TEST_ff_f (fmod, 6.5, -2.25L, 2.0L),
9400 TEST_ff_f (fmod, -6.5, -2.25L, -2.0L),
9401
9402 TEST_ff_f (fmod, 0x0.fffffep-126L, 0x1p-149L, plus_zero),
9403 #ifndef TEST_FLOAT
9404 TEST_ff_f (fmod, 0x0.fffffffffffffp-1022L, 0x1p-1074L, plus_zero),
9405 #endif
9406 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
9407 TEST_ff_f (fmod, 0x0.fffffffffffffffep-16382L, 0x1p-16445L, plus_zero),
9408 #endif
9409 END_DATA (fmod)
9410 };
9411
9412 static void
9413 fmod_test (void)
9414 {
9415 errno = 0;
9416 FUNC(fmod) (6.5, 2.3L);
9417 if (errno == ENOSYS)
9418 /* Function not implemented. */
9419 return;
9420
9421 START (fmod);
9422 RUN_TEST_LOOP_ff_f (fmod, fmod_test_data, );
9423 END (fmod);
9424 }
9425
9426
9427 static void
9428 fpclassify_test (void)
9429 {
9430 START (fpclassify);
9431
9432 TEST_f_i (fpclassify, qnan_value, FP_NAN);
9433 TEST_f_i (fpclassify, plus_infty, FP_INFINITE);
9434 TEST_f_i (fpclassify, minus_infty, FP_INFINITE);
9435 TEST_f_i (fpclassify, plus_zero, FP_ZERO);
9436 TEST_f_i (fpclassify, minus_zero, FP_ZERO);
9437 TEST_f_i (fpclassify, 1000, FP_NORMAL);
9438 TEST_f_i (fpclassify, min_subnorm_value, FP_SUBNORMAL);
9439
9440 END (fpclassify);
9441 }
9442
9443
9444 static void
9445 frexp_test (void)
9446 {
9447 int x;
9448
9449 START (frexp);
9450
9451 TEST_fI_f1 (frexp, plus_infty, plus_infty, IGNORE);
9452 TEST_fI_f1 (frexp, minus_infty, minus_infty, IGNORE);
9453 TEST_fI_f1 (frexp, qnan_value, qnan_value, IGNORE);
9454
9455 TEST_fI_f1 (frexp, 0.0, 0.0, 0.0);
9456 TEST_fI_f1 (frexp, minus_zero, minus_zero, 0.0);
9457
9458 TEST_fI_f1 (frexp, 12.8L, 0.8L, 4);
9459 TEST_fI_f1 (frexp, -27.34L, -0.854375L, 5);
9460
9461 END (frexp);
9462 }
9463
9464
9465 static void
9466 gamma_test (void)
9467 {
9468 errno = 0;
9469 FUNC(gamma) (1);
9470
9471 if (errno == ENOSYS)
9472 /* Function not implemented. */
9473 return;
9474
9475 START (gamma);
9476
9477 TEST_f_f1 (gamma, plus_infty, plus_infty, 1);
9478 TEST_f_f1 (gamma, 0, plus_infty, 1, DIVIDE_BY_ZERO_EXCEPTION);
9479 TEST_f_f1 (gamma, -3, plus_infty, IGNORE, DIVIDE_BY_ZERO_EXCEPTION);
9480 TEST_f_f1 (gamma, minus_infty, plus_infty, IGNORE);
9481 TEST_f_f1 (gamma, qnan_value, qnan_value, IGNORE);
9482
9483 TEST_f_f1 (gamma, 1, 0, 1);
9484 TEST_f_f1 (gamma, 3, M_LN2l, 1);
9485
9486 TEST_f_f1 (gamma, 0.5, M_LOG_SQRT_PIl, 1);
9487 TEST_f_f1 (gamma, -0.5, M_LOG_2_SQRT_PIl, -1);
9488
9489 END (gamma);
9490 }
9491
9492 static const struct test_ff_f_data hypot_test_data[] =
9493 {
9494 START_DATA (hypot),
9495 TEST_ff_f (hypot, plus_infty, 1, plus_infty),
9496 TEST_ff_f (hypot, minus_infty, 1, plus_infty),
9497
9498 #ifndef TEST_INLINE
9499 TEST_ff_f (hypot, plus_infty, qnan_value, plus_infty),
9500 TEST_ff_f (hypot, minus_infty, qnan_value, plus_infty),
9501 TEST_ff_f (hypot, qnan_value, plus_infty, plus_infty),
9502 TEST_ff_f (hypot, qnan_value, minus_infty, plus_infty),
9503 #endif
9504
9505 TEST_ff_f (hypot, qnan_value, qnan_value, qnan_value),
9506
9507 /* hypot (x,y) == hypot (+-x, +-y) */
9508 TEST_ff_f (hypot, 0.7L, 12.4L, 12.419742348374220601176836866763271L),
9509 TEST_ff_f (hypot, -0.7L, 12.4L, 12.419742348374220601176836866763271L),
9510 TEST_ff_f (hypot, 0.7L, -12.4L, 12.419742348374220601176836866763271L),
9511 TEST_ff_f (hypot, -0.7L, -12.4L, 12.419742348374220601176836866763271L),
9512 TEST_ff_f (hypot, 12.4L, 0.7L, 12.419742348374220601176836866763271L),
9513 TEST_ff_f (hypot, -12.4L, 0.7L, 12.419742348374220601176836866763271L),
9514 TEST_ff_f (hypot, 12.4L, -0.7L, 12.419742348374220601176836866763271L),
9515 TEST_ff_f (hypot, -12.4L, -0.7L, 12.419742348374220601176836866763271L),
9516
9517 /* hypot (x,0) == fabs (x) */
9518 TEST_ff_f (hypot, 0.75L, 0, 0.75L),
9519 TEST_ff_f (hypot, -0.75L, 0, 0.75L),
9520 TEST_ff_f (hypot, -5.7e7, 0, 5.7e7L),
9521
9522 TEST_ff_f (hypot, 0.75L, 1.25L, 1.45773797371132511771853821938639577L),
9523
9524 TEST_ff_f (hypot, 1.0L, 0x1p-61L, 1.0L),
9525 TEST_ff_f (hypot, 0x1p+0L, 0x1.fp-129L, 0x1p+0L),
9526 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
9527 TEST_ff_f (hypot, 0x1.23456789abcdef0123456789ab8p-500L, 0x1.23456789abcdef0123456789ab8p-500L, 4.9155782399407039128612180934736799735113e-151L),
9528 #endif
9529
9530 #if !(defined TEST_FLOAT && defined TEST_INLINE)
9531 TEST_ff_f (hypot, 0x3p125L, 0x4p125L, 0x5p125L),
9532 TEST_ff_f (hypot, 0x1.234566p-126L, 0x1.234566p-126L, 1.891441686191081936598531534017449451173e-38L),
9533 #endif
9534
9535 #if !defined TEST_FLOAT && !(defined TEST_DOUBLE && defined TEST_INLINE)
9536 TEST_ff_f (hypot, 0x3p1021L, 0x4p1021L, 0x5p1021L),
9537 TEST_ff_f (hypot, 0x1p+0L, 0x0.3ep-1022L, 0x1p+0L),
9538 #endif
9539
9540 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384 && !defined TEST_INLINE
9541 TEST_ff_f (hypot, 0x3p16381L, 0x4p16381L, 0x5p16381L),
9542 #endif
9543 END_DATA (hypot)
9544 };
9545
9546 static void
9547 hypot_test (void)
9548 {
9549 errno = 0;
9550 FUNC(hypot) (0.7L, 12.4L);
9551 if (errno == ENOSYS)
9552 /* Function not implemented. */
9553 return;
9554
9555 START (hypot);
9556 RUN_TEST_LOOP_ff_f (hypot, hypot_test_data, );
9557 END (hypot);
9558 }
9559
9560
9561 static void
9562 ilogb_test (void)
9563 {
9564 START (ilogb);
9565
9566 TEST_f_i (ilogb, 1, 0);
9567 TEST_f_i (ilogb, M_El, 1);
9568 TEST_f_i (ilogb, 1024, 10);
9569 TEST_f_i (ilogb, -2000, 10);
9570
9571 /* ilogb (0.0) == FP_ILOGB0 plus invalid exception */
9572 TEST_f_i (ilogb, 0.0, FP_ILOGB0, INVALID_EXCEPTION|ERRNO_EDOM);
9573 /* ilogb (qNaN) == FP_ILOGBNAN plus invalid exception */
9574 TEST_f_i (ilogb, qnan_value, FP_ILOGBNAN, INVALID_EXCEPTION|ERRNO_EDOM);
9575 /* ilogb (inf) == INT_MAX plus invalid exception */
9576 TEST_f_i (ilogb, plus_infty, INT_MAX, INVALID_EXCEPTION|ERRNO_EDOM);
9577 /* ilogb (-inf) == INT_MAX plus invalid exception */
9578 TEST_f_i (ilogb, minus_infty, INT_MAX, INVALID_EXCEPTION|ERRNO_EDOM);
9579
9580 END (ilogb);
9581 }
9582
9583 static void
9584 isfinite_test (void)
9585 {
9586 START (isfinite);
9587
9588 TEST_f_b (isfinite, 0, 1);
9589 TEST_f_b (isfinite, minus_zero, 1);
9590 TEST_f_b (isfinite, 10, 1);
9591 TEST_f_b (isfinite, min_subnorm_value, 1);
9592 TEST_f_b (isfinite, plus_infty, 0);
9593 TEST_f_b (isfinite, minus_infty, 0);
9594 TEST_f_b (isfinite, qnan_value, 0);
9595
9596 END (isfinite);
9597 }
9598
9599 static void
9600 isgreater_test (void)
9601 {
9602 START (isgreater);
9603
9604 TEST_ff_i (isgreater, minus_zero, minus_zero, 0);
9605 TEST_ff_i (isgreater, minus_zero, plus_zero, 0);
9606 TEST_ff_i (isgreater, minus_zero, (FLOAT) 1, 0);
9607 TEST_ff_i (isgreater, minus_zero, qnan_value, 0);
9608 TEST_ff_i (isgreater, plus_zero, minus_zero, 0);
9609 TEST_ff_i (isgreater, plus_zero, plus_zero, 0);
9610 TEST_ff_i (isgreater, plus_zero, (FLOAT) 1, 0);
9611 TEST_ff_i (isgreater, plus_zero, qnan_value, 0);
9612 TEST_ff_i (isgreater, (FLOAT) 1, minus_zero, 1);
9613 TEST_ff_i (isgreater, (FLOAT) 1, plus_zero, 1);
9614 TEST_ff_i (isgreater, (FLOAT) 1, (FLOAT) 1, 0);
9615 TEST_ff_i (isgreater, (FLOAT) 1, qnan_value, 0);
9616 TEST_ff_i (isgreater, qnan_value, minus_zero, 0);
9617 TEST_ff_i (isgreater, qnan_value, plus_zero, 0);
9618 TEST_ff_i (isgreater, qnan_value, (FLOAT) 1, 0);
9619 TEST_ff_i (isgreater, qnan_value, qnan_value, 0);
9620
9621 END (isgreater);
9622 }
9623
9624 static void
9625 isgreaterequal_test (void)
9626 {
9627 START (isgreaterequal);
9628
9629 TEST_ff_i (isgreaterequal, minus_zero, minus_zero, 1);
9630 TEST_ff_i (isgreaterequal, minus_zero, plus_zero, 1);
9631 TEST_ff_i (isgreaterequal, minus_zero, (FLOAT) 1, 0);
9632 TEST_ff_i (isgreaterequal, minus_zero, qnan_value, 0);
9633 TEST_ff_i (isgreaterequal, plus_zero, minus_zero, 1);
9634 TEST_ff_i (isgreaterequal, plus_zero, plus_zero, 1);
9635 TEST_ff_i (isgreaterequal, plus_zero, (FLOAT) 1, 0);
9636 TEST_ff_i (isgreaterequal, plus_zero, qnan_value, 0);
9637 TEST_ff_i (isgreaterequal, (FLOAT) 1, minus_zero, 1);
9638 TEST_ff_i (isgreaterequal, (FLOAT) 1, plus_zero, 1);
9639 TEST_ff_i (isgreaterequal, (FLOAT) 1, (FLOAT) 1, 1);
9640 TEST_ff_i (isgreaterequal, (FLOAT) 1, qnan_value, 0);
9641 TEST_ff_i (isgreaterequal, qnan_value, minus_zero, 0);
9642 TEST_ff_i (isgreaterequal, qnan_value, plus_zero, 0);
9643 TEST_ff_i (isgreaterequal, qnan_value, (FLOAT) 1, 0);
9644 TEST_ff_i (isgreaterequal, qnan_value, qnan_value, 0);
9645
9646 END (isgreaterequal);
9647 }
9648
9649 static void
9650 isinf_test (void)
9651 {
9652 START (isinf);
9653
9654 TEST_f_b (isinf, 0, 0);
9655 TEST_f_b (isinf, minus_zero, 0);
9656 TEST_f_b (isinf, 10, 0);
9657 TEST_f_b (isinf, min_subnorm_value, 0);
9658 TEST_f_b (isinf, plus_infty, 1);
9659 TEST_f_b (isinf, minus_infty, 1);
9660 TEST_f_b (isinf, qnan_value, 0);
9661
9662 END (isinf);
9663 }
9664
9665 static void
9666 isless_test (void)
9667 {
9668 START (isless);
9669
9670 TEST_ff_i (isless, minus_zero, minus_zero, 0);
9671 TEST_ff_i (isless, minus_zero, plus_zero, 0);
9672 TEST_ff_i (isless, minus_zero, (FLOAT) 1, 1);
9673 TEST_ff_i (isless, minus_zero, qnan_value, 0);
9674 TEST_ff_i (isless, plus_zero, minus_zero, 0);
9675 TEST_ff_i (isless, plus_zero, plus_zero, 0);
9676 TEST_ff_i (isless, plus_zero, (FLOAT) 1, 1);
9677 TEST_ff_i (isless, plus_zero, qnan_value, 0);
9678 TEST_ff_i (isless, (FLOAT) 1, minus_zero, 0);
9679 TEST_ff_i (isless, (FLOAT) 1, plus_zero, 0);
9680 TEST_ff_i (isless, (FLOAT) 1, (FLOAT) 1, 0);
9681 TEST_ff_i (isless, (FLOAT) 1, qnan_value, 0);
9682 TEST_ff_i (isless, qnan_value, minus_zero, 0);
9683 TEST_ff_i (isless, qnan_value, plus_zero, 0);
9684 TEST_ff_i (isless, qnan_value, (FLOAT) 1, 0);
9685 TEST_ff_i (isless, qnan_value, qnan_value, 0);
9686
9687 END (isless);
9688 }
9689
9690 static void
9691 islessequal_test (void)
9692 {
9693 START (islessequal);
9694
9695 TEST_ff_i (islessequal, minus_zero, minus_zero, 1);
9696 TEST_ff_i (islessequal, minus_zero, plus_zero, 1);
9697 TEST_ff_i (islessequal, minus_zero, (FLOAT) 1, 1);
9698 TEST_ff_i (islessequal, minus_zero, qnan_value, 0);
9699 TEST_ff_i (islessequal, plus_zero, minus_zero, 1);
9700 TEST_ff_i (islessequal, plus_zero, plus_zero, 1);
9701 TEST_ff_i (islessequal, plus_zero, (FLOAT) 1, 1);
9702 TEST_ff_i (islessequal, plus_zero, qnan_value, 0);
9703 TEST_ff_i (islessequal, (FLOAT) 1, minus_zero, 0);
9704 TEST_ff_i (islessequal, (FLOAT) 1, plus_zero, 0);
9705 TEST_ff_i (islessequal, (FLOAT) 1, (FLOAT) 1, 1);
9706 TEST_ff_i (islessequal, (FLOAT) 1, qnan_value, 0);
9707 TEST_ff_i (islessequal, qnan_value, minus_zero, 0);
9708 TEST_ff_i (islessequal, qnan_value, plus_zero, 0);
9709 TEST_ff_i (islessequal, qnan_value, (FLOAT) 1, 0);
9710 TEST_ff_i (islessequal, qnan_value, qnan_value, 0);
9711
9712 END (islessequal);
9713 }
9714
9715 static void
9716 islessgreater_test (void)
9717 {
9718 START (islessgreater);
9719
9720 TEST_ff_i (islessgreater, minus_zero, minus_zero, 0);
9721 TEST_ff_i (islessgreater, minus_zero, plus_zero, 0);
9722 TEST_ff_i (islessgreater, minus_zero, (FLOAT) 1, 1);
9723 TEST_ff_i (islessgreater, minus_zero, qnan_value, 0);
9724 TEST_ff_i (islessgreater, plus_zero, minus_zero, 0);
9725 TEST_ff_i (islessgreater, plus_zero, plus_zero, 0);
9726 TEST_ff_i (islessgreater, plus_zero, (FLOAT) 1, 1);
9727 TEST_ff_i (islessgreater, plus_zero, qnan_value, 0);
9728 TEST_ff_i (islessgreater, (FLOAT) 1, minus_zero, 1);
9729 TEST_ff_i (islessgreater, (FLOAT) 1, plus_zero, 1);
9730 TEST_ff_i (islessgreater, (FLOAT) 1, (FLOAT) 1, 0);
9731 TEST_ff_i (islessgreater, (FLOAT) 1, qnan_value, 0);
9732 TEST_ff_i (islessgreater, qnan_value, minus_zero, 0);
9733 TEST_ff_i (islessgreater, qnan_value, plus_zero, 0);
9734 TEST_ff_i (islessgreater, qnan_value, (FLOAT) 1, 0);
9735 TEST_ff_i (islessgreater, qnan_value, qnan_value, 0);
9736
9737 END (islessgreater);
9738 }
9739
9740 static void
9741 isnan_test (void)
9742 {
9743 START (isnan);
9744
9745 TEST_f_b (isnan, 0, 0);
9746 TEST_f_b (isnan, minus_zero, 0);
9747 TEST_f_b (isnan, 10, 0);
9748 TEST_f_b (isnan, min_subnorm_value, 0);
9749 TEST_f_b (isnan, plus_infty, 0);
9750 TEST_f_b (isnan, minus_infty, 0);
9751 TEST_f_b (isnan, qnan_value, 1);
9752
9753 END (isnan);
9754 }
9755
9756 static void
9757 isnormal_test (void)
9758 {
9759 START (isnormal);
9760
9761 TEST_f_b (isnormal, 0, 0);
9762 TEST_f_b (isnormal, minus_zero, 0);
9763 TEST_f_b (isnormal, 10, 1);
9764 TEST_f_b (isnormal, min_subnorm_value, 0);
9765 TEST_f_b (isnormal, plus_infty, 0);
9766 TEST_f_b (isnormal, minus_infty, 0);
9767 TEST_f_b (isnormal, qnan_value, 0);
9768
9769 END (isnormal);
9770 }
9771
9772 static void
9773 issignaling_test (void)
9774 {
9775 START (issignaling);
9776
9777 TEST_f_b (issignaling, 0, 0);
9778 TEST_f_b (issignaling, minus_zero, 0);
9779 TEST_f_b (issignaling, 10, 0);
9780 TEST_f_b (issignaling, min_subnorm_value, 0);
9781 TEST_f_b (issignaling, plus_infty, 0);
9782 TEST_f_b (issignaling, minus_infty, 0);
9783 TEST_f_b (issignaling, qnan_value, 0);
9784
9785 END (issignaling);
9786 }
9787
9788 static void
9789 isunordered_test (void)
9790 {
9791 START (isunordered);
9792
9793 TEST_ff_i (isunordered, minus_zero, minus_zero, 0);
9794 TEST_ff_i (isunordered, minus_zero, plus_zero, 0);
9795 TEST_ff_i (isunordered, minus_zero, (FLOAT) 1, 0);
9796 TEST_ff_i (isunordered, minus_zero, qnan_value, 1);
9797 TEST_ff_i (isunordered, plus_zero, minus_zero, 0);
9798 TEST_ff_i (isunordered, plus_zero, plus_zero, 0);
9799 TEST_ff_i (isunordered, plus_zero, (FLOAT) 1, 0);
9800 TEST_ff_i (isunordered, plus_zero, qnan_value, 1);
9801 TEST_ff_i (isunordered, (FLOAT) 1, minus_zero, 0);
9802 TEST_ff_i (isunordered, (FLOAT) 1, plus_zero, 0);
9803 TEST_ff_i (isunordered, (FLOAT) 1, (FLOAT) 1, 0);
9804 TEST_ff_i (isunordered, (FLOAT) 1, qnan_value, 1);
9805 TEST_ff_i (isunordered, qnan_value, minus_zero, 1);
9806 TEST_ff_i (isunordered, qnan_value, plus_zero, 1);
9807 TEST_ff_i (isunordered, qnan_value, (FLOAT) 1, 1);
9808 TEST_ff_i (isunordered, qnan_value, qnan_value, 1);
9809
9810 END (isunordered);
9811 }
9812
9813 static const struct test_f_f_data j0_test_data[] =
9814 {
9815 START_DATA (j0),
9816 /* j0 is the Bessel function of the first kind of order 0 */
9817 TEST_f_f (j0, qnan_value, qnan_value),
9818 TEST_f_f (j0, plus_infty, 0),
9819 TEST_f_f (j0, -1.0, 0.765197686557966551449717526102663221L),
9820 TEST_f_f (j0, 0.0, 1.0),
9821 TEST_f_f (j0, 0.125L, 0.996097563041985204620768999453174712L),
9822 TEST_f_f (j0, 0.75L, 0.864242275166648623555731103820923211L),
9823 TEST_f_f (j0, 1.0, 0.765197686557966551449717526102663221L),
9824 TEST_f_f (j0, 1.5, 0.511827671735918128749051744283411720L),
9825 TEST_f_f (j0, 2.0, 0.223890779141235668051827454649948626L),
9826 TEST_f_f (j0, 8.0, 0.171650807137553906090869407851972001L),
9827 TEST_f_f (j0, 10.0, -0.245935764451348335197760862485328754L),
9828 TEST_f_f (j0, 4.0, -3.9714980986384737228659076845169804197562E-1L),
9829 TEST_f_f (j0, -4.0, -3.9714980986384737228659076845169804197562E-1L),
9830
9831 TEST_f_f (j0, 0x1.d7ce3ap+107L, 2.775523647291230802651040996274861694514e-17L),
9832
9833 #ifndef TEST_FLOAT
9834 TEST_f_f (j0, -0x1.001000001p+593L, -3.927269966354206207832593635798954916263e-90L),
9835 TEST_f_f (j0, 0x1p1023L, -1.5665258060609012834424478437196679802783e-155L),
9836 #endif
9837
9838 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
9839 TEST_f_f (j0, 0x1p16382L, -1.2193782500509000574176799046642541129387e-2466L),
9840 TEST_f_f (j0, 0x1p16383L, 9.5859502826270374691362975419147645151233e-2467L),
9841 #endif
9842 END_DATA (j0)
9843 };
9844
9845 static void
9846 j0_test (void)
9847 {
9848 FLOAT s, c;
9849 errno = 0;
9850 FUNC (sincos) (0, &s, &c);
9851 if (errno == ENOSYS)
9852 /* Required function not implemented. */
9853 return;
9854 FUNC(j0) (0);
9855 if (errno == ENOSYS)
9856 /* Function not implemented. */
9857 return;
9858
9859 START (j0);
9860 RUN_TEST_LOOP_f_f (j0, j0_test_data, );
9861 END (j0);
9862 }
9863
9864
9865 static const struct test_f_f_data j1_test_data[] =
9866 {
9867 START_DATA (j1),
9868 /* j1 is the Bessel function of the first kind of order 1 */
9869 TEST_f_f (j1, qnan_value, qnan_value),
9870 TEST_f_f (j1, plus_infty, 0),
9871
9872 TEST_f_f (j1, -1.0, -0.440050585744933515959682203718914913L),
9873 TEST_f_f (j1, 0.0, 0.0),
9874 TEST_f_f (j1, 0.125L, 0.0623780091344946810942311355879361177L),
9875 TEST_f_f (j1, 0.75L, 0.349243602174862192523281016426251335L),
9876 TEST_f_f (j1, 1.0, 0.440050585744933515959682203718914913L),
9877 TEST_f_f (j1, 1.5, 0.557936507910099641990121213156089400L),
9878 TEST_f_f (j1, 2.0, 0.576724807756873387202448242269137087L),
9879 TEST_f_f (j1, 8.0, 0.234636346853914624381276651590454612L),
9880 TEST_f_f (j1, 10.0, 0.0434727461688614366697487680258592883L),
9881
9882 TEST_f_f (j1, 0x1.3ffp+74L, 1.818984347516051243459364437186082741567e-12L),
9883
9884 #ifndef TEST_FLOAT
9885 TEST_f_f (j1, 0x1.ff00000000002p+840L, 1.846591691699331493194965158699937660696e-127L),
9886 TEST_f_f (j1, 0x1p1023L, 8.2687542933709649327986678723012001545638e-155L),
9887 #endif
9888
9889 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
9890 TEST_f_f (j1, 0x1p16382L, 8.0839224448726336195866026476176740513439e-2467L),
9891 TEST_f_f (j1, 0x1p16383L, -3.8895531955766020648617743624167352352217e-2467L),
9892 #endif
9893 END_DATA (j1)
9894 };
9895
9896 static void
9897 j1_test (void)
9898 {
9899 FLOAT s, c;
9900 errno = 0;
9901 FUNC (sincos) (0, &s, &c);
9902 if (errno == ENOSYS)
9903 /* Required function not implemented. */
9904 return;
9905 FUNC(j1) (0);
9906 if (errno == ENOSYS)
9907 /* Function not implemented. */
9908 return;
9909
9910 START (j1);
9911 RUN_TEST_LOOP_f_f (j1, j1_test_data, );
9912 END (j1);
9913 }
9914
9915 static const struct test_if_f_data jn_test_data[] =
9916 {
9917 START_DATA (jn),
9918 /* jn is the Bessel function of the first kind of order n. */
9919 /* jn (0, x) == j0 (x) */
9920 TEST_if_f (jn, 0, qnan_value, qnan_value),
9921 TEST_if_f (jn, 0, plus_infty, 0),
9922 TEST_if_f (jn, 0, -1.0, 0.765197686557966551449717526102663221L),
9923 TEST_if_f (jn, 0, 0.0, 1.0),
9924 TEST_if_f (jn, 0, 0.125L, 0.996097563041985204620768999453174712L),
9925 TEST_if_f (jn, 0, 0.75L, 0.864242275166648623555731103820923211L),
9926 TEST_if_f (jn, 0, 1.0, 0.765197686557966551449717526102663221L),
9927 TEST_if_f (jn, 0, 1.5, 0.511827671735918128749051744283411720L),
9928 TEST_if_f (jn, 0, 2.0, 0.223890779141235668051827454649948626L),
9929 TEST_if_f (jn, 0, 8.0, 0.171650807137553906090869407851972001L),
9930 TEST_if_f (jn, 0, 10.0, -0.245935764451348335197760862485328754L),
9931 TEST_if_f (jn, 0, 4.0, -3.9714980986384737228659076845169804197562E-1L),
9932 TEST_if_f (jn, 0, -4.0, -3.9714980986384737228659076845169804197562E-1L),
9933
9934 /* jn (1, x) == j1 (x) */
9935 TEST_if_f (jn, 1, qnan_value, qnan_value),
9936 TEST_if_f (jn, 1, plus_infty, 0),
9937 TEST_if_f (jn, 1, -1.0, -0.440050585744933515959682203718914913L),
9938 TEST_if_f (jn, 1, 0.0, 0.0),
9939 TEST_if_f (jn, 1, 0.125L, 0.0623780091344946810942311355879361177L),
9940 TEST_if_f (jn, 1, 0.75L, 0.349243602174862192523281016426251335L),
9941 TEST_if_f (jn, 1, 1.0, 0.440050585744933515959682203718914913L),
9942 TEST_if_f (jn, 1, 1.5, 0.557936507910099641990121213156089400L),
9943 TEST_if_f (jn, 1, 2.0, 0.576724807756873387202448242269137087L),
9944 TEST_if_f (jn, 1, 8.0, 0.234636346853914624381276651590454612L),
9945 TEST_if_f (jn, 1, 10.0, 0.0434727461688614366697487680258592883L),
9946
9947 /* jn (3, x) */
9948 TEST_if_f (jn, 3, qnan_value, qnan_value),
9949 TEST_if_f (jn, 3, plus_infty, 0),
9950
9951 TEST_if_f (jn, 3, -1.0, -0.0195633539826684059189053216217515083L),
9952 TEST_if_f (jn, 3, 0.0, 0.0),
9953 TEST_if_f (jn, 3, 0.125L, 0.406503832554912875023029337653442868e-4L),
9954 TEST_if_f (jn, 3, 0.75L, 0.848438342327410884392755236884386804e-2L),
9955 TEST_if_f (jn, 3, 1.0, 0.0195633539826684059189053216217515083L),
9956 TEST_if_f (jn, 3, 2.0, 0.128943249474402051098793332969239835L),
9957 TEST_if_f (jn, 3, 10.0, 0.0583793793051868123429354784103409563L),
9958
9959 /* jn (10, x) */
9960 TEST_if_f (jn, 10, qnan_value, qnan_value),
9961 TEST_if_f (jn, 10, plus_infty, 0),
9962
9963 TEST_if_f (jn, 10, -1.0, 0.263061512368745320699785368779050294e-9L),
9964 TEST_if_f (jn, 10, 0.0, 0.0),
9965 TEST_if_f (jn, 10, 0.125L, 0.250543369809369890173993791865771547e-18L),
9966 TEST_if_f (jn, 10, 0.75L, 0.149621713117596814698712483621682835e-10L),
9967 TEST_if_f (jn, 10, 1.0, 0.263061512368745320699785368779050294e-9L),
9968 TEST_if_f (jn, 10, 2.0, 0.251538628271673670963516093751820639e-6L),
9969 TEST_if_f (jn, 10, 10.0, 0.207486106633358857697278723518753428L),
9970
9971 /* BZ #11589 .*/
9972 TEST_if_f (jn, 2, 2.4048255576957729L, 0.43175480701968038399746111312430703L),
9973 TEST_if_f (jn, 3, 2.4048255576957729L, 0.19899990535769083404042146764530813L),
9974 TEST_if_f (jn, 4, 2.4048255576957729L, 0.647466661641779720084932282551219891E-1L),
9975 TEST_if_f (jn, 5, 2.4048255576957729L, 0.163892432048058525099230549946147698E-1L),
9976 TEST_if_f (jn, 6, 2.4048255576957729L, 0.34048184720278336646673682895929161E-2L),
9977 TEST_if_f (jn, 7, 2.4048255576957729L, 0.60068836573295394221291569249883076E-3L),
9978 TEST_if_f (jn, 8, 2.4048255576957729L, 0.92165786705344923232879022467054148E-4L),
9979 TEST_if_f (jn, 9, 2.4048255576957729L, 0.12517270977961513005428966643852564E-4L),
9980
9981 /* Bug 14155: spurious exception may occur. */
9982 TEST_if_f (jn, 2, 0x1.ffff62p+99L, -4.43860668048170034334926693188979974489e-16L, UNDERFLOW_EXCEPTION_OK),
9983 END_DATA (jn)
9984 };
9985
9986 static void
9987 jn_test (void)
9988 {
9989 FLOAT s, c;
9990 errno = 0;
9991 FUNC (sincos) (0, &s, &c);
9992 if (errno == ENOSYS)
9993 /* Required function not implemented. */
9994 return;
9995 FUNC(jn) (1, 1);
9996 if (errno == ENOSYS)
9997 /* Function not implemented. */
9998 return;
9999
10000 START (jn);
10001 RUN_TEST_LOOP_if_f (jn, jn_test_data, );
10002 END (jn);
10003 }
10004
10005
10006 static void
10007 ldexp_test (void)
10008 {
10009 START (ldexp);
10010
10011 TEST_fi_f (ldexp, 0, 0, 0);
10012 TEST_fi_f (ldexp, minus_zero, 0, minus_zero);
10013
10014 TEST_fi_f (ldexp, plus_infty, 1, plus_infty);
10015 TEST_fi_f (ldexp, minus_infty, 1, minus_infty);
10016 TEST_fi_f (ldexp, qnan_value, 1, qnan_value);
10017
10018 TEST_fi_f (ldexp, 0.8L, 4, 12.8L);
10019 TEST_fi_f (ldexp, -0.854375L, 5, -27.34L);
10020
10021 /* ldexp (x, 0) == x. */
10022 TEST_fi_f (ldexp, 1.0L, 0L, 1.0L);
10023
10024 END (ldexp);
10025 }
10026
10027
10028 static void
10029 lgamma_test (void)
10030 {
10031 errno = 0;
10032 FUNC(lgamma) (0);
10033 if (errno == ENOSYS)
10034 /* Function not implemented. */
10035 return;
10036
10037 START (lgamma);
10038
10039 TEST_f_f1 (lgamma, plus_infty, plus_infty, 1);
10040 TEST_f_f1 (lgamma, 0, plus_infty, 1, DIVIDE_BY_ZERO_EXCEPTION);
10041 TEST_f_f1 (lgamma, minus_zero, plus_infty, -1, DIVIDE_BY_ZERO_EXCEPTION);
10042 TEST_f_f1 (lgamma, qnan_value, qnan_value, IGNORE);
10043
10044 /* lgamma (x) == +inf plus divide by zero exception for integer x <= 0. */
10045 TEST_f_f1 (lgamma, -3, plus_infty, IGNORE, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE);
10046 TEST_f_f1 (lgamma, minus_infty, plus_infty, IGNORE);
10047 TEST_f_f1 (lgamma, -max_value, plus_infty, IGNORE, DIVIDE_BY_ZERO_EXCEPTION);
10048 TEST_f_f1 (lgamma, max_value, plus_infty, 1, OVERFLOW_EXCEPTION);
10049
10050 TEST_f_f1 (lgamma, 1, 0, 1);
10051
10052 TEST_f_f1 (lgamma, 3, M_LN2l, 1);
10053
10054 TEST_f_f1 (lgamma, 0.5, M_LOG_SQRT_PIl, 1);
10055 TEST_f_f1 (lgamma, -0.5, M_LOG_2_SQRT_PIl, -1);
10056 TEST_f_f1 (lgamma, 0.7L, 0.260867246531666514385732417016759578L, 1);
10057 TEST_f_f1 (lgamma, 1.2L, -0.853740900033158497197028392998854470e-1L, 1);
10058
10059 END (lgamma);
10060 }
10061
10062
10063 static void
10064 lrint_test (void)
10065 {
10066 /* XXX this test is incomplete. We need to have a way to specifiy
10067 the rounding method and test the critical cases. So far, only
10068 unproblematic numbers are tested. */
10069 /* TODO: missing +/-Inf as well as qNaN tests. */
10070
10071 START (lrint);
10072
10073 TEST_f_l (lrint, 0.0, 0);
10074 TEST_f_l (lrint, minus_zero, 0);
10075 TEST_f_l (lrint, 0.2L, 0);
10076 TEST_f_l (lrint, -0.2L, 0);
10077
10078 TEST_f_l (lrint, 1.4L, 1);
10079 TEST_f_l (lrint, -1.4L, -1);
10080
10081 TEST_f_l (lrint, 8388600.3L, 8388600);
10082 TEST_f_l (lrint, -8388600.3L, -8388600);
10083
10084 TEST_f_l (lrint, 1071930.0008, 1071930);
10085 #ifndef TEST_FLOAT
10086 TEST_f_l (lrint, 1073741824.01, 1073741824);
10087 # if LONG_MAX > 281474976710656
10088 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
10089 # endif
10090 #endif
10091
10092 END (lrint);
10093 }
10094
10095
10096 static void
10097 lrint_test_tonearest (void)
10098 {
10099 int save_round_mode;
10100 START (lrint_tonearest);
10101
10102 save_round_mode = fegetround ();
10103
10104 if (!fesetround (FE_TONEAREST))
10105 {
10106 TEST_f_l (lrint, 0.0, 0);
10107 TEST_f_l (lrint, minus_zero, 0);
10108 TEST_f_l (lrint, 0.2L, 0);
10109 TEST_f_l (lrint, -0.2L, 0);
10110 TEST_f_l (lrint, 0.5L, 0);
10111 TEST_f_l (lrint, -0.5L, 0);
10112 TEST_f_l (lrint, 0.8L, 1);
10113 TEST_f_l (lrint, -0.8L, -1);
10114
10115 TEST_f_l (lrint, 1.4L, 1);
10116 TEST_f_l (lrint, -1.4L, -1);
10117
10118 TEST_f_l (lrint, 8388600.3L, 8388600);
10119 TEST_f_l (lrint, -8388600.3L, -8388600);
10120
10121 TEST_f_l (lrint, 1071930.0008, 1071930);
10122 #ifndef TEST_FLOAT
10123 TEST_f_l (lrint, 1073741824.01, 1073741824);
10124 # if LONG_MAX > 281474976710656
10125 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
10126 # endif
10127 #endif
10128 }
10129
10130 fesetround (save_round_mode);
10131
10132 END (lrint_tonearest);
10133 }
10134
10135
10136 static void
10137 lrint_test_towardzero (void)
10138 {
10139 int save_round_mode;
10140 START (lrint_towardzero);
10141
10142 save_round_mode = fegetround ();
10143
10144 if (!fesetround (FE_TOWARDZERO))
10145 {
10146 TEST_f_l (lrint, 0.0, 0);
10147 TEST_f_l (lrint, minus_zero, 0);
10148 TEST_f_l (lrint, 0.2L, 0);
10149 TEST_f_l (lrint, -0.2L, 0);
10150 TEST_f_l (lrint, 0.5L, 0);
10151 TEST_f_l (lrint, -0.5L, 0);
10152 TEST_f_l (lrint, 0.8L, 0);
10153 TEST_f_l (lrint, -0.8L, 0);
10154
10155 TEST_f_l (lrint, 1.4L, 1);
10156 TEST_f_l (lrint, -1.4L, -1);
10157
10158 TEST_f_l (lrint, 8388600.3L, 8388600);
10159 TEST_f_l (lrint, -8388600.3L, -8388600);
10160
10161 TEST_f_l (lrint, 1071930.0008, 1071930);
10162 #ifndef TEST_FLOAT
10163 TEST_f_l (lrint, 1073741824.01, 1073741824);
10164 # if LONG_MAX > 281474976710656
10165 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
10166 # endif
10167 #endif
10168 }
10169
10170 fesetround (save_round_mode);
10171
10172 END (lrint_towardzero);
10173 }
10174
10175
10176 static void
10177 lrint_test_downward (void)
10178 {
10179 int save_round_mode;
10180 START (lrint_downward);
10181
10182 save_round_mode = fegetround ();
10183
10184 if (!fesetround (FE_DOWNWARD))
10185 {
10186 TEST_f_l (lrint, 0.0, 0);
10187 TEST_f_l (lrint, minus_zero, 0);
10188 TEST_f_l (lrint, 0.2L, 0);
10189 TEST_f_l (lrint, -0.2L, -1);
10190 TEST_f_l (lrint, 0.5L, 0);
10191 TEST_f_l (lrint, -0.5L, -1);
10192 TEST_f_l (lrint, 0.8L, 0);
10193 TEST_f_l (lrint, -0.8L, -1);
10194
10195 TEST_f_l (lrint, 1.4L, 1);
10196 TEST_f_l (lrint, -1.4L, -2);
10197
10198 TEST_f_l (lrint, 8388600.3L, 8388600);
10199 TEST_f_l (lrint, -8388600.3L, -8388601);
10200
10201 TEST_f_l (lrint, 1071930.0008, 1071930);
10202 #ifndef TEST_FLOAT
10203 TEST_f_l (lrint, 1073741824.01, 1073741824);
10204 # if LONG_MAX > 281474976710656
10205 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
10206 # endif
10207 #endif
10208 }
10209
10210 fesetround (save_round_mode);
10211
10212 END (lrint_downward);
10213 }
10214
10215
10216 static void
10217 lrint_test_upward (void)
10218 {
10219 int save_round_mode;
10220 START (lrint_upward);
10221
10222 save_round_mode = fegetround ();
10223
10224 if (!fesetround (FE_UPWARD))
10225 {
10226 TEST_f_l (lrint, 0.0, 0);
10227 TEST_f_l (lrint, minus_zero, 0);
10228 TEST_f_l (lrint, 0.2L, 1);
10229 TEST_f_l (lrint, -0.2L, 0);
10230 TEST_f_l (lrint, 0.5L, 1);
10231 TEST_f_l (lrint, -0.5L, 0);
10232 TEST_f_l (lrint, 0.8L, 1);
10233 TEST_f_l (lrint, -0.8L, 0);
10234
10235 TEST_f_l (lrint, 1.4L, 2);
10236 TEST_f_l (lrint, -1.4L, -1);
10237
10238 TEST_f_l (lrint, 8388600.3L, 8388601);
10239 TEST_f_l (lrint, -8388600.3L, -8388600);
10240
10241 #ifndef TEST_FLOAT
10242 TEST_f_l (lrint, 1071930.0008, 1071931);
10243 TEST_f_l (lrint, 1073741824.01, 1073741825);
10244 # if LONG_MAX > 281474976710656 && defined (TEST_LDOUBLE)
10245 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
10246 # endif
10247 #endif
10248 }
10249
10250 fesetround (save_round_mode);
10251
10252 END (lrint_upward);
10253 }
10254
10255
10256 static void
10257 llrint_test (void)
10258 {
10259 /* XXX this test is incomplete. We need to have a way to specifiy
10260 the rounding method and test the critical cases. So far, only
10261 unproblematic numbers are tested. */
10262 /* TODO: missing +/-Inf as well as qNaN tests. */
10263
10264 START (llrint);
10265
10266 TEST_f_L (llrint, 0.0, 0);
10267 TEST_f_L (llrint, minus_zero, 0);
10268 TEST_f_L (llrint, 0.2L, 0);
10269 TEST_f_L (llrint, -0.2L, 0);
10270
10271 TEST_f_L (llrint, 1.4L, 1);
10272 TEST_f_L (llrint, -1.4L, -1);
10273
10274 TEST_f_L (llrint, 8388600.3L, 8388600);
10275 TEST_f_L (llrint, -8388600.3L, -8388600);
10276
10277 TEST_f_l (llrint, 1071930.0008, 1071930);
10278
10279 /* Test boundary conditions. */
10280 /* 0x1FFFFF */
10281 TEST_f_L (llrint, 2097151.0,2097151LL);
10282 /* 0x800000 */
10283 TEST_f_L (llrint, 8388608.0, 8388608LL);
10284 /* 0x1000000 */
10285 TEST_f_L (llrint, 16777216.0, 16777216LL);
10286 /* 0x20000000000 */
10287 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10288 /* 0x40000000000 */
10289 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
10290 /* 0x1000000000000 */
10291 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
10292 /* 0x10000000000000 */
10293 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10294 /* 0x10000080000000 */
10295 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10296 /* 0x20000000000000 */
10297 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10298 /* 0x80000000000000 */
10299 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10300 /* 0x100000000000000 */
10301 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
10302 #ifdef TEST_LDOUBLE
10303 /* The input can only be represented in long double. */
10304 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370496LL);
10305 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370496LL);
10306 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370496LL);
10307 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370497LL);
10308 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370498LL);
10309
10310 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370496LL);
10311 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370496LL);
10312 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370496LL);
10313 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370497LL);
10314 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370498LL);
10315
10316 # if LDBL_MANT_DIG > 100
10317 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370495LL);
10318 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370496LL);
10319 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370497LL);
10320 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370495LL);
10321 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370496LL);
10322 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370497LL);
10323
10324 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370495LL);
10325 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370496LL);
10326 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370497LL);
10327 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370495LL);
10328 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370496LL);
10329 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370497LL);
10330 #endif
10331
10332 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740992LL);
10333 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740992LL);
10334 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740992LL);
10335 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740993LL);
10336 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740994LL);
10337
10338 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740992LL);
10339 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740992LL);
10340 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740992LL);
10341 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740993LL);
10342 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740994LL);
10343
10344 # if LDBL_MANT_DIG > 100
10345 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740991LL);
10346 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740992LL);
10347 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740993LL);
10348 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740992LL);
10349 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740993LL);
10350 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740994LL);
10351
10352 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740991LL);
10353 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740992LL);
10354 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740993LL);
10355 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740992LL);
10356 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740993LL);
10357 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740994LL);
10358 #endif
10359
10360 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927936LL);
10361 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927936LL);
10362 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927936LL);
10363 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927937LL);
10364 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927938LL);
10365
10366 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927936LL);
10367 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927936LL);
10368 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927936LL);
10369 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927937LL);
10370 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927938LL);
10371
10372 # if LDBL_MANT_DIG > 100
10373 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775806LL);
10374 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775806LL);
10375 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
10376 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
10377 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775806LL);
10378 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775806LL);
10379 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775806L);
10380 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775806LL);
10381 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775807LL);
10382 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775807LL);
10383 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
10384 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
10385 # endif
10386 #endif
10387
10388 END (llrint);
10389 }
10390
10391 static void
10392 llrint_test_tonearest (void)
10393 {
10394 int save_round_mode;
10395 START (llrint_tonearest);
10396
10397 save_round_mode = fegetround ();
10398
10399 if (!fesetround (FE_TONEAREST))
10400 {
10401 TEST_f_L (llrint, 0.0, 0);
10402 TEST_f_L (llrint, minus_zero, 0);
10403 TEST_f_L (llrint, 0.2L, 0);
10404 TEST_f_L (llrint, -0.2L, 0);
10405
10406 TEST_f_L (llrint, 1.4L, 1);
10407 TEST_f_L (llrint, -1.4L, -1);
10408
10409 TEST_f_L (llrint, 8388600.3L, 8388600);
10410 TEST_f_L (llrint, -8388600.3L, -8388600);
10411
10412 TEST_f_l (llrint, 1071930.0008, 1071930);
10413
10414 /* Test boundary conditions. */
10415 /* 0x1FFFFF */
10416 TEST_f_L (llrint, 2097151.0,2097151LL);
10417 /* 0x800000 */
10418 TEST_f_L (llrint, 8388608.0, 8388608LL);
10419 /* 0x1000000 */
10420 TEST_f_L (llrint, 16777216.0, 16777216LL);
10421 /* 0x20000000000 */
10422 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10423 /* 0x40000000000 */
10424 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
10425 /* 0x1000000000000 */
10426 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
10427 /* 0x10000000000000 */
10428 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10429 /* 0x10000080000000 */
10430 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10431 /* 0x20000000000000 */
10432 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10433 /* 0x80000000000000 */
10434 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10435 /* 0x100000000000000 */
10436 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
10437 #ifdef TEST_LDOUBLE
10438 /* The input can only be represented in long double. */
10439 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370496LL);
10440 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370496LL);
10441 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370496LL);
10442 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370497LL);
10443 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370498LL);
10444
10445 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370496LL);
10446 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370496LL);
10447 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370496LL);
10448 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370497LL);
10449 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370498LL);
10450
10451 # if LDBL_MANT_DIG > 100
10452 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370495LL);
10453 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370496LL);
10454 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370497LL);
10455 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370495LL);
10456 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370496LL);
10457 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370497LL);
10458
10459 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370495LL);
10460 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370496LL);
10461 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370497LL);
10462 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370495LL);
10463 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370496LL);
10464 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370497LL);
10465 #endif
10466
10467 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740992LL);
10468 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740992LL);
10469 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740992LL);
10470 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740993LL);
10471 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740994LL);
10472
10473 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740992LL);
10474 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740992LL);
10475 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740992LL);
10476 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740993LL);
10477 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740994LL);
10478
10479 # if LDBL_MANT_DIG > 100
10480 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740991LL);
10481 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740992LL);
10482 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740993LL);
10483 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740992LL);
10484 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740993LL);
10485 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740994LL);
10486
10487 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740991LL);
10488 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740992LL);
10489 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740993LL);
10490 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740992LL);
10491 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740993LL);
10492 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740994LL);
10493 #endif
10494
10495 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927936LL);
10496 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927936LL);
10497 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927936LL);
10498 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927937LL);
10499 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927938LL);
10500
10501 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927936LL);
10502 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927936LL);
10503 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927936LL);
10504 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927937LL);
10505 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927938LL);
10506
10507 # if LDBL_MANT_DIG > 100
10508 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775806LL);
10509 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775806LL);
10510 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
10511 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
10512 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775806LL);
10513 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775806LL);
10514 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775806L);
10515 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775806LL);
10516 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775807LL);
10517 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775807LL);
10518 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
10519 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
10520 # endif
10521 #endif
10522 }
10523
10524 fesetround (save_round_mode);
10525
10526 END (llrint_tonearest);
10527 }
10528
10529 static void
10530 llrint_test_towardzero (void)
10531 {
10532 int save_round_mode;
10533 START (llrint_towardzero);
10534
10535 save_round_mode = fegetround ();
10536
10537 if (!fesetround (FE_TOWARDZERO))
10538 {
10539 TEST_f_L (llrint, 0.0, 0);
10540 TEST_f_L (llrint, minus_zero, 0);
10541 TEST_f_L (llrint, 0.2L, 0);
10542 TEST_f_L (llrint, -0.2L, 0);
10543
10544 TEST_f_L (llrint, 1.4L, 1);
10545 TEST_f_L (llrint, -1.4L, -1);
10546
10547 TEST_f_L (llrint, 8388600.3L, 8388600);
10548 TEST_f_L (llrint, -8388600.3L, -8388600);
10549
10550 TEST_f_l (llrint, 1071930.0008, 1071930);
10551
10552 /* Test boundary conditions. */
10553 /* 0x1FFFFF */
10554 TEST_f_L (llrint, 2097151.0,2097151LL);
10555 /* 0x800000 */
10556 TEST_f_L (llrint, 8388608.0, 8388608LL);
10557 /* 0x1000000 */
10558 TEST_f_L (llrint, 16777216.0, 16777216LL);
10559 /* 0x20000000000 */
10560 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10561 /* 0x40000000000 */
10562 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
10563 /* 0x1000000000000 */
10564 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
10565 /* 0x10000000000000 */
10566 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10567 /* 0x10000080000000 */
10568 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10569 /* 0x20000000000000 */
10570 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10571 /* 0x80000000000000 */
10572 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10573 /* 0x100000000000000 */
10574 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
10575 #ifdef TEST_LDOUBLE
10576 /* The input can only be represented in long double. */
10577 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370495LL);
10578 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370496LL);
10579 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370496LL);
10580 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370496LL);
10581 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370497LL);
10582
10583 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370495LL);
10584 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370496LL);
10585 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370496LL);
10586 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370496LL);
10587 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370497LL);
10588
10589 # if LDBL_MANT_DIG > 100
10590 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370495LL);
10591 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370496LL);
10592 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370497LL);
10593 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370494LL);
10594 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370495LL);
10595 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370496LL);
10596
10597 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370495LL);
10598 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370496LL);
10599 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370497LL);
10600 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370494LL);
10601 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370495LL);
10602 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370496LL);
10603 #endif
10604
10605 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740991LL);
10606 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740992LL);
10607 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740992LL);
10608 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740992LL);
10609 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740993LL);
10610
10611 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740991LL);
10612 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740992LL);
10613 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740992LL);
10614 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740992LL);
10615 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740993LL);
10616
10617 # if LDBL_MANT_DIG > 100
10618 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740991LL);
10619 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740992LL);
10620 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740993LL);
10621 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740991LL);
10622 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740992LL);
10623 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740993LL);
10624
10625 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740991LL);
10626 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740992LL);
10627 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740993LL);
10628 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740991LL);
10629 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740992LL);
10630 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740993LL);
10631 #endif
10632
10633 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927935LL);
10634 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927936LL);
10635 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927936LL);
10636 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927936LL);
10637 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927937LL);
10638
10639 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927935LL);
10640 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927936LL);
10641 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927936LL);
10642 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927936LL);
10643 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927937LL);
10644
10645 # if LDBL_MANT_DIG > 100
10646 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775805LL);
10647 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775805LL);
10648 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
10649 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
10650 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775806LL);
10651 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775806LL);
10652 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775806L);
10653 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775806LL);
10654 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775806LL);
10655 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775806LL);
10656 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
10657 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
10658 # endif
10659 #endif
10660 }
10661
10662 fesetround (save_round_mode);
10663
10664 END (llrint_towardzero);
10665 }
10666
10667 static void
10668 llrint_test_downward (void)
10669 {
10670 int save_round_mode;
10671 START (llrint_downward);
10672
10673 save_round_mode = fegetround ();
10674
10675 if (!fesetround (FE_DOWNWARD))
10676 {
10677 TEST_f_L (llrint, 0.0, 0);
10678 TEST_f_L (llrint, minus_zero, 0);
10679 TEST_f_L (llrint, 0.2L, 0);
10680 TEST_f_L (llrint, -0.2L, -1);
10681
10682 TEST_f_L (llrint, 1.4L, 1);
10683 TEST_f_L (llrint, -1.4L, -2);
10684
10685 TEST_f_L (llrint, 8388600.3L, 8388600);
10686 TEST_f_L (llrint, -8388600.3L, -8388601);
10687
10688 TEST_f_l (llrint, 1071930.0008, 1071930);
10689
10690 /* Test boundary conditions. */
10691 /* 0x1FFFFF */
10692 TEST_f_L (llrint, 2097151.0,2097151LL);
10693 /* 0x800000 */
10694 TEST_f_L (llrint, 8388608.0, 8388608LL);
10695 /* 0x1000000 */
10696 TEST_f_L (llrint, 16777216.0, 16777216LL);
10697 /* 0x20000000000 */
10698 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10699 /* 0x40000000000 */
10700 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
10701 /* 0x1000000000000 */
10702 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
10703 /* 0x10000000000000 */
10704 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10705 /* 0x10000080000000 */
10706 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10707 /* 0x20000000000000 */
10708 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10709 /* 0x80000000000000 */
10710 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10711 /* 0x100000000000000 */
10712 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
10713 #ifdef TEST_LDOUBLE
10714 /* The input can only be represented in long double. */
10715 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370495LL);
10716 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370496LL);
10717 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370496LL);
10718 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370496LL);
10719 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370497LL);
10720
10721 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370495LL);
10722 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370496LL);
10723 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370497LL);
10724 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370494LL);
10725 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370495LL);
10726 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370496LL);
10727
10728 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370496LL);
10729 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370497LL);
10730 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370497LL);
10731 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370497LL);
10732 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370498LL);
10733
10734 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370496LL);
10735 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370497LL);
10736 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370498LL);
10737 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370495LL);
10738 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370496LL);
10739 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370497LL);
10740
10741 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740991LL);
10742 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740992LL);
10743 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740992LL);
10744 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740992LL);
10745 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740993LL);
10746
10747 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740991LL);
10748 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740992LL);
10749 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740993LL);
10750 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740991LL);
10751 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740992LL);
10752 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740993LL);
10753
10754 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740992LL);
10755 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740993LL);
10756 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740993LL);
10757 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740993LL);
10758 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740994LL);
10759
10760 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740992LL);
10761 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740993LL);
10762 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740994LL);
10763 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740992LL);
10764 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740993LL);
10765 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740994LL);
10766
10767 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927935LL);
10768 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927936LL);
10769 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927936LL);
10770 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927936LL);
10771 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927937LL);
10772
10773 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927936LL);
10774 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927937LL);
10775 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927937LL);
10776 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927937LL);
10777 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927938LL);
10778
10779 # if LDBL_MANT_DIG > 100
10780 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775805LL);
10781 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775806LL);
10782 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
10783 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
10784 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775806LL);
10785 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775807LL);
10786 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775806L);
10787 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775807LL);
10788 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775806LL);
10789 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775807LL);
10790 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
10791 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
10792 # endif
10793 #endif
10794 }
10795
10796 fesetround (save_round_mode);
10797
10798 END (llrint_downward);
10799 }
10800
10801 static void
10802 llrint_test_upward (void)
10803 {
10804 int save_round_mode;
10805 START (llrint_upward);
10806
10807 save_round_mode = fegetround ();
10808
10809 if (!fesetround (FE_UPWARD))
10810 {
10811 TEST_f_L (llrint, 0.0, 0);
10812 TEST_f_L (llrint, minus_zero, 0);
10813 TEST_f_L (llrint, 0.2L, 1);
10814 TEST_f_L (llrint, -0.2L, 0);
10815
10816 TEST_f_L (llrint, 1.4L, 2);
10817 TEST_f_L (llrint, -1.4L, -1);
10818
10819 TEST_f_L (llrint, 8388600.3L, 8388601);
10820 TEST_f_L (llrint, -8388600.3L, -8388600);
10821 #ifndef TEST_FLOAT
10822 TEST_f_l (llrint, 1071930.0008, 1071931);
10823 #endif
10824 /* Test boundary conditions. */
10825 /* 0x1FFFFF */
10826 TEST_f_L (llrint, 2097151.0,2097151LL);
10827 /* 0x800000 */
10828 TEST_f_L (llrint, 8388608.0, 8388608LL);
10829 /* 0x1000000 */
10830 TEST_f_L (llrint, 16777216.0, 16777216LL);
10831 /* 0x20000000000 */
10832 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10833 /* 0x40000000000 */
10834 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
10835 /* 0x1000000000000 */
10836 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
10837 /* 0x10000000000000 */
10838 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10839 /* 0x10000080000000 */
10840 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10841 /* 0x20000000000000 */
10842 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10843 /* 0x80000000000000 */
10844 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10845 /* 0x100000000000000 */
10846 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
10847 #ifdef TEST_LDOUBLE
10848 /* The input can only be represented in long double. */
10849 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370496LL);
10850 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370497LL);
10851 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370497LL);
10852 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370497LL);
10853 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370498LL);
10854
10855 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370496LL);
10856 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370497LL);
10857 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370498LL);
10858 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370495LL);
10859 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370496LL);
10860 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370497LL);
10861
10862 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370495LL);
10863 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370496LL);
10864 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370496LL);
10865 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370496LL);
10866 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370497LL);
10867
10868 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370495LL);
10869 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370496LL);
10870 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370497LL);
10871 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370494LL);
10872 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370495LL);
10873 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370496LL);
10874
10875 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740992LL);
10876 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740993LL);
10877 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740993LL);
10878 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740993LL);
10879 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740994LL);
10880
10881 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740992LL);
10882 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740993LL);
10883 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740994LL);
10884 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740992LL);
10885 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740993LL);
10886 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740994LL);
10887
10888 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740991LL);
10889 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740992LL);
10890 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740992LL);
10891 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740992LL);
10892 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740993LL);
10893
10894 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740991LL);
10895 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740992LL);
10896 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740993LL);
10897 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740991LL);
10898 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740992LL);
10899 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740993LL);
10900
10901 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927936LL);
10902 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927937LL);
10903 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927937LL);
10904 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927937LL);
10905 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927938LL);
10906
10907 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927935LL);
10908 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927936LL);
10909 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927936LL);
10910 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927936LL);
10911 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927937LL);
10912
10913 # if LDBL_MANT_DIG > 100
10914 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775806LL);
10915 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775805LL);
10916 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
10917 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
10918 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775807LL);
10919 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775806LL);
10920 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775807L);
10921 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775806LL);
10922 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775807LL);
10923 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775806LL);
10924 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
10925 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
10926 # endif
10927 #endif
10928 }
10929
10930 fesetround (save_round_mode);
10931
10932 END (llrint_upward);
10933 }
10934
10935
10936 static const struct test_f_f_data log_test_data[] =
10937 {
10938 START_DATA (log),
10939 TEST_f_f (log, 0, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
10940 TEST_f_f (log, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
10941
10942 TEST_f_f (log, 1, 0),
10943
10944 TEST_f_f (log, -1, qnan_value, INVALID_EXCEPTION),
10945 TEST_f_f (log, -max_value, qnan_value, INVALID_EXCEPTION),
10946 TEST_f_f (log, minus_infty, qnan_value, INVALID_EXCEPTION),
10947 TEST_f_f (log, plus_infty, plus_infty),
10948 TEST_f_f (log, qnan_value, qnan_value),
10949
10950 TEST_f_f (log, M_El, 1),
10951 TEST_f_f (log, M_1_DIV_El, -1),
10952 TEST_f_f (log, 2, M_LN2l),
10953 TEST_f_f (log, 10, M_LN10l),
10954 TEST_f_f (log, 0.75L, -0.287682072451780927439219005993827432L),
10955 END_DATA (log)
10956 };
10957
10958 static void
10959 log_test (void)
10960 {
10961 errno = 0;
10962 FUNC(log) (1);
10963 if (errno == ENOSYS)
10964 /* Function not implemented. */
10965 return;
10966 START (log);
10967 RUN_TEST_LOOP_f_f (log, log_test_data, );
10968 END (log);
10969 }
10970
10971
10972 static const struct test_f_f_data log10_test_data[] =
10973 {
10974 START_DATA (log10),
10975 TEST_f_f (log10, 0, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
10976 TEST_f_f (log10, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
10977
10978 TEST_f_f (log10, 1, 0),
10979
10980 /* log10 (x) == qNaN plus invalid exception if x < 0. */
10981 TEST_f_f (log10, -1, qnan_value, INVALID_EXCEPTION),
10982 TEST_f_f (log10, -max_value, qnan_value, INVALID_EXCEPTION),
10983 TEST_f_f (log10, minus_infty, qnan_value, INVALID_EXCEPTION),
10984
10985 TEST_f_f (log10, plus_infty, plus_infty),
10986 TEST_f_f (log10, qnan_value, qnan_value),
10987
10988 TEST_f_f (log10, 0.1L, -1),
10989 TEST_f_f (log10, 10.0, 1),
10990 TEST_f_f (log10, 100.0, 2),
10991 TEST_f_f (log10, 10000.0, 4),
10992 TEST_f_f (log10, M_El, M_LOG10El),
10993 TEST_f_f (log10, 0.75L, -0.124938736608299953132449886193870744L),
10994 END_DATA (log10)
10995 };
10996
10997 static void
10998 log10_test (void)
10999 {
11000 errno = 0;
11001 FUNC(log10) (1);
11002 if (errno == ENOSYS)
11003 /* Function not implemented. */
11004 return;
11005
11006 START (log10);
11007 RUN_TEST_LOOP_f_f (log10, log10_test_data, );
11008 END (log10);
11009 }
11010
11011
11012 static const struct test_f_f_data log1p_test_data[] =
11013 {
11014 START_DATA (log1p),
11015 TEST_f_f (log1p, 0, 0),
11016 TEST_f_f (log1p, minus_zero, minus_zero),
11017
11018 TEST_f_f (log1p, -1, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11019 TEST_f_f (log1p, -2, qnan_value, INVALID_EXCEPTION),
11020 TEST_f_f (log1p, -max_value, qnan_value, INVALID_EXCEPTION),
11021 TEST_f_f (log1p, minus_infty, qnan_value, INVALID_EXCEPTION),
11022
11023 TEST_f_f (log1p, plus_infty, plus_infty),
11024 TEST_f_f (log1p, qnan_value, qnan_value),
11025
11026 TEST_f_f (log1p, M_El - 1.0, 1),
11027
11028 TEST_f_f (log1p, -0.25L, -0.287682072451780927439219005993827432L),
11029 TEST_f_f (log1p, -0.875, -2.07944154167983592825169636437452970L),
11030 END_DATA (log1p)
11031 };
11032
11033 static void
11034 log1p_test (void)
11035 {
11036 errno = 0;
11037 FUNC(log1p) (0);
11038 if (errno == ENOSYS)
11039 /* Function not implemented. */
11040 return;
11041
11042 START (log1p);
11043 RUN_TEST_LOOP_f_f (log1p, log1p_test_data, );
11044 END (log1p);
11045 }
11046
11047
11048 static const struct test_f_f_data log2_test_data[] =
11049 {
11050 START_DATA (log2),
11051 TEST_f_f (log2, 0, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11052 TEST_f_f (log2, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11053
11054 TEST_f_f (log2, 1, 0),
11055
11056 TEST_f_f (log2, -1, qnan_value, INVALID_EXCEPTION),
11057 TEST_f_f (log2, -max_value, qnan_value, INVALID_EXCEPTION),
11058 TEST_f_f (log2, minus_infty, qnan_value, INVALID_EXCEPTION),
11059
11060 TEST_f_f (log2, plus_infty, plus_infty),
11061 TEST_f_f (log2, qnan_value, qnan_value),
11062
11063 TEST_f_f (log2, M_El, M_LOG2El),
11064 TEST_f_f (log2, 2.0, 1),
11065 TEST_f_f (log2, 16.0, 4),
11066 TEST_f_f (log2, 256.0, 8),
11067 TEST_f_f (log2, 0.75L, -.415037499278843818546261056052183492L),
11068 END_DATA (log2)
11069 };
11070
11071 static void
11072 log2_test (void)
11073 {
11074 errno = 0;
11075 FUNC(log2) (1);
11076 if (errno == ENOSYS)
11077 /* Function not implemented. */
11078 return;
11079
11080 START (log2);
11081 RUN_TEST_LOOP_f_f (log2, log2_test_data, );
11082 END (log2);
11083 }
11084
11085
11086 static const struct test_f_f_data logb_test_data[] =
11087 {
11088 START_DATA (logb),
11089 TEST_f_f (logb, plus_infty, plus_infty),
11090 TEST_f_f (logb, minus_infty, plus_infty),
11091
11092 TEST_f_f (logb, 0, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11093
11094 TEST_f_f (logb, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11095 TEST_f_f (logb, qnan_value, qnan_value),
11096
11097 TEST_f_f (logb, 1, 0),
11098 TEST_f_f (logb, M_El, 1),
11099 TEST_f_f (logb, 1024, 10),
11100 TEST_f_f (logb, -2000, 10),
11101
11102 TEST_f_f (logb, 0x0.1p-127, -131),
11103 TEST_f_f (logb, 0x0.01p-127, -135),
11104 TEST_f_f (logb, 0x0.011p-127, -135),
11105 #ifndef TEST_FLOAT
11106 TEST_f_f (logb, 0x0.8p-1022, -1023),
11107 TEST_f_f (logb, 0x0.1p-1022, -1026),
11108 TEST_f_f (logb, 0x0.00111p-1022, -1034),
11109 TEST_f_f (logb, 0x0.00001p-1022, -1042),
11110 TEST_f_f (logb, 0x0.000011p-1022, -1042),
11111 TEST_f_f (logb, 0x0.0000000000001p-1022, -1074),
11112 #endif
11113 #if defined TEST_LDOUBLE && LDBL_MIN_EXP - LDBL_MANT_DIG <= -16400
11114 TEST_f_f (logb, 0x1p-16400L, -16400),
11115 TEST_f_f (logb, 0x.00000000001p-16382L, -16426),
11116 #endif
11117 END_DATA (logb)
11118 };
11119
11120 static void
11121 logb_test (void)
11122 {
11123 START (logb);
11124 RUN_TEST_LOOP_f_f (logb, logb_test_data, );
11125 END (logb);
11126 }
11127
11128 static const struct test_f_f_data logb_downward_test_data[] =
11129 {
11130 START_DATA (logb_downward),
11131 /* IEEE 754-2008 says (section 5.3.3) that "logB(1) is +0.". Libm
11132 should not return -0 from logb in any rounding mode. PowerPC32 has
11133 failed with this test for power4 logb (and logbl on all PowerPC
11134 platforms) in the past due to instruction selection. GCC PR 52775
11135 provides the availability of the fcfid insn in 32-bit mode which
11136 eliminates the use of fsub in this instance and prevents the negative
11137 signed 0.0. */
11138
11139 /* BZ #887 */
11140 TEST_f_f (logb, 1.000e+0, plus_zero),
11141 END_DATA (logb_downward)
11142 };
11143
11144 static void
11145 logb_test_downward (void)
11146 {
11147 errno = 0;
11148
11149 FUNC(logb) (0);
11150 if (errno == ENOSYS)
11151 /* Function not implemented. */
11152 return;
11153
11154 START (logb_downward);
11155 RUN_TEST_LOOP_f_f (logb, logb_downward_test_data, FE_DOWNWARD);
11156 END (logb_downward);
11157 }
11158
11159 static void
11160 lround_test (void)
11161 {
11162 /* TODO: missing +/-Inf as well as qNaN tests. */
11163
11164 START (lround);
11165
11166 TEST_f_l (lround, 0, 0);
11167 TEST_f_l (lround, minus_zero, 0);
11168 TEST_f_l (lround, 0.2L, 0.0);
11169 TEST_f_l (lround, -0.2L, 0);
11170 TEST_f_l (lround, 0.5, 1);
11171 TEST_f_l (lround, -0.5, -1);
11172 TEST_f_l (lround, 0.8L, 1);
11173 TEST_f_l (lround, -0.8L, -1);
11174 TEST_f_l (lround, 1.5, 2);
11175 TEST_f_l (lround, -1.5, -2);
11176 TEST_f_l (lround, 22514.5, 22515);
11177 TEST_f_l (lround, -22514.5, -22515);
11178 TEST_f_l (lround, 1071930.0008, 1071930);
11179 #ifndef TEST_FLOAT
11180 TEST_f_l (lround, 1073741824.01, 1073741824);
11181 # if LONG_MAX > 281474976710656
11182 TEST_f_l (lround, 281474976710656.025, 281474976710656);
11183 TEST_f_l (lround, 18014398509481974, 18014398509481974);
11184 # endif
11185 TEST_f_l (lround, 2097152.5, 2097153);
11186 TEST_f_l (lround, -2097152.5, -2097153);
11187 /* nextafter(0.5,-1) */
11188 TEST_f_l (lround, 0x1.fffffffffffffp-2, 0);
11189 /* nextafter(-0.5,1) */
11190 TEST_f_l (lround, -0x1.fffffffffffffp-2, 0);
11191 #else
11192 /* nextafter(0.5,-1) */
11193 TEST_f_l (lround, 0x1.fffffp-2, 0);
11194 /* nextafter(-0.5,1) */
11195 TEST_f_l (lround, -0x1.fffffp-2, 0);
11196 TEST_f_l (lround, 0x1.fffffep+23, 16777215);
11197 TEST_f_l (lround, -0x1.fffffep+23, -16777215);
11198 #endif
11199 END (lround);
11200 }
11201
11202
11203 static void
11204 llround_test (void)
11205 {
11206 /* TODO: missing +/-Inf as well as qNaN tests. */
11207
11208 START (llround);
11209
11210 TEST_f_L (llround, 0, 0);
11211 TEST_f_L (llround, minus_zero, 0);
11212 TEST_f_L (llround, 0.2L, 0.0);
11213 TEST_f_L (llround, -0.2L, 0);
11214 TEST_f_L (llround, 0.5, 1);
11215 TEST_f_L (llround, -0.5, -1);
11216 TEST_f_L (llround, 0.8L, 1);
11217 TEST_f_L (llround, -0.8L, -1);
11218 TEST_f_L (llround, 1.5, 2);
11219 TEST_f_L (llround, -1.5, -2);
11220 TEST_f_L (llround, 22514.5, 22515);
11221 TEST_f_L (llround, -22514.5, -22515);
11222 TEST_f_l (llround, 1071930.0008, 1071930);
11223 #ifndef TEST_FLOAT
11224 TEST_f_L (llround, 2097152.5, 2097153);
11225 TEST_f_L (llround, -2097152.5, -2097153);
11226 TEST_f_L (llround, 34359738368.5, 34359738369ll);
11227 TEST_f_L (llround, -34359738368.5, -34359738369ll);
11228 TEST_f_L (llround, -3.65309740835E17, -365309740835000000LL);
11229 #endif
11230
11231 /* Test boundary conditions. */
11232 /* 0x1FFFFF */
11233 TEST_f_L (llround, 2097151.0, 2097151LL);
11234 /* 0x800000 */
11235 TEST_f_L (llround, 8388608.0, 8388608LL);
11236 /* 0x1000000 */
11237 TEST_f_L (llround, 16777216.0, 16777216LL);
11238 /* 0x20000000000 */
11239 TEST_f_L (llround, 2199023255552.0, 2199023255552LL);
11240 /* 0x40000000000 */
11241 TEST_f_L (llround, 4398046511104.0, 4398046511104LL);
11242 /* 0x1000000000000 */
11243 TEST_f_L (llround, 281474976710656.0, 281474976710656LL);
11244 /* 0x10000000000000 */
11245 TEST_f_L (llround, 4503599627370496.0, 4503599627370496LL);
11246 /* 0x10000080000000 */
11247 TEST_f_L (llround, 4503601774854144.0, 4503601774854144LL);
11248 /* 0x20000000000000 */
11249 TEST_f_L (llround, 9007199254740992.0, 9007199254740992LL);
11250 /* 0x80000000000000 */
11251 TEST_f_L (llround, 36028797018963968.0, 36028797018963968LL);
11252 /* 0x100000000000000 */
11253 TEST_f_L (llround, 72057594037927936.0, 72057594037927936LL);
11254
11255 #ifndef TEST_FLOAT
11256 /* 0x100000000 */
11257 TEST_f_L (llround, 4294967295.5, 4294967296LL);
11258 /* 0x200000000 */
11259 TEST_f_L (llround, 8589934591.5, 8589934592LL);
11260
11261 /* nextafter(0.5,-1) */
11262 TEST_f_L (llround, 0x1.fffffffffffffp-2, 0);
11263 /* nextafter(-0.5,1) */
11264 TEST_f_L (llround, -0x1.fffffffffffffp-2, 0);
11265 /* On PowerPC an exponent of '52' is the largest incrementally
11266 * representable sequence of whole-numbers in the 'double' range. We test
11267 * lround to make sure that a guard bit set during the lround operation
11268 * hasn't forced an erroneous shift giving us an incorrect result. The odd
11269 * numbers between +-(2^52+1 and 2^53-1) are affected since they have the
11270 * rightmost bit set. */
11271 /* +-(2^52+1) */
11272 TEST_f_L (llround, 0x1.0000000000001p+52,4503599627370497LL);
11273 TEST_f_L (llround, -0x1.0000000000001p+52,-4503599627370497LL);
11274 /* +-(2^53-1): Input is the last (positive and negative) incrementally
11275 * representable whole-number in the 'double' range that might round
11276 * erroneously. */
11277 TEST_f_L (llround, 0x1.fffffffffffffp+52, 9007199254740991LL);
11278 TEST_f_L (llround, -0x1.fffffffffffffp+52, -9007199254740991LL);
11279 #else
11280 /* nextafter(0.5,-1) */
11281 TEST_f_L (llround, 0x1.fffffep-2, 0);
11282 /* nextafter(-0.5,1) */
11283 TEST_f_L (llround, -0x1.fffffep-2, 0);
11284 /* As above, on PowerPC an exponent of '23' is the largest incrementally
11285 * representable sequence of whole-numbers in the 'float' range.
11286 * Likewise, numbers between +-(2^23+1 and 2^24-1) are affected. */
11287 TEST_f_L (llround, 0x1.000002p+23,8388609);
11288 TEST_f_L (llround, -0x1.000002p+23,-8388609);
11289 TEST_f_L (llround, 0x1.fffffep+23, 16777215);
11290 TEST_f_L (llround, -0x1.fffffep+23, -16777215);
11291 #endif
11292
11293
11294 #ifdef TEST_LDOUBLE
11295 /* The input can only be represented in long double. */
11296 TEST_f_L (llround, 4503599627370495.5L, 4503599627370496LL);
11297 TEST_f_L (llround, 4503599627370496.25L, 4503599627370496LL);
11298 TEST_f_L (llround, 4503599627370496.5L, 4503599627370497LL);
11299 TEST_f_L (llround, 4503599627370496.75L, 4503599627370497LL);
11300 TEST_f_L (llround, 4503599627370497.5L, 4503599627370498LL);
11301
11302 # if LDBL_MANT_DIG > 100
11303 TEST_f_L (llround, 4503599627370495.4999999999999L, 4503599627370495LL);
11304 TEST_f_L (llround, 4503599627370496.4999999999999L, 4503599627370496LL);
11305 TEST_f_L (llround, 4503599627370497.4999999999999L, 4503599627370497LL);
11306 TEST_f_L (llround, 4503599627370494.5000000000001L, 4503599627370495LL);
11307 TEST_f_L (llround, 4503599627370495.5000000000001L, 4503599627370496LL);
11308 TEST_f_L (llround, 4503599627370496.5000000000001L, 4503599627370497LL);
11309
11310 TEST_f_L (llround, -4503599627370495.4999999999999L, -4503599627370495LL);
11311 TEST_f_L (llround, -4503599627370496.4999999999999L, -4503599627370496LL);
11312 TEST_f_L (llround, -4503599627370497.4999999999999L, -4503599627370497LL);
11313 TEST_f_L (llround, -4503599627370494.5000000000001L, -4503599627370495LL);
11314 TEST_f_L (llround, -4503599627370495.5000000000001L, -4503599627370496LL);
11315 TEST_f_L (llround, -4503599627370496.5000000000001L, -4503599627370497LL);
11316 # endif
11317
11318 TEST_f_L (llround, -4503599627370495.5L, -4503599627370496LL);
11319 TEST_f_L (llround, -4503599627370496.25L, -4503599627370496LL);
11320 TEST_f_L (llround, -4503599627370496.5L, -4503599627370497LL);
11321 TEST_f_L (llround, -4503599627370496.75L, -4503599627370497LL);
11322 TEST_f_L (llround, -4503599627370497.5L, -4503599627370498LL);
11323
11324 TEST_f_L (llround, 9007199254740991.5L, 9007199254740992LL);
11325 TEST_f_L (llround, 9007199254740992.25L, 9007199254740992LL);
11326 TEST_f_L (llround, 9007199254740992.5L, 9007199254740993LL);
11327 TEST_f_L (llround, 9007199254740992.75L, 9007199254740993LL);
11328 TEST_f_L (llround, 9007199254740993.5L, 9007199254740994LL);
11329
11330 # if LDBL_MANT_DIG > 100
11331 TEST_f_L (llround, 9007199254740991.4999999999999L, 9007199254740991LL);
11332 TEST_f_L (llround, 9007199254740992.4999999999999L, 9007199254740992LL);
11333 TEST_f_L (llround, 9007199254740993.4999999999999L, 9007199254740993LL);
11334 TEST_f_L (llround, 9007199254740991.5000000000001L, 9007199254740992LL);
11335 TEST_f_L (llround, 9007199254740992.5000000000001L, 9007199254740993LL);
11336 TEST_f_L (llround, 9007199254740993.5000000000001L, 9007199254740994LL);
11337
11338 TEST_f_L (llround, -9007199254740991.4999999999999L, -9007199254740991LL);
11339 TEST_f_L (llround, -9007199254740992.4999999999999L, -9007199254740992LL);
11340 TEST_f_L (llround, -9007199254740993.4999999999999L, -9007199254740993LL);
11341 TEST_f_L (llround, -9007199254740991.5000000000001L, -9007199254740992LL);
11342 TEST_f_L (llround, -9007199254740992.5000000000001L, -9007199254740993LL);
11343 TEST_f_L (llround, -9007199254740993.5000000000001L, -9007199254740994LL);
11344 # endif
11345
11346 TEST_f_L (llround, -9007199254740991.5L, -9007199254740992LL);
11347 TEST_f_L (llround, -9007199254740992.25L, -9007199254740992LL);
11348 TEST_f_L (llround, -9007199254740992.5L, -9007199254740993LL);
11349 TEST_f_L (llround, -9007199254740992.75L, -9007199254740993LL);
11350 TEST_f_L (llround, -9007199254740993.5L, -9007199254740994LL);
11351
11352 TEST_f_L (llround, 72057594037927935.5L, 72057594037927936LL);
11353 TEST_f_L (llround, 72057594037927936.25L, 72057594037927936LL);
11354 TEST_f_L (llround, 72057594037927936.5L, 72057594037927937LL);
11355 TEST_f_L (llround, 72057594037927936.75L, 72057594037927937LL);
11356 TEST_f_L (llround, 72057594037927937.5L, 72057594037927938LL);
11357
11358 TEST_f_L (llround, -72057594037927935.5L, -72057594037927936LL);
11359 TEST_f_L (llround, -72057594037927936.25L, -72057594037927936LL);
11360 TEST_f_L (llround, -72057594037927936.5L, -72057594037927937LL);
11361 TEST_f_L (llround, -72057594037927936.75L, -72057594037927937LL);
11362 TEST_f_L (llround, -72057594037927937.5L, -72057594037927938LL);
11363
11364 TEST_f_L (llround, 9223372036854775806.25L, 9223372036854775806LL);
11365 TEST_f_L (llround, -9223372036854775806.25L, -9223372036854775806LL);
11366 TEST_f_L (llround, 9223372036854775806.5L, 9223372036854775807LL);
11367 TEST_f_L (llround, -9223372036854775806.5L, -9223372036854775807LL);
11368 TEST_f_L (llround, 9223372036854775807.0L, 9223372036854775807LL);
11369 TEST_f_L (llround, -9223372036854775807.0L, -9223372036854775807LL);
11370 #endif
11371
11372 END (llround);
11373 }
11374
11375 static void
11376 modf_test (void)
11377 {
11378 FLOAT x;
11379
11380 START (modf);
11381
11382 TEST_fF_f1 (modf, plus_infty, 0, plus_infty);
11383 TEST_fF_f1 (modf, minus_infty, minus_zero, minus_infty);
11384 TEST_fF_f1 (modf, qnan_value, qnan_value, qnan_value);
11385 TEST_fF_f1 (modf, 0, 0, 0);
11386 TEST_fF_f1 (modf, 1.5, 0.5, 1);
11387 TEST_fF_f1 (modf, 2.5, 0.5, 2);
11388 TEST_fF_f1 (modf, -2.5, -0.5, -2);
11389 TEST_fF_f1 (modf, 20, 0, 20);
11390 TEST_fF_f1 (modf, 21, 0, 21);
11391 TEST_fF_f1 (modf, 89.5, 0.5, 89);
11392
11393 END (modf);
11394 }
11395
11396
11397 static const struct test_f_f_data nearbyint_test_data[] =
11398 {
11399 START_DATA (nearbyint),
11400
11401 TEST_f_f (nearbyint, 0.0, 0.0),
11402 TEST_f_f (nearbyint, minus_zero, minus_zero),
11403 TEST_f_f (nearbyint, plus_infty, plus_infty),
11404 TEST_f_f (nearbyint, minus_infty, minus_infty),
11405 TEST_f_f (nearbyint, qnan_value, qnan_value),
11406
11407 /* Subnormal values */
11408 TEST_f_f (nearbyint, -8.98847e+307, -8.98847e+307),
11409 TEST_f_f (nearbyint, -4.45015e-308, minus_zero),
11410
11411 /* Default rounding mode is round to nearest. */
11412 TEST_f_f (nearbyint, 0.5, 0.0),
11413 TEST_f_f (nearbyint, 1.5, 2.0),
11414 TEST_f_f (nearbyint, -0.5, minus_zero),
11415 TEST_f_f (nearbyint, -1.5, -2.0),
11416
11417 TEST_f_f (nearbyint, 262144.75, 262145.0),
11418 TEST_f_f (nearbyint, 262142.75, 262143.0),
11419 TEST_f_f (nearbyint, 524286.75, 524287.0),
11420 TEST_f_f (nearbyint, 524288.75, 524289.0),
11421
11422 TEST_f_f (nearbyint, 1048576.75, 1048577.0),
11423 TEST_f_f (nearbyint, 2097152.75, 2097153.0),
11424 TEST_f_f (nearbyint, 2492472.75, 2492473.0),
11425 TEST_f_f (nearbyint, 2886220.75, 2886221.0),
11426 TEST_f_f (nearbyint, 3058792.75, 3058793.0),
11427 TEST_f_f (nearbyint, -1048576.75, -1048577.0),
11428 TEST_f_f (nearbyint, -2097152.75, -2097153.0),
11429 TEST_f_f (nearbyint, -2492472.75, -2492473.0),
11430 TEST_f_f (nearbyint, -2886220.75, -2886221.0),
11431 TEST_f_f (nearbyint, -3058792.75, -3058793.0),
11432 #ifndef TEST_FLOAT
11433 TEST_f_f (nearbyint, 70368744177664.75, 70368744177665.0),
11434 TEST_f_f (nearbyint, 140737488355328.75, 140737488355329.0),
11435 TEST_f_f (nearbyint, 281474976710656.75, 281474976710657.0),
11436 TEST_f_f (nearbyint, 562949953421312.75, 562949953421313.0),
11437 TEST_f_f (nearbyint, 1125899906842624.75, 1125899906842625.0),
11438 TEST_f_f (nearbyint, -70368744177664.75, -70368744177665.0),
11439 TEST_f_f (nearbyint, -140737488355328.75, -140737488355329.0),
11440 TEST_f_f (nearbyint, -281474976710656.75, -281474976710657.0),
11441 TEST_f_f (nearbyint, -562949953421312.75, -562949953421313.0),
11442 TEST_f_f (nearbyint, -1125899906842624.75, -1125899906842625.0),
11443 #endif
11444
11445 END_DATA (nearbyint)
11446 };
11447
11448 static void
11449 nearbyint_test (void)
11450 {
11451 START (nearbyint);
11452 RUN_TEST_LOOP_f_f (nearbyint, nearbyint_test_data, );
11453 END (nearbyint);
11454 }
11455
11456 static const struct test_ff_f_data nextafter_test_data[] =
11457 {
11458 START_DATA (nextafter),
11459
11460 TEST_ff_f (nextafter, 0, 0, 0),
11461 TEST_ff_f (nextafter, minus_zero, 0, 0),
11462 TEST_ff_f (nextafter, 0, minus_zero, minus_zero),
11463 TEST_ff_f (nextafter, minus_zero, minus_zero, minus_zero),
11464
11465 TEST_ff_f (nextafter, 9, 9, 9),
11466 TEST_ff_f (nextafter, -9, -9, -9),
11467 TEST_ff_f (nextafter, plus_infty, plus_infty, plus_infty),
11468 TEST_ff_f (nextafter, minus_infty, minus_infty, minus_infty),
11469
11470 TEST_ff_f (nextafter, qnan_value, 1.1L, qnan_value),
11471 TEST_ff_f (nextafter, 1.1L, qnan_value, qnan_value),
11472 TEST_ff_f (nextafter, qnan_value, qnan_value, qnan_value),
11473
11474 TEST_ff_f (nextafter, max_value, plus_infty, plus_infty, OVERFLOW_EXCEPTION),
11475 TEST_ff_f (nextafter, -max_value, minus_infty, minus_infty, OVERFLOW_EXCEPTION),
11476
11477 #ifdef TEST_LDOUBLE
11478 // XXX Enable once gcc is fixed.
11479 //TEST_ff_f (nextafter, 0x0.00000040000000000000p-16385L, -0.1L, 0x0.0000003ffffffff00000p-16385L),
11480 #endif
11481
11482 /* XXX We need the hexadecimal FP number representation here for further
11483 tests. */
11484 END_DATA (nextafter)
11485 };
11486
11487 static void
11488 nextafter_test (void)
11489 {
11490
11491 START (nextafter);
11492 RUN_TEST_LOOP_ff_f (nextafter, nextafter_test_data, );
11493 END (nextafter);
11494 }
11495
11496
11497 static const struct test_ff_f_data_nexttoward nexttoward_test_data[] =
11498 {
11499 START_DATA (nexttoward),
11500 TEST_ff_f (nexttoward, 0, 0, 0),
11501 TEST_ff_f (nexttoward, minus_zero, 0, 0),
11502 TEST_ff_f (nexttoward, 0, minus_zero, minus_zero),
11503 TEST_ff_f (nexttoward, minus_zero, minus_zero, minus_zero),
11504
11505 TEST_ff_f (nexttoward, 9, 9, 9),
11506 TEST_ff_f (nexttoward, -9, -9, -9),
11507 TEST_ff_f (nexttoward, plus_infty, plus_infty, plus_infty),
11508 TEST_ff_f (nexttoward, minus_infty, minus_infty, minus_infty),
11509
11510 TEST_ff_f (nexttoward, qnan_value, 1.1L, qnan_value),
11511 TEST_ff_f (nexttoward, 1.1L, qnan_value, qnan_value),
11512 TEST_ff_f (nexttoward, qnan_value, qnan_value, qnan_value),
11513
11514 #ifdef TEST_FLOAT
11515 TEST_ff_f (nexttoward, 1.0, 1.1L, 0x1.000002p0),
11516 TEST_ff_f (nexttoward, 1.0, LDBL_MAX, 0x1.000002p0),
11517 TEST_ff_f (nexttoward, 1.0, 0x1.0000000000001p0, 0x1.000002p0),
11518 TEST_ff_f (nexttoward, 1.0, 0.9L, 0x0.ffffffp0),
11519 TEST_ff_f (nexttoward, 1.0, -LDBL_MAX, 0x0.ffffffp0),
11520 TEST_ff_f (nexttoward, 1.0, 0x0.fffffffffffff8p0, 0x0.ffffffp0),
11521 TEST_ff_f (nexttoward, -1.0, -1.1L, -0x1.000002p0),
11522 TEST_ff_f (nexttoward, -1.0, -LDBL_MAX, -0x1.000002p0),
11523 TEST_ff_f (nexttoward, -1.0, -0x1.0000000000001p0, -0x1.000002p0),
11524 TEST_ff_f (nexttoward, -1.0, -0.9L, -0x0.ffffffp0),
11525 TEST_ff_f (nexttoward, -1.0, LDBL_MAX, -0x0.ffffffp0),
11526 TEST_ff_f (nexttoward, -1.0, -0x0.fffffffffffff8p0, -0x0.ffffffp0),
11527 TEST_ff_f (nexttoward, -0x1.3p-145, -0xap-148L, -0x1.4p-145, UNDERFLOW_EXCEPTION),
11528 # if LDBL_MANT_DIG >= 64
11529 TEST_ff_f (nexttoward, 1.0, 0x1.000000000000002p0L, 0x1.000002p0),
11530 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffp0L, 0x0.ffffffp0),
11531 TEST_ff_f (nexttoward, -1.0, -0x1.000000000000002p0L, -0x1.000002p0),
11532 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffp0L, -0x0.ffffffp0),
11533 # endif
11534 # if LDBL_MANT_DIG >= 106
11535 TEST_ff_f (nexttoward, 1.0, 0x1.000000000000000000000000008p0L, 0x1.000002p0),
11536 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffffffffffffcp0L, 0x0.ffffffp0),
11537 TEST_ff_f (nexttoward, -1.0, -0x1.000000000000000000000000008p0L, -0x1.000002p0),
11538 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffffffffffffcp0L, -0x0.ffffffp0),
11539 # endif
11540 # if LDBL_MANT_DIG >= 113
11541 TEST_ff_f (nexttoward, 1.0, 0x1.0000000000000000000000000001p0L, 0x1.000002p0),
11542 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffp0),
11543 TEST_ff_f (nexttoward, -1.0, -0x1.0000000000000000000000000001p0L, -0x1.000002p0),
11544 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffp0),
11545 # endif
11546 #endif
11547 #ifdef TEST_DOUBLE
11548 TEST_ff_f (nexttoward, 1.0, 1.1L, 0x1.0000000000001p0),
11549 TEST_ff_f (nexttoward, 1.0, LDBL_MAX, 0x1.0000000000001p0),
11550 TEST_ff_f (nexttoward, 1.0, 0x1.0000000000001p0, 0x1.0000000000001p0),
11551 TEST_ff_f (nexttoward, 1.0, 0.9L, 0x0.fffffffffffff8p0),
11552 TEST_ff_f (nexttoward, 1.0, -LDBL_MAX, 0x0.fffffffffffff8p0),
11553 TEST_ff_f (nexttoward, 1.0, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0),
11554 TEST_ff_f (nexttoward, -1.0, -1.1L, -0x1.0000000000001p0),
11555 TEST_ff_f (nexttoward, -1.0, -LDBL_MAX, -0x1.0000000000001p0),
11556 TEST_ff_f (nexttoward, -1.0, -0x1.0000000000001p0, -0x1.0000000000001p0),
11557 TEST_ff_f (nexttoward, -1.0, -0.9L, -0x0.fffffffffffff8p0),
11558 TEST_ff_f (nexttoward, -1.0, LDBL_MAX, -0x0.fffffffffffff8p0),
11559 TEST_ff_f (nexttoward, -1.0, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0),
11560 TEST_ff_f (nexttoward, -1.0, -0x8.00346dc5d6388p-3L, -0x1.0000000000001p0),
11561 TEST_ff_f (nexttoward, 0x1p-1074, 0x1p-1073L, 0x1p-1073, UNDERFLOW_EXCEPTION),
11562 # if LDBL_MANT_DIG >= 64
11563 TEST_ff_f (nexttoward, 1.0, 0x1.000000000000002p0L, 0x1.0000000000001p0),
11564 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffff8p0),
11565 TEST_ff_f (nexttoward, -1.0, -0x1.000000000000002p0L, -0x1.0000000000001p0),
11566 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffff8p0),
11567 # endif
11568 # if LDBL_MANT_DIG >= 106
11569 TEST_ff_f (nexttoward, 1.0, 0x1.000000000000000000000000008p0L, 0x1.0000000000001p0),
11570 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffffffffffffcp0L, 0x0.fffffffffffff8p0),
11571 TEST_ff_f (nexttoward, -1.0, -0x1.000000000000000000000000008p0L, -0x1.0000000000001p0),
11572 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffffffffffffcp0L, -0x0.fffffffffffff8p0),
11573 # endif
11574 # if LDBL_MANT_DIG >= 113
11575 TEST_ff_f (nexttoward, 1.0, 0x1.0000000000000000000000000001p0L, 0x1.0000000000001p0),
11576 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.fffffffffffff8p0),
11577 TEST_ff_f (nexttoward, -1.0, -0x1.0000000000000000000000000001p0L, -0x1.0000000000001p0),
11578 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.fffffffffffff8p0),
11579 # endif
11580 #endif
11581 END_DATA (nexttoward)
11582 };
11583
11584 static void
11585 nexttoward_test (void)
11586 {
11587 START (nexttoward);
11588 RUN_TEST_LOOP_ff_f (nexttoward, nexttoward_test_data, );
11589 END (nexttoward);
11590 }
11591
11592
11593 static const struct test_ff_f_data pow_test_data[] =
11594 {
11595 START_DATA (pow),
11596 TEST_ff_f (pow, 0, 0, 1),
11597 TEST_ff_f (pow, 0, minus_zero, 1),
11598 TEST_ff_f (pow, minus_zero, 0, 1),
11599 TEST_ff_f (pow, minus_zero, minus_zero, 1),
11600
11601 TEST_ff_f (pow, 10, 0, 1),
11602 TEST_ff_f (pow, 10, minus_zero, 1),
11603 TEST_ff_f (pow, -10, 0, 1),
11604 TEST_ff_f (pow, -10, minus_zero, 1),
11605
11606 TEST_ff_f (pow, qnan_value, 0, 1),
11607 TEST_ff_f (pow, qnan_value, minus_zero, 1),
11608
11609 #ifndef TEST_INLINE
11610 TEST_ff_f (pow, 1.1L, plus_infty, plus_infty),
11611 TEST_ff_f (pow, plus_infty, plus_infty, plus_infty),
11612 TEST_ff_f (pow, -1.1L, plus_infty, plus_infty),
11613 TEST_ff_f (pow, minus_infty, plus_infty, plus_infty),
11614
11615 TEST_ff_f (pow, 0.9L, plus_infty, 0),
11616 TEST_ff_f (pow, 1e-7L, plus_infty, 0),
11617 TEST_ff_f (pow, -0.9L, plus_infty, 0),
11618 TEST_ff_f (pow, -1e-7L, plus_infty, 0),
11619
11620 TEST_ff_f (pow, 1.1L, minus_infty, 0),
11621 TEST_ff_f (pow, plus_infty, minus_infty, 0),
11622 TEST_ff_f (pow, -1.1L, minus_infty, 0),
11623 TEST_ff_f (pow, minus_infty, minus_infty, 0),
11624
11625 TEST_ff_f (pow, 0.9L, minus_infty, plus_infty),
11626 TEST_ff_f (pow, 1e-7L, minus_infty, plus_infty),
11627 TEST_ff_f (pow, -0.9L, minus_infty, plus_infty),
11628 TEST_ff_f (pow, -1e-7L, minus_infty, plus_infty),
11629
11630 TEST_ff_f (pow, plus_infty, 1e-7L, plus_infty),
11631 TEST_ff_f (pow, plus_infty, 1, plus_infty),
11632 TEST_ff_f (pow, plus_infty, 1e7L, plus_infty),
11633 TEST_ff_f (pow, plus_infty, min_subnorm_value, plus_infty),
11634
11635 TEST_ff_f (pow, plus_infty, -1e-7L, 0),
11636 TEST_ff_f (pow, plus_infty, -1, 0),
11637 TEST_ff_f (pow, plus_infty, -1e7L, 0),
11638 TEST_ff_f (pow, plus_infty, -min_subnorm_value, 0),
11639
11640 TEST_ff_f (pow, minus_infty, 1, minus_infty),
11641 TEST_ff_f (pow, minus_infty, 11, minus_infty),
11642 TEST_ff_f (pow, minus_infty, 1001, minus_infty),
11643
11644 TEST_ff_f (pow, minus_infty, 2, plus_infty),
11645 TEST_ff_f (pow, minus_infty, 12, plus_infty),
11646 TEST_ff_f (pow, minus_infty, 1002, plus_infty),
11647 TEST_ff_f (pow, minus_infty, 0.1L, plus_infty),
11648 TEST_ff_f (pow, minus_infty, 1.1L, plus_infty),
11649 TEST_ff_f (pow, minus_infty, 11.1L, plus_infty),
11650 TEST_ff_f (pow, minus_infty, 1001.1L, plus_infty),
11651 TEST_ff_f (pow, minus_infty, min_subnorm_value, plus_infty),
11652
11653 TEST_ff_f (pow, minus_infty, -1, minus_zero),
11654 TEST_ff_f (pow, minus_infty, -11, minus_zero),
11655 TEST_ff_f (pow, minus_infty, -1001, minus_zero),
11656
11657 TEST_ff_f (pow, minus_infty, -2, 0),
11658 TEST_ff_f (pow, minus_infty, -12, 0),
11659 TEST_ff_f (pow, minus_infty, -1002, 0),
11660 TEST_ff_f (pow, minus_infty, -0.1L, 0),
11661 TEST_ff_f (pow, minus_infty, -1.1L, 0),
11662 TEST_ff_f (pow, minus_infty, -11.1L, 0),
11663 TEST_ff_f (pow, minus_infty, -1001.1L, 0),
11664 TEST_ff_f (pow, minus_infty, -min_subnorm_value, 0),
11665 #endif
11666
11667 TEST_ff_f (pow, qnan_value, qnan_value, qnan_value),
11668 TEST_ff_f (pow, 0, qnan_value, qnan_value),
11669 TEST_ff_f (pow, 1, qnan_value, 1),
11670 TEST_ff_f (pow, -1, qnan_value, qnan_value),
11671 TEST_ff_f (pow, qnan_value, 1, qnan_value),
11672 TEST_ff_f (pow, qnan_value, -1, qnan_value),
11673
11674 /* pow (x, qNaN) == qNaN. */
11675 TEST_ff_f (pow, 3.0, qnan_value, qnan_value),
11676 TEST_ff_f (pow, minus_zero, qnan_value, qnan_value),
11677 TEST_ff_f (pow, plus_infty, qnan_value, qnan_value),
11678 TEST_ff_f (pow, -3.0, qnan_value, qnan_value),
11679 TEST_ff_f (pow, minus_infty, qnan_value, qnan_value),
11680
11681 TEST_ff_f (pow, qnan_value, 3.0, qnan_value),
11682 TEST_ff_f (pow, qnan_value, -3.0, qnan_value),
11683 TEST_ff_f (pow, qnan_value, plus_infty, qnan_value),
11684 TEST_ff_f (pow, qnan_value, minus_infty, qnan_value),
11685 TEST_ff_f (pow, qnan_value, 2.5, qnan_value),
11686 TEST_ff_f (pow, qnan_value, -2.5, qnan_value),
11687 TEST_ff_f (pow, qnan_value, min_subnorm_value, qnan_value),
11688 TEST_ff_f (pow, qnan_value, -min_subnorm_value, qnan_value),
11689
11690 TEST_ff_f (pow, 1, plus_infty, 1),
11691 TEST_ff_f (pow, -1, plus_infty, 1),
11692 TEST_ff_f (pow, 1, minus_infty, 1),
11693 TEST_ff_f (pow, -1, minus_infty, 1),
11694 TEST_ff_f (pow, 1, 1, 1),
11695 TEST_ff_f (pow, 1, -1, 1),
11696 TEST_ff_f (pow, 1, 1.25, 1),
11697 TEST_ff_f (pow, 1, -1.25, 1),
11698 TEST_ff_f (pow, 1, 0x1p62L, 1),
11699 TEST_ff_f (pow, 1, 0x1p63L, 1),
11700 TEST_ff_f (pow, 1, 0x1p64L, 1),
11701 TEST_ff_f (pow, 1, 0x1p72L, 1),
11702 TEST_ff_f (pow, 1, min_subnorm_value, 1),
11703 TEST_ff_f (pow, 1, -min_subnorm_value, 1),
11704
11705 /* pow (x, +-0) == 1. */
11706 TEST_ff_f (pow, plus_infty, 0, 1),
11707 TEST_ff_f (pow, plus_infty, minus_zero, 1),
11708 TEST_ff_f (pow, minus_infty, 0, 1),
11709 TEST_ff_f (pow, minus_infty, minus_zero, 1),
11710 TEST_ff_f (pow, 32.75L, 0, 1),
11711 TEST_ff_f (pow, 32.75L, minus_zero, 1),
11712 TEST_ff_f (pow, -32.75L, 0, 1),
11713 TEST_ff_f (pow, -32.75L, minus_zero, 1),
11714 TEST_ff_f (pow, 0x1p72L, 0, 1),
11715 TEST_ff_f (pow, 0x1p72L, minus_zero, 1),
11716 TEST_ff_f (pow, 0x1p-72L, 0, 1),
11717 TEST_ff_f (pow, 0x1p-72L, minus_zero, 1),
11718
11719 TEST_ff_f (pow, -0.1L, 1.1L, qnan_value, INVALID_EXCEPTION),
11720 TEST_ff_f (pow, -0.1L, -1.1L, qnan_value, INVALID_EXCEPTION),
11721 TEST_ff_f (pow, -10.1L, 1.1L, qnan_value, INVALID_EXCEPTION),
11722 TEST_ff_f (pow, -10.1L, -1.1L, qnan_value, INVALID_EXCEPTION),
11723 TEST_ff_f (pow, -1.01L, min_subnorm_value, qnan_value, INVALID_EXCEPTION),
11724 TEST_ff_f (pow, -1.01L, -min_subnorm_value, qnan_value, INVALID_EXCEPTION),
11725 TEST_ff_f (pow, -1.0L, min_subnorm_value, qnan_value, INVALID_EXCEPTION),
11726 TEST_ff_f (pow, -1.0L, -min_subnorm_value, qnan_value, INVALID_EXCEPTION),
11727
11728 TEST_ff_f (pow, 0, -1, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11729 TEST_ff_f (pow, 0, -11, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11730 TEST_ff_f (pow, 0, -0xffffff, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11731 #ifndef TEST_FLOAT
11732 TEST_ff_f (pow, 0, -0x1.fffffffffffffp+52L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11733 #endif
11734 #ifdef TEST_LDOUBLE
11735 # if LDBL_MANT_DIG >= 64
11736 TEST_ff_f (pow, 0, -0x1.fffffffffffffffep+63L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11737 # endif
11738 # if LDBL_MANT_DIG >= 106
11739 TEST_ff_f (pow, 0, -0x1.ffffffffffffffffffffffffff8p+105L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11740 # endif
11741 # if LDBL_MANT_DIG >= 113
11742 TEST_ff_f (pow, 0, -0x1.ffffffffffffffffffffffffffffp+112L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11743 # endif
11744 #endif
11745 TEST_ff_f (pow, minus_zero, -1, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11746 TEST_ff_f (pow, minus_zero, -11L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11747 TEST_ff_f (pow, minus_zero, -0xffffff, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11748 TEST_ff_f (pow, minus_zero, -0x1fffffe, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11749 #ifndef TEST_FLOAT
11750 TEST_ff_f (pow, minus_zero, -0x1.fffffffffffffp+52L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11751 TEST_ff_f (pow, minus_zero, -0x1.fffffffffffffp+53L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11752 #endif
11753 #ifdef TEST_LDOUBLE
11754 # if LDBL_MANT_DIG >= 64
11755 TEST_ff_f (pow, minus_zero, -0x1.fffffffffffffffep+63L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11756 TEST_ff_f (pow, minus_zero, -0x1.fffffffffffffffep+64L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11757 # endif
11758 # if LDBL_MANT_DIG >= 106
11759 TEST_ff_f (pow, minus_zero, -0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11760 TEST_ff_f (pow, minus_zero, -0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11761 # endif
11762 # if LDBL_MANT_DIG >= 113
11763 TEST_ff_f (pow, minus_zero, -0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11764 TEST_ff_f (pow, minus_zero, -0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11765 # endif
11766 #endif
11767
11768 TEST_ff_f (pow, 0, -2, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11769 TEST_ff_f (pow, 0, -11.1L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11770 TEST_ff_f (pow, 0, -min_subnorm_value, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11771 TEST_ff_f (pow, 0, -0x1p24, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11772 TEST_ff_f (pow, 0, -0x1p127, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11773 TEST_ff_f (pow, 0, -max_value, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11774 TEST_ff_f (pow, minus_zero, -2, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11775 TEST_ff_f (pow, minus_zero, -11.1L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11776 TEST_ff_f (pow, minus_zero, -min_subnorm_value, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11777 TEST_ff_f (pow, minus_zero, -0x1p24, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11778 TEST_ff_f (pow, minus_zero, -0x1p127, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11779 TEST_ff_f (pow, minus_zero, -max_value, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11780
11781 TEST_ff_f (pow, 0x1p72L, 0x1p72L, plus_infty, OVERFLOW_EXCEPTION),
11782 TEST_ff_f (pow, 10, -0x1p72L, 0, UNDERFLOW_EXCEPTION),
11783 TEST_ff_f (pow, max_value, max_value, plus_infty, OVERFLOW_EXCEPTION),
11784 TEST_ff_f (pow, 10, -max_value, 0, UNDERFLOW_EXCEPTION),
11785
11786 TEST_ff_f (pow, 0, 1, 0),
11787 TEST_ff_f (pow, 0, 11, 0),
11788
11789 TEST_ff_f (pow, minus_zero, 1, minus_zero),
11790 TEST_ff_f (pow, minus_zero, 11, minus_zero),
11791
11792 TEST_ff_f (pow, 0, 2, 0),
11793 TEST_ff_f (pow, 0, 11.1L, 0),
11794
11795 TEST_ff_f (pow, minus_zero, 2, 0),
11796 TEST_ff_f (pow, minus_zero, 11.1L, 0),
11797 TEST_ff_f (pow, 0, plus_infty, 0),
11798 TEST_ff_f (pow, minus_zero, plus_infty, 0),
11799 TEST_ff_f (pow, 0, minus_infty, plus_infty, DIVIDE_BY_ZERO_EXCEPTION_OK),
11800 TEST_ff_f (pow, minus_zero, minus_infty, plus_infty, DIVIDE_BY_ZERO_EXCEPTION_OK),
11801
11802 #ifndef TEST_INLINE
11803 /* pow (x, +inf) == +inf for |x| > 1. */
11804 TEST_ff_f (pow, 1.5, plus_infty, plus_infty),
11805
11806 /* pow (x, +inf) == +0 for |x| < 1. */
11807 TEST_ff_f (pow, 0.5, plus_infty, 0.0),
11808
11809 /* pow (x, -inf) == +0 for |x| > 1. */
11810 TEST_ff_f (pow, 1.5, minus_infty, 0.0),
11811
11812 /* pow (x, -inf) == +inf for |x| < 1. */
11813 TEST_ff_f (pow, 0.5, minus_infty, plus_infty),
11814 #endif
11815
11816 /* pow (+inf, y) == +inf for y > 0. */
11817 TEST_ff_f (pow, plus_infty, 2, plus_infty),
11818 TEST_ff_f (pow, plus_infty, 0xffffff, plus_infty),
11819 #ifndef TEST_FLOAT
11820 TEST_ff_f (pow, plus_infty, 0x1.fffffffffffffp+52L, plus_infty),
11821 #endif
11822 #ifdef TEST_LDOUBLE
11823 # if LDBL_MANT_DIG >= 64
11824 TEST_ff_f (pow, plus_infty, 0x1.fffffffffffffffep+63L, plus_infty),
11825 # endif
11826 # if LDBL_MANT_DIG >= 106
11827 TEST_ff_f (pow, plus_infty, 0x1.ffffffffffffffffffffffffff8p+105L, plus_infty),
11828 # endif
11829 # if LDBL_MANT_DIG >= 113
11830 TEST_ff_f (pow, plus_infty, 0x1.ffffffffffffffffffffffffffffp+112L, plus_infty),
11831 # endif
11832 #endif
11833 TEST_ff_f (pow, plus_infty, 0x1p24, plus_infty),
11834 TEST_ff_f (pow, plus_infty, 0x1p127, plus_infty),
11835 TEST_ff_f (pow, plus_infty, max_value, plus_infty),
11836
11837 /* pow (+inf, y) == +0 for y < 0. */
11838 TEST_ff_f (pow, plus_infty, -1, 0.0),
11839 TEST_ff_f (pow, plus_infty, -0xffffff, 0.0),
11840 #ifndef TEST_FLOAT
11841 TEST_ff_f (pow, plus_infty, -0x1.fffffffffffffp+52L, 0.0),
11842 #endif
11843 #ifdef TEST_LDOUBLE
11844 # if LDBL_MANT_DIG >= 64
11845 TEST_ff_f (pow, plus_infty, -0x1.fffffffffffffffep+63L, 0.0),
11846 # endif
11847 # if LDBL_MANT_DIG >= 106
11848 TEST_ff_f (pow, plus_infty, -0x1.ffffffffffffffffffffffffff8p+105L, 0.0),
11849 # endif
11850 # if LDBL_MANT_DIG >= 113
11851 TEST_ff_f (pow, plus_infty, -0x1.ffffffffffffffffffffffffffffp+112L, 0.0),
11852 # endif
11853 #endif
11854 TEST_ff_f (pow, plus_infty, -0x1p24, 0.0),
11855 TEST_ff_f (pow, plus_infty, -0x1p127, 0.0),
11856 TEST_ff_f (pow, plus_infty, -max_value, 0.0),
11857
11858 /* pow (-inf, y) == -inf for y an odd integer > 0. */
11859 TEST_ff_f (pow, minus_infty, 27, minus_infty),
11860 TEST_ff_f (pow, minus_infty, 0xffffff, minus_infty),
11861 TEST_ff_f (pow, minus_infty, 0x1fffffe, plus_infty),
11862 #ifndef TEST_FLOAT
11863 TEST_ff_f (pow, minus_infty, 0x1.fffffffffffffp+52L, minus_infty),
11864 TEST_ff_f (pow, minus_infty, 0x1.fffffffffffffp+53L, plus_infty),
11865 #endif
11866 #ifdef TEST_LDOUBLE
11867 # if LDBL_MANT_DIG >= 64
11868 TEST_ff_f (pow, minus_infty, 0x1.fffffffffffffffep+63L, minus_infty),
11869 TEST_ff_f (pow, minus_infty, 0x1.fffffffffffffffep+64L, plus_infty),
11870 # endif
11871 # if LDBL_MANT_DIG >= 106
11872 TEST_ff_f (pow, minus_infty, 0x1.ffffffffffffffffffffffffff8p+105L, minus_infty),
11873 TEST_ff_f (pow, minus_infty, 0x1.ffffffffffffffffffffffffff8p+106L, plus_infty),
11874 # endif
11875 # if LDBL_MANT_DIG >= 113
11876 TEST_ff_f (pow, minus_infty, 0x1.ffffffffffffffffffffffffffffp+112L, minus_infty),
11877 TEST_ff_f (pow, minus_infty, 0x1.ffffffffffffffffffffffffffffp+113L, plus_infty),
11878 # endif
11879 #endif
11880
11881 /* pow (-inf, y) == +inf for y > 0 and not an odd integer. */
11882 TEST_ff_f (pow, minus_infty, 28, plus_infty),
11883 TEST_ff_f (pow, minus_infty, 0x1p24, plus_infty),
11884 TEST_ff_f (pow, minus_infty, 0x1p127, plus_infty),
11885 TEST_ff_f (pow, minus_infty, max_value, plus_infty),
11886
11887 /* pow (-inf, y) == -0 for y an odd integer < 0. */
11888 TEST_ff_f (pow, minus_infty, -3, minus_zero),
11889 TEST_ff_f (pow, minus_infty, -0xffffff, minus_zero),
11890 TEST_ff_f (pow, minus_infty, -0x1fffffe, plus_zero),
11891 #ifndef TEST_FLOAT
11892 TEST_ff_f (pow, minus_infty, -0x1.fffffffffffffp+52L, minus_zero),
11893 TEST_ff_f (pow, minus_infty, -0x1.fffffffffffffp+53L, plus_zero),
11894 #endif
11895 #ifdef TEST_LDOUBLE
11896 # if LDBL_MANT_DIG >= 64
11897 TEST_ff_f (pow, minus_infty, -0x1.fffffffffffffffep+63L, minus_zero),
11898 TEST_ff_f (pow, minus_infty, -0x1.fffffffffffffffep+64L, plus_zero),
11899 # endif
11900 # if LDBL_MANT_DIG >= 106
11901 TEST_ff_f (pow, minus_infty, -0x1.ffffffffffffffffffffffffff8p+105L, minus_zero),
11902 TEST_ff_f (pow, minus_infty, -0x1.ffffffffffffffffffffffffff8p+106L, plus_zero),
11903 # endif
11904 # if LDBL_MANT_DIG >= 113
11905 TEST_ff_f (pow, minus_infty, -0x1.ffffffffffffffffffffffffffffp+112L, minus_zero),
11906 TEST_ff_f (pow, minus_infty, -0x1.ffffffffffffffffffffffffffffp+113L, plus_zero),
11907 # endif
11908 #endif
11909 /* pow (-inf, y) == +0 for y < 0 and not an odd integer. */
11910 TEST_ff_f (pow, minus_infty, -2.0, 0.0),
11911 TEST_ff_f (pow, minus_infty, -0x1p24, 0.0),
11912 TEST_ff_f (pow, minus_infty, -0x1p127, 0.0),
11913 TEST_ff_f (pow, minus_infty, -max_value, 0.0),
11914
11915 /* pow (+0, y) == +0 for y an odd integer > 0. */
11916 TEST_ff_f (pow, 0.0, 27, 0.0),
11917 TEST_ff_f (pow, 0.0, 0xffffff, 0.0),
11918 #ifndef TEST_FLOAT
11919 TEST_ff_f (pow, 0.0, 0x1.fffffffffffffp+52L, 0.0),
11920 #endif
11921 #ifdef TEST_LDOUBLE
11922 # if LDBL_MANT_DIG >= 64
11923 TEST_ff_f (pow, 0.0, 0x1.fffffffffffffffep+63L, 0.0),
11924 # endif
11925 # if LDBL_MANT_DIG >= 106
11926 TEST_ff_f (pow, 0.0, 0x1.ffffffffffffffffffffffffff8p+105L, 0.0),
11927 # endif
11928 # if LDBL_MANT_DIG >= 113
11929 TEST_ff_f (pow, 0.0, 0x1.ffffffffffffffffffffffffffffp+112L, 0.0),
11930 # endif
11931 #endif
11932
11933 /* pow (-0, y) == -0 for y an odd integer > 0. */
11934 TEST_ff_f (pow, minus_zero, 27, minus_zero),
11935 TEST_ff_f (pow, minus_zero, 0xffffff, minus_zero),
11936 TEST_ff_f (pow, minus_zero, 0x1fffffe, plus_zero),
11937 #ifndef TEST_FLOAT
11938 TEST_ff_f (pow, minus_zero, 0x1.fffffffffffffp+52L, minus_zero),
11939 TEST_ff_f (pow, minus_zero, 0x1.fffffffffffffp+53L, plus_zero),
11940 #endif
11941 #ifdef TEST_LDOUBLE
11942 # if LDBL_MANT_DIG >= 64
11943 TEST_ff_f (pow, minus_zero, 0x1.fffffffffffffffep+63L, minus_zero),
11944 TEST_ff_f (pow, minus_zero, 0x1.fffffffffffffffep+64L, plus_zero),
11945 # endif
11946 # if LDBL_MANT_DIG >= 106
11947 TEST_ff_f (pow, minus_zero, 0x1.ffffffffffffffffffffffffff8p+105L, minus_zero),
11948 TEST_ff_f (pow, minus_zero, 0x1.ffffffffffffffffffffffffff8p+106L, plus_zero),
11949 # endif
11950 # if LDBL_MANT_DIG >= 113
11951 TEST_ff_f (pow, minus_zero, 0x1.ffffffffffffffffffffffffffffp+112L, minus_zero),
11952 TEST_ff_f (pow, minus_zero, 0x1.ffffffffffffffffffffffffffffp+113L, plus_zero),
11953 # endif
11954 #endif
11955
11956 /* pow (+0, y) == +0 for y > 0 and not an odd integer. */
11957 TEST_ff_f (pow, 0.0, 4, 0.0),
11958 TEST_ff_f (pow, 0.0, 0x1p24, 0.0),
11959 TEST_ff_f (pow, 0.0, 0x1p127, 0.0),
11960 TEST_ff_f (pow, 0.0, max_value, 0.0),
11961 TEST_ff_f (pow, 0.0, min_subnorm_value, 0.0),
11962
11963 /* pow (-0, y) == +0 for y > 0 and not an odd integer. */
11964 TEST_ff_f (pow, minus_zero, 4, 0.0),
11965 TEST_ff_f (pow, minus_zero, 0x1p24, 0.0),
11966 TEST_ff_f (pow, minus_zero, 0x1p127, 0.0),
11967 TEST_ff_f (pow, minus_zero, max_value, 0.0),
11968 TEST_ff_f (pow, minus_zero, min_subnorm_value, 0.0),
11969
11970 TEST_ff_f (pow, 16, 0.25L, 2),
11971 TEST_ff_f (pow, 0x1p64L, 0.125L, 256),
11972 TEST_ff_f (pow, 2, 4, 16),
11973 TEST_ff_f (pow, 256, 8, 0x1p64L),
11974
11975 TEST_ff_f (pow, 0.75L, 1.25L, 0.697953644326574699205914060237425566L),
11976
11977 #if defined TEST_DOUBLE || defined TEST_LDOUBLE
11978 TEST_ff_f (pow, -7.49321e+133, -9.80818e+16, 0, UNDERFLOW_EXCEPTION),
11979 #endif
11980
11981 TEST_ff_f (pow, -1.0, -0xffffff, -1.0),
11982 TEST_ff_f (pow, -1.0, -0x1fffffe, 1.0),
11983 #ifndef TEST_FLOAT
11984 TEST_ff_f (pow, -1.0, -0x1.fffffffffffffp+52L, -1.0),
11985 TEST_ff_f (pow, -1.0, -0x1.fffffffffffffp+53L, 1.0),
11986 #endif
11987 #ifdef TEST_LDOUBLE
11988 # if LDBL_MANT_DIG >= 64
11989 TEST_ff_f (pow, -1.0, -0x1.fffffffffffffffep+63L, -1.0),
11990 TEST_ff_f (pow, -1.0, -0x1.fffffffffffffffep+64L, 1.0),
11991 # endif
11992 # if LDBL_MANT_DIG >= 106
11993 TEST_ff_f (pow, -1.0, -0x1.ffffffffffffffffffffffffff8p+105L, -1.0),
11994 TEST_ff_f (pow, -1.0, -0x1.ffffffffffffffffffffffffff8p+106L, 1.0),
11995 # endif
11996 # if LDBL_MANT_DIG >= 113
11997 TEST_ff_f (pow, -1.0, -0x1.ffffffffffffffffffffffffffffp+112L, -1.0),
11998 TEST_ff_f (pow, -1.0, -0x1.ffffffffffffffffffffffffffffp+113L, 1.0),
11999 # endif
12000 #endif
12001 TEST_ff_f (pow, -1.0, -max_value, 1.0),
12002
12003 TEST_ff_f (pow, -1.0, 0xffffff, -1.0),
12004 TEST_ff_f (pow, -1.0, 0x1fffffe, 1.0),
12005 #ifndef TEST_FLOAT
12006 TEST_ff_f (pow, -1.0, 0x1.fffffffffffffp+52L, -1.0),
12007 TEST_ff_f (pow, -1.0, 0x1.fffffffffffffp+53L, 1.0),
12008 #endif
12009 #ifdef TEST_LDOUBLE
12010 # if LDBL_MANT_DIG >= 64
12011 TEST_ff_f (pow, -1.0, 0x1.fffffffffffffffep+63L, -1.0),
12012 TEST_ff_f (pow, -1.0, 0x1.fffffffffffffffep+64L, 1.0),
12013 # endif
12014 # if LDBL_MANT_DIG >= 106
12015 TEST_ff_f (pow, -1.0, 0x1.ffffffffffffffffffffffffff8p+105L, -1.0),
12016 TEST_ff_f (pow, -1.0, 0x1.ffffffffffffffffffffffffff8p+106L, 1.0),
12017 # endif
12018 # if LDBL_MANT_DIG >= 113
12019 TEST_ff_f (pow, -1.0, 0x1.ffffffffffffffffffffffffffffp+112L, -1.0),
12020 TEST_ff_f (pow, -1.0, 0x1.ffffffffffffffffffffffffffffp+113L, 1.0),
12021 # endif
12022 #endif
12023 TEST_ff_f (pow, -1.0, max_value, 1.0),
12024
12025 TEST_ff_f (pow, -2.0, 126, 0x1p126),
12026 TEST_ff_f (pow, -2.0, 127, -0x1p127),
12027 /* Allow inexact results for float to be considered to underflow. */
12028 TEST_ff_f (pow, -2.0, -126, 0x1p-126, UNDERFLOW_EXCEPTION_OK_FLOAT),
12029 TEST_ff_f (pow, -2.0, -127, -0x1p-127, UNDERFLOW_EXCEPTION_OK_FLOAT),
12030
12031 TEST_ff_f (pow, -2.0, -0xffffff, minus_zero, UNDERFLOW_EXCEPTION),
12032 TEST_ff_f (pow, -2.0, -0x1fffffe, plus_zero, UNDERFLOW_EXCEPTION),
12033 #ifndef TEST_FLOAT
12034 TEST_ff_f (pow, -2.0, -0x1.fffffffffffffp+52L, minus_zero, UNDERFLOW_EXCEPTION),
12035 TEST_ff_f (pow, -2.0, -0x1.fffffffffffffp+53L, plus_zero, UNDERFLOW_EXCEPTION),
12036 #endif
12037 #ifdef TEST_LDOUBLE
12038 # if LDBL_MANT_DIG >= 64
12039 TEST_ff_f (pow, -2.0, -0x1.fffffffffffffffep+63L, minus_zero, UNDERFLOW_EXCEPTION),
12040 TEST_ff_f (pow, -2.0, -0x1.fffffffffffffffep+64L, plus_zero, UNDERFLOW_EXCEPTION),
12041 # endif
12042 # if LDBL_MANT_DIG >= 106
12043 TEST_ff_f (pow, -2.0, -0x1.ffffffffffffffffffffffffff8p+105L, minus_zero, UNDERFLOW_EXCEPTION),
12044 TEST_ff_f (pow, -2.0, -0x1.ffffffffffffffffffffffffff8p+106L, plus_zero, UNDERFLOW_EXCEPTION),
12045 # endif
12046 # if LDBL_MANT_DIG >= 113
12047 TEST_ff_f (pow, -2.0, -0x1.ffffffffffffffffffffffffffffp+112L, minus_zero, UNDERFLOW_EXCEPTION),
12048 TEST_ff_f (pow, -2.0, -0x1.ffffffffffffffffffffffffffffp+113L, plus_zero, UNDERFLOW_EXCEPTION),
12049 # endif
12050 #endif
12051 TEST_ff_f (pow, -2.0, -max_value, plus_zero, UNDERFLOW_EXCEPTION),
12052
12053 TEST_ff_f (pow, -2.0, 0xffffff, minus_infty, OVERFLOW_EXCEPTION),
12054 TEST_ff_f (pow, -2.0, 0x1fffffe, plus_infty, OVERFLOW_EXCEPTION),
12055 #ifndef TEST_FLOAT
12056 TEST_ff_f (pow, -2.0, 0x1.fffffffffffffp+52L, minus_infty, OVERFLOW_EXCEPTION),
12057 TEST_ff_f (pow, -2.0, 0x1.fffffffffffffp+53L, plus_infty, OVERFLOW_EXCEPTION),
12058 #endif
12059 #ifdef TEST_LDOUBLE
12060 # if LDBL_MANT_DIG >= 64
12061 TEST_ff_f (pow, -2.0, 0x1.fffffffffffffffep+63L, minus_infty, OVERFLOW_EXCEPTION),
12062 TEST_ff_f (pow, -2.0, 0x1.fffffffffffffffep+64L, plus_infty, OVERFLOW_EXCEPTION),
12063 # endif
12064 # if LDBL_MANT_DIG >= 106
12065 TEST_ff_f (pow, -2.0, 0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, OVERFLOW_EXCEPTION),
12066 TEST_ff_f (pow, -2.0, 0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, OVERFLOW_EXCEPTION),
12067 # endif
12068 # if LDBL_MANT_DIG >= 113
12069 TEST_ff_f (pow, -2.0, 0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, OVERFLOW_EXCEPTION),
12070 TEST_ff_f (pow, -2.0, 0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, OVERFLOW_EXCEPTION),
12071 # endif
12072 #endif
12073 TEST_ff_f (pow, -2.0, max_value, plus_infty, OVERFLOW_EXCEPTION),
12074
12075 TEST_ff_f (pow, -max_value, 0.5, qnan_value, INVALID_EXCEPTION),
12076 TEST_ff_f (pow, -max_value, 1.5, qnan_value, INVALID_EXCEPTION),
12077 TEST_ff_f (pow, -max_value, 1000.5, qnan_value, INVALID_EXCEPTION),
12078 TEST_ff_f (pow, -max_value, -2, plus_zero, UNDERFLOW_EXCEPTION),
12079 TEST_ff_f (pow, -max_value, -3, minus_zero, UNDERFLOW_EXCEPTION),
12080 TEST_ff_f (pow, -max_value, 2, plus_infty, OVERFLOW_EXCEPTION),
12081 TEST_ff_f (pow, -max_value, 3, minus_infty, OVERFLOW_EXCEPTION),
12082
12083 TEST_ff_f (pow, -max_value, -0xffffff, minus_zero, UNDERFLOW_EXCEPTION),
12084 TEST_ff_f (pow, -max_value, -0x1fffffe, plus_zero, UNDERFLOW_EXCEPTION),
12085 #ifndef TEST_FLOAT
12086 TEST_ff_f (pow, -max_value, -0x1.fffffffffffffp+52L, minus_zero, UNDERFLOW_EXCEPTION),
12087 TEST_ff_f (pow, -max_value, -0x1.fffffffffffffp+53L, plus_zero, UNDERFLOW_EXCEPTION),
12088 #endif
12089 #ifdef TEST_LDOUBLE
12090 # if LDBL_MANT_DIG >= 64
12091 TEST_ff_f (pow, -max_value, -0x1.fffffffffffffffep+63L, minus_zero, UNDERFLOW_EXCEPTION),
12092 TEST_ff_f (pow, -max_value, -0x1.fffffffffffffffep+64L, plus_zero, UNDERFLOW_EXCEPTION),
12093 # endif
12094 # if LDBL_MANT_DIG >= 106
12095 TEST_ff_f (pow, -max_value, -0x1.ffffffffffffffffffffffffff8p+105L, minus_zero, UNDERFLOW_EXCEPTION),
12096 TEST_ff_f (pow, -max_value, -0x1.ffffffffffffffffffffffffff8p+106L, plus_zero, UNDERFLOW_EXCEPTION),
12097 # endif
12098 # if LDBL_MANT_DIG >= 113
12099 TEST_ff_f (pow, -max_value, -0x1.ffffffffffffffffffffffffffffp+112L, minus_zero, UNDERFLOW_EXCEPTION),
12100 TEST_ff_f (pow, -max_value, -0x1.ffffffffffffffffffffffffffffp+113L, plus_zero, UNDERFLOW_EXCEPTION),
12101 # endif
12102 #endif
12103 TEST_ff_f (pow, -max_value, -max_value, plus_zero, UNDERFLOW_EXCEPTION),
12104
12105 TEST_ff_f (pow, -max_value, 0xffffff, minus_infty, OVERFLOW_EXCEPTION),
12106 TEST_ff_f (pow, -max_value, 0x1fffffe, plus_infty, OVERFLOW_EXCEPTION),
12107 #ifndef TEST_FLOAT
12108 TEST_ff_f (pow, -max_value, 0x1.fffffffffffffp+52L, minus_infty, OVERFLOW_EXCEPTION),
12109 TEST_ff_f (pow, -max_value, 0x1.fffffffffffffp+53L, plus_infty, OVERFLOW_EXCEPTION),
12110 #endif
12111 #ifdef TEST_LDOUBLE
12112 # if LDBL_MANT_DIG >= 64
12113 TEST_ff_f (pow, -max_value, 0x1.fffffffffffffffep+63L, minus_infty, OVERFLOW_EXCEPTION),
12114 TEST_ff_f (pow, -max_value, 0x1.fffffffffffffffep+64L, plus_infty, OVERFLOW_EXCEPTION),
12115 # endif
12116 # if LDBL_MANT_DIG >= 106
12117 TEST_ff_f (pow, -max_value, 0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, OVERFLOW_EXCEPTION),
12118 TEST_ff_f (pow, -max_value, 0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, OVERFLOW_EXCEPTION),
12119 # endif
12120 # if LDBL_MANT_DIG >= 113
12121 TEST_ff_f (pow, -max_value, 0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, OVERFLOW_EXCEPTION),
12122 TEST_ff_f (pow, -max_value, 0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, OVERFLOW_EXCEPTION),
12123 # endif
12124 #endif
12125 TEST_ff_f (pow, -max_value, max_value, plus_infty, OVERFLOW_EXCEPTION),
12126
12127 TEST_ff_f (pow, -0.5, 126, 0x1p-126),
12128 TEST_ff_f (pow, -0.5, 127, -0x1p-127),
12129 TEST_ff_f (pow, -0.5, -126, 0x1p126),
12130 TEST_ff_f (pow, -0.5, -127, -0x1p127),
12131
12132 TEST_ff_f (pow, -0.5, -0xffffff, minus_infty, OVERFLOW_EXCEPTION),
12133 TEST_ff_f (pow, -0.5, -0x1fffffe, plus_infty, OVERFLOW_EXCEPTION),
12134 #ifndef TEST_FLOAT
12135 TEST_ff_f (pow, -0.5, -0x1.fffffffffffffp+52L, minus_infty, OVERFLOW_EXCEPTION),
12136 TEST_ff_f (pow, -0.5, -0x1.fffffffffffffp+53L, plus_infty, OVERFLOW_EXCEPTION),
12137 #endif
12138 #ifdef TEST_LDOUBLE
12139 # if LDBL_MANT_DIG >= 64
12140 TEST_ff_f (pow, -0.5, -0x1.fffffffffffffffep+63L, minus_infty, OVERFLOW_EXCEPTION),
12141 TEST_ff_f (pow, -0.5, -0x1.fffffffffffffffep+64L, plus_infty, OVERFLOW_EXCEPTION),
12142 # endif
12143 # if LDBL_MANT_DIG >= 106
12144 TEST_ff_f (pow, -0.5, -0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, OVERFLOW_EXCEPTION),
12145 TEST_ff_f (pow, -0.5, -0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, OVERFLOW_EXCEPTION),
12146 # endif
12147 # if LDBL_MANT_DIG >= 113
12148 TEST_ff_f (pow, -0.5, -0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, OVERFLOW_EXCEPTION),
12149 TEST_ff_f (pow, -0.5, -0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, OVERFLOW_EXCEPTION),
12150 # endif
12151 #endif
12152 TEST_ff_f (pow, -0.5, -max_value, plus_infty, OVERFLOW_EXCEPTION),
12153
12154 TEST_ff_f (pow, -0.5, 0xffffff, minus_zero, UNDERFLOW_EXCEPTION),
12155 TEST_ff_f (pow, -0.5, 0x1fffffe, plus_zero, UNDERFLOW_EXCEPTION),
12156 #ifndef TEST_FLOAT
12157 TEST_ff_f (pow, -0.5, 0x1.fffffffffffffp+52L, minus_zero, UNDERFLOW_EXCEPTION),
12158 TEST_ff_f (pow, -0.5, 0x1.fffffffffffffp+53L, plus_zero, UNDERFLOW_EXCEPTION),
12159 #endif
12160 #ifdef TEST_LDOUBLE
12161 # if LDBL_MANT_DIG >= 64
12162 TEST_ff_f (pow, -0.5, 0x1.fffffffffffffffep+63L, minus_zero, UNDERFLOW_EXCEPTION),
12163 TEST_ff_f (pow, -0.5, 0x1.fffffffffffffffep+64L, plus_zero, UNDERFLOW_EXCEPTION),
12164 # endif
12165 # if LDBL_MANT_DIG >= 106
12166 TEST_ff_f (pow, -0.5, 0x1.ffffffffffffffffffffffffff8p+105L, minus_zero, UNDERFLOW_EXCEPTION),
12167 TEST_ff_f (pow, -0.5, 0x1.ffffffffffffffffffffffffff8p+106L, plus_zero, UNDERFLOW_EXCEPTION),
12168 # endif
12169 # if LDBL_MANT_DIG >= 113
12170 TEST_ff_f (pow, -0.5, 0x1.ffffffffffffffffffffffffffffp+112L, minus_zero, UNDERFLOW_EXCEPTION),
12171 TEST_ff_f (pow, -0.5, 0x1.ffffffffffffffffffffffffffffp+113L, plus_zero, UNDERFLOW_EXCEPTION),
12172 # endif
12173 #endif
12174 TEST_ff_f (pow, -0.5, max_value, plus_zero, UNDERFLOW_EXCEPTION),
12175
12176 TEST_ff_f (pow, -min_value, 0.5, qnan_value, INVALID_EXCEPTION),
12177 TEST_ff_f (pow, -min_value, 1.5, qnan_value, INVALID_EXCEPTION),
12178 TEST_ff_f (pow, -min_value, 1000.5, qnan_value, INVALID_EXCEPTION),
12179 TEST_ff_f (pow, -min_value, -2, plus_infty, OVERFLOW_EXCEPTION),
12180 TEST_ff_f (pow, -min_value, -3, minus_infty, OVERFLOW_EXCEPTION),
12181 /* Allow inexact results to be considered to underflow. */
12182 TEST_ff_f (pow, -min_value, 1, -min_value, UNDERFLOW_EXCEPTION_OK),
12183 TEST_ff_f (pow, -min_value, 2, plus_zero, UNDERFLOW_EXCEPTION),
12184 TEST_ff_f (pow, -min_value, 3, minus_zero, UNDERFLOW_EXCEPTION),
12185
12186 TEST_ff_f (pow, -min_value, -0xffffff, minus_infty, OVERFLOW_EXCEPTION),
12187 TEST_ff_f (pow, -min_value, -0x1fffffe, plus_infty, OVERFLOW_EXCEPTION),
12188 #ifndef TEST_FLOAT
12189 TEST_ff_f (pow, -min_value, -0x1.fffffffffffffp+52L, minus_infty, OVERFLOW_EXCEPTION),
12190 TEST_ff_f (pow, -min_value, -0x1.fffffffffffffp+53L, plus_infty, OVERFLOW_EXCEPTION),
12191 #endif
12192 #ifdef TEST_LDOUBLE
12193 # if LDBL_MANT_DIG >= 64
12194 TEST_ff_f (pow, -min_value, -0x1.fffffffffffffffep+63L, minus_infty, OVERFLOW_EXCEPTION),
12195 TEST_ff_f (pow, -min_value, -0x1.fffffffffffffffep+64L, plus_infty, OVERFLOW_EXCEPTION),
12196 # endif
12197 # if LDBL_MANT_DIG >= 106
12198 TEST_ff_f (pow, -min_value, -0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, OVERFLOW_EXCEPTION),
12199 TEST_ff_f (pow, -min_value, -0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, OVERFLOW_EXCEPTION),
12200 # endif
12201 # if LDBL_MANT_DIG >= 113
12202 TEST_ff_f (pow, -min_value, -0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, OVERFLOW_EXCEPTION),
12203 TEST_ff_f (pow, -min_value, -0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, OVERFLOW_EXCEPTION),
12204 # endif
12205 #endif
12206 TEST_ff_f (pow, -min_value, -max_value, plus_infty, OVERFLOW_EXCEPTION),
12207
12208 TEST_ff_f (pow, -min_value, 0xffffff, minus_zero, UNDERFLOW_EXCEPTION),
12209 TEST_ff_f (pow, -min_value, 0x1fffffe, plus_zero, UNDERFLOW_EXCEPTION),
12210 #ifndef TEST_FLOAT
12211 TEST_ff_f (pow, -min_value, 0x1.fffffffffffffp+52L, minus_zero, UNDERFLOW_EXCEPTION),
12212 TEST_ff_f (pow, -min_value, 0x1.fffffffffffffp+53L, plus_zero, UNDERFLOW_EXCEPTION),
12213 #endif
12214 #ifdef TEST_LDOUBLE
12215 # if LDBL_MANT_DIG >= 64
12216 TEST_ff_f (pow, -min_value, 0x1.fffffffffffffffep+63L, minus_zero, UNDERFLOW_EXCEPTION),
12217 TEST_ff_f (pow, -min_value, 0x1.fffffffffffffffep+64L, plus_zero, UNDERFLOW_EXCEPTION),
12218 # endif
12219 # if LDBL_MANT_DIG >= 106
12220 TEST_ff_f (pow, -min_value, 0x1.ffffffffffffffffffffffffff8p+105L, minus_zero, UNDERFLOW_EXCEPTION),
12221 TEST_ff_f (pow, -min_value, 0x1.ffffffffffffffffffffffffff8p+106L, plus_zero, UNDERFLOW_EXCEPTION),
12222 # endif
12223 # if LDBL_MANT_DIG >= 113
12224 TEST_ff_f (pow, -min_value, 0x1.ffffffffffffffffffffffffffffp+112L, minus_zero, UNDERFLOW_EXCEPTION),
12225 TEST_ff_f (pow, -min_value, 0x1.ffffffffffffffffffffffffffffp+113L, plus_zero, UNDERFLOW_EXCEPTION),
12226 # endif
12227 #endif
12228 TEST_ff_f (pow, -min_value, max_value, plus_zero, UNDERFLOW_EXCEPTION),
12229
12230 TEST_ff_f (pow, 0x0.ffffffp0, 10, 0.999999403953712118183885036774764444747L),
12231 TEST_ff_f (pow, 0x0.ffffffp0, 100, 0.999994039553108359406305079606228341585L),
12232 TEST_ff_f (pow, 0x0.ffffffp0, 1000, 0.9999403971297699052276650144650733772182L),
12233 TEST_ff_f (pow, 0x0.ffffffp0, 0x1p24, 0.3678794302077803437135155590023422899744L),
12234 TEST_ff_f (pow, 0x0.ffffffp0, 0x1p30, 1.603807831524924233828134753069728224044e-28L),
12235 TEST_ff_f (pow, 0x0.ffffffp0, 0x1.234566p30, 2.374884712135295099971443365381007297732e-32L),
12236 TEST_ff_f (pow, 0x0.ffffffp0, -10, 1.000000596046643153205170848674671339688L),
12237 TEST_ff_f (pow, 0x0.ffffffp0, -100, 1.000005960482418779499387594989252621451L),
12238 TEST_ff_f (pow, 0x0.ffffffp0, -1000, 1.000059606422943986382898964231519867906L),
12239 TEST_ff_f (pow, 0x0.ffffffp0, -0x1p24, 2.7182819094701610539628664526874952929416L),
12240 TEST_ff_f (pow, 0x0.ffffffp0, -0x1p30, 6.2351609734265057988914412331288163636075e+27L),
12241 TEST_ff_f (pow, 0x0.ffffffp0, -0x1.234566p30, 4.2107307141696353498921307077142537353515e+31L),
12242 TEST_ff_f (pow, 0x1.000002p0, 0x1p24, 7.3890552180866447284268641248075832310141L),
12243 TEST_ff_f (pow, 0x1.000002p0, 0x1.234566p29, 4.2107033006507495188536371520637025716256e+31L),
12244 TEST_ff_f (pow, 0x1.000002p0, -0x1.234566p29, 2.3749001736727769098946062325205705312166e-32L),
12245
12246 #if !defined TEST_FLOAT
12247 TEST_ff_f (pow, 0x0.fffffffffffff8p0L, 0x1.23456789abcdfp62L, 1.0118762747827252817436395051178295138220e-253L),
12248 TEST_ff_f (pow, 0x0.fffffffffffff8p0L, -0x1.23456789abcdfp62L, 9.8826311568054561811190162420900667121992e+252L),
12249 TEST_ff_f (pow, 0x1.0000000000001p0L, 0x1.23456789abcdfp61L, 9.8826311568044974397135026217687399395481e+252L),
12250 TEST_ff_f (pow, 0x1.0000000000001p0L, -0x1.23456789abcdfp61L, 1.0118762747828234466621210689458255908670e-253L),
12251 #endif
12252
12253 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64 && LDBL_MAX_EXP >= 16384
12254 TEST_ff_f (pow, 0x0.ffffffffffffffffp0L, 0x1.23456789abcdef0ep77L, 1.2079212226420368189981778807634890018840e-4048L),
12255 TEST_ff_f (pow, 0x0.ffffffffffffffffp0L, -0x1.23456789abcdef0ep77L, 8.2786855736563746280496724205839522148001e+4047L),
12256 TEST_ff_f (pow, 0x1.0000000000000002p0L, 0x1.23456789abcdef0ep76L, 8.2786855736563683535324500168799315131570e+4047L),
12257 TEST_ff_f (pow, 0x1.0000000000000002p0L, -0x1.23456789abcdef0ep76L, 1.2079212226420377344964713407722652880280e-4048L),
12258 #endif
12259
12260 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
12261 TEST_ff_f (pow, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.23456789abcdef0123456789abcdp126L, 1.2079212226420440237790185999151440179953e-4048L),
12262 TEST_ff_f (pow, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.23456789abcdef0123456789abcdp126L, 8.2786855736563252489063231915535105363602e+4047L),
12263 TEST_ff_f (pow, 0x1.0000000000000000000000000001p0L, 0x1.23456789abcdef0123456789abcdp125L, 8.2786855736563252489063231915423647547782e+4047L),
12264 TEST_ff_f (pow, 0x1.0000000000000000000000000001p0L, -0x1.23456789abcdef0123456789abcdp125L, 1.2079212226420440237790185999167702696503e-4048L),
12265 #endif
12266
12267 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
12268 TEST_ff_f (pow, 1e4932L, 0.75L, 1e3699L),
12269 TEST_ff_f (pow, 1e4928L, 0.75L, 1e3696L),
12270 TEST_ff_f (pow, 1e4924L, 0.75L, 1e3693L),
12271 TEST_ff_f (pow, 1e4920L, 0.75L, 1e3690L),
12272 TEST_ff_f (pow, 10.0L, 4932.0L, 1e4932L),
12273 TEST_ff_f (pow, 10.0L, 4931.0L, 1e4931L),
12274 TEST_ff_f (pow, 10.0L, 4930.0L, 1e4930L),
12275 TEST_ff_f (pow, 10.0L, 4929.0L, 1e4929L),
12276 TEST_ff_f (pow, 10.0L, -4931.0L, 1e-4931L),
12277 TEST_ff_f (pow, 10.0L, -4930.0L, 1e-4930L),
12278 TEST_ff_f (pow, 10.0L, -4929.0L, 1e-4929L),
12279 TEST_ff_f (pow, 1e27L, 182.0L, 1e4914L),
12280 TEST_ff_f (pow, 1e27L, -182.0L, 1e-4914L),
12281 #endif
12282
12283 TEST_ff_f (pow, min_subnorm_value, min_subnorm_value, 1.0L),
12284 TEST_ff_f (pow, min_subnorm_value, -min_subnorm_value, 1.0L),
12285 TEST_ff_f (pow, max_value, min_subnorm_value, 1.0L),
12286 TEST_ff_f (pow, max_value, -min_subnorm_value, 1.0L),
12287 TEST_ff_f (pow, 0.99L, min_subnorm_value, 1.0L),
12288 TEST_ff_f (pow, 0.99L, -min_subnorm_value, 1.0L),
12289 TEST_ff_f (pow, 1.01L, min_subnorm_value, 1.0L),
12290 TEST_ff_f (pow, 1.01L, -min_subnorm_value, 1.0L),
12291
12292 TEST_ff_f (pow, 2.0L, -100000.0L, plus_zero, UNDERFLOW_EXCEPTION),
12293 END_DATA (pow)
12294 };
12295
12296 static void
12297 pow_test (void)
12298 {
12299
12300 errno = 0;
12301 FUNC(pow) (0, 0);
12302 if (errno == ENOSYS)
12303 /* Function not implemented. */
12304 return;
12305
12306 START (pow);
12307 RUN_TEST_LOOP_ff_f (pow, pow_test_data, );
12308 END (pow);
12309 }
12310
12311
12312 static const struct test_ff_f_data pow_tonearest_test_data[] =
12313 {
12314 START_DATA (pow_tonearest),
12315 TEST_ff_f (pow, 1.0625L, 1.125L, 1.070582293028761362162622578677070098674L),
12316 TEST_ff_f (pow, 1.5L, 1.03125L, 1.519127098714743184071644334163037684948L),
12317 END_DATA (pow_tonearest)
12318 };
12319
12320 static void
12321 pow_test_tonearest (void)
12322 {
12323 errno = 0;
12324 FUNC(pow) (0, 0);
12325 if (errno == ENOSYS)
12326 /* Function not implemented. */
12327 return;
12328
12329 START (pow_tonearest);
12330 RUN_TEST_LOOP_ff_f (pow, pow_tonearest_test_data, FE_TONEAREST);
12331 END (pow_tonearest);
12332 }
12333
12334
12335 static const struct test_ff_f_data pow_towardzero_test_data[] =
12336 {
12337 START_DATA (pow_towardzero),
12338 TEST_ff_f (pow, 1.0625L, 1.125L, 1.070582293028761362162622578677070098674L),
12339 TEST_ff_f (pow, 1.5L, 1.03125L, 1.519127098714743184071644334163037684948L),
12340 END_DATA (pow_towardzero)
12341 };
12342
12343 static void
12344 pow_test_towardzero (void)
12345 {
12346 errno = 0;
12347 FUNC(pow) (0, 0);
12348 if (errno == ENOSYS)
12349 /* Function not implemented. */
12350 return;
12351
12352 START (pow_towardzero);
12353 RUN_TEST_LOOP_ff_f (pow, pow_towardzero_test_data, FE_TOWARDZERO);
12354 END (pow_towardzero);
12355 }
12356
12357
12358 static const struct test_ff_f_data pow_downward_test_data[] =
12359 {
12360 START_DATA (pow_downward),
12361 TEST_ff_f (pow, 1.0625L, 1.125L, 1.070582293028761362162622578677070098674L),
12362 TEST_ff_f (pow, 1.5L, 1.03125L, 1.519127098714743184071644334163037684948L),
12363 END_DATA (pow_downward)
12364 };
12365
12366 static void
12367 pow_test_downward (void)
12368 {
12369 errno = 0;
12370 FUNC(pow) (0, 0);
12371 if (errno == ENOSYS)
12372 /* Function not implemented. */
12373 return;
12374
12375 START (pow_downward);
12376 RUN_TEST_LOOP_ff_f (pow, pow_downward_test_data, FE_DOWNWARD);
12377 END (pow_downward);
12378 }
12379
12380
12381 static const struct test_ff_f_data pow_upward_test_data[] =
12382 {
12383 START_DATA (pow_upward),
12384 TEST_ff_f (pow, 1.0625L, 1.125L, 1.070582293028761362162622578677070098674L),
12385 TEST_ff_f (pow, 1.5L, 1.03125L, 1.519127098714743184071644334163037684948L),
12386 END_DATA (pow_upward)
12387 };
12388
12389 static void
12390 pow_test_upward (void)
12391 {
12392 errno = 0;
12393 FUNC(pow) (0, 0);
12394 if (errno == ENOSYS)
12395 /* Function not implemented. */
12396 return;
12397
12398 START (pow_upward);
12399 RUN_TEST_LOOP_ff_f (pow, pow_upward_test_data, FE_UPWARD);
12400 END (pow_upward);
12401 }
12402
12403
12404 static const struct test_ff_f_data remainder_test_data[] =
12405 {
12406 START_DATA (remainder),
12407 TEST_ff_f (remainder, 1, 0, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12408 TEST_ff_f (remainder, 1, minus_zero, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12409 TEST_ff_f (remainder, plus_infty, minus_zero, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12410 TEST_ff_f (remainder, plus_infty, 0, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12411 TEST_ff_f (remainder, plus_infty, 1, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12412 TEST_ff_f (remainder, plus_infty, 2, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12413 TEST_ff_f (remainder, minus_infty, minus_zero, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12414 TEST_ff_f (remainder, minus_infty, 0, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12415 TEST_ff_f (remainder, minus_infty, 1, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12416 TEST_ff_f (remainder, minus_infty, 2, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12417 TEST_ff_f (remainder, qnan_value, qnan_value, qnan_value, ERRNO_UNCHANGED),
12418 TEST_ff_f (remainder, 0, qnan_value, qnan_value, ERRNO_UNCHANGED),
12419 TEST_ff_f (remainder, qnan_value, 0, qnan_value, ERRNO_UNCHANGED),
12420
12421 TEST_ff_f (remainder, 7.0, plus_infty, 7.0, ERRNO_UNCHANGED),
12422 TEST_ff_f (remainder, 7.0, minus_infty, 7.0, ERRNO_UNCHANGED),
12423
12424 TEST_ff_f (remainder, 1.625, 1.0, -0.375),
12425 TEST_ff_f (remainder, -1.625, 1.0, 0.375),
12426 TEST_ff_f (remainder, 1.625, -1.0, -0.375),
12427 TEST_ff_f (remainder, -1.625, -1.0, 0.375),
12428 TEST_ff_f (remainder, 5.0, 2.0, 1.0),
12429 TEST_ff_f (remainder, 3.0, 2.0, -1.0),
12430 END_DATA (remainder)
12431 };
12432
12433 static void
12434 remainder_test (void)
12435 {
12436 errno = 0;
12437 FUNC(remainder) (1.625, 1.0);
12438 if (errno == ENOSYS)
12439 /* Function not implemented. */
12440 return;
12441
12442 START (remainder);
12443 RUN_TEST_LOOP_ff_f (remainder, remainder_test_data, );
12444 END (remainder);
12445 }
12446
12447 static void
12448 remquo_test (void)
12449 {
12450 /* x is needed. */
12451 int x;
12452
12453 errno = 0;
12454 FUNC(remquo) (1.625, 1.0, &x);
12455 if (errno == ENOSYS)
12456 /* Function not implemented. */
12457 return;
12458
12459 START (remquo);
12460
12461 TEST_ffI_f1 (remquo, 1, 0, qnan_value, IGNORE, INVALID_EXCEPTION);
12462 TEST_ffI_f1 (remquo, 1, minus_zero, qnan_value, IGNORE, INVALID_EXCEPTION);
12463 TEST_ffI_f1 (remquo, plus_infty, 1, qnan_value, IGNORE, INVALID_EXCEPTION);
12464 TEST_ffI_f1 (remquo, minus_infty, 1, qnan_value, IGNORE, INVALID_EXCEPTION);
12465 TEST_ffI_f1 (remquo, qnan_value, qnan_value, qnan_value, IGNORE);
12466
12467 TEST_ffI_f1 (remquo, 1.625, 1.0, -0.375, 2);
12468 TEST_ffI_f1 (remquo, -1.625, 1.0, 0.375, -2);
12469 TEST_ffI_f1 (remquo, 1.625, -1.0, -0.375, -2);
12470 TEST_ffI_f1 (remquo, -1.625, -1.0, 0.375, 2);
12471
12472 TEST_ffI_f1 (remquo, 5, 2, 1, 2);
12473 TEST_ffI_f1 (remquo, 3, 2, -1, 2);
12474
12475 END (remquo);
12476 }
12477
12478 static const struct test_f_f_data rint_test_data[] =
12479 {
12480 START_DATA (rint),
12481 /* TODO: missing qNaN tests. */
12482
12483 TEST_f_f (rint, 0.0, 0.0),
12484 TEST_f_f (rint, minus_zero, minus_zero),
12485 TEST_f_f (rint, plus_infty, plus_infty),
12486 TEST_f_f (rint, minus_infty, minus_infty),
12487
12488 /* Default rounding mode is round to even. */
12489 TEST_f_f (rint, 0.5, 0.0),
12490 TEST_f_f (rint, 1.5, 2.0),
12491 TEST_f_f (rint, 2.5, 2.0),
12492 TEST_f_f (rint, 3.5, 4.0),
12493 TEST_f_f (rint, 4.5, 4.0),
12494 TEST_f_f (rint, -0.5, -0.0),
12495 TEST_f_f (rint, -1.5, -2.0),
12496 TEST_f_f (rint, -2.5, -2.0),
12497 TEST_f_f (rint, -3.5, -4.0),
12498 TEST_f_f (rint, -4.5, -4.0),
12499 TEST_f_f (rint, 0.1, 0.0),
12500 TEST_f_f (rint, 0.25, 0.0),
12501 TEST_f_f (rint, 0.625, 1.0),
12502 TEST_f_f (rint, -0.1, -0.0),
12503 TEST_f_f (rint, -0.25, -0.0),
12504 TEST_f_f (rint, -0.625, -1.0),
12505 TEST_f_f (rint, 262144.75, 262145.0),
12506 TEST_f_f (rint, 262142.75, 262143.0),
12507 TEST_f_f (rint, 524286.75, 524287.0),
12508 TEST_f_f (rint, 524288.75, 524289.0),
12509 TEST_f_f (rint, 1048576.75, 1048577.0),
12510 TEST_f_f (rint, 2097152.75, 2097153.0),
12511 TEST_f_f (rint, -1048576.75, -1048577.0),
12512 TEST_f_f (rint, -2097152.75, -2097153.0),
12513 #ifndef TEST_FLOAT
12514 TEST_f_f (rint, 70368744177664.75, 70368744177665.0),
12515 TEST_f_f (rint, 140737488355328.75, 140737488355329.0),
12516 TEST_f_f (rint, 281474976710656.75, 281474976710657.0),
12517 TEST_f_f (rint, 562949953421312.75, 562949953421313.0),
12518 TEST_f_f (rint, 1125899906842624.75, 1125899906842625.0),
12519 TEST_f_f (rint, -70368744177664.75, -70368744177665.0),
12520 TEST_f_f (rint, -140737488355328.75, -140737488355329.0),
12521 TEST_f_f (rint, -281474976710656.75, -281474976710657.0),
12522 TEST_f_f (rint, -562949953421312.75, -562949953421313.0),
12523 TEST_f_f (rint, -1125899906842624.75, -1125899906842625.0),
12524 #endif
12525 #ifdef TEST_LDOUBLE
12526 /* The result can only be represented in long double. */
12527 TEST_f_f (rint, 4503599627370495.5L, 4503599627370496.0L),
12528 TEST_f_f (rint, 4503599627370496.25L, 4503599627370496.0L),
12529 TEST_f_f (rint, 4503599627370496.5L, 4503599627370496.0L),
12530 TEST_f_f (rint, 4503599627370496.75L, 4503599627370497.0L),
12531 TEST_f_f (rint, 4503599627370497.5L, 4503599627370498.0L),
12532
12533 # if LDBL_MANT_DIG > 100
12534 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370495.0L),
12535 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370496.0L),
12536 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370497.0L),
12537 # endif
12538
12539 TEST_f_f (rint, -4503599627370495.5L, -4503599627370496.0L),
12540 TEST_f_f (rint, -4503599627370496.25L, -4503599627370496.0L),
12541 TEST_f_f (rint, -4503599627370496.5L, -4503599627370496.0L),
12542 TEST_f_f (rint, -4503599627370496.75L, -4503599627370497.0L),
12543 TEST_f_f (rint, -4503599627370497.5L, -4503599627370498.0L),
12544
12545 # if LDBL_MANT_DIG > 100
12546 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370495.0L),
12547 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370496.0L),
12548 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370497.0L),
12549
12550 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740991.0L),
12551 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740992.0L),
12552 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740993.0L),
12553 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740992.0L),
12554 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740993.0L),
12555 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740994.0L),
12556
12557 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740991.0L),
12558 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740992.0L),
12559 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740993.0L),
12560 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740992.0L),
12561 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740993.0L),
12562 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740994.0L),
12563 # endif
12564
12565 TEST_f_f (rint, 9007199254740991.5L, 9007199254740992.0L),
12566 TEST_f_f (rint, 9007199254740992.25L, 9007199254740992.0L),
12567 TEST_f_f (rint, 9007199254740992.5L, 9007199254740992.0L),
12568 TEST_f_f (rint, 9007199254740992.75L, 9007199254740993.0L),
12569 TEST_f_f (rint, 9007199254740993.5L, 9007199254740994.0L),
12570
12571 TEST_f_f (rint, -9007199254740991.5L, -9007199254740992.0L),
12572 TEST_f_f (rint, -9007199254740992.25L, -9007199254740992.0L),
12573 TEST_f_f (rint, -9007199254740992.5L, -9007199254740992.0L),
12574 TEST_f_f (rint, -9007199254740992.75L, -9007199254740993.0L),
12575 TEST_f_f (rint, -9007199254740993.5L, -9007199254740994.0L),
12576
12577 TEST_f_f (rint, 72057594037927935.5L, 72057594037927936.0L),
12578 TEST_f_f (rint, 72057594037927936.25L, 72057594037927936.0L),
12579 TEST_f_f (rint, 72057594037927936.5L, 72057594037927936.0L),
12580 TEST_f_f (rint, 72057594037927936.75L, 72057594037927937.0L),
12581 TEST_f_f (rint, 72057594037927937.5L, 72057594037927938.0L),
12582
12583 TEST_f_f (rint, -72057594037927935.5L, -72057594037927936.0L),
12584 TEST_f_f (rint, -72057594037927936.25L, -72057594037927936.0L),
12585 TEST_f_f (rint, -72057594037927936.5L, -72057594037927936.0L),
12586 TEST_f_f (rint, -72057594037927936.75L, -72057594037927937.0L),
12587 TEST_f_f (rint, -72057594037927937.5L, -72057594037927938.0L),
12588
12589 TEST_f_f (rint, 10141204801825835211973625643007.5L, 10141204801825835211973625643008.0L),
12590 TEST_f_f (rint, 10141204801825835211973625643008.25L, 10141204801825835211973625643008.0L),
12591 TEST_f_f (rint, 10141204801825835211973625643008.5L, 10141204801825835211973625643008.0L),
12592 TEST_f_f (rint, 10141204801825835211973625643008.75L, 10141204801825835211973625643009.0L),
12593 TEST_f_f (rint, 10141204801825835211973625643009.5L, 10141204801825835211973625643010.0L),
12594 #endif
12595 END_DATA (rint)
12596 };
12597
12598 static void
12599 rint_test (void)
12600 {
12601 START (rint);
12602 RUN_TEST_LOOP_f_f (rint, rint_test_data, );
12603 END (rint);
12604 }
12605
12606 static const struct test_f_f_data rint_tonearest_test_data[] =
12607 {
12608 START_DATA (rint_tonearest),
12609 TEST_f_f (rint, 2.0, 2.0),
12610 TEST_f_f (rint, 1.5, 2.0),
12611 TEST_f_f (rint, 1.0, 1.0),
12612 TEST_f_f (rint, 0.5, 0.0),
12613 TEST_f_f (rint, 0.0, 0.0),
12614 TEST_f_f (rint, minus_zero, minus_zero),
12615 TEST_f_f (rint, -0.5, -0.0),
12616 TEST_f_f (rint, -1.0, -1.0),
12617 TEST_f_f (rint, -1.5, -2.0),
12618 TEST_f_f (rint, -2.0, -2.0),
12619 TEST_f_f (rint, 0.1, 0.0),
12620 TEST_f_f (rint, 0.25, 0.0),
12621 TEST_f_f (rint, 0.625, 1.0),
12622 TEST_f_f (rint, -0.1, -0.0),
12623 TEST_f_f (rint, -0.25, -0.0),
12624 TEST_f_f (rint, -0.625, -1.0),
12625 TEST_f_f (rint, 1048576.75, 1048577.0),
12626 TEST_f_f (rint, 2097152.75, 2097153.0),
12627 TEST_f_f (rint, -1048576.75, -1048577.0),
12628 TEST_f_f (rint, -2097152.75, -2097153.0),
12629 #ifndef TEST_FLOAT
12630 TEST_f_f (rint, 70368744177664.75, 70368744177665.0),
12631 TEST_f_f (rint, 140737488355328.75, 140737488355329.0),
12632 TEST_f_f (rint, 281474976710656.75, 281474976710657.0),
12633 TEST_f_f (rint, 562949953421312.75, 562949953421313.0),
12634 TEST_f_f (rint, 1125899906842624.75, 1125899906842625.0),
12635 TEST_f_f (rint, -70368744177664.75, -70368744177665.0),
12636 TEST_f_f (rint, -140737488355328.75, -140737488355329.0),
12637 TEST_f_f (rint, -281474976710656.75, -281474976710657.0),
12638 TEST_f_f (rint, -562949953421312.75, -562949953421313.0),
12639 TEST_f_f (rint, -1125899906842624.75, -1125899906842625.0),
12640 #endif
12641 #ifdef TEST_LDOUBLE
12642 /* The result can only be represented in long double. */
12643 TEST_f_f (rint, 4503599627370495.5L, 4503599627370496.0L),
12644 TEST_f_f (rint, 4503599627370496.25L, 4503599627370496.0L),
12645 TEST_f_f (rint, 4503599627370496.5L, 4503599627370496.0L),
12646 TEST_f_f (rint, 4503599627370496.75L, 4503599627370497.0L),
12647 TEST_f_f (rint, 4503599627370497.5L, 4503599627370498.0L),
12648 # if LDBL_MANT_DIG > 100
12649 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370495.0L),
12650 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370496.0L),
12651 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370497.0L),
12652 # endif
12653 TEST_f_f (rint, -4503599627370495.5L, -4503599627370496.0L),
12654 TEST_f_f (rint, -4503599627370496.25L, -4503599627370496.0L),
12655 TEST_f_f (rint, -4503599627370496.5L, -4503599627370496.0L),
12656 TEST_f_f (rint, -4503599627370496.75L, -4503599627370497.0L),
12657 TEST_f_f (rint, -4503599627370497.5L, -4503599627370498.0L),
12658 # if LDBL_MANT_DIG > 100
12659 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370495.0L),
12660 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370496.0L),
12661 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370497.0L),
12662
12663 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740991.0L),
12664 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740992.0L),
12665 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740993.0L),
12666 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740992.0L),
12667 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740993.0L),
12668 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740994.0L),
12669
12670 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740991.0L),
12671 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740992.0L),
12672 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740993.0L),
12673 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740992.0L),
12674 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740993.0L),
12675 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740994.0L),
12676 # endif
12677 #endif
12678 END_DATA (rint_tonearest)
12679 };
12680
12681 static void
12682 rint_test_tonearest (void)
12683 {
12684 START (rint_tonearest);
12685 RUN_TEST_LOOP_f_f (rint, rint_tonearest_test_data, FE_TONEAREST);
12686 END (rint_tonearest);
12687 }
12688
12689 static const struct test_f_f_data rint_towardzero_test_data[] =
12690 {
12691 START_DATA (rint_towardzero),
12692 TEST_f_f (rint, 2.0, 2.0),
12693 TEST_f_f (rint, 1.5, 1.0),
12694 TEST_f_f (rint, 1.0, 1.0),
12695 TEST_f_f (rint, 0.5, 0.0),
12696 TEST_f_f (rint, 0.0, 0.0),
12697 TEST_f_f (rint, minus_zero, minus_zero),
12698 TEST_f_f (rint, -0.5, -0.0),
12699 TEST_f_f (rint, -1.0, -1.0),
12700 TEST_f_f (rint, -1.5, -1.0),
12701 TEST_f_f (rint, -2.0, -2.0),
12702 TEST_f_f (rint, 0.1, 0.0),
12703 TEST_f_f (rint, 0.25, 0.0),
12704 TEST_f_f (rint, 0.625, 0.0),
12705 TEST_f_f (rint, -0.1, -0.0),
12706 TEST_f_f (rint, -0.25, -0.0),
12707 TEST_f_f (rint, -0.625, -0.0),
12708 TEST_f_f (rint, 1048576.75, 1048576.0),
12709 TEST_f_f (rint, 2097152.75, 2097152.0),
12710 TEST_f_f (rint, -1048576.75, -1048576.0),
12711 TEST_f_f (rint, -2097152.75, -2097152.0),
12712 #ifndef TEST_FLOAT
12713 TEST_f_f (rint, 70368744177664.75, 70368744177664.0),
12714 TEST_f_f (rint, 140737488355328.75, 140737488355328.0),
12715 TEST_f_f (rint, 281474976710656.75, 281474976710656.0),
12716 TEST_f_f (rint, 562949953421312.75, 562949953421312.0),
12717 TEST_f_f (rint, 1125899906842624.75, 1125899906842624.0),
12718 TEST_f_f (rint, -70368744177664.75, -70368744177664.0),
12719 TEST_f_f (rint, -140737488355328.75, -140737488355328.0),
12720 TEST_f_f (rint, -281474976710656.75, -281474976710656.0),
12721 TEST_f_f (rint, -562949953421312.75, -562949953421312.0),
12722 TEST_f_f (rint, -1125899906842624.75, -1125899906842624.0),
12723 #endif
12724 #ifdef TEST_LDOUBLE
12725 /* The result can only be represented in long double. */
12726 TEST_f_f (rint, 4503599627370495.5L, 4503599627370495.0L),
12727 TEST_f_f (rint, 4503599627370496.25L, 4503599627370496.0L),
12728 TEST_f_f (rint, 4503599627370496.5L, 4503599627370496.0L),
12729 TEST_f_f (rint, 4503599627370496.75L, 4503599627370496.0L),
12730 TEST_f_f (rint, 4503599627370497.5L, 4503599627370497.0L),
12731 # if LDBL_MANT_DIG > 100
12732 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370494.0L),
12733 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370495.0L),
12734 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370496.0L),
12735 # endif
12736 TEST_f_f (rint, -4503599627370495.5L, -4503599627370495.0L),
12737 TEST_f_f (rint, -4503599627370496.25L, -4503599627370496.0L),
12738 TEST_f_f (rint, -4503599627370496.5L, -4503599627370496.0L),
12739 TEST_f_f (rint, -4503599627370496.75L, -4503599627370496.0L),
12740 TEST_f_f (rint, -4503599627370497.5L, -4503599627370497.0L),
12741 # if LDBL_MANT_DIG > 100
12742 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370494.0L),
12743 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370495.0L),
12744 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370496.0L),
12745
12746 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740991.0L),
12747 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740992.0L),
12748 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740993.0L),
12749 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740991.0L),
12750 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740992.0L),
12751 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740993.0L),
12752
12753 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740991.0L),
12754 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740992.0L),
12755 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740993.0L),
12756 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740991.0L),
12757 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740992.0L),
12758 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740993.0L),
12759 # endif
12760 #endif
12761 END_DATA (rint_towardzero)
12762 };
12763
12764 static void
12765 rint_test_towardzero (void)
12766 {
12767 START (rint_towardzero);
12768 RUN_TEST_LOOP_f_f (rint, rint_towardzero_test_data, FE_TOWARDZERO);
12769 END (rint_towardzero);
12770 }
12771
12772 static const struct test_f_f_data rint_downward_test_data[] =
12773 {
12774 START_DATA (rint_downward),
12775 TEST_f_f (rint, 2.0, 2.0),
12776 TEST_f_f (rint, 1.5, 1.0),
12777 TEST_f_f (rint, 1.0, 1.0),
12778 TEST_f_f (rint, 0.5, 0.0),
12779 TEST_f_f (rint, 0.0, 0.0),
12780 TEST_f_f (rint, minus_zero, minus_zero),
12781 TEST_f_f (rint, -0.5, -1.0),
12782 TEST_f_f (rint, -1.0, -1.0),
12783 TEST_f_f (rint, -1.5, -2.0),
12784 TEST_f_f (rint, -2.0, -2.0),
12785 TEST_f_f (rint, 0.1, 0.0),
12786 TEST_f_f (rint, 0.25, 0.0),
12787 TEST_f_f (rint, 0.625, 0.0),
12788 TEST_f_f (rint, -0.1, -1.0),
12789 TEST_f_f (rint, -0.25, -1.0),
12790 TEST_f_f (rint, -0.625, -1.0),
12791 TEST_f_f (rint, 1048576.75, 1048576.0),
12792 TEST_f_f (rint, 2097152.75, 2097152.0),
12793 TEST_f_f (rint, -1048576.75, -1048577.0),
12794 TEST_f_f (rint, -2097152.75, -2097153.0),
12795 #ifndef TEST_FLOAT
12796 TEST_f_f (rint, 70368744177664.75, 70368744177664.0),
12797 TEST_f_f (rint, 140737488355328.75, 140737488355328.0),
12798 TEST_f_f (rint, 281474976710656.75, 281474976710656.0),
12799 TEST_f_f (rint, 562949953421312.75, 562949953421312.0),
12800 TEST_f_f (rint, 1125899906842624.75, 1125899906842624.0),
12801 TEST_f_f (rint, -70368744177664.75, -70368744177665.0),
12802 TEST_f_f (rint, -140737488355328.75, -140737488355329.0),
12803 TEST_f_f (rint, -281474976710656.75, -281474976710657.0),
12804 TEST_f_f (rint, -562949953421312.75, -562949953421313.0),
12805 TEST_f_f (rint, -1125899906842624.75, -1125899906842625.0),
12806 #endif
12807 #ifdef TEST_LDOUBLE
12808 /* The result can only be represented in long double. */
12809 TEST_f_f (rint, 4503599627370495.5L, 4503599627370495.0L),
12810 TEST_f_f (rint, 4503599627370496.25L, 4503599627370496.0L),
12811 TEST_f_f (rint, 4503599627370496.5L, 4503599627370496.0L),
12812 TEST_f_f (rint, 4503599627370496.75L, 4503599627370496.0L),
12813 TEST_f_f (rint, 4503599627370497.5L, 4503599627370497.0L),
12814 # if LDBL_MANT_DIG > 100
12815 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370494.0L),
12816 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370495.0L),
12817 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370496.0L),
12818 # endif
12819 TEST_f_f (rint, -4503599627370495.5L, -4503599627370496.0L),
12820 TEST_f_f (rint, -4503599627370496.25L, -4503599627370497.0L),
12821 TEST_f_f (rint, -4503599627370496.5L, -4503599627370497.0L),
12822 TEST_f_f (rint, -4503599627370496.75L, -4503599627370497.0L),
12823 TEST_f_f (rint, -4503599627370497.5L, -4503599627370498.0L),
12824 # if LDBL_MANT_DIG > 100
12825 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370495.0L),
12826 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370496.0L),
12827 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370497.0L),
12828
12829 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740991.0L),
12830 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740992.0L),
12831 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740993.0L),
12832 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740991.0L),
12833 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740992.0L),
12834 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740993.0L),
12835
12836 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740992.0L),
12837 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740993.0L),
12838 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740994.0L),
12839 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740992.0L),
12840 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740993.0L),
12841 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740994.0L),
12842 # endif
12843 #endif
12844 END_DATA (rint_downward)
12845 };
12846
12847 static void
12848 rint_test_downward (void)
12849 {
12850 START (rint_downward);
12851 RUN_TEST_LOOP_f_f (rint, rint_downward_test_data, FE_DOWNWARD);
12852 END (rint_downward);
12853 }
12854
12855 static const struct test_f_f_data rint_upward_test_data[] =
12856 {
12857 START_DATA (rint_upward),
12858 TEST_f_f (rint, 2.0, 2.0),
12859 TEST_f_f (rint, 1.5, 2.0),
12860 TEST_f_f (rint, 1.0, 1.0),
12861 TEST_f_f (rint, 0.5, 1.0),
12862 TEST_f_f (rint, 0.0, 0.0),
12863 TEST_f_f (rint, minus_zero, minus_zero),
12864 TEST_f_f (rint, -0.5, -0.0),
12865 TEST_f_f (rint, -1.0, -1.0),
12866 TEST_f_f (rint, -1.5, -1.0),
12867 TEST_f_f (rint, -2.0, -2.0),
12868 TEST_f_f (rint, 0.1, 1.0),
12869 TEST_f_f (rint, 0.25, 1.0),
12870 TEST_f_f (rint, 0.625, 1.0),
12871 TEST_f_f (rint, -0.1, -0.0),
12872 TEST_f_f (rint, -0.25, -0.0),
12873 TEST_f_f (rint, -0.625, -0.0),
12874 TEST_f_f (rint, 1048576.75, 1048577.0),
12875 TEST_f_f (rint, 2097152.75, 2097153.0),
12876 TEST_f_f (rint, -1048576.75, -1048576.0),
12877 TEST_f_f (rint, -2097152.75, -2097152.0),
12878 #ifndef TEST_FLOAT
12879 TEST_f_f (rint, 70368744177664.75, 70368744177665.0),
12880 TEST_f_f (rint, 140737488355328.75, 140737488355329.0),
12881 TEST_f_f (rint, 281474976710656.75, 281474976710657.0),
12882 TEST_f_f (rint, 562949953421312.75, 562949953421313.0),
12883 TEST_f_f (rint, 1125899906842624.75, 1125899906842625.0),
12884 TEST_f_f (rint, -70368744177664.75, -70368744177664.0),
12885 TEST_f_f (rint, -140737488355328.75, -140737488355328.0),
12886 TEST_f_f (rint, -281474976710656.75, -281474976710656.0),
12887 TEST_f_f (rint, -562949953421312.75, -562949953421312.0),
12888 TEST_f_f (rint, -1125899906842624.75, -1125899906842624.0),
12889 #endif
12890 #ifdef TEST_LDOUBLE
12891 /* The result can only be represented in long double. */
12892 TEST_f_f (rint, 4503599627370495.5L, 4503599627370496.0L),
12893 TEST_f_f (rint, 4503599627370496.25L, 4503599627370497.0L),
12894 TEST_f_f (rint, 4503599627370496.5L, 4503599627370497.0L),
12895 TEST_f_f (rint, 4503599627370496.75L, 4503599627370497.0L),
12896 TEST_f_f (rint, 4503599627370497.5L, 4503599627370498.0L),
12897 # if LDBL_MANT_DIG > 100
12898 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370495.0L),
12899 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370496.0L),
12900 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370497.0L),
12901 # endif
12902 TEST_f_f (rint, -4503599627370495.5L, -4503599627370495.0L),
12903 TEST_f_f (rint, -4503599627370496.25L, -4503599627370496.0L),
12904 TEST_f_f (rint, -4503599627370496.5L, -4503599627370496.0L),
12905 TEST_f_f (rint, -4503599627370496.75L, -4503599627370496.0L),
12906 TEST_f_f (rint, -4503599627370497.5L, -4503599627370497.0L),
12907 # if LDBL_MANT_DIG > 100
12908 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370494.0L),
12909 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370495.0L),
12910 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370496.0L),
12911
12912 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740992.0L),
12913 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740993.0L),
12914 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740994.0L),
12915 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740992.0L),
12916 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740993.0L),
12917 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740994.0L),
12918
12919 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740991.0L),
12920 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740992.0L),
12921 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740993.0L),
12922 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740991.0L),
12923 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740992.0L),
12924 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740993.0L),
12925 # endif
12926 #endif
12927 END_DATA (rint_upward)
12928 };
12929
12930 static void
12931 rint_test_upward (void)
12932 {
12933 START (rint_upward);
12934 RUN_TEST_LOOP_f_f (rint, rint_upward_test_data, FE_UPWARD);
12935 END (rint_upward);
12936 }
12937
12938 static const struct test_f_f_data round_test_data[] =
12939 {
12940 START_DATA (round),
12941 /* TODO: missing +/-Inf as well as qNaN tests. */
12942
12943 TEST_f_f (round, 0, 0),
12944 TEST_f_f (round, minus_zero, minus_zero),
12945 TEST_f_f (round, 0.2L, 0.0),
12946 TEST_f_f (round, -0.2L, minus_zero),
12947 TEST_f_f (round, 0.5, 1.0),
12948 TEST_f_f (round, -0.5, -1.0),
12949 TEST_f_f (round, 0.8L, 1.0),
12950 TEST_f_f (round, -0.8L, -1.0),
12951 TEST_f_f (round, 1.5, 2.0),
12952 TEST_f_f (round, -1.5, -2.0),
12953 TEST_f_f (round, 0.1, 0.0),
12954 TEST_f_f (round, 0.25, 0.0),
12955 TEST_f_f (round, 0.625, 1.0),
12956 TEST_f_f (round, -0.1, -0.0),
12957 TEST_f_f (round, -0.25, -0.0),
12958 TEST_f_f (round, -0.625, -1.0),
12959 TEST_f_f (round, 2097152.5, 2097153),
12960 TEST_f_f (round, -2097152.5, -2097153),
12961
12962 #ifdef TEST_LDOUBLE
12963 /* The result can only be represented in long double. */
12964 TEST_f_f (round, 4503599627370495.5L, 4503599627370496.0L),
12965 TEST_f_f (round, 4503599627370496.25L, 4503599627370496.0L),
12966 TEST_f_f (round, 4503599627370496.5L, 4503599627370497.0L),
12967 TEST_f_f (round, 4503599627370496.75L, 4503599627370497.0L),
12968 TEST_f_f (round, 4503599627370497.5L, 4503599627370498.0L),
12969 # if LDBL_MANT_DIG > 100
12970 TEST_f_f (round, 4503599627370494.5000000000001L, 4503599627370495.0L),
12971 TEST_f_f (round, 4503599627370495.5000000000001L, 4503599627370496.0L),
12972 TEST_f_f (round, 4503599627370496.5000000000001L, 4503599627370497.0L),
12973 # endif
12974
12975 TEST_f_f (round, -4503599627370495.5L, -4503599627370496.0L),
12976 TEST_f_f (round, -4503599627370496.25L, -4503599627370496.0L),
12977 TEST_f_f (round, -4503599627370496.5L, -4503599627370497.0L),
12978 TEST_f_f (round, -4503599627370496.75L, -4503599627370497.0L),
12979 TEST_f_f (round, -4503599627370497.5L, -4503599627370498.0L),
12980 # if LDBL_MANT_DIG > 100
12981 TEST_f_f (round, -4503599627370494.5000000000001L, -4503599627370495.0L),
12982 TEST_f_f (round, -4503599627370495.5000000000001L, -4503599627370496.0L),
12983 TEST_f_f (round, -4503599627370496.5000000000001L, -4503599627370497.0L),
12984 # endif
12985
12986 TEST_f_f (round, 9007199254740991.5L, 9007199254740992.0L),
12987 TEST_f_f (round, 9007199254740992.25L, 9007199254740992.0L),
12988 TEST_f_f (round, 9007199254740992.5L, 9007199254740993.0L),
12989 TEST_f_f (round, 9007199254740992.75L, 9007199254740993.0L),
12990 TEST_f_f (round, 9007199254740993.5L, 9007199254740994.0L),
12991
12992 TEST_f_f (round, -9007199254740991.5L, -9007199254740992.0L),
12993 TEST_f_f (round, -9007199254740992.25L, -9007199254740992.0L),
12994 TEST_f_f (round, -9007199254740992.5L, -9007199254740993.0L),
12995 TEST_f_f (round, -9007199254740992.75L, -9007199254740993.0L),
12996 TEST_f_f (round, -9007199254740993.5L, -9007199254740994.0L),
12997
12998 # if LDBL_MANT_DIG > 100
12999 TEST_f_f (round, 9007199254740991.0000000000001L, 9007199254740991.0L),
13000 TEST_f_f (round, 9007199254740992.0000000000001L, 9007199254740992.0L),
13001 TEST_f_f (round, 9007199254740993.0000000000001L, 9007199254740993.0L),
13002 TEST_f_f (round, 9007199254740991.5000000000001L, 9007199254740992.0L),
13003 TEST_f_f (round, 9007199254740992.5000000000001L, 9007199254740993.0L),
13004 TEST_f_f (round, 9007199254740993.5000000000001L, 9007199254740994.0L),
13005
13006 TEST_f_f (round, -9007199254740991.0000000000001L, -9007199254740991.0L),
13007 TEST_f_f (round, -9007199254740992.0000000000001L, -9007199254740992.0L),
13008 TEST_f_f (round, -9007199254740993.0000000000001L, -9007199254740993.0L),
13009 TEST_f_f (round, -9007199254740991.5000000000001L, -9007199254740992.0L),
13010 TEST_f_f (round, -9007199254740992.5000000000001L, -9007199254740993.0L),
13011 TEST_f_f (round, -9007199254740993.5000000000001L, -9007199254740994.0L),
13012 # endif
13013
13014 TEST_f_f (round, 72057594037927935.5L, 72057594037927936.0L),
13015 TEST_f_f (round, 72057594037927936.25L, 72057594037927936.0L),
13016 TEST_f_f (round, 72057594037927936.5L, 72057594037927937.0L),
13017 TEST_f_f (round, 72057594037927936.75L, 72057594037927937.0L),
13018 TEST_f_f (round, 72057594037927937.5L, 72057594037927938.0L),
13019
13020 TEST_f_f (round, -72057594037927935.5L, -72057594037927936.0L),
13021 TEST_f_f (round, -72057594037927936.25L, -72057594037927936.0L),
13022 TEST_f_f (round, -72057594037927936.5L, -72057594037927937.0L),
13023 TEST_f_f (round, -72057594037927936.75L, -72057594037927937.0L),
13024 TEST_f_f (round, -72057594037927937.5L, -72057594037927938.0L),
13025
13026 TEST_f_f (round, 10141204801825835211973625643007.5L, 10141204801825835211973625643008.0L),
13027 TEST_f_f (round, 10141204801825835211973625643008.25L, 10141204801825835211973625643008.0L),
13028 TEST_f_f (round, 10141204801825835211973625643008.5L, 10141204801825835211973625643009.0L),
13029 TEST_f_f (round, 10141204801825835211973625643008.75L, 10141204801825835211973625643009.0L),
13030 TEST_f_f (round, 10141204801825835211973625643009.5L, 10141204801825835211973625643010.0L),
13031 #endif
13032 END_DATA (round)
13033 };
13034
13035 static void
13036 round_test (void)
13037 {
13038 START (round);
13039 RUN_TEST_LOOP_f_f (round, round_test_data, );
13040 END (round);
13041 }
13042
13043
13044 static const struct test_ff_f_data scalb_test_data[] =
13045 {
13046 START_DATA (scalb),
13047 TEST_ff_f (scalb, 2.0, 0.5, qnan_value, INVALID_EXCEPTION),
13048 TEST_ff_f (scalb, 3.0, -2.5, qnan_value, INVALID_EXCEPTION),
13049
13050 TEST_ff_f (scalb, 0, qnan_value, qnan_value),
13051 TEST_ff_f (scalb, 1, qnan_value, qnan_value),
13052
13053 TEST_ff_f (scalb, 1, 0, 1),
13054 TEST_ff_f (scalb, -1, 0, -1),
13055
13056 TEST_ff_f (scalb, 0, plus_infty, qnan_value, INVALID_EXCEPTION),
13057 TEST_ff_f (scalb, minus_zero, plus_infty, qnan_value, INVALID_EXCEPTION),
13058
13059 TEST_ff_f (scalb, 0, 2, 0),
13060 TEST_ff_f (scalb, minus_zero, -4, minus_zero),
13061 TEST_ff_f (scalb, 0, 0, 0),
13062 TEST_ff_f (scalb, minus_zero, 0, minus_zero),
13063 TEST_ff_f (scalb, 0, -1, 0),
13064 TEST_ff_f (scalb, minus_zero, -10, minus_zero),
13065 TEST_ff_f (scalb, 0, minus_infty, 0),
13066 TEST_ff_f (scalb, minus_zero, minus_infty, minus_zero),
13067
13068 TEST_ff_f (scalb, plus_infty, -1, plus_infty),
13069 TEST_ff_f (scalb, minus_infty, -10, minus_infty),
13070 TEST_ff_f (scalb, plus_infty, 0, plus_infty),
13071 TEST_ff_f (scalb, minus_infty, 0, minus_infty),
13072 TEST_ff_f (scalb, plus_infty, 2, plus_infty),
13073 TEST_ff_f (scalb, minus_infty, 100, minus_infty),
13074
13075 TEST_ff_f (scalb, 0.1L, minus_infty, 0.0),
13076 TEST_ff_f (scalb, -0.1L, minus_infty, minus_zero),
13077
13078 TEST_ff_f (scalb, 1, plus_infty, plus_infty),
13079 TEST_ff_f (scalb, -1, plus_infty, minus_infty),
13080 TEST_ff_f (scalb, plus_infty, plus_infty, plus_infty),
13081 TEST_ff_f (scalb, minus_infty, plus_infty, minus_infty),
13082
13083 TEST_ff_f (scalb, plus_infty, minus_infty, qnan_value, INVALID_EXCEPTION),
13084 TEST_ff_f (scalb, minus_infty, minus_infty, qnan_value, INVALID_EXCEPTION),
13085
13086 TEST_ff_f (scalb, qnan_value, 1, qnan_value),
13087 TEST_ff_f (scalb, 1, qnan_value, qnan_value),
13088 TEST_ff_f (scalb, qnan_value, 0, qnan_value),
13089 TEST_ff_f (scalb, 0, qnan_value, qnan_value),
13090 TEST_ff_f (scalb, qnan_value, plus_infty, qnan_value),
13091 TEST_ff_f (scalb, plus_infty, qnan_value, qnan_value),
13092 TEST_ff_f (scalb, qnan_value, qnan_value, qnan_value),
13093
13094 TEST_ff_f (scalb, 0.8L, 4, 12.8L),
13095 TEST_ff_f (scalb, -0.854375L, 5, -27.34L),
13096 END_DATA (scalb)
13097 };
13098
13099 static void
13100 scalb_test (void)
13101 {
13102
13103 START (scalb);
13104 RUN_TEST_LOOP_ff_f (scalb, scalb_test_data, );
13105 END (scalb);
13106 }
13107
13108
13109 static void
13110 scalbn_test (void)
13111 {
13112
13113 START (scalbn);
13114
13115 TEST_fi_f (scalbn, 0, 0, 0);
13116 TEST_fi_f (scalbn, minus_zero, 0, minus_zero);
13117
13118 TEST_fi_f (scalbn, plus_infty, 1, plus_infty);
13119 TEST_fi_f (scalbn, minus_infty, 1, minus_infty);
13120 TEST_fi_f (scalbn, qnan_value, 1, qnan_value);
13121
13122 TEST_fi_f (scalbn, 0.8L, 4, 12.8L);
13123 TEST_fi_f (scalbn, -0.854375L, 5, -27.34L);
13124
13125 TEST_fi_f (scalbn, 1, 0L, 1);
13126
13127 TEST_fi_f (scalbn, 1, INT_MAX, plus_infty, OVERFLOW_EXCEPTION);
13128 TEST_fi_f (scalbn, 1, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION);
13129 TEST_fi_f (scalbn, max_value, INT_MAX, plus_infty, OVERFLOW_EXCEPTION);
13130 TEST_fi_f (scalbn, max_value, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION);
13131 TEST_fi_f (scalbn, min_value, INT_MAX, plus_infty, OVERFLOW_EXCEPTION);
13132 TEST_fi_f (scalbn, min_value, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION);
13133 TEST_fi_f (scalbn, min_value / 4, INT_MAX, plus_infty, OVERFLOW_EXCEPTION);
13134 TEST_fi_f (scalbn, min_value / 4, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION);
13135
13136 END (scalbn);
13137 }
13138
13139
13140 static void
13141 scalbln_test (void)
13142 {
13143
13144 START (scalbln);
13145
13146 TEST_fl_f (scalbln, 0, 0, 0);
13147 TEST_fl_f (scalbln, minus_zero, 0, minus_zero);
13148
13149 TEST_fl_f (scalbln, plus_infty, 1, plus_infty);
13150 TEST_fl_f (scalbln, minus_infty, 1, minus_infty);
13151 TEST_fl_f (scalbln, qnan_value, 1, qnan_value);
13152
13153 TEST_fl_f (scalbln, 0.8L, 4, 12.8L);
13154 TEST_fl_f (scalbln, -0.854375L, 5, -27.34L);
13155
13156 TEST_fl_f (scalbln, 1, 0L, 1);
13157
13158 TEST_fl_f (scalbln, 1, INT_MAX, plus_infty, OVERFLOW_EXCEPTION);
13159 TEST_fl_f (scalbln, 1, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION);
13160 TEST_fl_f (scalbln, max_value, INT_MAX, plus_infty, OVERFLOW_EXCEPTION);
13161 TEST_fl_f (scalbln, max_value, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION);
13162 TEST_fl_f (scalbln, min_value, INT_MAX, plus_infty, OVERFLOW_EXCEPTION);
13163 TEST_fl_f (scalbln, min_value, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION);
13164 TEST_fl_f (scalbln, min_value / 4, INT_MAX, plus_infty, OVERFLOW_EXCEPTION);
13165 TEST_fl_f (scalbln, min_value / 4, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION);
13166
13167 TEST_fl_f (scalbln, 1, LONG_MAX, plus_infty, OVERFLOW_EXCEPTION);
13168 TEST_fl_f (scalbln, 1, LONG_MIN, plus_zero, UNDERFLOW_EXCEPTION);
13169 TEST_fl_f (scalbln, max_value, LONG_MAX, plus_infty, OVERFLOW_EXCEPTION);
13170 TEST_fl_f (scalbln, max_value, LONG_MIN, plus_zero, UNDERFLOW_EXCEPTION);
13171 TEST_fl_f (scalbln, min_value, LONG_MAX, plus_infty, OVERFLOW_EXCEPTION);
13172 TEST_fl_f (scalbln, min_value, LONG_MIN, plus_zero, UNDERFLOW_EXCEPTION);
13173 TEST_fl_f (scalbln, min_value / 4, LONG_MAX, plus_infty, OVERFLOW_EXCEPTION);
13174 TEST_fl_f (scalbln, min_value / 4, LONG_MIN, plus_zero, UNDERFLOW_EXCEPTION);
13175
13176 #if LONG_MAX >= 0x100000000
13177 TEST_fl_f (scalbln, 1, 0x88000000L, plus_infty, OVERFLOW_EXCEPTION);
13178 TEST_fl_f (scalbln, 1, -0x88000000L, plus_zero, UNDERFLOW_EXCEPTION);
13179 TEST_fl_f (scalbln, max_value, 0x88000000L, plus_infty, OVERFLOW_EXCEPTION);
13180 TEST_fl_f (scalbln, max_value, -0x88000000L, plus_zero, UNDERFLOW_EXCEPTION);
13181 TEST_fl_f (scalbln, min_value, 0x88000000L, plus_infty, OVERFLOW_EXCEPTION);
13182 TEST_fl_f (scalbln, min_value, -0x88000000L, plus_zero, UNDERFLOW_EXCEPTION);
13183 TEST_fl_f (scalbln, min_value / 4, 0x88000000L, plus_infty, OVERFLOW_EXCEPTION);
13184 TEST_fl_f (scalbln, min_value / 4, -0x88000000L, plus_zero, UNDERFLOW_EXCEPTION);
13185 #endif
13186
13187 END (scalbn);
13188 }
13189
13190
13191 static void
13192 signbit_test (void)
13193 {
13194 /* TODO: missing qNaN tests. */
13195
13196 START (signbit);
13197
13198 TEST_f_b (signbit, 0, 0);
13199 TEST_f_b (signbit, minus_zero, 1);
13200 TEST_f_b (signbit, plus_infty, 0);
13201 TEST_f_b (signbit, minus_infty, 1);
13202
13203 /* signbit (x) != 0 for x < 0. */
13204 TEST_f_b (signbit, -1, 1);
13205 /* signbit (x) == 0 for x >= 0. */
13206 TEST_f_b (signbit, 1, 0);
13207
13208 END (signbit);
13209 }
13210
13211
13212 static const struct test_f_f_data sin_test_data[] =
13213 {
13214 START_DATA (sin),
13215 TEST_f_f (sin, 0, 0),
13216 TEST_f_f (sin, minus_zero, minus_zero),
13217 TEST_f_f (sin, plus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13218 TEST_f_f (sin, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13219 TEST_f_f (sin, qnan_value, qnan_value, ERRNO_UNCHANGED),
13220
13221 TEST_f_f (sin, M_PI_6l, 0.5),
13222 TEST_f_f (sin, -M_PI_6l, -0.5),
13223 TEST_f_f (sin, M_PI_2l, 1),
13224 TEST_f_f (sin, -M_PI_2l, -1),
13225 TEST_f_f (sin, 0.75L, 0.681638760023334166733241952779893935L),
13226
13227 TEST_f_f (sin, 0x1p65, -0.047183876212354673805106149805700013943218L),
13228 TEST_f_f (sin, -0x1p65, 0.047183876212354673805106149805700013943218L),
13229
13230 TEST_f_f (sin, 0x1.7f4134p+103, -6.6703229329788657073304190650534846045235e-08L),
13231
13232 #ifdef TEST_DOUBLE
13233 TEST_f_f (sin, 0.80190127184058835, 0.71867942238767868),
13234 TEST_f_f (sin, 2.522464e-1, 2.4957989804940911e-1),
13235 #endif
13236
13237 #ifndef TEST_FLOAT
13238 TEST_f_f (sin, 1e22, -0.8522008497671888017727058937530293682618L),
13239 TEST_f_f (sin, 0x1p1023, 0.5631277798508840134529434079444683477104L),
13240 #endif
13241
13242 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
13243 TEST_f_f (sin, 0x1p16383L, 0.3893629985894208126948115852610595405563L),
13244 #endif
13245
13246 TEST_f_f (sin, 0x1p+120, 3.77820109360752022655548470056922991960587e-01L),
13247 TEST_f_f (sin, 0x1p+127, 6.23385512955870240370428801097126489001833e-01L),
13248 TEST_f_f (sin, 0x1.fffff8p+127, 4.85786063130487339701113680434728152037092e-02L),
13249 TEST_f_f (sin, 0x1.fffffep+127, -5.21876523333658540551505357019806722935726e-01L),
13250 TEST_f_f (sin, 0x1p+50, 4.96396515208940840876821859865411368093356e-01L),
13251 TEST_f_f (sin, 0x1p+28, -9.86198211836975655703110310527108292055548e-01L),
13252 END_DATA (sin)
13253 };
13254
13255 static void
13256 sin_test (void)
13257 {
13258 errno = 0;
13259 FUNC(sin) (0);
13260 if (errno == ENOSYS)
13261 /* Function not implemented. */
13262 return;
13263
13264 START (sin);
13265 RUN_TEST_LOOP_f_f (sin, sin_test_data, );
13266 END (sin);
13267 }
13268
13269
13270 static const struct test_f_f_data sin_tonearest_test_data[] =
13271 {
13272 START_DATA (sin_tonearest),
13273 TEST_f_f (sin, 1, 0.8414709848078965066525023216302989996226L),
13274 TEST_f_f (sin, 2, 0.9092974268256816953960198659117448427023L),
13275 TEST_f_f (sin, 3, 0.1411200080598672221007448028081102798469L),
13276 TEST_f_f (sin, 4, -0.7568024953079282513726390945118290941359L),
13277 TEST_f_f (sin, 5, -0.9589242746631384688931544061559939733525L),
13278 TEST_f_f (sin, 6, -0.2794154981989258728115554466118947596280L),
13279 TEST_f_f (sin, 7, 0.6569865987187890903969990915936351779369L),
13280 TEST_f_f (sin, 8, 0.9893582466233817778081235982452886721164L),
13281 TEST_f_f (sin, 9, 0.4121184852417565697562725663524351793439L),
13282 TEST_f_f (sin, 10, -0.5440211108893698134047476618513772816836L),
13283 END_DATA (sin_tonearest)
13284 };
13285
13286 static void
13287 sin_test_tonearest (void)
13288 {
13289 errno = 0;
13290 FUNC(sin) (0);
13291 if (errno == ENOSYS)
13292 /* Function not implemented. */
13293 return;
13294
13295 START (sin_tonearest);
13296 RUN_TEST_LOOP_f_f (sin, sin_tonearest_test_data, FE_TONEAREST);
13297 END (sin_tonearest);
13298 }
13299
13300
13301 static const struct test_f_f_data sin_towardzero_test_data[] =
13302 {
13303 START_DATA (sin_towardzero),
13304 TEST_f_f (sin, 1, 0.8414709848078965066525023216302989996226L),
13305 TEST_f_f (sin, 2, 0.9092974268256816953960198659117448427023L),
13306 TEST_f_f (sin, 3, 0.1411200080598672221007448028081102798469L),
13307 TEST_f_f (sin, 4, -0.7568024953079282513726390945118290941359L),
13308 TEST_f_f (sin, 5, -0.9589242746631384688931544061559939733525L),
13309 TEST_f_f (sin, 6, -0.2794154981989258728115554466118947596280L),
13310 TEST_f_f (sin, 7, 0.6569865987187890903969990915936351779369L),
13311 TEST_f_f (sin, 8, 0.9893582466233817778081235982452886721164L),
13312 TEST_f_f (sin, 9, 0.4121184852417565697562725663524351793439L),
13313 TEST_f_f (sin, 10, -0.5440211108893698134047476618513772816836L),
13314 END_DATA (sin_towardzero)
13315 };
13316
13317 static void
13318 sin_test_towardzero (void)
13319 {
13320 errno = 0;
13321 FUNC(sin) (0);
13322 if (errno == ENOSYS)
13323 /* Function not implemented. */
13324 return;
13325
13326 START (sin_towardzero);
13327 RUN_TEST_LOOP_f_f (sin, sin_towardzero_test_data, FE_TOWARDZERO);
13328 END (sin_towardzero);
13329 }
13330
13331
13332 static const struct test_f_f_data sin_downward_test_data[] =
13333 {
13334 START_DATA (sin_downward),
13335 TEST_f_f (sin, 1, 0.8414709848078965066525023216302989996226L),
13336 TEST_f_f (sin, 2, 0.9092974268256816953960198659117448427023L),
13337 TEST_f_f (sin, 3, 0.1411200080598672221007448028081102798469L),
13338 TEST_f_f (sin, 4, -0.7568024953079282513726390945118290941359L),
13339 TEST_f_f (sin, 5, -0.9589242746631384688931544061559939733525L),
13340 TEST_f_f (sin, 6, -0.2794154981989258728115554466118947596280L),
13341 TEST_f_f (sin, 7, 0.6569865987187890903969990915936351779369L),
13342 TEST_f_f (sin, 8, 0.9893582466233817778081235982452886721164L),
13343 TEST_f_f (sin, 9, 0.4121184852417565697562725663524351793439L),
13344 TEST_f_f (sin, 10, -0.5440211108893698134047476618513772816836L),
13345 END_DATA (sin_downward)
13346 };
13347
13348 static void
13349 sin_test_downward (void)
13350 {
13351 errno = 0;
13352 FUNC(sin) (0);
13353 if (errno == ENOSYS)
13354 /* Function not implemented. */
13355 return;
13356
13357 START (sin_downward);
13358 RUN_TEST_LOOP_f_f (sin, sin_downward_test_data, FE_DOWNWARD);
13359 END (sin_downward);
13360 }
13361
13362
13363 static const struct test_f_f_data sin_upward_test_data[] =
13364 {
13365 START_DATA (sin_upward),
13366 TEST_f_f (sin, 1, 0.8414709848078965066525023216302989996226L),
13367 TEST_f_f (sin, 2, 0.9092974268256816953960198659117448427023L),
13368 TEST_f_f (sin, 3, 0.1411200080598672221007448028081102798469L),
13369 TEST_f_f (sin, 4, -0.7568024953079282513726390945118290941359L),
13370 TEST_f_f (sin, 5, -0.9589242746631384688931544061559939733525L),
13371 TEST_f_f (sin, 6, -0.2794154981989258728115554466118947596280L),
13372 TEST_f_f (sin, 7, 0.6569865987187890903969990915936351779369L),
13373 TEST_f_f (sin, 8, 0.9893582466233817778081235982452886721164L),
13374 TEST_f_f (sin, 9, 0.4121184852417565697562725663524351793439L),
13375 TEST_f_f (sin, 10, -0.5440211108893698134047476618513772816836L),
13376 END_DATA (sin_upward)
13377 };
13378
13379 static void
13380 sin_test_upward (void)
13381 {
13382 errno = 0;
13383 FUNC(sin) (0);
13384 if (errno == ENOSYS)
13385 /* Function not implemented. */
13386 return;
13387
13388 START (sin_upward);
13389 RUN_TEST_LOOP_f_f (sin, sin_upward_test_data, FE_UPWARD);
13390 END (sin_upward);
13391 }
13392
13393
13394 static void
13395 sincos_test (void)
13396 {
13397 FLOAT sin_res, cos_res;
13398
13399 errno = 0;
13400 FUNC(sincos) (0, &sin_res, &cos_res);
13401 if (errno == ENOSYS)
13402 /* Function not implemented. */
13403 return;
13404
13405 START (sincos);
13406
13407 /* sincos is treated differently because it returns void. */
13408 TEST_extra (sincos, 0, 0, 1);
13409
13410 TEST_extra (sincos, minus_zero, minus_zero, 1);
13411 TEST_extra (sincos, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION);
13412 TEST_extra (sincos, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION);
13413 TEST_extra (sincos, qnan_value, qnan_value, qnan_value);
13414
13415 /* The value of M_PI_2l is never exactly PI/2, and therefore the
13416 answer is never exactly zero. The answer is equal to the error
13417 in rounding PI/2 for the type used. Thus the answer is unique
13418 to each type. */
13419 #ifdef TEST_FLOAT
13420 /* 32-bit float. */
13421 TEST_extra (sincos, M_PI_2l, 1, -0x1.777a5cp-25L);
13422 #endif
13423 #if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MANT_DIG == 53)
13424 /* 64-bit double or 64-bit long double. */
13425 TEST_extra (sincos, M_PI_2l, 1, 0x1.1a62633145c07p-54L);
13426 #endif
13427 #if defined TEST_LDOUBLE && LDBL_MANT_DIG == 64
13428 /* 96-bit long double. */
13429 TEST_extra (sincos, M_PI_2l, 1, -0xe.ce675d1fc8f8cbbp-69L);
13430 #endif
13431 #if defined TEST_LDOUBLE && LDBL_MANT_DIG == 106
13432 /* 128-bit IBM long double. */
13433 TEST_extra (sincos, M_PI_2l, 1, 0x1.c1cd129024e088a67cc74020bcp-107L);
13434 #endif
13435 #if defined TEST_LDOUBLE && LDBL_MANT_DIG == 113
13436 /* 128-bit long double. */
13437 TEST_extra (sincos, M_PI_2l, 1, 0x1.cd129024e088a67cc74020bbea64p-115L);
13438 #endif
13439
13440 TEST_extra (sincos, M_PI_6l, 0.5, 0.86602540378443864676372317075293616L);
13441 TEST_extra (sincos, M_PI_6l*2.0, 0.86602540378443864676372317075293616L, 0.5);
13442 TEST_extra (sincos, 0.75L, 0.681638760023334166733241952779893935L, 0.731688868873820886311838753000084544L);
13443
13444 TEST_extra (sincos, 0x1p65, -0.047183876212354673805106149805700013943218L, 0.99888622066058013610642172179340364209972L);
13445 TEST_extra (sincos, -0x1p65, 0.047183876212354673805106149805700013943218L, 0.99888622066058013610642172179340364209972L);
13446
13447 #ifdef TEST_DOUBLE
13448 TEST_extra (sincos, 0.80190127184058835, 0.71867942238767868, 0.69534156199418473);
13449 #endif
13450
13451 #ifndef TEST_FLOAT
13452 TEST_extra (sincos, 1e22, -0.8522008497671888017727058937530293682618L, 0.5232147853951389454975944733847094921409L);
13453 TEST_extra (sincos, 0x1p1023, 0.5631277798508840134529434079444683477104L, -0.826369834614147994500785680811743734805L);
13454 #endif
13455
13456 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
13457 TEST_extra (sincos, 0x1p16383L, 0.3893629985894208126948115852610595405563L, 0.9210843909921906206874509522505756251609L);
13458 #endif
13459
13460 TEST_extra (sincos, 0x1p+120, 3.77820109360752022655548470056922991960587e-01L, -9.25879022854837867303861764107414946730833e-01L);
13461 TEST_extra (sincos, 0x1p+127, 6.23385512955870240370428801097126489001833e-01L, 7.81914638714960072263910298466369236613162e-01L);
13462 TEST_extra (sincos, 0x1.fffff8p+127, 4.85786063130487339701113680434728152037092e-02L, 9.98819362551949040703862043664101081064641e-01L);
13463 TEST_extra (sincos, 0x1.fffffep+127, -5.21876523333658540551505357019806722935726e-01L, 8.53021039830304158051791467692161107353094e-01L);
13464 TEST_extra (sincos, 0x1p+50, 4.96396515208940840876821859865411368093356e-01L, 8.68095904660550604334592502063501320395739e-01L);
13465 TEST_extra (sincos, 0x1p+28, -9.86198211836975655703110310527108292055548e-01L, -1.65568979490578758865468278195361551113358e-01L);
13466
13467 END (sincos);
13468 }
13469
13470 static const struct test_f_f_data sinh_test_data[] =
13471 {
13472 START_DATA (sinh),
13473 TEST_f_f (sinh, 0, 0),
13474 TEST_f_f (sinh, minus_zero, minus_zero),
13475
13476 #ifndef TEST_INLINE
13477 TEST_f_f (sinh, plus_infty, plus_infty),
13478 TEST_f_f (sinh, minus_infty, minus_infty),
13479 #endif
13480 TEST_f_f (sinh, qnan_value, qnan_value),
13481
13482 TEST_f_f (sinh, 0.75L, 0.822316731935829980703661634446913849L),
13483 TEST_f_f (sinh, 0x8p-32L, 1.86264514923095703232705808926175479e-9L),
13484 END_DATA (sinh)
13485 };
13486
13487 static void
13488 sinh_test (void)
13489 {
13490 errno = 0;
13491 FUNC(sinh) (0.7L);
13492 if (errno == ENOSYS)
13493 /* Function not implemented. */
13494 return;
13495
13496 START (sinh);
13497 RUN_TEST_LOOP_f_f (sinh, sinh_test_data, );
13498 END (sinh);
13499 }
13500
13501
13502 static const struct test_f_f_data sinh_tonearest_test_data[] =
13503 {
13504 START_DATA (sinh_tonearest),
13505 TEST_f_f (sinh, 22, 1792456423.065795780701106568345764104225L),
13506 TEST_f_f (sinh, 23, 4872401723.124451299966006944252978187305L),
13507 TEST_f_f (sinh, 24, 13244561064.92173614705070540368454568168L),
13508 END_DATA (sinh_tonearest)
13509 };
13510
13511 static void
13512 sinh_test_tonearest (void)
13513 {
13514 errno = 0;
13515 FUNC(sinh) (0);
13516 if (errno == ENOSYS)
13517 /* Function not implemented. */
13518 return;
13519
13520 START (sinh_tonearest);
13521 RUN_TEST_LOOP_f_f (sinh, sinh_tonearest_test_data, FE_TONEAREST);
13522 END (sinh_tonearest);
13523 }
13524
13525
13526 static const struct test_f_f_data sinh_towardzero_test_data[] =
13527 {
13528 START_DATA (sinh_towardzero),
13529 TEST_f_f (sinh, 22, 1792456423.065795780701106568345764104225L),
13530 TEST_f_f (sinh, 23, 4872401723.124451299966006944252978187305L),
13531 TEST_f_f (sinh, 24, 13244561064.92173614705070540368454568168L),
13532 END_DATA (sinh_towardzero)
13533 };
13534
13535 static void
13536 sinh_test_towardzero (void)
13537 {
13538 errno = 0;
13539 FUNC(sinh) (0);
13540 if (errno == ENOSYS)
13541 /* Function not implemented. */
13542 return;
13543
13544 START (sinh_towardzero);
13545 RUN_TEST_LOOP_f_f (sinh, sinh_towardzero_test_data, FE_TOWARDZERO);
13546 END (sinh_towardzero);
13547 }
13548
13549
13550 static const struct test_f_f_data sinh_downward_test_data[] =
13551 {
13552 START_DATA (sinh_downward),
13553 TEST_f_f (sinh, 22, 1792456423.065795780701106568345764104225L),
13554 TEST_f_f (sinh, 23, 4872401723.124451299966006944252978187305L),
13555 TEST_f_f (sinh, 24, 13244561064.92173614705070540368454568168L),
13556 END_DATA (sinh_downward)
13557 };
13558
13559 static void
13560 sinh_test_downward (void)
13561 {
13562 errno = 0;
13563 FUNC(sinh) (0);
13564 if (errno == ENOSYS)
13565 /* Function not implemented. */
13566 return;
13567
13568 START (sinh_downward);
13569 RUN_TEST_LOOP_f_f (sinh, sinh_downward_test_data, FE_DOWNWARD);
13570 END (sinh_downward);
13571 }
13572
13573
13574 static const struct test_f_f_data sinh_upward_test_data[] =
13575 {
13576 START_DATA (sinh_upward),
13577 TEST_f_f (sinh, 22, 1792456423.065795780701106568345764104225L),
13578 TEST_f_f (sinh, 23, 4872401723.124451299966006944252978187305L),
13579 TEST_f_f (sinh, 24, 13244561064.92173614705070540368454568168L),
13580 END_DATA (sinh_upward)
13581 };
13582
13583 static void
13584 sinh_test_upward (void)
13585 {
13586 errno = 0;
13587 FUNC(sinh) (0);
13588 if (errno == ENOSYS)
13589 /* Function not implemented. */
13590 return;
13591
13592 START (sinh_upward);
13593 RUN_TEST_LOOP_f_f (sinh, sinh_upward_test_data, FE_UPWARD);
13594 END (sinh_upward);
13595 }
13596
13597
13598 static const struct test_f_f_data sqrt_test_data[] =
13599 {
13600 START_DATA (sqrt),
13601 TEST_f_f (sqrt, 0, 0),
13602 TEST_f_f (sqrt, qnan_value, qnan_value),
13603 TEST_f_f (sqrt, plus_infty, plus_infty),
13604
13605 TEST_f_f (sqrt, minus_zero, minus_zero),
13606
13607 /* sqrt (x) == qNaN plus invalid exception for x < 0. */
13608 TEST_f_f (sqrt, -1, qnan_value, INVALID_EXCEPTION),
13609 TEST_f_f (sqrt, -max_value, qnan_value, INVALID_EXCEPTION),
13610 TEST_f_f (sqrt, minus_infty, qnan_value, INVALID_EXCEPTION),
13611
13612 TEST_f_f (sqrt, 2209, 47),
13613 TEST_f_f (sqrt, 4, 2),
13614 TEST_f_f (sqrt, 2, M_SQRT2l),
13615 TEST_f_f (sqrt, 0.25, 0.5),
13616 TEST_f_f (sqrt, 6642.25, 81.5),
13617 TEST_f_f (sqrt, 15190.5625L, 123.25L),
13618 TEST_f_f (sqrt, 0.75L, 0.866025403784438646763723170752936183L),
13619 END_DATA (sqrt)
13620 };
13621
13622 static void
13623 sqrt_test (void)
13624 {
13625 errno = 0;
13626 FUNC(sqrt) (1);
13627 if (errno == ENOSYS)
13628 /* Function not implemented. */
13629 return;
13630
13631 START (sqrt);
13632 RUN_TEST_LOOP_f_f (sqrt, sqrt_test_data, );
13633 END (sqrt);
13634 }
13635
13636
13637 static const struct test_f_f_data tan_test_data[] =
13638 {
13639 START_DATA (tan),
13640 TEST_f_f (tan, 0, 0),
13641 TEST_f_f (tan, minus_zero, minus_zero),
13642 TEST_f_f (tan, plus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13643 TEST_f_f (tan, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13644 TEST_f_f (tan, qnan_value, qnan_value, ERRNO_UNCHANGED),
13645
13646 TEST_f_f (tan, M_PI_4l, 1),
13647 TEST_f_f (tan, 0.75L, 0.931596459944072461165202756573936428L),
13648
13649 TEST_f_f (tan, 0x1p65, -0.0472364872359047946798414219288370688827L),
13650 TEST_f_f (tan, -0x1p65, 0.0472364872359047946798414219288370688827L),
13651
13652 TEST_f_f (tan, 0xc.9p-4, 0.9995162902115457818029468900654150261381L),
13653 TEST_f_f (tan, 0xc.908p-4, 0.9997603425502441410973077452249560802034L),
13654 TEST_f_f (tan, 0xc.90cp-4, 0.9998823910588060302788513970802357770031L),
13655 TEST_f_f (tan, 0xc.90ep-4, 0.9999434208994808753305784795924711152508L),
13656 TEST_f_f (tan, 0xc.90fp-4, 0.9999739372166156702433266059635165160515L),
13657 TEST_f_f (tan, 0xc.90f8p-4, 0.9999891957244072765118898375645469865764L),
13658 TEST_f_f (tan, 0xc.90fcp-4, 0.9999968250656122402859679132395522927393L),
13659 TEST_f_f (tan, 0xc.90fdp-4, 0.9999987324100083358016192309006353329444L),
13660 TEST_f_f (tan, 0xc.90fd8p-4, 0.9999996860835706212861509874451585282616L),
13661 TEST_f_f (tan, 0xc.90fdap-4, 0.9999999245021033010474530133665235922808L),
13662 TEST_f_f (tan, 0xc.ap-4, 1.0073556597407272165371804539701396631519L),
13663 TEST_f_f (tan, 0xc.98p-4, 1.0034282930863044654045449407466962736255L),
13664 TEST_f_f (tan, 0xc.94p-4, 1.0014703786820082237342656561856877993328L),
13665 TEST_f_f (tan, 0xc.92p-4, 1.0004928571392300571266638743539017593717L),
13666 TEST_f_f (tan, 0xc.91p-4, 1.0000044544650244953647966900221905361131L),
13667 TEST_f_f (tan, 0xc.90fep-4, 1.0000006397580424009014454926842136804016L),
13668 TEST_f_f (tan, 0xc.90fdcp-4, 1.0000001629206928242190327320047489394217L),
13669 TEST_f_f (tan, 0xc.90fdbp-4, 1.0000000437113909572052640953950483705005L),
13670
13671 TEST_f_f (tan, -0xc.9p-4, -0.9995162902115457818029468900654150261381L),
13672 TEST_f_f (tan, -0xc.908p-4, -0.9997603425502441410973077452249560802034L),
13673 TEST_f_f (tan, -0xc.90cp-4, -0.9998823910588060302788513970802357770031L),
13674 TEST_f_f (tan, -0xc.90ep-4, -0.9999434208994808753305784795924711152508L),
13675 TEST_f_f (tan, -0xc.90fp-4, -0.9999739372166156702433266059635165160515L),
13676 TEST_f_f (tan, -0xc.90f8p-4, -0.9999891957244072765118898375645469865764L),
13677 TEST_f_f (tan, -0xc.90fcp-4, -0.9999968250656122402859679132395522927393L),
13678 TEST_f_f (tan, -0xc.90fdp-4, -0.9999987324100083358016192309006353329444L),
13679 TEST_f_f (tan, -0xc.90fd8p-4, -0.9999996860835706212861509874451585282616L),
13680 TEST_f_f (tan, -0xc.90fdap-4, -0.9999999245021033010474530133665235922808L),
13681 TEST_f_f (tan, -0xc.ap-4, -1.0073556597407272165371804539701396631519L),
13682 TEST_f_f (tan, -0xc.98p-4, -1.0034282930863044654045449407466962736255L),
13683 TEST_f_f (tan, -0xc.94p-4, -1.0014703786820082237342656561856877993328L),
13684 TEST_f_f (tan, -0xc.92p-4, -1.0004928571392300571266638743539017593717L),
13685 TEST_f_f (tan, -0xc.91p-4, -1.0000044544650244953647966900221905361131L),
13686 TEST_f_f (tan, -0xc.90fep-4, -1.0000006397580424009014454926842136804016L),
13687 TEST_f_f (tan, -0xc.90fdcp-4, -1.0000001629206928242190327320047489394217L),
13688 TEST_f_f (tan, -0xc.90fdbp-4, -1.0000000437113909572052640953950483705005L),
13689
13690 #ifndef TEST_FLOAT
13691 TEST_f_f (tan, 1e22, -1.628778225606898878549375936939548513545L),
13692 TEST_f_f (tan, 0x1p1023, -0.6814476476066215012854144040167365190368L),
13693 #endif
13694
13695 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
13696 TEST_f_f (tan, 0x1p16383L, 0.422722393732022337800504160054440141575L),
13697 #endif
13698 END_DATA (tan)
13699 };
13700
13701 static void
13702 tan_test (void)
13703 {
13704 errno = 0;
13705 FUNC(tan) (0);
13706 if (errno == ENOSYS)
13707 /* Function not implemented. */
13708 return;
13709
13710 START (tan);
13711 RUN_TEST_LOOP_f_f (tan, tan_test_data, );
13712 END (tan);
13713 }
13714
13715
13716 static const struct test_f_f_data tan_tonearest_test_data[] =
13717 {
13718 START_DATA (tan_tonearest),
13719 TEST_f_f (tan, 1, 1.5574077246549022305069748074583601730873L),
13720 TEST_f_f (tan, 2, -2.1850398632615189916433061023136825434320L),
13721 TEST_f_f (tan, 3, -0.1425465430742778052956354105339134932261L),
13722 TEST_f_f (tan, 4, 1.1578212823495775831373424182673239231198L),
13723 TEST_f_f (tan, 5, -3.3805150062465856369827058794473439087096L),
13724 TEST_f_f (tan, 6, -0.2910061913847491570536995888681755428312L),
13725 TEST_f_f (tan, 7, 0.8714479827243187364564508896003135663222L),
13726 TEST_f_f (tan, 8, -6.7997114552203786999252627596086333648814L),
13727 TEST_f_f (tan, 9, -0.4523156594418098405903708757987855343087L),
13728 TEST_f_f (tan, 10, 0.6483608274590866712591249330098086768169L),
13729 END_DATA (tan_tonearest)
13730 };
13731
13732 static void
13733 tan_test_tonearest (void)
13734 {
13735 errno = 0;
13736 FUNC(tan) (0);
13737 if (errno == ENOSYS)
13738 /* Function not implemented. */
13739 return;
13740
13741 START (tan_tonearest);
13742 RUN_TEST_LOOP_f_f (tan, tan_tonearest_test_data, FE_TONEAREST);
13743 END (tan_tonearest);
13744 }
13745
13746
13747 static const struct test_f_f_data tan_towardzero_test_data[] =
13748 {
13749 START_DATA (tan_towardzero),
13750 TEST_f_f (tan, 1, 1.5574077246549022305069748074583601730873L),
13751 TEST_f_f (tan, 2, -2.1850398632615189916433061023136825434320L),
13752 TEST_f_f (tan, 3, -0.1425465430742778052956354105339134932261L),
13753 TEST_f_f (tan, 4, 1.1578212823495775831373424182673239231198L),
13754 TEST_f_f (tan, 5, -3.3805150062465856369827058794473439087096L),
13755 TEST_f_f (tan, 6, -0.2910061913847491570536995888681755428312L),
13756 TEST_f_f (tan, 7, 0.8714479827243187364564508896003135663222L),
13757 TEST_f_f (tan, 8, -6.7997114552203786999252627596086333648814L),
13758 TEST_f_f (tan, 9, -0.4523156594418098405903708757987855343087L),
13759 TEST_f_f (tan, 10, 0.6483608274590866712591249330098086768169L),
13760 END_DATA (tan_towardzero)
13761 };
13762
13763 static void
13764 tan_test_towardzero (void)
13765 {
13766 errno = 0;
13767 FUNC(tan) (0);
13768 if (errno == ENOSYS)
13769 /* Function not implemented. */
13770 return;
13771
13772 START (tan_towardzero);
13773 RUN_TEST_LOOP_f_f (tan, tan_towardzero_test_data, FE_TOWARDZERO);
13774 END (tan_towardzero);
13775 }
13776
13777
13778 static const struct test_f_f_data tan_downward_test_data[] =
13779 {
13780 START_DATA (tan_downward),
13781 TEST_f_f (tan, 1, 1.5574077246549022305069748074583601730873L),
13782 TEST_f_f (tan, 2, -2.1850398632615189916433061023136825434320L),
13783 TEST_f_f (tan, 3, -0.1425465430742778052956354105339134932261L),
13784 TEST_f_f (tan, 4, 1.1578212823495775831373424182673239231198L),
13785 TEST_f_f (tan, 5, -3.3805150062465856369827058794473439087096L),
13786 TEST_f_f (tan, 6, -0.2910061913847491570536995888681755428312L),
13787 TEST_f_f (tan, 7, 0.8714479827243187364564508896003135663222L),
13788 TEST_f_f (tan, 8, -6.7997114552203786999252627596086333648814L),
13789 TEST_f_f (tan, 9, -0.4523156594418098405903708757987855343087L),
13790 TEST_f_f (tan, 10, 0.6483608274590866712591249330098086768169L),
13791 END_DATA (tan_downward)
13792 };
13793
13794 static void
13795 tan_test_downward (void)
13796 {
13797 errno = 0;
13798 FUNC(tan) (0);
13799 if (errno == ENOSYS)
13800 /* Function not implemented. */
13801 return;
13802
13803 START (tan_downward);
13804 RUN_TEST_LOOP_f_f (tan, tan_downward_test_data, FE_DOWNWARD);
13805 END (tan_downward);
13806 }
13807
13808
13809 static const struct test_f_f_data tan_upward_test_data[] =
13810 {
13811 START_DATA (tan_upward),
13812 TEST_f_f (tan, 1, 1.5574077246549022305069748074583601730873L),
13813 TEST_f_f (tan, 2, -2.1850398632615189916433061023136825434320L),
13814 TEST_f_f (tan, 3, -0.1425465430742778052956354105339134932261L),
13815 TEST_f_f (tan, 4, 1.1578212823495775831373424182673239231198L),
13816 TEST_f_f (tan, 5, -3.3805150062465856369827058794473439087096L),
13817 TEST_f_f (tan, 6, -0.2910061913847491570536995888681755428312L),
13818 TEST_f_f (tan, 7, 0.8714479827243187364564508896003135663222L),
13819 TEST_f_f (tan, 8, -6.7997114552203786999252627596086333648814L),
13820 TEST_f_f (tan, 9, -0.4523156594418098405903708757987855343087L),
13821 TEST_f_f (tan, 10, 0.6483608274590866712591249330098086768169L),
13822 END_DATA (tan_upward)
13823 };
13824
13825 static void
13826 tan_test_upward (void)
13827 {
13828 errno = 0;
13829 FUNC(tan) (0);
13830 if (errno == ENOSYS)
13831 /* Function not implemented. */
13832 return;
13833
13834 START (tan_upward);
13835 RUN_TEST_LOOP_f_f (tan, tan_upward_test_data, FE_UPWARD);
13836 END (tan_upward);
13837 }
13838
13839
13840 static const struct test_f_f_data tanh_test_data[] =
13841 {
13842 START_DATA (tanh),
13843 TEST_f_f (tanh, 0, 0),
13844 TEST_f_f (tanh, minus_zero, minus_zero),
13845
13846 #ifndef TEST_INLINE
13847 TEST_f_f (tanh, plus_infty, 1),
13848 TEST_f_f (tanh, minus_infty, -1),
13849 #endif
13850 TEST_f_f (tanh, qnan_value, qnan_value),
13851
13852 TEST_f_f (tanh, 0.75L, 0.635148952387287319214434357312496495L),
13853 TEST_f_f (tanh, -0.75L, -0.635148952387287319214434357312496495L),
13854
13855 TEST_f_f (tanh, 1.0L, 0.7615941559557648881194582826047935904L),
13856 TEST_f_f (tanh, -1.0L, -0.7615941559557648881194582826047935904L),
13857
13858 /* 2^-57 */
13859 TEST_f_f (tanh, 0x1p-57L, 6.938893903907228377647697925567626953125e-18L),
13860 END_DATA (tanh)
13861 };
13862
13863 static void
13864 tanh_test (void)
13865 {
13866 errno = 0;
13867 FUNC(tanh) (0.7L);
13868 if (errno == ENOSYS)
13869 /* Function not implemented. */
13870 return;
13871
13872 START (tanh);
13873 RUN_TEST_LOOP_f_f (tanh, tanh_test_data, );
13874 END (tanh);
13875 }
13876
13877 static const struct test_f_f_data tgamma_test_data[] =
13878 {
13879 START_DATA (tgamma),
13880 TEST_f_f (tgamma, plus_infty, plus_infty),
13881 TEST_f_f (tgamma, max_value, plus_infty, OVERFLOW_EXCEPTION),
13882 TEST_f_f (tgamma, 0, plus_infty, DIVIDE_BY_ZERO_EXCEPTION),
13883 TEST_f_f (tgamma, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
13884 /* tgamma (x) == qNaN plus invalid exception for integer x <= 0. */
13885 TEST_f_f (tgamma, -2, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13886 TEST_f_f (tgamma, -max_value, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13887 TEST_f_f (tgamma, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13888 TEST_f_f (tgamma, qnan_value, qnan_value),
13889
13890 TEST_f_f (tgamma, 0.5, M_SQRT_PIl),
13891 TEST_f_f (tgamma, -0.5, -M_2_SQRT_PIl),
13892
13893 TEST_f_f (tgamma, 1, 1),
13894 TEST_f_f (tgamma, 2, 1),
13895 TEST_f_f (tgamma, 3, 2),
13896 TEST_f_f (tgamma, 4, 6),
13897 TEST_f_f (tgamma, 5, 24),
13898 TEST_f_f (tgamma, 6, 120),
13899 TEST_f_f (tgamma, 7, 720),
13900 TEST_f_f (tgamma, 8, 5040),
13901 TEST_f_f (tgamma, 9, 40320),
13902 TEST_f_f (tgamma, 10, 362880),
13903
13904 TEST_f_f (tgamma, 0.7L, 1.29805533264755778568117117915281162L),
13905 TEST_f_f (tgamma, 1.2L, 0.918168742399760610640951655185830401L),
13906
13907 TEST_f_f (tgamma, 1.5L, 8.8622692545275801364908374167057259139877e-01L),
13908 TEST_f_f (tgamma, 2.5L, 1.3293403881791370204736256125058588870982e+00L),
13909 TEST_f_f (tgamma, 3.5L, 3.3233509704478425511840640312646472177454e+00L),
13910 TEST_f_f (tgamma, 4.5L, 1.1631728396567448929144224109426265262109e+01L),
13911 TEST_f_f (tgamma, 5.5L, 5.2342777784553520181149008492418193679490e+01L),
13912 TEST_f_f (tgamma, 6.5L, 2.8788527781504436099631954670830006523720e+02L),
13913 TEST_f_f (tgamma, 7.5L, 1.8712543057977883464760770536039504240418e+03L),
13914 TEST_f_f (tgamma, 8.5L, 1.4034407293483412598570577902029628180313e+04L),
13915 TEST_f_f (tgamma, 9.5L, 1.1929246199460900708784991216725183953266e+05L),
13916 TEST_f_f (tgamma, -1.5L, 2.3632718012073547030642233111215269103967e+00L),
13917 TEST_f_f (tgamma, -2.5L, -9.4530872048294188122568932444861076415869e-01L),
13918 TEST_f_f (tgamma, -3.5L, 2.7008820585226910892162552127103164690248e-01L),
13919 TEST_f_f (tgamma, -4.5L, -6.0019601300504246427027893615784810422774e-02L),
13920 TEST_f_f (tgamma, -5.5L, 1.0912654781909862986732344293779056440504e-02L),
13921 TEST_f_f (tgamma, -6.5L, -1.6788699664476712287280529682737009908468e-03L),
13922 TEST_f_f (tgamma, -7.5L, 2.2384932885968949716374039576982679877958e-04L),
13923 TEST_f_f (tgamma, -8.5L, -2.6335215159963470254557693619979623385833e-05L),
13924 TEST_f_f (tgamma, -9.5L, 2.7721279115751021320587045915768024616666e-06L),
13925 TEST_f_f (tgamma, 0x1p-24L, 1.6777215422784394050795179874582764575261e+07L),
13926 TEST_f_f (tgamma, -0x1p-24L, -1.6777216577215723853867349114260580375249e+07L),
13927 TEST_f_f (tgamma, 0x1p-53L, 9.0071992547409914227843350984672492007618e+15L),
13928 TEST_f_f (tgamma, -0x1p-53L, -9.0071992547409925772156649015329704137860e+15L),
13929 TEST_f_f (tgamma, 0x1p-64L, 1.8446744073709551615422784335098467139447e+19L),
13930 TEST_f_f (tgamma, -0x1p-64L, -1.8446744073709551616577215664901532860660e+19L),
13931 TEST_f_f (tgamma, 0x1p-106L, 8.1129638414606681695789005144063422784335e+31L),
13932 TEST_f_f (tgamma, -0x1p-106L, -8.1129638414606681695789005144064577215665e+31L),
13933 TEST_f_f (tgamma, 0x1p-113L, 1.0384593717069655257060992658440191422784e+34L),
13934 TEST_f_f (tgamma, -0x1p-113L, -1.0384593717069655257060992658440192577216e+34L),
13935 TEST_f_f (tgamma, 0x1p-127L, 1.7014118346046923173168730371588410572742e+38L),
13936 TEST_f_f (tgamma, -0x1p-127L, -1.7014118346046923173168730371588410572858e+38L),
13937 #ifdef TEST_FLOAT
13938 TEST_f_f (tgamma, 0x1p-128L, plus_infty, OVERFLOW_EXCEPTION),
13939 TEST_f_f (tgamma, -0x1p-128L, minus_infty, OVERFLOW_EXCEPTION),
13940 TEST_f_f (tgamma, 0x1p-149L, plus_infty, OVERFLOW_EXCEPTION),
13941 TEST_f_f (tgamma, -0x1p-149L, minus_infty, OVERFLOW_EXCEPTION),
13942 #else
13943 TEST_f_f (tgamma, 0x1p-128L, 3.4028236692093846346337460743176821145542e+38L),
13944 TEST_f_f (tgamma, -0x1p-128L, -3.4028236692093846346337460743176821145658e+38L),
13945 TEST_f_f (tgamma, 0x1p-149L, 7.1362384635297994052914298472474756819137e+44L),
13946 TEST_f_f (tgamma, -0x1p-149L, -7.1362384635297994052914298472474756819137e+44L),
13947 #endif
13948 #ifndef TEST_FLOAT
13949 TEST_f_f (tgamma, 0x1p-1023L, 8.9884656743115795386465259539451236680899e+307L),
13950 TEST_f_f (tgamma, -0x1p-1023L, -8.9884656743115795386465259539451236680899e+307L),
13951 # if !defined TEST_LDOUBLE || LDBL_MAX_EXP <= 1024
13952 TEST_f_f (tgamma, 0x1p-1024L, plus_infty, OVERFLOW_EXCEPTION),
13953 TEST_f_f (tgamma, -0x1p-1024L, minus_infty, OVERFLOW_EXCEPTION),
13954 TEST_f_f (tgamma, 0x1p-1074L, plus_infty, OVERFLOW_EXCEPTION),
13955 TEST_f_f (tgamma, -0x1p-1074L, minus_infty, OVERFLOW_EXCEPTION),
13956 # else
13957 TEST_f_f (tgamma, 0x1p-1024L, 1.7976931348623159077293051907890247336180e+308L),
13958 TEST_f_f (tgamma, -0x1p-1024L, -1.7976931348623159077293051907890247336180e+308L),
13959 TEST_f_f (tgamma, 0x1p-1074L, 2.0240225330731061835249534671891730704956e+323L),
13960 TEST_f_f (tgamma, -0x1p-1074L, -2.0240225330731061835249534671891730704956e+323L),
13961 # endif
13962 #endif
13963 #if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
13964 TEST_f_f (tgamma, 0x1p-16383L, 5.9486574767861588254287966331400356538172e+4931L),
13965 TEST_f_f (tgamma, -0x1p-16383L, -5.9486574767861588254287966331400356538172e+4931L),
13966 TEST_f_f (tgamma, 0x1p-16384L, plus_infty, OVERFLOW_EXCEPTION),
13967 TEST_f_f (tgamma, -0x1p-16384L, minus_infty, OVERFLOW_EXCEPTION),
13968 TEST_f_f (tgamma, 0x1p-16445L, plus_infty, OVERFLOW_EXCEPTION),
13969 TEST_f_f (tgamma, -0x1p-16445L, minus_infty, OVERFLOW_EXCEPTION),
13970 # if LDBL_MANT_DIG >= 113
13971 TEST_f_f (tgamma, 0x1p-16494L, plus_infty, OVERFLOW_EXCEPTION),
13972 TEST_f_f (tgamma, -0x1p-16494L, minus_infty, OVERFLOW_EXCEPTION),
13973 # endif
13974 #endif
13975 TEST_f_f (tgamma, 0x8.00001p0L, 5.0400096882277802019946778420223050233915e+03L),
13976 TEST_f_f (tgamma, 0x7.fffff8p0L, 5.0399951558933225045148935487583089307135e+03L),
13977 TEST_f_f (tgamma, 0x7.000008p0L, 7.2000064296977505705636258629805621178587e+02L),
13978 TEST_f_f (tgamma, 0x6.fffff8p0L, 7.1999935703082425988147448928288557689866e+02L),
13979 TEST_f_f (tgamma, 0x6.000008p0L, 1.2000009762487825358530770343720418162783e+02L),
13980 TEST_f_f (tgamma, 0x5.fffff8p0L, 1.1999990237520611552119807476573441975106e+02L),
13981 TEST_f_f (tgamma, 0x5.000008p0L, 2.4000017236155647574166073485628713443799e+01L),
13982 TEST_f_f (tgamma, 0x4.fffff8p0L, 2.3999982763857938712639837029547357501709e+01L),
13983 TEST_f_f (tgamma, 0x4.000008p0L, 6.0000035937827461765660468073471093546129e+00L),
13984 TEST_f_f (tgamma, 0x3.fffffcp0L, 5.9999982031095793171233994481968816873643e+00L),
13985 TEST_f_f (tgamma, 0x3.000004p0L, 2.0000004400179308360529417942462250547999e+00L),
13986 TEST_f_f (tgamma, 0x2.fffffcp0L, 1.9999995599822108706107786027549565954046e+00L),
13987 TEST_f_f (tgamma, 0x2.000004p0L, 1.0000001007996638509889062631687945799175e+00L),
13988 TEST_f_f (tgamma, 0x1.fffffep0L, 9.9999994960018563231526611134590489120697e-01L),
13989 TEST_f_f (tgamma, 0x1.000002p0L, 9.9999993119054472483596471908942669644327e-01L),
13990 TEST_f_f (tgamma, 0x0.ffffffp0L, 1.0000000344047381790797322460568297132998e+00L),
13991 TEST_f_f (tgamma, -0x0.ffffffp0L, -1.6777216422784419250710305882992376932423e+07L),
13992 TEST_f_f (tgamma, -0x1.000002p0L, 8.3886075772158332060084424806449513922858e+06L),
13993 TEST_f_f (tgamma, -0x1.fffffep0L, 4.1943044613922792026014320172298377770578e+06L),
13994 TEST_f_f (tgamma, -0x2.000004p0L, -2.0971515386080557574407223895988378776747e+06L),
13995 TEST_f_f (tgamma, -0x2.fffffcp0L, -6.9905087601970247876992248591045142913324e+05L),
13996 TEST_f_f (tgamma, -0x3.000004p0L, 6.9905045731381300146131914617735687322025e+05L),
13997 TEST_f_f (tgamma, -0x3.fffffcp0L, 1.7476272942159602684441970627092458855771e+05L),
13998 TEST_f_f (tgamma, -0x4.000008p0L, -8.7381270578483499672965708923121931082305e+04L),
13999 TEST_f_f (tgamma, -0x4.fffff8p0L, -1.7476280884325863043793087474680780379554e+04L),
14000 TEST_f_f (tgamma, -0x5.000008p0L, 1.7476252449031389167286893378510439443844e+04L),
14001 TEST_f_f (tgamma, -0x5.fffff8p0L, 2.9127137122026653716311560165769071985443e+03L),
14002 TEST_f_f (tgamma, -0x6.000008p0L, -2.9127085100239567622341538102130981196910e+03L),
14003 TEST_f_f (tgamma, -0x6.fffff8p0L, -4.1610198723079349791939054365613377035519e+02L),
14004 TEST_f_f (tgamma, -0x7.000008p0L, 4.1610118737306415004517215226199741948733e+02L),
14005 TEST_f_f (tgamma, -0x7.fffff8p0L, 5.2012751504050764429534086402871289946986e+01L),
14006 TEST_f_f (tgamma, -0x8.00001p0L, -2.6006296115134418896533598545925084576702e+01L),
14007 TEST_f_f (tgamma, -0x9.fffffp0L, 2.8896008370721717567612135720915723136310e-01L),
14008 TEST_f_f (tgamma, -0xa.00001p0L, -2.8895878754728051776830454190076999107021e-01L),
14009 TEST_f_f (tgamma, -0x13.ffffep0L, 2.1550026214525536756224040483579183652119e-13L),
14010 TEST_f_f (tgamma, -0x14.00002p0L, -2.1549777908265594916405421768142757507179e-13L),
14011 TEST_f_f (tgamma, -0x1d.ffffep0L, 1.9765721589464867957912772592816027583176e-27L),
14012 TEST_f_f (tgamma, -0x1e.00002p0L, -1.9765463890341964384070157599286498212650e-27L),
14013 TEST_f_f (tgamma, -0x27.ffffcp0L, 3.2129279441390812141195076945616975790225e-43L, UNDERFLOW_EXCEPTION_FLOAT),
14014 TEST_f_f (tgamma, -0x28.00004p0L, -3.2128372159115252365699015758097981155793e-43L, UNDERFLOW_EXCEPTION_FLOAT),
14015 TEST_f_f (tgamma, -0x28.ffffcp0L, -7.8364103489619817539676737414096652170685e-45L, UNDERFLOW_EXCEPTION_FLOAT),
14016 TEST_f_f (tgamma, -0x29.00004p0L, 7.8361876024016854597745353972619195760515e-45L, UNDERFLOW_EXCEPTION_FLOAT),
14017 #ifdef TEST_FLOAT
14018 TEST_f_f (tgamma, -0x29.ffffcp0L, plus_zero, UNDERFLOW_EXCEPTION_FLOAT),
14019 TEST_f_f (tgamma, -0x2a.00004p0L, minus_zero, UNDERFLOW_EXCEPTION_FLOAT),
14020 #else
14021 TEST_f_f (tgamma, -0x29.ffffcp0L, 1.8658121573125798145204120066590953505132e-46L),
14022 TEST_f_f (tgamma, -0x2a.00004p0L, -1.8657587834931410688246126853566488626385e-46L),
14023 #endif
14024 #ifndef TEST_FLOAT
14025 TEST_f_f (tgamma, 0x8.0000000000008p0L, 5.0400000000000180457125667322294144477136e+03L),
14026 TEST_f_f (tgamma, 0x7.ffffffffffffcp0L, 5.0399999999999909771437166339103165198442e+03L),
14027 TEST_f_f (tgamma, 0x7.0000000000004p0L, 7.2000000000000119762397445457359071259652e+02L),
14028 TEST_f_f (tgamma, 0x6.ffffffffffffcp0L, 7.1999999999999880237602554542848858572672e+02L),
14029 TEST_f_f (tgamma, 0x6.0000000000004p0L, 1.2000000000000018184042734842640022086408e+02L),
14030 TEST_f_f (tgamma, 0x5.ffffffffffffcp0L, 1.1999999999999981815957265157389249327533e+02L),
14031 TEST_f_f (tgamma, 0x5.0000000000004p0L, 2.4000000000000032104829055124673225982803e+01L),
14032 TEST_f_f (tgamma, 0x4.ffffffffffffcp0L, 2.3999999999999967895170944875373910918544e+01L),
14033 TEST_f_f (tgamma, 0x4.0000000000004p0L, 6.0000000000000066939396342309789716341613e+00L),
14034 TEST_f_f (tgamma, 0x3.ffffffffffffep0L, 5.9999999999999966530301828845138185025345e+00L),
14035 TEST_f_f (tgamma, 0x3.0000000000002p0L, 2.0000000000000008195971324717875960213536e+00L),
14036 TEST_f_f (tgamma, 0x2.ffffffffffffep0L, 1.9999999999999991804028675282128956223990e+00L),
14037 TEST_f_f (tgamma, 0x2.0000000000002p0L, 1.0000000000000001877539613108624482361963e+00L),
14038 TEST_f_f (tgamma, 0x1.fffffffffffffp0L, 9.9999999999999990612301934456883679778984e-01L),
14039 TEST_f_f (tgamma, 0x1.0000000000001p0L, 9.9999999999999987183237573039992418700531e-01L),
14040 TEST_f_f (tgamma, 0x0.fffffffffffff8p0L, 1.0000000000000000640838121348000744796665e+00L),
14041 TEST_f_f (tgamma, -0x0.fffffffffffff8p0L, -9.0071992547409924227843350984672961392521e+15L),
14042 TEST_f_f (tgamma, -0x1.0000000000001p0L, 4.5035996273704955772156649015331740980405e+15L),
14043 TEST_f_f (tgamma, -0x1.fffffffffffffp0L, 2.2517998136852484613921675492337776673289e+15L),
14044 TEST_f_f (tgamma, -0x2.0000000000002p0L, -1.1258999068426235386078324507668462444260e+15L),
14045 TEST_f_f (tgamma, -0x2.ffffffffffffep0L, -3.7529996894754154268627807196691509198813e+14L),
14046 TEST_f_f (tgamma, -0x3.0000000000002p0L, 3.7529996894754112398038859470009084971438e+14L),
14047 TEST_f_f (tgamma, -0x3.ffffffffffffep0L, 9.3824992236885396088236184658402406857503e+13L),
14048 TEST_f_f (tgamma, -0x4.0000000000004p0L, -4.6912496118442603911763815341745722862351e+13L),
14049 TEST_f_f (tgamma, -0x4.ffffffffffffcp0L, -9.3824992236885475509805702650262155809819e+12L),
14050 TEST_f_f (tgamma, -0x5.0000000000004p0L, 9.3824992236885191156860964016850034672946e+12L),
14051 TEST_f_f (tgamma, -0x5.ffffffffffffcp0L, 1.5637498706147581566449098589862357835505e+12L),
14052 TEST_f_f (tgamma, -0x6.0000000000004p0L, -1.5637498706147529544662012521330708016396e+12L),
14053 TEST_f_f (tgamma, -0x6.ffffffffffffcp0L, -2.2339283865925119357965832452642909859289e+11L),
14054 TEST_f_f (tgamma, -0x7.0000000000004p0L, 2.2339283865925039372192897706214475877342e+11L),
14055 TEST_f_f (tgamma, -0x7.ffffffffffffcp0L, 2.7924104832406402297655703264222230055898e+10L),
14056 TEST_f_f (tgamma, -0x8.0000000000008p0L, -1.3962052416203121511868106259843527348026e+10L),
14057 TEST_f_f (tgamma, -0x9.ffffffffffff8p0L, 1.5513391573559147700413058496716749249803e+08L),
14058 TEST_f_f (tgamma, -0xa.0000000000008p0L, -1.5513391573559018084419393002828541166901e+08L),
14059 TEST_f_f (tgamma, -0x13.ffffffffffffp0L, 1.1569515572952029402736625857313236848570e-04L),
14060 TEST_f_f (tgamma, -0x14.000000000001p0L, -1.1569515572951781096476686854873801225397e-04L),
14061 TEST_f_f (tgamma, -0x1d.ffffffffffffp0L, 1.0611571800204311628217068863959963842891e-18L),
14062 TEST_f_f (tgamma, -0x1e.000000000001p0L, -1.0611571800204053929094168642022073530425e-18L),
14063 TEST_f_f (tgamma, -0x27.fffffffffffep0L, 1.7249032006742266376460389310340465554361e-34L),
14064 TEST_f_f (tgamma, -0x28.000000000002p0L, -1.7249032006741359094184881234822934593822e-34L),
14065 TEST_f_f (tgamma, -0x28.fffffffffffep0L, -4.2070809772542120404320040128839297118648e-36L),
14066 TEST_f_f (tgamma, -0x29.000000000002p0L, 4.2070809772539892938717205103652583609422e-36L),
14067 TEST_f_f (tgamma, -0x29.fffffffffffep0L, 1.0016859469652887505173040814397197718981e-37L),
14068 TEST_f_f (tgamma, -0x2a.000000000002p0L, -1.0016859469652353766978684241048308120274e-37L),
14069 TEST_f_f (tgamma, -0x31.fffffffffffep0L, 4.6273774273632946947805289899230181990085e-51L),
14070 TEST_f_f (tgamma, -0x32.000000000002p0L, -4.6273774273630367887073532197576655720178e-51L),
14071 TEST_f_f (tgamma, -0x63.fffffffffffcp0L, 7.5400833348840965463348754984345825364294e-145L),
14072 TEST_f_f (tgamma, -0x64.000000000004p0L, -7.5400833348831085791638490135462230991587e-145L),
14073 TEST_f_f (tgamma, -0x95.fffffffffff8p0L, 6.1582369322723207086020016423767264008839e-250L),
14074 TEST_f_f (tgamma, -0x96.000000000008p0L, -6.1582369322705655439003240743176243138734e-250L),
14075 TEST_f_f (tgamma, -0xb4.fffffffffff8p0L, -9.6760879059917574597728750098636253931457e-319L, UNDERFLOW_EXCEPTION_DOUBLE),
14076 TEST_f_f (tgamma, -0xb5.000000000008p0L, 9.6760879059888966544677044221698800670218e-319L, UNDERFLOW_EXCEPTION_DOUBLE),
14077 TEST_f_f (tgamma, -0xb5.fffffffffff8p0L, 5.3165318164789884455066481673086605454904e-321L, UNDERFLOW_EXCEPTION_DOUBLE),
14078 TEST_f_f (tgamma, -0xb6.000000000008p0L, -5.3165318164774149139661976747137185876909e-321L, UNDERFLOW_EXCEPTION_DOUBLE),
14079 TEST_f_f (tgamma, -0xb6.fffffffffff8p0L, -2.9052086428846935908287469917922960610289e-323L, UNDERFLOW_EXCEPTION_DOUBLE),
14080 TEST_f_f (tgamma, -0xb7.000000000008p0L, 2.9052086428838328351126988236541632950925e-323L, UNDERFLOW_EXCEPTION_DOUBLE),
14081 # if !defined TEST_LDOUBLE || LDBL_MAX_EXP <= 1024
14082 TEST_f_f (tgamma, -0xb7.fffffffffff8p0L, plus_zero, UNDERFLOW_EXCEPTION_DOUBLE),
14083 TEST_f_f (tgamma, -0xb8.000000000008p0L, minus_zero, UNDERFLOW_EXCEPTION_DOUBLE),
14084 # else
14085 TEST_f_f (tgamma, -0xb7.fffffffffff8p0L, 1.5789177406982032823826953250736039527543e-325L),
14086 TEST_f_f (tgamma, -0xb8.000000000008p0L, -1.5789177406977349925854817486109369828857e-325L),
14087 # endif
14088 #endif
14089 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
14090 TEST_f_f (tgamma, 0x8.00000000000000000000000004p0L, 5.0400000000000000000000000000020034765587e+03L),
14091 TEST_f_f (tgamma, 0x7.fffffffffffffffffffffffffep0L, 5.0399999999999999999999999999989982617206e+03L),
14092 TEST_f_f (tgamma, 0x7.00000000000000000000000002p0L, 7.2000000000000000000000000000013296297113e+02L),
14093 TEST_f_f (tgamma, 0x6.fffffffffffffffffffffffffep0L, 7.1999999999999999999999999999986703702887e+02L),
14094 TEST_f_f (tgamma, 0x6.00000000000000000000000002p0L, 1.2000000000000000000000000000002018834292e+02L),
14095 TEST_f_f (tgamma, 0x5.fffffffffffffffffffffffffep0L, 1.1999999999999999999999999999997981165708e+02L),
14096 TEST_f_f (tgamma, 0x5.00000000000000000000000002p0L, 2.4000000000000000000000000000003564352042e+01L),
14097 TEST_f_f (tgamma, 0x4.fffffffffffffffffffffffffep0L, 2.3999999999999999999999999999996435647958e+01L),
14098 TEST_f_f (tgamma, 0x4.00000000000000000000000002p0L, 6.0000000000000000000000000000007431765907e+00L),
14099 TEST_f_f (tgamma, 0x3.ffffffffffffffffffffffffffp0L, 5.9999999999999999999999999999996284117046e+00L),
14100 TEST_f_f (tgamma, 0x3.00000000000000000000000001p0L, 2.0000000000000000000000000000000909935607e+00L),
14101 TEST_f_f (tgamma, 0x2.ffffffffffffffffffffffffffp0L, 1.9999999999999999999999999999999090064393e+00L),
14102 TEST_f_f (tgamma, 0x2.00000000000000000000000001p0L, 1.0000000000000000000000000000000208448771e+00L),
14103 TEST_f_f (tgamma, 0x1.ffffffffffffffffffffffffff8p0L, 9.9999999999999999999999999999998957756146e-01L),
14104 TEST_f_f (tgamma, 0x1.000000000000000000000000008p0L, 9.9999999999999999999999999999998577053525e-01L),
14105 TEST_f_f (tgamma, 0x0.ffffffffffffffffffffffffffcp0L, 1.0000000000000000000000000000000071147324e+00L),
14106 TEST_f_f (tgamma, -0x0.ffffffffffffffffffffffffffcp0L, -8.1129638414606681695789005144064422784335e+31L),
14107 TEST_f_f (tgamma, -0x1.000000000000000000000000008p0L, 4.0564819207303340847894502572031577215665e+31L),
14108 TEST_f_f (tgamma, -0x1.ffffffffffffffffffffffffff8p0L, 2.0282409603651670423947251286016461392168e+31L),
14109 TEST_f_f (tgamma, -0x2.00000000000000000000000001p0L, -1.0141204801825835211973625643007538607832e+31L),
14110 TEST_f_f (tgamma, -0x2.ffffffffffffffffffffffffffp0L, -3.3804016006086117373245418810028760196114e+30L),
14111 TEST_f_f (tgamma, -0x3.00000000000000000000000001p0L, 3.3804016006086117373245418810024573137219e+30L),
14112 TEST_f_f (tgamma, -0x3.ffffffffffffffffffffffffffp0L, 8.4510040015215293433113547025072942156952e+29L),
14113 TEST_f_f (tgamma, -0x4.00000000000000000000000002p0L, -4.2255020007607646716556773512527057843048e+29L),
14114 TEST_f_f (tgamma, -0x4.fffffffffffffffffffffffffep0L, -8.4510040015215293433113547025080884313904e+28L),
14115 TEST_f_f (tgamma, -0x5.00000000000000000000000002p0L, 8.4510040015215293433113547025052449019430e+28L),
14116 TEST_f_f (tgamma, -0x5.fffffffffffffffffffffffffep0L, 1.4085006669202548905518924504180378867132e+28L),
14117 TEST_f_f (tgamma, -0x6.00000000000000000000000002p0L, -1.4085006669202548905518924504175176688423e+28L),
14118 TEST_f_f (tgamma, -0x6.fffffffffffffffffffffffffep0L, -2.0121438098860784150741320720257967542615e+27L),
14119 TEST_f_f (tgamma, -0x7.00000000000000000000000002p0L, 2.0121438098860784150741320720249968965322e+27L),
14120 TEST_f_f (tgamma, -0x7.fffffffffffffffffffffffffep0L, 2.5151797623575980188426650900322769448110e+26L),
14121 TEST_f_f (tgamma, -0x8.00000000000000000000000004p0L, -1.2575898811787990094213325450153421028080e+26L),
14122 TEST_f_f (tgamma, -0x9.fffffffffffffffffffffffffcp0L, 1.3973220901986655660237028277960625420495e+24L),
14123 TEST_f_f (tgamma, -0xa.00000000000000000000000004p0L, -1.3973220901986655660237028277947663821128e+24L),
14124 TEST_f_f (tgamma, -0x13.fffffffffffffffffffffffff8p0L, 1.0420893204640670202556853709074896123293e+12L),
14125 TEST_f_f (tgamma, -0x14.00000000000000000000000008p0L, -1.0420893204640670202556853709050065497299e+12L),
14126 TEST_f_f (tgamma, -0x1d.fffffffffffffffffffffffff8p0L, 9.5580541610429641982963434151488827190079e-03L),
14127 TEST_f_f (tgamma, -0x1e.00000000000000000000000008p0L, -9.5580541610429641982963434151231128067179e-03L),
14128 TEST_f_f (tgamma, -0x27.fffffffffffffffffffffffffp0L, 1.5536546823612837336494536911280147806523e-18L),
14129 TEST_f_f (tgamma, -0x28.0000000000000000000000001p0L, -1.5536546823612837336494536911189419578973e-18L),
14130 TEST_f_f (tgamma, -0x28.fffffffffffffffffffffffffp0L, -3.7894016642958139845108626612879138384405e-20L),
14131 TEST_f_f (tgamma, -0x29.0000000000000000000000001p0L, 3.7894016642958139845108626612656391824122e-20L),
14132 TEST_f_f (tgamma, -0x29.fffffffffffffffffffffffffp0L, 9.0223849149900332964544349078285357440663e-22L),
14133 TEST_f_f (tgamma, -0x2a.0000000000000000000000001p0L, -9.0223849149900332964544349077751619246306e-22L),
14134 TEST_f_f (tgamma, -0x31.fffffffffffffffffffffffffp0L, 4.1679710515150795310771069868348482819424e-35L),
14135 TEST_f_f (tgamma, -0x32.0000000000000000000000001p0L, -4.1679710515150795310771069868090576746248e-35L),
14136 TEST_f_f (tgamma, -0x63.ffffffffffffffffffffffffep0L, 6.7915032994648558610510614163560656864280e-129L),
14137 TEST_f_f (tgamma, -0x64.0000000000000000000000002p0L, -6.7915032994648558610510614162572689693253e-129L),
14138 TEST_f_f (tgamma, -0x95.ffffffffffffffffffffffffcp0L, 5.5468467106873795353190582463444660395353e-234L),
14139 TEST_f_f (tgamma, -0x96.0000000000000000000000004p0L, -5.5468467106873795353190582461689495693675e-234L),
14140 TEST_f_f (tgamma, -0xb4.ffffffffffffffffffffffffcp0L, -8.7154451775644399729745472278589884205029e-303L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14141 TEST_f_f (tgamma, -0xb5.0000000000000000000000004p0L, 8.7154451775644399729745472275729078899858e-303L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14142 TEST_f_f (tgamma, -0xb5.ffffffffffffffffffffffffcp0L, 4.7887061415189230620739270482742524864974e-305L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14143 TEST_f_f (tgamma, -0xb6.0000000000000000000000004p0L, -4.7887061415189230620739270481168993324524e-305L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14144 TEST_f_f (tgamma, -0xb6.ffffffffffffffffffffffffcp0L, -2.6167793123054224382917634143575601407067e-307L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14145 TEST_f_f (tgamma, -0xb7.0000000000000000000000004p0L, 2.6167793123054224382917634142714845691019e-307L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14146 TEST_f_f (tgamma, -0xb7.ffffffffffffffffffffffffcp0L, 1.4221626697312078468976975078030462044826e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
14147 TEST_f_f (tgamma, -0xb8.0000000000000000000000004p0L, -1.4221626697312078468976975077562172247612e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
14148 TEST_f_f (tgamma, -0xbb.ffffffffffffffffffffffffcp0L, 1.1756150745511026776007338998283058108448e-318L, UNDERFLOW_EXCEPTION_DOUBLE),
14149 TEST_f_f (tgamma, -0xbc.0000000000000000000000004p0L, -1.1756150745511026776007338997894360215107e-318L, UNDERFLOW_EXCEPTION_DOUBLE),
14150 TEST_f_f (tgamma, -0xbc.ffffffffffffffffffffffffcp0L, -6.2201855796354639026493857133773832713743e-321L, UNDERFLOW_EXCEPTION_DOUBLE),
14151 TEST_f_f (tgamma, -0xbd.0000000000000000000000004p0L, 6.2201855796354639026493857131715153125175e-321L, UNDERFLOW_EXCEPTION_DOUBLE),
14152 TEST_f_f (tgamma, -0xbd.ffffffffffffffffffffffffcp0L, 3.2737818840186652119207293228302560914295e-323L, UNDERFLOW_EXCEPTION_DOUBLE),
14153 TEST_f_f (tgamma, -0xbe.0000000000000000000000004p0L, -3.2737818840186652119207293227217957948294e-323L, UNDERFLOW_EXCEPTION_DOUBLE),
14154 # if LDBL_MAX_EXP <= 1024
14155 TEST_f_f (tgamma, -0xbe.ffffffffffffffffffffffffcp0L, minus_zero, UNDERFLOW_EXCEPTION_DOUBLE),
14156 TEST_f_f (tgamma, -0xbf.0000000000000000000000004p0L, plus_zero, UNDERFLOW_EXCEPTION_DOUBLE),
14157 # else
14158 TEST_f_f (tgamma, -0xbe.ffffffffffffffffffffffffcp0L, -1.7140219288055838805867692789687487834686e-325L),
14159 TEST_f_f (tgamma, -0xbf.0000000000000000000000004p0L, 1.7140219288055838805867692789119066543632e-325L),
14160 # endif
14161 #endif
14162 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
14163 TEST_f_f (tgamma, 0x8.000000000000001p0L, 5.0400000000000000088113830892247051102283e+03L),
14164 TEST_f_f (tgamma, 0x7.fffffffffffffff8p0L, 5.0399999999999999955943084553876474508520e+03L),
14165 TEST_f_f (tgamma, 0x7.0000000000000008p0L, 7.2000000000000000058477733127664675369681e+02L),
14166 TEST_f_f (tgamma, 0x6.fffffffffffffff8p0L, 7.1999999999999999941522266872335324679893e+02L),
14167 TEST_f_f (tgamma, 0x6.0000000000000008p0L, 1.2000000000000000008878927116622375680433e+02L),
14168 TEST_f_f (tgamma, 0x5.fffffffffffffff8p0L, 1.1999999999999999991121072883377624326546e+02L),
14169 TEST_f_f (tgamma, 0x5.0000000000000008p0L, 2.4000000000000000015676186062072582846211e+01L),
14170 TEST_f_f (tgamma, 0x4.fffffffffffffff8p0L, 2.3999999999999999984323813937927417165027e+01L),
14171 TEST_f_f (tgamma, 0x4.0000000000000008p0L, 6.0000000000000000032685252120268430507939e+00L),
14172 TEST_f_f (tgamma, 0x3.fffffffffffffffcp0L, 5.9999999999999999983657373939865784753909e+00L),
14173 TEST_f_f (tgamma, 0x3.0000000000000004p0L, 2.0000000000000000004001939123397399171482e+00L),
14174 TEST_f_f (tgamma, 0x2.fffffffffffffffcp0L, 1.9999999999999999995998060876602600829690e+00L),
14175 TEST_f_f (tgamma, 0x2.0000000000000004p0L, 1.0000000000000000000916767389213195151634e+00L),
14176 TEST_f_f (tgamma, 0x1.fffffffffffffffep0L, 9.9999999999999999995416163053934024243282e-01L),
14177 TEST_f_f (tgamma, 0x1.0000000000000002p0L, 9.9999999999999999993741815221210931418291e-01L),
14178 TEST_f_f (tgamma, 0x0.ffffffffffffffffp0L, 1.0000000000000000000312909238939453429173e+00L),
14179 TEST_f_f (tgamma, -0x0.ffffffffffffffffp0L, -1.8446744073709551616422784335098467139470e+19L),
14180 TEST_f_f (tgamma, -0x1.0000000000000002p0L, 9.2233720368547758075772156649015328607596e+18L),
14181 TEST_f_f (tgamma, -0x1.fffffffffffffffep0L, 4.6116860184273879044613921675492335697983e+18L),
14182 TEST_f_f (tgamma, -0x2.0000000000000004p0L, -2.3058430092136939515386078324507664305064e+18L),
14183 TEST_f_f (tgamma, -0x2.fffffffffffffffcp0L, -7.6861433640456465087601961140530007887063e+17L),
14184 TEST_f_f (tgamma, -0x3.0000000000000004p0L, 7.6861433640456465045731372192803325462836e+17L),
14185 TEST_f_f (tgamma, -0x3.fffffffffffffffcp0L, 1.9215358410114116272942156951799168638773e+17L),
14186 TEST_f_f (tgamma, -0x4.0000000000000008p0L, -9.6076792050570581270578430482008313684602e+16L),
14187 TEST_f_f (tgamma, -0x4.fffffffffffffff8p0L, -1.9215358410114116280884313903598337283601e+16L),
14188 TEST_f_f (tgamma, -0x5.0000000000000008p0L, 1.9215358410114116252449019429734996071487e+16L),
14189 TEST_f_f (tgamma, -0x5.fffffffffffffff8p0L, 3.2025597350190193803788671320812043622696e+15L),
14190 TEST_f_f (tgamma, -0x6.0000000000000008p0L, -3.2025597350190193751766884234743511972877e+15L),
14191 TEST_f_f (tgamma, -0x6.fffffffffffffff8p0L, -4.5750853357414562579675426149912896787735e+14L),
14192 TEST_f_f (tgamma, -0x7.0000000000000008p0L, 4.5750853357414562499689653215166468353753e+14L),
14193 TEST_f_f (tgamma, -0x7.fffffffffffffff8p0L, 5.7188566696768203227694481100089533685959e+13L),
14194 TEST_f_f (tgamma, -0x8.000000000000001p0L, -2.8594283348384101534210280804672371201060e+13L),
14195 TEST_f_f (tgamma, -0x9.fffffffffffffffp0L, 3.1771425942649001828476427167843945971988e+11L),
14196 TEST_f_f (tgamma, -0xa.000000000000001p0L, -3.1771425942649001698860433502350057763905e+11L),
14197 TEST_f_f (tgamma, -0x13.ffffffffffffffep0L, 2.3694367893405502075347562184931828448654e-01L),
14198 TEST_f_f (tgamma, -0x14.000000000000002p0L, -2.3694367893405501827041302245929389013031e-01L),
14199 TEST_f_f (tgamma, -0x1d.ffffffffffffffep0L, 2.1732499046818166459536268654187775086902e-15L),
14200 TEST_f_f (tgamma, -0x1e.000000000000002p0L, -2.1732499046818166201837145753965837196590e-15L),
14201 TEST_f_f (tgamma, -0x27.ffffffffffffffcp0L, 3.5326017549807232935581894777156474496719e-31L),
14202 TEST_f_f (tgamma, -0x28.000000000000004p0L, -3.5326017549807232028299619269080956965758e-31L),
14203 TEST_f_f (tgamma, -0x28.ffffffffffffffcp0L, -8.6161018414163982777002940498289948893044e-33L),
14204 TEST_f_f (tgamma, -0x29.000000000000004p0L, 8.6161018414163980549537337663264762179535e-33L),
14205 TEST_f_f (tgamma, -0x29.ffffffffffffffcp0L, 2.0514528193848567329552463626090806737389e-34L),
14206 TEST_f_f (tgamma, -0x2a.000000000000004p0L, -2.0514528193848566795814269269517457847791e-34L),
14207 TEST_f_f (tgamma, -0x31.ffffffffffffffcp0L, 9.4768689712397635680446279661359728835046e-48L),
14208 TEST_f_f (tgamma, -0x32.000000000000004p0L, -9.4768689712397633101385547903658075308777e-48L),
14209 TEST_f_f (tgamma, -0x63.ffffffffffffff8p0L, 1.5442090669841618542494279375256856430049e-141L),
14210 TEST_f_f (tgamma, -0x64.000000000000008p0L, -1.5442090669841617554527108348771968070612e-141L),
14211 TEST_f_f (tgamma, -0x95.ffffffffffffffp0L, 1.2612069237291916400144732227892704713839e-246L),
14212 TEST_f_f (tgamma, -0x96.00000000000001p0L, -1.2612069237291914644980030550324645611752e-246L),
14213 TEST_f_f (tgamma, -0xb4.ffffffffffffffp0L, -1.9816628031468191243385005680879281767694e-315L),
14214 TEST_f_f (tgamma, -0xb5.00000000000001p0L, 1.9816628031468188382579700510291588022368e-315L),
14215 TEST_f_f (tgamma, -0xb5.ffffffffffffffp0L, 1.0888257160147357826865964233809723297472e-317L),
14216 TEST_f_f (tgamma, -0xb6.00000000000001p0L, -1.0888257160147356253334423783317128355514e-317L),
14217 TEST_f_f (tgamma, -0xb6.ffffffffffffffp0L, -5.9498673006269714905418984659220067091260e-320L),
14218 TEST_f_f (tgamma, -0xb7.00000000000001p0L, 5.9498673006269706297861824177538685763601e-320L),
14219 TEST_f_f (tgamma, -0xb7.ffffffffffffffp0L, 3.2336235329494410277123118903958061569834e-322L),
14220 TEST_f_f (tgamma, -0xb8.00000000000001p0L, -3.2336235329494405594225146768193434900135e-322L),
14221 TEST_f_f (tgamma, -0xbb.ffffffffffffffp0L, 2.6730392040715350119087465463119939092815e-331L),
14222 TEST_f_f (tgamma, -0xbc.00000000000001p0L, -2.6730392040715346232108532050343031951651e-331L),
14223 TEST_f_f (tgamma, -0xbc.ffffffffffffffp0L, -1.4143064571807063556111222197839950086445e-333L),
14224 TEST_f_f (tgamma, -0xbd.00000000000001p0L, 1.4143064571807061497431633629389135273431e-333L),
14225 TEST_f_f (tgamma, -0xbd.ffffffffffffffp0L, 7.4437181956879281879706555863416819210399e-336L),
14226 TEST_f_f (tgamma, -0xbe.00000000000001p0L, -7.4437181956879271033676895858841525581153e-336L),
14227 TEST_f_f (tgamma, -0xbe.ffffffffffffffp0L, -3.8972346574282346536709453101948570578636e-338L),
14228 TEST_f_f (tgamma, -0xbf.00000000000001p0L, 3.8972346574282340852496542564155275274974e-338L),
14229 TEST_f_f (tgamma, -0xf9.ffffffffffffffp0L, 2.2289142548411573883553287678043297937797e-476L),
14230 TEST_f_f (tgamma, -0xfa.00000000000001p0L, -2.2289142548411570466476165308364665814265e-476L),
14231 TEST_f_f (tgamma, -0x1f3.fffffffffffffep0L, 2.9528489142763141594943668922610562530068e-1118L),
14232 TEST_f_f (tgamma, -0x1f4.00000000000002p0L, -2.9528489142763131406565394149878256133744e-1118L),
14233 TEST_f_f (tgamma, -0x2ed.fffffffffffffcp0L, 6.9801511765871818502006905472380418430269e-1817L),
14234 TEST_f_f (tgamma, -0x2ee.00000000000004p0L, -6.9801511765871767194421856376592926002995e-1817L),
14235 TEST_f_f (tgamma, -0x3e7.fffffffffffffcp0L, 4.4768809295877296071892611539415773519036e-2552L),
14236 TEST_f_f (tgamma, -0x3e8.00000000000004p0L, -4.4768809295877261735541135972060089530309e-2552L),
14237 TEST_f_f (tgamma, -0x4e1.fffffffffffff8p0L, 5.4651488569236507565341414077911790252381e-3315L),
14238 TEST_f_f (tgamma, -0x4e2.00000000000008p0L, -5.4651488569236421026544487194247355967789e-3315L),
14239 TEST_f_f (tgamma, -0x5db.fffffffffffff8p0L, 1.8718211510339187689122114747834510481993e-4099L),
14240 TEST_f_f (tgamma, -0x5dc.00000000000008p0L, -1.8718211510339157291960718369454861898499e-4099L),
14241 TEST_f_f (tgamma, -0x6d5.fffffffffffff8p0L, 4.2925786447266492555651378780094011518063e-4902L),
14242 TEST_f_f (tgamma, -0x6d6.00000000000008p0L, -4.2925786447266421378134368786479937285900e-4902L),
14243 TEST_f_f (tgamma, -0x6e2.fffffffffffff8p0L, -2.8229173528168668283609231628661510187536e-4944L, UNDERFLOW_EXCEPTION),
14244 TEST_f_f (tgamma, -0x6e3.00000000000008p0L, 2.8229173528168621428945467532322397890424e-4944L, UNDERFLOW_EXCEPTION),
14245 TEST_f_f (tgamma, -0x6e3.fffffffffffff8p0L, 1.6002932839097884515524894602387278842659e-4947L, UNDERFLOW_EXCEPTION),
14246 TEST_f_f (tgamma, -0x6e4.00000000000008p0L, -1.6002932839097857951909742110188634438017e-4947L, UNDERFLOW_EXCEPTION),
14247 TEST_f_f (tgamma, -0x6e4.fffffffffffff8p0L, -9.0668174725767051085164382743343408095146e-4951L, UNDERFLOW_EXCEPTION),
14248 TEST_f_f (tgamma, -0x6e5.00000000000008p0L, 9.0668174725766900571689083050287838090189e-4951L, UNDERFLOW_EXCEPTION),
14249 # if LDBL_MANT_DIG <= 64
14250 TEST_f_f (tgamma, -0x6e5.fffffffffffff8p0L, plus_zero, UNDERFLOW_EXCEPTION),
14251 TEST_f_f (tgamma, -0x6e6.00000000000008p0L, minus_zero, UNDERFLOW_EXCEPTION),
14252 # else
14253 TEST_f_f (tgamma, -0x6e5.fffffffffffff8p0L, 5.1340982290921319983501912122292601780326e-4954L, UNDERFLOW_EXCEPTION),
14254 TEST_f_f (tgamma, -0x6e6.00000000000008p0L, -5.1340982290921234748578193083614111497314e-4954L, UNDERFLOW_EXCEPTION),
14255 # endif
14256 # if LDBL_MANT_DIG >= 113
14257 TEST_f_f (tgamma, 0x8.0000000000000000000000000008p0L, 5.0400000000000000000000000000000156521606e+03L),
14258 TEST_f_f (tgamma, 0x7.fffffffffffffffffffffffffffcp0L, 5.0399999999999999999999999999999921739197e+03L),
14259 TEST_f_f (tgamma, 0x7.0000000000000000000000000004p0L, 7.2000000000000000000000000000000103877321e+02L),
14260 TEST_f_f (tgamma, 0x6.fffffffffffffffffffffffffffcp0L, 7.1999999999999999999999999999999896122679e+02L),
14261 TEST_f_f (tgamma, 0x6.0000000000000000000000000004p0L, 1.2000000000000000000000000000000015772143e+02L),
14262 TEST_f_f (tgamma, 0x5.fffffffffffffffffffffffffffcp0L, 1.1999999999999999999999999999999984227857e+02L),
14263 TEST_f_f (tgamma, 0x5.0000000000000000000000000004p0L, 2.4000000000000000000000000000000027846500e+01L),
14264 TEST_f_f (tgamma, 0x4.fffffffffffffffffffffffffffcp0L, 2.3999999999999999999999999999999972153500e+01L),
14265 TEST_f_f (tgamma, 0x4.0000000000000000000000000004p0L, 6.0000000000000000000000000000000058060671e+00L),
14266 TEST_f_f (tgamma, 0x3.fffffffffffffffffffffffffffep0L, 5.9999999999999999999999999999999970969664e+00L),
14267 TEST_f_f (tgamma, 0x3.0000000000000000000000000002p0L, 2.0000000000000000000000000000000007108872e+00L),
14268 TEST_f_f (tgamma, 0x2.fffffffffffffffffffffffffffep0L, 1.9999999999999999999999999999999992891128e+00L),
14269 TEST_f_f (tgamma, 0x2.0000000000000000000000000002p0L, 1.0000000000000000000000000000000001628506e+00L),
14270 TEST_f_f (tgamma, 0x1.ffffffffffffffffffffffffffffp0L, 9.9999999999999999999999999999999991857470e-01L),
14271 TEST_f_f (tgamma, 0x1.0000000000000000000000000001p0L, 9.9999999999999999999999999999999988883231e-01L),
14272 TEST_f_f (tgamma, 0x0.ffffffffffffffffffffffffffff8p0L, 1.0000000000000000000000000000000000555838e+00L),
14273 TEST_f_f (tgamma, -0x0.ffffffffffffffffffffffffffff8p0L, -1.0384593717069655257060992658440192422784e+34L),
14274 TEST_f_f (tgamma, -0x1.0000000000000000000000000001p0L, 5.1922968585348276285304963292200955772157e+33L),
14275 TEST_f_f (tgamma, -0x1.ffffffffffffffffffffffffffffp0L, 2.5961484292674138142652481646100484613922e+33L),
14276 TEST_f_f (tgamma, -0x2.0000000000000000000000000002p0L, -1.2980742146337069071326240823050235386078e+33L),
14277 TEST_f_f (tgamma, -0x2.fffffffffffffffffffffffffffep0L, -4.3269140487790230237754136076834154268628e+32L),
14278 TEST_f_f (tgamma, -0x3.0000000000000000000000000002p0L, 4.3269140487790230237754136076834112398039e+32L),
14279 TEST_f_f (tgamma, -0x3.fffffffffffffffffffffffffffep0L, 1.0817285121947557559438534019208539608824e+32L),
14280 TEST_f_f (tgamma, -0x4.0000000000000000000000000004p0L, -5.4086425609737787797192670096042603911764e+31L),
14281 TEST_f_f (tgamma, -0x4.fffffffffffffffffffffffffffcp0L, -1.0817285121947557559438534019208547550981e+31L),
14282 TEST_f_f (tgamma, -0x5.0000000000000000000000000004p0L, 1.0817285121947557559438534019208519115686e+31L),
14283 TEST_f_f (tgamma, -0x5.fffffffffffffffffffffffffffcp0L, 1.8028808536579262599064223365347581566449e+30L),
14284 TEST_f_f (tgamma, -0x6.0000000000000000000000000004p0L, -1.8028808536579262599064223365347529544662e+30L),
14285 TEST_f_f (tgamma, -0x6.fffffffffffffffffffffffffffcp0L, -2.5755440766541803712948890521925119357966e+29L),
14286 TEST_f_f (tgamma, -0x7.0000000000000000000000000004p0L, 2.5755440766541803712948890521925039372193e+29L),
14287 TEST_f_f (tgamma, -0x7.fffffffffffffffffffffffffffcp0L, 3.2194300958177254641186113152406402297656e+28L),
14288 TEST_f_f (tgamma, -0x8.0000000000000000000000000008p0L, -1.6097150479088627320593056576203121511868e+28L),
14289 TEST_f_f (tgamma, -0x9.fffffffffffffffffffffffffff8p0L, 1.7885722754542919245103396195781369922635e+26L),
14290 TEST_f_f (tgamma, -0xa.0000000000000000000000000008p0L, -1.7885722754542919245103396195781240306642e+26L),
14291 TEST_f_f (tgamma, -0x13.fffffffffffffffffffffffffffp0L, 1.3338743301940057859272772747600099590309e+14L),
14292 TEST_f_f (tgamma, -0x14.000000000000000000000000001p0L, -1.3338743301940057859272772747599851284049e+14L),
14293 TEST_f_f (tgamma, -0x1d.fffffffffffffffffffffffffffp0L, 1.2234309326134994173819319571374205986026e+00L),
14294 TEST_f_f (tgamma, -0x1e.000000000000000000000000001p0L, -1.2234309326134994173819319571373948286903e+00L),
14295 TEST_f_f (tgamma, -0x27.ffffffffffffffffffffffffffep0L, 1.9886779934224431790713007246380976767855e-16L),
14296 TEST_f_f (tgamma, -0x28.000000000000000000000000002p0L, -1.9886779934224431790713007246380069485580e-16L),
14297 TEST_f_f (tgamma, -0x28.ffffffffffffffffffffffffffep0L, -4.8504341302986419001739042064343853066259e-18L),
14298 TEST_f_f (tgamma, -0x29.000000000000000000000000002p0L, 4.8504341302986419001739042064341625600656e-18L),
14299 TEST_f_f (tgamma, -0x29.ffffffffffffffffffffffffffep0L, 1.1548652691187242619461676681986633377063e-19L),
14300 TEST_f_f (tgamma, -0x2a.000000000000000000000000002p0L, -1.1548652691187242619461676681986099638869e-19L),
14301 TEST_f_f (tgamma, -0x31.ffffffffffffffffffffffffffep0L, 5.3350029459393017997786969431322287652396e-33L),
14302 TEST_f_f (tgamma, -0x32.000000000000000000000000002p0L, -5.3350029459393017997786969431319708591664e-33L),
14303 TEST_f_f (tgamma, -0x63.ffffffffffffffffffffffffffcp0L, 8.6931242233150155021453586128730281632676e-127L),
14304 TEST_f_f (tgamma, -0x64.000000000000000000000000004p0L, -8.6931242233150155021453586128720401960966e-127L),
14305 TEST_f_f (tgamma, -0x95.ffffffffffffffffffffffffff8p0L, 7.0999637896798458052083945552094635720486e-232L),
14306 TEST_f_f (tgamma, -0x96.000000000000000000000000008p0L, -7.0999637896798458052083945552077084073470e-232L),
14307 TEST_f_f (tgamma, -0xb4.ffffffffffffffffffffffffff8p0L, -1.1155769827282483165407420451477844041365e-300L),
14308 TEST_f_f (tgamma, -0xb5.000000000000000000000000008p0L, 1.1155769827282483165407420451474983236060e-300L),
14309 TEST_f_f (tgamma, -0xb5.ffffffffffffffffffffffffff8p0L, 6.1295438611442215194546266216911239298981e-303L),
14310 TEST_f_f (tgamma, -0xb6.000000000000000000000000008p0L, -6.1295438611442215194546266216895503983577e-303L),
14311 TEST_f_f (tgamma, -0xb6.ffffffffffffffffffffffffff8p0L, -3.3494775197509407210134571703230189921356e-305L),
14312 TEST_f_f (tgamma, -0xb7.000000000000000000000000008p0L, 3.3494775197509407210134571703221582364195e-305L),
14313 TEST_f_f (tgamma, -0xb7.ffffffffffffffffffffffffff8p0L, 1.8203682172559460440290528099581627396147e-307L),
14314 TEST_f_f (tgamma, -0xb8.000000000000000000000000008p0L, -1.8203682172559460440290528099576944498174e-307L),
14315 TEST_f_f (tgamma, -0xbb.ffffffffffffffffffffffffff8p0L, 1.5047872954254114273289393917555491216542e-316L),
14316 TEST_f_f (tgamma, -0xbc.000000000000000000000000008p0L, -1.5047872954254114273289393917551604237609e-316L),
14317 TEST_f_f (tgamma, -0xbc.ffffffffffffffffffffffffff8p0L, -7.9618375419333937953912137129923244334851e-319L),
14318 TEST_f_f (tgamma, -0xbd.000000000000000000000000008p0L, 7.9618375419333937953912137129902657538965e-319L),
14319 TEST_f_f (tgamma, -0xbd.ffffffffffffffffffffffffff8p0L, 4.1904408115438914712585335331538555086887e-321L),
14320 TEST_f_f (tgamma, -0xbe.000000000000000000000000008p0L, -4.1904408115438914712585335331527709057227e-321L),
14321 TEST_f_f (tgamma, -0xbe.ffffffffffffffffffffffffff8p0L, -2.1939480688711473671510646770439036908579e-323L),
14322 TEST_f_f (tgamma, -0xbf.000000000000000000000000008p0L, 2.1939480688711473671510646770433352695669e-323L),
14323 TEST_f_f (tgamma, -0xf9.ffffffffffffffffffffffffff8p0L, 1.2547671759429278005937024349858508569625e-461L),
14324 TEST_f_f (tgamma, -0xfa.000000000000000000000000008p0L, -1.2547671759429278005937024349855091492502e-461L),
14325 TEST_f_f (tgamma, -0x1f3.ffffffffffffffffffffffffffp0L, 1.6623061587520224800948170558276526986560e-1103L),
14326 TEST_f_f (tgamma, -0x1f4.00000000000000000000000001p0L, -1.6623061587520224800948170558266338608285e-1103L),
14327 TEST_f_f (tgamma, -0x2ed.fffffffffffffffffffffffffep0L, 3.9294757797334687313030998663853566763041e-1802L),
14328 TEST_f_f (tgamma, -0x2ee.00000000000000000000000002p0L, -3.9294757797334687313030998663802259177992e-1802L),
14329 TEST_f_f (tgamma, -0x3e7.fffffffffffffffffffffffffep0L, 2.5202599107841713834679953735597552855978e-2537L),
14330 TEST_f_f (tgamma, -0x3e8.00000000000000000000000002p0L, -2.5202599107841713834679953735563216504503e-2537L),
14331 TEST_f_f (tgamma, -0x4e1.fffffffffffffffffffffffffcp0L, 3.0766052944457032773369415396747635242705e-3300L),
14332 TEST_f_f (tgamma, -0x4e2.00000000000000000000000004p0L, -3.0766052944457032773369415396661096445778e-3300L),
14333 TEST_f_f (tgamma, -0x5db.fffffffffffffffffffffffffcp0L, 1.0537416297875703295453200836588944487917e-4084L),
14334 TEST_f_f (tgamma, -0x5dc.00000000000000000000000004p0L, -1.0537416297875703295453200836558547326520e-4084L),
14335 TEST_f_f (tgamma, -0x6d5.fffffffffffffffffffffffffcp0L, 2.4165069481061837867659591369998698607387e-4887L),
14336 TEST_f_f (tgamma, -0x6d6.00000000000000000000000004p0L, -2.4165069481061837867659591369927521090377e-4887L),
14337 TEST_f_f (tgamma, -0x6e2.fffffffffffffffffffffffffcp0L, -1.5891611922804672355414813803008070609431e-4929L),
14338 TEST_f_f (tgamma, -0x6e3.00000000000000000000000004p0L, 1.5891611922804672355414813802961215945667e-4929L),
14339 TEST_f_f (tgamma, -0x6e3.fffffffffffffffffffffffffcp0L, 9.0088502963745308137272187091882496519917e-4933L, UNDERFLOW_EXCEPTION),
14340 TEST_f_f (tgamma, -0x6e4.00000000000000000000000004p0L, -9.0088502963745308137272187091616860368392e-4933L, UNDERFLOW_EXCEPTION),
14341 TEST_f_f (tgamma, -0x6e4.fffffffffffffffffffffffffcp0L, -5.1041644738665896961627301468488672286746e-4936L, UNDERFLOW_EXCEPTION),
14342 TEST_f_f (tgamma, -0x6e5.00000000000000000000000004p0L, 5.1041644738665896961627301468338158811446e-4936L, UNDERFLOW_EXCEPTION),
14343 TEST_f_f (tgamma, -0x6e5.fffffffffffffffffffffffffcp0L, 2.8902403589278537350864836618623260468143e-4939L, UNDERFLOW_EXCEPTION),
14344 TEST_f_f (tgamma, -0x6e6.00000000000000000000000004p0L, -2.8902403589278537350864836618538025544424e-4939L, UNDERFLOW_EXCEPTION),
14345 TEST_f_f (tgamma, -0x6eb.fffffffffffffffffffffffffcp0L, 9.4152481960798287090819640211017219042636e-4959L, UNDERFLOW_EXCEPTION),
14346 TEST_f_f (tgamma, -0x6ec.00000000000000000000000004p0L, -9.4152481960798287090819640210739431797168e-4959L, UNDERFLOW_EXCEPTION),
14347 TEST_f_f (tgamma, -0x6ec.fffffffffffffffffffffffffcp0L, -5.3103486723518492437010513373388172315540e-4962L, UNDERFLOW_EXCEPTION),
14348 TEST_f_f (tgamma, -0x6ed.00000000000000000000000004p0L, 5.3103486723518492437010513373231484108489e-4962L, UNDERFLOW_EXCEPTION),
14349 TEST_f_f (tgamma, -0x6ed.fffffffffffffffffffffffffcp0L, 2.9934321715624854812294539669328172615019e-4965L, UNDERFLOW_EXCEPTION),
14350 TEST_f_f (tgamma, -0x6ee.00000000000000000000000004p0L, -2.9934321715624854812294539669239841152754e-4965L, UNDERFLOW_EXCEPTION),
14351 TEST_f_f (tgamma, -0x6ee.fffffffffffffffffffffffffcp0L, minus_zero, UNDERFLOW_EXCEPTION),
14352 TEST_f_f (tgamma, -0x6ef.00000000000000000000000004p0L, plus_zero, UNDERFLOW_EXCEPTION),
14353 # endif
14354 #endif
14355 TEST_f_f (tgamma, -0x1.0a32a2p+5L, 1.8125267978155035272941154746083439329912e-37L),
14356 #ifndef TEST_FLOAT
14357 TEST_f_f (tgamma, -0x1.5800000080001p+7L, -3.1439271448823567326093363350637118195240e-304L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14358 #endif
14359 TEST_f_f (tgamma, 18.5L, 1.4986120533153361177371791123515513270334e+15L),
14360 TEST_f_f (tgamma, 19.5L, 2.7724322986333718178137813578503699550119e+16L),
14361 TEST_f_f (tgamma, 23.5L, 5.3613035875444147334274983856108155717836e+21L),
14362 TEST_f_f (tgamma, 29.5L, 1.6348125198274266444378807806868221866931e+30L),
14363 TEST_f_f (tgamma, 30.5L, 4.8226969334909086010917483030261254507447e+31L),
14364 TEST_f_f (tgamma, 31.5L, 1.4709225647147271233329832324229682624771e+33L),
14365 TEST_f_f (tgamma, 32.5L, 4.6334060788513904384988971821323500268029e+34L),
14366 TEST_f_f (tgamma, 33.5L, 1.5058569756267018925121415841930137587110e+36L),
14367 TEST_f_f (tgamma, 34.5L, 5.0446208683494513399156743070465960916817e+37L),
14368 TEST_f_f (tgamma, 0x2.30a43cp+4L, 3.4027979115654976101247558405326779640190e+38L),
14369 #ifdef TEST_FLOAT
14370 TEST_f_f (tgamma, 0x2.30a44p+4L, plus_infty, OVERFLOW_EXCEPTION),
14371 #else
14372 TEST_f_f (tgamma, 0x2.30a44p+4L, 3.4028438913396451054667218138127983367181e+38L),
14373 #endif
14374 #ifndef TEST_FLOAT
14375 TEST_f_f (tgamma, 0xa.b9fd72b0fb238p+4L, 1.7976931348622298700886249281842651388250e+308L),
14376 # if !defined TEST_LDOUBLE || LDBL_MAX_EXP <= 1024
14377 TEST_f_f (tgamma, 0xa.b9fd72b0fb24p+4L, plus_infty, OVERFLOW_EXCEPTION),
14378 # else
14379 TEST_f_f (tgamma, 0xa.b9fd72b0fb24p+4L, 1.7976931348624926129589466917917870782484e+308L),
14380 # endif
14381 #endif
14382 #if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
14383 TEST_f_f (tgamma, 0xa.b9fd72b0fb23a9ddbf0d3804f4p+4L, 1.7976931348623158079372897140307719334857e+308L),
14384 # if LDBL_MAX_EXP <= 1024
14385 TEST_f_f (tgamma, 0xa.b9fd72b0fb23a9ddbf0d3804f8p+4L, plus_infty, OVERFLOW_EXCEPTION),
14386 # else
14387 TEST_f_f (tgamma, 0xa.b9fd72b0fb23a9ddbf0d3804f8p+4L, 1.7976931348623158079372897140599422519044e+308L),
14388 # endif
14389 #endif
14390 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
14391 TEST_f_f (tgamma, 0x6.db8c603359a97108p+8L, 1.1897314953572317517071551278058233700012e+4932L),
14392 TEST_f_f (tgamma, 0x6.db8c603359a9711p+8L, plus_infty, OVERFLOW_EXCEPTION),
14393 # if LDBL_MANT_DIG >= 113
14394 TEST_f_f (tgamma, 0x6.db8c603359a971081bc4a2e9dfdp+8L, 1.1897314953572317650857593266265995494998e+4932L),
14395 TEST_f_f (tgamma, 0x6.db8c603359a971081bc4a2e9dfd4p+8L, plus_infty, OVERFLOW_EXCEPTION),
14396 # endif
14397 #endif
14398 END_DATA (tgamma)
14399 };
14400
14401 static void
14402 tgamma_test (void)
14403 {
14404 errno = 0;
14405 FUNC(tgamma) (1);
14406 if (errno == ENOSYS)
14407 /* Function not implemented. */
14408 return;
14409
14410 START (tgamma);
14411 RUN_TEST_LOOP_f_f (tgamma, tgamma_test_data, );
14412 END (tgamma);
14413 }
14414
14415
14416 static const struct test_f_f_data trunc_test_data[] =
14417 {
14418 START_DATA (trunc),
14419 TEST_f_f (trunc, plus_infty, plus_infty),
14420 TEST_f_f (trunc, minus_infty, minus_infty),
14421 TEST_f_f (trunc, qnan_value, qnan_value),
14422
14423 TEST_f_f (trunc, 0, 0),
14424 TEST_f_f (trunc, minus_zero, minus_zero),
14425 TEST_f_f (trunc, 0.1, 0),
14426 TEST_f_f (trunc, 0.25, 0),
14427 TEST_f_f (trunc, 0.625, 0),
14428 TEST_f_f (trunc, -0.1, minus_zero),
14429 TEST_f_f (trunc, -0.25, minus_zero),
14430 TEST_f_f (trunc, -0.625, minus_zero),
14431 TEST_f_f (trunc, 1, 1),
14432 TEST_f_f (trunc, -1, -1),
14433 TEST_f_f (trunc, 1.625, 1),
14434 TEST_f_f (trunc, -1.625, -1),
14435
14436 TEST_f_f (trunc, 1048580.625L, 1048580L),
14437 TEST_f_f (trunc, -1048580.625L, -1048580L),
14438
14439 TEST_f_f (trunc, 8388610.125L, 8388610.0L),
14440 TEST_f_f (trunc, -8388610.125L, -8388610.0L),
14441
14442 TEST_f_f (trunc, 4294967296.625L, 4294967296.0L),
14443 TEST_f_f (trunc, -4294967296.625L, -4294967296.0L),
14444
14445 #ifdef TEST_LDOUBLE
14446 /* The result can only be represented in long double. */
14447 TEST_f_f (trunc, 4503599627370495.5L, 4503599627370495.0L),
14448 TEST_f_f (trunc, 4503599627370496.25L, 4503599627370496.0L),
14449 TEST_f_f (trunc, 4503599627370496.5L, 4503599627370496.0L),
14450 TEST_f_f (trunc, 4503599627370496.75L, 4503599627370496.0L),
14451 TEST_f_f (trunc, 4503599627370497.5L, 4503599627370497.0L),
14452
14453 # if LDBL_MANT_DIG > 100
14454 TEST_f_f (trunc, 4503599627370494.5000000000001L, 4503599627370494.0L),
14455 TEST_f_f (trunc, 4503599627370495.5000000000001L, 4503599627370495.0L),
14456 TEST_f_f (trunc, 4503599627370496.5000000000001L, 4503599627370496.0L),
14457 # endif
14458
14459 TEST_f_f (trunc, -4503599627370495.5L, -4503599627370495.0L),
14460 TEST_f_f (trunc, -4503599627370496.25L, -4503599627370496.0L),
14461 TEST_f_f (trunc, -4503599627370496.5L, -4503599627370496.0L),
14462 TEST_f_f (trunc, -4503599627370496.75L, -4503599627370496.0L),
14463 TEST_f_f (trunc, -4503599627370497.5L, -4503599627370497.0L),
14464
14465 # if LDBL_MANT_DIG > 100
14466 TEST_f_f (trunc, -4503599627370494.5000000000001L, -4503599627370494.0L),
14467 TEST_f_f (trunc, -4503599627370495.5000000000001L, -4503599627370495.0L),
14468 TEST_f_f (trunc, -4503599627370496.5000000000001L, -4503599627370496.0L),
14469 # endif
14470
14471 TEST_f_f (trunc, 9007199254740991.5L, 9007199254740991.0L),
14472 TEST_f_f (trunc, 9007199254740992.25L, 9007199254740992.0L),
14473 TEST_f_f (trunc, 9007199254740992.5L, 9007199254740992.0L),
14474 TEST_f_f (trunc, 9007199254740992.75L, 9007199254740992.0L),
14475 TEST_f_f (trunc, 9007199254740993.5L, 9007199254740993.0L),
14476
14477 # if LDBL_MANT_DIG > 100
14478 TEST_f_f (trunc, 9007199254740991.0000000000001L, 9007199254740991.0L),
14479 TEST_f_f (trunc, 9007199254740992.0000000000001L, 9007199254740992.0L),
14480 TEST_f_f (trunc, 9007199254740993.0000000000001L, 9007199254740993.0L),
14481 TEST_f_f (trunc, 9007199254740991.5000000000001L, 9007199254740991.0L),
14482 TEST_f_f (trunc, 9007199254740992.5000000000001L, 9007199254740992.0L),
14483 TEST_f_f (trunc, 9007199254740993.5000000000001L, 9007199254740993.0L),
14484 # endif
14485
14486 TEST_f_f (trunc, -9007199254740991.5L, -9007199254740991.0L),
14487 TEST_f_f (trunc, -9007199254740992.25L, -9007199254740992.0L),
14488 TEST_f_f (trunc, -9007199254740992.5L, -9007199254740992.0L),
14489 TEST_f_f (trunc, -9007199254740992.75L, -9007199254740992.0L),
14490 TEST_f_f (trunc, -9007199254740993.5L, -9007199254740993.0L),
14491
14492 # if LDBL_MANT_DIG > 100
14493 TEST_f_f (trunc, -9007199254740991.0000000000001L, -9007199254740991.0L),
14494 TEST_f_f (trunc, -9007199254740992.0000000000001L, -9007199254740992.0L),
14495 TEST_f_f (trunc, -9007199254740993.0000000000001L, -9007199254740993.0L),
14496 TEST_f_f (trunc, -9007199254740991.5000000000001L, -9007199254740991.0L),
14497 TEST_f_f (trunc, -9007199254740992.5000000000001L, -9007199254740992.0L),
14498 TEST_f_f (trunc, -9007199254740993.5000000000001L, -9007199254740993.0L),
14499 # endif
14500
14501 TEST_f_f (trunc, 72057594037927935.5L, 72057594037927935.0L),
14502 TEST_f_f (trunc, 72057594037927936.25L, 72057594037927936.0L),
14503 TEST_f_f (trunc, 72057594037927936.5L, 72057594037927936.0L),
14504 TEST_f_f (trunc, 72057594037927936.75L, 72057594037927936.0L),
14505 TEST_f_f (trunc, 72057594037927937.5L, 72057594037927937.0L),
14506
14507 TEST_f_f (trunc, -72057594037927935.5L, -72057594037927935.0L),
14508 TEST_f_f (trunc, -72057594037927936.25L, -72057594037927936.0L),
14509 TEST_f_f (trunc, -72057594037927936.5L, -72057594037927936.0L),
14510 TEST_f_f (trunc, -72057594037927936.75L, -72057594037927936.0L),
14511 TEST_f_f (trunc, -72057594037927937.5L, -72057594037927937.0L),
14512
14513 TEST_f_f (trunc, 10141204801825835211973625643007.5L, 10141204801825835211973625643007.0L),
14514 TEST_f_f (trunc, 10141204801825835211973625643008.25L, 10141204801825835211973625643008.0L),
14515 TEST_f_f (trunc, 10141204801825835211973625643008.5L, 10141204801825835211973625643008.0L),
14516 TEST_f_f (trunc, 10141204801825835211973625643008.75L, 10141204801825835211973625643008.0L),
14517 TEST_f_f (trunc, 10141204801825835211973625643009.5L, 10141204801825835211973625643009.0L),
14518 #endif
14519 END_DATA (trunc)
14520 };
14521
14522 static void
14523 trunc_test (void)
14524 {
14525 START (trunc);
14526 RUN_TEST_LOOP_f_f (trunc, trunc_test_data, );
14527 END (trunc);
14528 }
14529
14530 static const struct test_f_f_data y0_test_data[] =
14531 {
14532 START_DATA (y0),
14533 /* y0 is the Bessel function of the second kind of order 0 */
14534 TEST_f_f (y0, -1.0, minus_infty, INVALID_EXCEPTION),
14535 TEST_f_f (y0, -max_value, minus_infty, INVALID_EXCEPTION),
14536 TEST_f_f (y0, 0.0, minus_infty),
14537 TEST_f_f (y0, qnan_value, qnan_value),
14538 TEST_f_f (y0, plus_infty, 0),
14539
14540 TEST_f_f (y0, 0.125L, -1.38968062514384052915582277745018693L),
14541 TEST_f_f (y0, 0.75L, -0.137172769385772397522814379396581855L),
14542 TEST_f_f (y0, 1.0, 0.0882569642156769579829267660235151628L),
14543 TEST_f_f (y0, 1.5, 0.382448923797758843955068554978089862L),
14544 TEST_f_f (y0, 2.0, 0.510375672649745119596606592727157873L),
14545 TEST_f_f (y0, 8.0, 0.223521489387566220527323400498620359L),
14546 TEST_f_f (y0, 10.0, 0.0556711672835993914244598774101900481L),
14547
14548 TEST_f_f (y0, 0x1.3ffp+74L, 1.818984347516051243459467456433028748678e-12L),
14549
14550 #ifndef TEST_FLOAT
14551 TEST_f_f (y0, 0x1.ff00000000002p+840L, 1.846591691699331493194965158699937660696e-127L),
14552 TEST_f_f (y0, 0x1p1023L, 8.2687542933709649327986678723012001545638e-155L),
14553 #endif
14554
14555 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
14556 TEST_f_f (y0, 0x1p16382L, 8.0839224448726336195866026476176740513439e-2467L),
14557 TEST_f_f (y0, 0x1p16383L, -3.8895531955766020648617743624167352352217e-2467L),
14558 #endif
14559
14560 TEST_f_f (y0, 0x1p-10L, -4.4865150767109739412411806297168793661098L),
14561 TEST_f_f (y0, 0x1p-20L, -8.8992283012125827603076426611387876938160L),
14562 TEST_f_f (y0, 0x1p-30L, -1.3311940304267782826037118027401817264906e+1L),
14563 TEST_f_f (y0, 0x1p-40L, -1.7724652307320814696990854700366226762563e+1L),
14564 TEST_f_f (y0, 0x1p-50L, -2.2137364310373846564919987139743760738155e+1L),
14565 TEST_f_f (y0, 0x1p-60L, -2.6550076313426878432849115782108205929120e+1L),
14566 TEST_f_f (y0, 0x1p-70L, -3.0962788316479910300778244424468159753887e+1L),
14567 TEST_f_f (y0, 0x1p-80L, -3.5375500319532942168707373066828113573541e+1L),
14568 TEST_f_f (y0, 0x1p-90L, -3.9788212322585974036636501709188067393195e+1L),
14569 TEST_f_f (y0, 0x1p-100L, -4.420092432563900590456563035154802121284e+1L),
14570 TEST_f_f (y0, 0x1p-110L, -4.861363632869203777249475899390797503250e+1L),
14571 END_DATA (y0)
14572 };
14573
14574 static void
14575 y0_test (void)
14576 {
14577 FLOAT s, c;
14578 errno = 0;
14579 FUNC (sincos) (0, &s, &c);
14580 if (errno == ENOSYS)
14581 /* Required function not implemented. */
14582 return;
14583 FUNC(y0) (1);
14584 if (errno == ENOSYS)
14585 /* Function not implemented. */
14586 return;
14587
14588 START (y0);
14589 RUN_TEST_LOOP_f_f (y0, y0_test_data, );
14590 END (y0);
14591 }
14592
14593
14594 static const struct test_f_f_data y1_test_data[] =
14595 {
14596 START_DATA (y1),
14597 /* y1 is the Bessel function of the second kind of order 1 */
14598 TEST_f_f (y1, -1.0, minus_infty, INVALID_EXCEPTION),
14599 TEST_f_f (y1, -max_value, minus_infty, INVALID_EXCEPTION),
14600 TEST_f_f (y1, 0.0, minus_infty),
14601 TEST_f_f (y1, plus_infty, 0),
14602 TEST_f_f (y1, qnan_value, qnan_value),
14603
14604 TEST_f_f (y1, 0.125L, -5.19993611253477499595928744876579921L),
14605 TEST_f_f (y1, 0.75L, -1.03759455076928541973767132140642198L),
14606 TEST_f_f (y1, 1.0, -0.781212821300288716547150000047964821L),
14607 TEST_f_f (y1, 1.5, -0.412308626973911295952829820633445323L),
14608 TEST_f_f (y1, 2.0, -0.107032431540937546888370772277476637L),
14609 TEST_f_f (y1, 8.0, -0.158060461731247494255555266187483550L),
14610 TEST_f_f (y1, 10.0, 0.249015424206953883923283474663222803L),
14611
14612 TEST_f_f (y1, 0x1.27e204p+99L, -8.881610148467797208469612080785210013461e-16L),
14613
14614 #ifndef TEST_FLOAT
14615 TEST_f_f (y1, 0x1.001000001p+593L, 3.927269966354206207832593635798954916263e-90L),
14616 TEST_f_f (y1, 0x1p1023L, 1.5665258060609012834424478437196679802783e-155L),
14617 #endif
14618
14619 #if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
14620 TEST_f_f (y1, 0x1p16382L, 1.2193782500509000574176799046642541129387e-2466L),
14621 TEST_f_f (y1, 0x1p16383L, -9.5859502826270374691362975419147645151233e-2467L),
14622 #endif
14623
14624 TEST_f_f (y1, 0x1p-10L, -6.5190099301063115047395187618929589514382e+02L),
14625 TEST_f_f (y1, 0x1p-20L, -6.6754421443450423911167962313100637952285e+05L),
14626 TEST_f_f (y1, 0x1p-30L, -6.8356527557643159612937462812258975438856e+08L),
14627 TEST_f_f (y1, 0x1p-40L, -6.9997084219026594793707805777425993547887e+11L),
14628 TEST_f_f (y1, 0x1p-50L, -7.1677014240283233068755952926181262431559e+14L),
14629 TEST_f_f (y1, 0x1p-60L, -7.3397262582050030662406095795388448059822e+17L),
14630 TEST_f_f (y1, 0x1p-70L, -7.5158796884019231398303842094477769620063e+20L),
14631 TEST_f_f (y1, 0x1p-80L, -7.6962608009235692951863134304745236090943e+23L),
14632 TEST_f_f (y1, 0x1p-90L, -7.8809710601457349582707849528059121757126e+26L),
14633 TEST_f_f (y1, 0x1p-100L, -8.0701143655892325972692837916732540679297e+29L),
14634 TEST_f_f (y1, 0x1p-110L, -8.2637971103633741796037466026734121655600e+32L),
14635 END_DATA (y1)
14636 };
14637
14638 static void
14639 y1_test (void)
14640 {
14641 FLOAT s, c;
14642 errno = 0;
14643 FUNC (sincos) (0, &s, &c);
14644 if (errno == ENOSYS)
14645 /* Required function not implemented. */
14646 return;
14647 FUNC(y1) (1);
14648 if (errno == ENOSYS)
14649 /* Function not implemented. */
14650 return;
14651
14652 START (y1);
14653 RUN_TEST_LOOP_f_f (y1, y1_test_data, );
14654 END (y1);
14655 }
14656
14657
14658 static const struct test_if_f_data yn_test_data[] =
14659 {
14660 START_DATA (yn),
14661 /* yn is the Bessel function of the second kind of order n */
14662 /* yn (0, x) == y0 (x) */
14663 TEST_if_f (yn, 0, -1.0, minus_infty, INVALID_EXCEPTION),
14664 TEST_if_f (yn, 0, -max_value, minus_infty, INVALID_EXCEPTION),
14665 TEST_if_f (yn, 0, 0.0, minus_infty),
14666 TEST_if_f (yn, 0, qnan_value, qnan_value),
14667 TEST_if_f (yn, 0, plus_infty, 0),
14668
14669 TEST_if_f (yn, 0, 0.125L, -1.38968062514384052915582277745018693L),
14670 TEST_if_f (yn, 0, 0.75L, -0.137172769385772397522814379396581855L),
14671 TEST_if_f (yn, 0, 1.0, 0.0882569642156769579829267660235151628L),
14672 TEST_if_f (yn, 0, 1.5, 0.382448923797758843955068554978089862L),
14673 TEST_if_f (yn, 0, 2.0, 0.510375672649745119596606592727157873L),
14674 TEST_if_f (yn, 0, 8.0, 0.223521489387566220527323400498620359L),
14675 TEST_if_f (yn, 0, 10.0, 0.0556711672835993914244598774101900481L),
14676
14677 /* yn (1, x) == y1 (x) */
14678 TEST_if_f (yn, 1, -1.0, minus_infty, INVALID_EXCEPTION),
14679 TEST_if_f (yn, 1, 0.0, minus_infty),
14680 TEST_if_f (yn, 1, plus_infty, 0),
14681 TEST_if_f (yn, 1, qnan_value, qnan_value),
14682
14683 TEST_if_f (yn, 1, 0.125L, -5.19993611253477499595928744876579921L),
14684 TEST_if_f (yn, 1, 0.75L, -1.03759455076928541973767132140642198L),
14685 TEST_if_f (yn, 1, 1.0, -0.781212821300288716547150000047964821L),
14686 TEST_if_f (yn, 1, 1.5, -0.412308626973911295952829820633445323L),
14687 TEST_if_f (yn, 1, 2.0, -0.107032431540937546888370772277476637L),
14688 TEST_if_f (yn, 1, 8.0, -0.158060461731247494255555266187483550L),
14689 TEST_if_f (yn, 1, 10.0, 0.249015424206953883923283474663222803L),
14690
14691 /* yn (3, x) */
14692 TEST_if_f (yn, 3, plus_infty, 0),
14693 TEST_if_f (yn, 3, qnan_value, qnan_value),
14694
14695 TEST_if_f (yn, 3, 0.125L, -2612.69757350066712600220955744091741L),
14696 TEST_if_f (yn, 3, 0.75L, -12.9877176234475433186319774484809207L),
14697 TEST_if_f (yn, 3, 1.0, -5.82151760596472884776175706442981440L),
14698 TEST_if_f (yn, 3, 2.0, -1.12778377684042778608158395773179238L),
14699 TEST_if_f (yn, 3, 10.0, -0.251362657183837329779204747654240998L),
14700
14701 /* yn (10, x) */
14702 TEST_if_f (yn, 10, plus_infty, 0),
14703 TEST_if_f (yn, 10, qnan_value, qnan_value),
14704
14705 TEST_if_f (yn, 10, 0.125L, -127057845771019398.252538486899753195L),
14706 TEST_if_f (yn, 10, 0.75L, -2133501638.90573424452445412893839236L),
14707 TEST_if_f (yn, 10, 1.0, -121618014.278689189288130426667971145L),
14708 TEST_if_f (yn, 10, 2.0, -129184.542208039282635913145923304214L),
14709 TEST_if_f (yn, 10, 10.0, -0.359814152183402722051986577343560609L),
14710
14711 /* Check whether yn returns correct value for LDBL_MIN, DBL_MIN,
14712 and FLT_MIN. See Bug 14173. */
14713 TEST_if_f (yn, 10, min_value, minus_infty, OVERFLOW_EXCEPTION),
14714
14715 TEST_if_f (yn, 10, min_value, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
14716 END_DATA (yn)
14717 };
14718
14719 static void
14720 yn_test (void)
14721 {
14722 FLOAT s, c;
14723 errno = 0;
14724 FUNC (sincos) (0, &s, &c);
14725 if (errno == ENOSYS)
14726 /* Required function not implemented. */
14727 return;
14728 FUNC(yn) (1, 1);
14729 if (errno == ENOSYS)
14730 /* Function not implemented. */
14731 return;
14732
14733 START (yn);
14734 RUN_TEST_LOOP_if_f (yn, yn_test_data, );
14735 END (yn);
14736 }
14737
14738
14739 static const struct test_f_f_data significand_test_data[] =
14740 {
14741 START_DATA (significand),
14742 /* significand returns the mantissa of the exponential representation. */
14743 /* TODO: missing +/-Inf as well as qNaN tests. */
14744 TEST_f_f (significand, 4.0, 1.0),
14745 TEST_f_f (significand, 6.0, 1.5),
14746 TEST_f_f (significand, 8.0, 1.0),
14747 END_DATA (significand)
14748 };
14749
14750 static void
14751 significand_test (void)
14752 {
14753 START (significand);
14754 RUN_TEST_LOOP_f_f (significand, significand_test_data, );
14755 END (significand);
14756 }
14757
14758
14759 static void
14760 initialize (void)
14761 {
14762 fpstack_test ("start *init*");
14763
14764 /* Clear all exceptions. From now on we must not get random exceptions. */
14765 feclearexcept (FE_ALL_EXCEPT);
14766 errno = 0;
14767
14768 /* Test to make sure we start correctly. */
14769 fpstack_test ("end *init*");
14770 }
14771
14772 /* Definitions of arguments for argp functions. */
14773 static const struct argp_option options[] =
14774 {
14775 { "verbose", 'v', "NUMBER", 0, "Level of verbosity (0..3)"},
14776 { "ulps-file", 'u', NULL, 0, "Output ulps to file ULPs"},
14777 { "no-max-error", 'f', NULL, 0,
14778 "Don't output maximal errors of functions"},
14779 { "no-points", 'p', NULL, 0,
14780 "Don't output results of functions invocations"},
14781 { "ignore-max-ulp", 'i', "yes/no", 0,
14782 "Ignore given maximal errors"},
14783 { "output-dir", 'o', "DIR", 0,
14784 "Directory where generated files will be placed"},
14785 { NULL, 0, NULL, 0, NULL }
14786 };
14787
14788 /* Short description of program. */
14789 static const char doc[] = "Math test suite: " TEST_MSG ;
14790
14791 /* Prototype for option handler. */
14792 static error_t parse_opt (int key, char *arg, struct argp_state *state);
14793
14794 /* Data structure to communicate with argp functions. */
14795 static struct argp argp =
14796 {
14797 options, parse_opt, NULL, doc,
14798 };
14799
14800
14801 /* Handle program arguments. */
14802 static error_t
14803 parse_opt (int key, char *arg, struct argp_state *state)
14804 {
14805 switch (key)
14806 {
14807 case 'f':
14808 output_max_error = 0;
14809 break;
14810 case 'i':
14811 if (strcmp (arg, "yes") == 0)
14812 ignore_max_ulp = 1;
14813 else if (strcmp (arg, "no") == 0)
14814 ignore_max_ulp = 0;
14815 break;
14816 case 'o':
14817 output_dir = (char *) malloc (strlen (arg) + 1);
14818 if (output_dir != NULL)
14819 strcpy (output_dir, arg);
14820 else
14821 return errno;
14822 break;
14823 case 'p':
14824 output_points = 0;
14825 break;
14826 case 'u':
14827 output_ulps = 1;
14828 break;
14829 case 'v':
14830 if (optarg)
14831 verbose = (unsigned int) strtoul (optarg, NULL, 0);
14832 else
14833 verbose = 3;
14834 break;
14835 default:
14836 return ARGP_ERR_UNKNOWN;
14837 }
14838 return 0;
14839 }
14840
14841 #if 0
14842 /* function to check our ulp calculation. */
14843 void
14844 check_ulp (void)
14845 {
14846 int i;
14847
14848 FLOAT u, diff, ulp;
14849 /* This gives one ulp. */
14850 u = FUNC(nextafter) (10, 20);
14851 check_equal (10.0, u, 1, &diff, &ulp);
14852 printf ("One ulp: % .4" PRINTF_NEXPR "\n", ulp);
14853
14854 /* This gives one more ulp. */
14855 u = FUNC(nextafter) (u, 20);
14856 check_equal (10.0, u, 2, &diff, &ulp);
14857 printf ("two ulp: % .4" PRINTF_NEXPR "\n", ulp);
14858
14859 /* And now calculate 100 ulp. */
14860 for (i = 2; i < 100; i++)
14861 u = FUNC(nextafter) (u, 20);
14862 check_equal (10.0, u, 100, &diff, &ulp);
14863 printf ("100 ulp: % .4" PRINTF_NEXPR "\n", ulp);
14864 }
14865 #endif
14866
14867 int
14868 main (int argc, char **argv)
14869 {
14870
14871 int remaining;
14872 char *ulps_file_path;
14873 size_t dir_len = 0;
14874
14875 verbose = 1;
14876 output_ulps = 0;
14877 output_max_error = 1;
14878 output_points = 1;
14879 output_dir = NULL;
14880 /* XXX set to 0 for releases. */
14881 ignore_max_ulp = 0;
14882
14883 /* Parse and process arguments. */
14884 argp_parse (&argp, argc, argv, 0, &remaining, NULL);
14885
14886 if (remaining != argc)
14887 {
14888 fprintf (stderr, "wrong number of arguments");
14889 argp_help (&argp, stdout, ARGP_HELP_SEE, program_invocation_short_name);
14890 exit (EXIT_FAILURE);
14891 }
14892
14893 if (output_ulps)
14894 {
14895 if (output_dir != NULL)
14896 dir_len = strlen (output_dir);
14897 ulps_file_path = (char *) malloc (dir_len + strlen (ulps_file_name) + 1);
14898 if (ulps_file_path == NULL)
14899 {
14900 perror ("can't allocate path for `ULPs' file: ");
14901 exit (1);
14902 }
14903 sprintf (ulps_file_path, "%s%s", output_dir == NULL ? "" : output_dir, ulps_file_name);
14904 ulps_file = fopen (ulps_file_path, "a");
14905 if (ulps_file == NULL)
14906 {
14907 perror ("can't open file `ULPs' for writing: ");
14908 exit (1);
14909 }
14910 }
14911
14912
14913 initialize ();
14914 printf (TEST_MSG);
14915
14916 #if 0
14917 check_ulp ();
14918 #endif
14919
14920 /* Keep the tests a wee bit ordered (according to ISO C99). */
14921 /* Classification macros: */
14922 finite_test ();
14923 fpclassify_test ();
14924 isfinite_test ();
14925 isinf_test ();
14926 isnan_test ();
14927 isnormal_test ();
14928 issignaling_test ();
14929 signbit_test ();
14930
14931 /* Trigonometric functions: */
14932 acos_test ();
14933 acos_test_tonearest ();
14934 acos_test_towardzero ();
14935 acos_test_downward ();
14936 acos_test_upward ();
14937 asin_test ();
14938 asin_test_tonearest ();
14939 asin_test_towardzero ();
14940 asin_test_downward ();
14941 asin_test_upward ();
14942 atan_test ();
14943 atan2_test ();
14944 cos_test ();
14945 cos_test_tonearest ();
14946 cos_test_towardzero ();
14947 cos_test_downward ();
14948 cos_test_upward ();
14949 sin_test ();
14950 sin_test_tonearest ();
14951 sin_test_towardzero ();
14952 sin_test_downward ();
14953 sin_test_upward ();
14954 sincos_test ();
14955 tan_test ();
14956 tan_test_tonearest ();
14957 tan_test_towardzero ();
14958 tan_test_downward ();
14959 tan_test_upward ();
14960
14961 /* Hyperbolic functions: */
14962 acosh_test ();
14963 asinh_test ();
14964 atanh_test ();
14965 cosh_test ();
14966 cosh_test_tonearest ();
14967 cosh_test_towardzero ();
14968 cosh_test_downward ();
14969 cosh_test_upward ();
14970 sinh_test ();
14971 sinh_test_tonearest ();
14972 sinh_test_towardzero ();
14973 sinh_test_downward ();
14974 sinh_test_upward ();
14975 tanh_test ();
14976
14977 /* Exponential and logarithmic functions: */
14978 exp_test ();
14979 exp_test_tonearest ();
14980 exp_test_towardzero ();
14981 exp_test_downward ();
14982 exp_test_upward ();
14983 exp10_test ();
14984 exp2_test ();
14985 expm1_test ();
14986 frexp_test ();
14987 ldexp_test ();
14988 log_test ();
14989 log10_test ();
14990 log1p_test ();
14991 log2_test ();
14992 logb_test ();
14993 logb_test_downward ();
14994 modf_test ();
14995 ilogb_test ();
14996 scalb_test ();
14997 scalbn_test ();
14998 scalbln_test ();
14999 significand_test ();
15000
15001 /* Power and absolute value functions: */
15002 cbrt_test ();
15003 fabs_test ();
15004 hypot_test ();
15005 pow_test ();
15006 pow_test_tonearest ();
15007 pow_test_towardzero ();
15008 pow_test_downward ();
15009 pow_test_upward ();
15010 sqrt_test ();
15011
15012 /* Error and gamma functions: */
15013 erf_test ();
15014 erfc_test ();
15015 gamma_test ();
15016 lgamma_test ();
15017 tgamma_test ();
15018
15019 /* Nearest integer functions: */
15020 ceil_test ();
15021 floor_test ();
15022 nearbyint_test ();
15023 rint_test ();
15024 rint_test_tonearest ();
15025 rint_test_towardzero ();
15026 rint_test_downward ();
15027 rint_test_upward ();
15028 lrint_test ();
15029 lrint_test_tonearest ();
15030 lrint_test_towardzero ();
15031 lrint_test_downward ();
15032 lrint_test_upward ();
15033 llrint_test ();
15034 llrint_test_tonearest ();
15035 llrint_test_towardzero ();
15036 llrint_test_downward ();
15037 llrint_test_upward ();
15038 round_test ();
15039 lround_test ();
15040 llround_test ();
15041 trunc_test ();
15042
15043 /* Remainder functions: */
15044 fmod_test ();
15045 remainder_test ();
15046 remquo_test ();
15047
15048 /* Manipulation functions: */
15049 copysign_test ();
15050 nextafter_test ();
15051 nexttoward_test ();
15052
15053 /* maximum, minimum and positive difference functions */
15054 fdim_test ();
15055 fmax_test ();
15056 fmin_test ();
15057
15058 /* Multiply and add: */
15059 fma_test ();
15060 fma_test_towardzero ();
15061 fma_test_downward ();
15062 fma_test_upward ();
15063
15064 /* Comparison macros: */
15065 isgreater_test ();
15066 isgreaterequal_test ();
15067 isless_test ();
15068 islessequal_test ();
15069 islessgreater_test ();
15070 isunordered_test ();
15071
15072 /* Complex functions: */
15073 cabs_test ();
15074 cacos_test ();
15075 cacosh_test ();
15076 carg_test ();
15077 casin_test ();
15078 casinh_test ();
15079 catan_test ();
15080 catanh_test ();
15081 ccos_test ();
15082 ccosh_test ();
15083 cexp_test ();
15084 cimag_test ();
15085 clog10_test ();
15086 clog_test ();
15087 conj_test ();
15088 cpow_test ();
15089 cproj_test ();
15090 creal_test ();
15091 csin_test ();
15092 csinh_test ();
15093 csqrt_test ();
15094 ctan_test ();
15095 ctan_test_tonearest ();
15096 ctan_test_towardzero ();
15097 ctan_test_downward ();
15098 ctan_test_upward ();
15099 ctanh_test ();
15100 ctanh_test_tonearest ();
15101 ctanh_test_towardzero ();
15102 ctanh_test_downward ();
15103 ctanh_test_upward ();
15104
15105 /* Bessel functions: */
15106 j0_test ();
15107 j1_test ();
15108 jn_test ();
15109 y0_test ();
15110 y1_test ();
15111 yn_test ();
15112
15113 if (output_ulps)
15114 fclose (ulps_file);
15115
15116 printf ("\nTest suite completed:\n");
15117 printf (" %d test cases plus %d tests for exception flags and\n"
15118 " %d tests for errno executed.\n",
15119 noTests, noExcTests, noErrnoTests);
15120 if (noErrors)
15121 {
15122 printf (" %d errors occurred.\n", noErrors);
15123 return 1;
15124 }
15125 printf (" All tests passed successfully.\n");
15126
15127 return 0;
15128 }
15129
15130 /*
15131 * Local Variables:
15132 * mode:c
15133 * End:
15134 */