]> git.ipfire.org Git - thirdparty/glibc.git/blame - math/libm-test.inc
projects / thirdparty / glibc.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Convert TEST_fF_f1 tests from code to data.
[thirdparty/glibc.git] / math / libm-test.inc
CommitLineData
568035b7 1/* Copyright (C) 1997-2013 Free Software Foundation, Inc.
8847214f 2 This file is part of the GNU C Library.
18394a08 3 Contributed by Andreas Jaeger <aj@suse.de>, 1997.
8847214f
UD		 4
5 The GNU C Library is free software; you can redistribute it and/or
41bdb6e2
AJ		 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.
8847214f
UD		 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
41bdb6e2 13 Lesser General Public License for more details.
8847214f 14
41bdb6e2 15 You should have received a copy of the GNU Lesser General Public
59ba27a6
PE		 16 License along with the GNU C Library; if not, see
17 <http://www.gnu.org/licenses/>. */
8847214f
UD		 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
f964490f 24 Macros:
8847214f
UD		 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,
ef1bb361 43 fabs, fdim, finite, floor, fma, fmax, fmin, fmod, fpclassify,
8847214f 44 frexp, gamma, hypot,
57267616 45 ilogb, isfinite, isinf, isnan, isnormal, issignaling,
0e8e0c1c 46 isless, islessequal, isgreater, isgreaterequal, islessgreater, isunordered,
8847214f
UD		 47 j0, j1, jn,
48 ldexp, lgamma, log, log10, log1p, log2, logb,
28234b07 49 modf, nearbyint, nextafter, nexttoward,
8847214f
UD		 50 pow, remainder, remquo, rint, lrint, llrint,
51 round, lround, llround,
52 scalb, scalbn, scalbln, signbit, sin, sincos, sinh, sqrt, tan, tanh, tgamma, trunc,
e9c7764e 53 y0, y1, yn, significand
8847214f
UD		 54
55 and for the following complex math functions:
56 cabs, cacos, cacosh, carg, casin, casinh, catan, catanh,
28234b07
JM		 57 ccos, ccosh, cexp, cimag, clog, clog10, conj, cpow, cproj, creal,
58 csin, csinh, csqrt, ctan, ctanh.
8847214f 59
28234b07
JM		 60 At the moment the following functions and macros aren't tested:
61 drem (alias for remainder),
28234b07
JM		 62 lgamma_r,
63 nan,
64 pow10 (alias for exp10).
8847214f
UD		 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
ec751a23 83 specified in ISO C99.
8847214f 84
80bad0cc
JM		 85 Exception testing: At the moment only divide-by-zero, invalid,
86 overflow and underflow exceptions are tested. Inexact exceptions
8847214f
UD		 87 aren't checked at the moment.
88
89 NaN values: There exist signalling and quiet NaNs. This implementation
57267616
TS		 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.
8847214f
UD		 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.
33996419
AJ		 110
111
112 To Do: All parameter should be numbers that can be represented as
2550dfe9
AJ		 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. */
8847214f
UD		 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>
601d2942 127#include <limits.h>
8847214f
UD		 128
129#include <errno.h>
130#include <stdlib.h>
131#include <stdio.h>
bdf09fab 132#include <string.h>
8847214f 133#include <argp.h>
ef82f4da 134#include <tininess.h>
8847214f 135
0af797de
CM		 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
8847214f
UD		 152/* Possible exceptions */
153#define NO_EXCEPTION 0x0
154#define INVALID_EXCEPTION 0x1
155#define DIVIDE_BY_ZERO_EXCEPTION 0x2
c135cc1b 156#define OVERFLOW_EXCEPTION 0x4
80bad0cc 157#define UNDERFLOW_EXCEPTION 0x8
8847214f 158/* The next flags signals that those exceptions are allowed but not required. */
80bad0cc
JM		 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
8847214f 163#define EXCEPTIONS_OK INVALID_EXCEPTION_OK+DIVIDE_BY_ZERO_EXCEPTION_OK
80bad0cc
JM		 164/* Some special test flags, passed together with exceptions. */
165#define IGNORE_ZERO_INF_SIGN 0x100
f2da7793
JM		 166/* Indicate errno settings required or disallowed. */
167#define ERRNO_UNCHANGED 0x200
168#define ERRNO_EDOM 0x400
169#define ERRNO_ERANGE 0x800
80bad0cc
JM		 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
ccc8cadf 184# define UNDERFLOW_EXCEPTION_OK_DOUBLE UNDERFLOW_EXCEPTION_OK
80bad0cc
JM		 185#else
186# define UNDERFLOW_EXCEPTION_DOUBLE 0
ccc8cadf 187# define UNDERFLOW_EXCEPTION_OK_DOUBLE 0
80bad0cc
JM		 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
ef82f4da
JM		 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)
8847214f
UD		 201
202/* Various constants (we must supply them precalculated for accuracy). */
42be70d4
UD		 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) */
3c6cad26
UD		 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)) */
faa7f811
JM		 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
f98ece5f 215#define M_1_DIV_El 0.367879441171442321595523770161460867L /* 1 div e */
8847214f 216
26510bdd
CD		 217#define ulps_file_name "ULPs" /* Name of the ULPs file. */
218static FILE *ulps_file; /* File to document difference. */
219static int output_ulps; /* Should ulps printed? */
220static char *output_dir; /* Directory where generated files will be written. */
8847214f
UD		 221
222static int noErrors; /* number of errors */
223static int noTests; /* number of tests (without testing exceptions) */
224static int noExcTests; /* number of tests for exception flags */
f2da7793 225static int noErrnoTests;/* number of tests for errno values */
8847214f
UD		 226
227static int verbose;
228static int output_max_error; /* Should the maximal errors printed? */
229static int output_points; /* Should the single function results printed? */
cd33623e 230static int ignore_max_ulp; /* Should we ignore max_ulp? */
8847214f 231
a0d9f9d7
JM		 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
252static const FLOAT plus_zero = PLUS_ZERO_INIT;
253static const FLOAT minus_zero = MINUS_ZERO_INIT;
254static const FLOAT plus_infty = PLUS_INFTY_INIT;
255static const FLOAT minus_infty = MINUS_INFTY_INIT;
256static const FLOAT qnan_value = QNAN_VALUE_INIT;
257static const FLOAT max_value = MAX_VALUE_INIT;
258static const FLOAT min_value = MIN_VALUE_INIT;
259static const FLOAT min_subnorm_value = MIN_SUBNORM_VALUE_INIT;
8847214f 260
6815fabc 261static FLOAT max_error, real_max_error, imag_max_error;
8847214f
UD		 262
263
264#define BUILD_COMPLEX(real, imag) \
265 ({ __complex__ FLOAT __retval; \
266 __real__ __retval = (real); \
267 __imag__ __retval = (imag); \
268 __retval; })
08198877 269#define BUILD_COMPLEX_ULP(real, imag) ((real) + I * (imag))
8847214f
UD		 270
271#define MANT_DIG CHOOSE ((LDBL_MANT_DIG-1), (DBL_MANT_DIG-1), (FLT_MANT_DIG-1), \
bf582445 272 (LDBL_MANT_DIG-1), (DBL_MANT_DIG-1), (FLT_MANT_DIG-1))
8847214f
UD		 273
274static void
275init_max_error (void)
276{
277 max_error = 0;
6815fabc
UD		 278 real_max_error = 0;
279 imag_max_error = 0;
aaca11d8 280 feclearexcept (FE_ALL_EXCEPT);
f2da7793 281 errno = 0;
8847214f
UD		 282}
283
284static void
6815fabc 285set_max_error (FLOAT current, FLOAT *curr_max_error)
8847214f 286{
6815fabc
UD		 287 if (current > *curr_max_error)
288 *curr_max_error = current;
8847214f
UD		 289}
290
291
57267616
TS		 292/* Print a FLOAT. */
293static void
294print_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
8847214f
UD		 305/* Should the message print to screen? This depends on the verbose flag,
306 and the test status. */
307static int
b7dab1e4 308print_screen (int ok)
8847214f
UD		 309{
310 if (output_points
311 && (verbose > 1
b7dab1e4 312 || (verbose == 1 && ok == 0)))
8847214f
UD		 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. */
320static int
b7dab1e4 321print_screen_max_error (int ok)
8847214f
UD		 322{
323 if (output_max_error
324 && (verbose > 1
b7dab1e4 325 || ((verbose == 1) && (ok == 0))))
8847214f
UD		 326 return 1;
327 return 0;
328}
329
330/* Update statistic counters. */
331static void
b7dab1e4 332update_stats (int ok)
8847214f
UD		 333{
334 ++noTests;
b7dab1e4 335 if (!ok)
8847214f
UD		 336 ++noErrors;
337}
338
339static void
340print_ulps (const char *test_name, FLOAT ulp)
341{
342 if (output_ulps)
343 {
344 fprintf (ulps_file, "Test \"%s\":\n", test_name);
303f1335 345 fprintf (ulps_file, "%s: %.0" PRINTF_NEXPR "\n",
8847214f 346 CHOOSE("ldouble", "double", "float",
303f1335
AS		 347 "ildouble", "idouble", "ifloat"),
348 FUNC(ceil) (ulp));
8847214f
UD		 349 }
350}
351
352static void
353print_function_ulps (const char *function_name, FLOAT ulp)
354{
355 if (output_ulps)
356 {
6815fabc 357 fprintf (ulps_file, "Function: \"%s\":\n", function_name);
303f1335 358 fprintf (ulps_file, "%s: %.0" PRINTF_NEXPR "\n",
8847214f 359 CHOOSE("ldouble", "double", "float",
303f1335
AS		 360 "ildouble", "idouble", "ifloat"),
361 FUNC(ceil) (ulp));
8847214f
UD		 362 }
363}
364
365
6815fabc
UD		 366static void
367print_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);
303f1335 375 fprintf (ulps_file, "%s: %.0" PRINTF_NEXPR "\n",
6815fabc 376 CHOOSE("ldouble", "double", "float",
303f1335
AS		 377 "ildouble", "idouble", "ifloat"),
378 FUNC(ceil) (real_ulp));
6815fabc
UD		 379 }
380 if (imag_ulp != 0.0)
381 {
382 fprintf (ulps_file, "Function: Imaginary part of \"%s\":\n", function_name);
303f1335 383 fprintf (ulps_file, "%s: %.0" PRINTF_NEXPR "\n",
6815fabc 384 CHOOSE("ldouble", "double", "float",
303f1335
AS		 385 "ildouble", "idouble", "ifloat"),
386 FUNC(ceil) (imag_ulp));
6815fabc 387 }
15daa639
UD		 388
389
6815fabc
UD		 390 }
391}
392
393
8847214f
UD		 394
395/* Test if Floating-Point stack hasn't changed */
396static void
397fpstack_test (const char *test_name)
398{
64487e12 399#if defined (__i386__) || defined (__x86_64__)
8847214f
UD		 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
418static void
b7dab1e4 419print_max_error (const char *func_name, FLOAT allowed)
8847214f 420{
8847214f
UD		 421 int ok = 0;
422
cd33623e 423 if (max_error == 0.0 || (max_error <= allowed && !ignore_max_ulp))
8847214f
UD		 424 {
425 ok = 1;
426 }
427
428 if (!ok)
429 print_function_ulps (func_name, max_error);
430
431
b7dab1e4 432 if (print_screen_max_error (ok))
8847214f 433 {
6815fabc 434 printf ("Maximal error of `%s'\n", func_name);
303f1335
AS		 435 printf (" is : %.0" PRINTF_NEXPR " ulp\n", FUNC(ceil) (max_error));
436 printf (" accepted: %.0" PRINTF_NEXPR " ulp\n", FUNC(ceil) (allowed));
8847214f
UD		 437 }
438
b7dab1e4 439 update_stats (ok);
8847214f
UD		 440}
441
442
6815fabc 443static void
b7dab1e4 444print_complex_max_error (const char *func_name, __complex__ FLOAT allowed)
6815fabc
UD		 445{
446 int ok = 0;
447
303f1335
AS		 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))
6815fabc
UD		 452 {
453 ok = 1;
454 }
455
456 if (!ok)
457 print_complex_function_ulps (func_name, real_max_error, imag_max_error);
458
459
b7dab1e4 460 if (print_screen_max_error (ok))
6815fabc
UD		 461 {
462 printf ("Maximal error of real part of: %s\n", func_name);
303f1335
AS		 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));
6815fabc 467 printf ("Maximal error of imaginary part of: %s\n", func_name);
303f1335
AS		 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));
6815fabc
UD		 472 }
473
b7dab1e4 474 update_stats (ok);
6815fabc
UD		 475}
476
477
8847214f
UD		 478/* Test whether a given exception was raised. */
479static void
480test_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 {
b7dab1e4 492 if (print_screen (1))
8847214f
UD		 493 printf ("Pass: %s: Exception \"%s\" set\n", test_name, flag_name);
494 }
495 else
496 {
497 ok = 0;
b7dab1e4 498 if (print_screen (0))
8847214f
UD		 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;
b7dab1e4 508 if (print_screen (0))
8847214f
UD		 509 printf ("Failure: %s: Exception \"%s\" set\n",
510 test_name, flag_name);
511 }
512 else
513 {
b7dab1e4 514 if (print_screen (1))
8847214f
UD		 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*/
529static void
530test_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");
c135cc1b
JM		 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");
80bad0cc
JM		 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");
8847214f
UD		 553#endif
554 feclearexcept (FE_ALL_EXCEPT);
555}
556
f2da7793
JM		 557/* Test whether errno for TEST_NAME, set to ERRNO_VALUE, has value
558 EXPECTED_VALUE (description EXPECTED_NAME). */
559static void
560test_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 {
b7dab1e4 565 if (print_screen (1))
f2da7793
JM		 566 printf ("Pass: %s: errno set to %d (%s)\n", test_name, errno_value,
567 expected_name);
568 }
569 else
570 {
571 ++noErrors;
b7dab1e4 572 if (print_screen (0))
f2da7793
JM		 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. */
580static void
581test_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}
8847214f
UD		 591
592static void
6815fabc 593check_float_internal (const char *test_name, FLOAT computed, FLOAT expected,
b7dab1e4 594 FLOAT max_ulp, int exceptions,
6815fabc 595 FLOAT *curr_max_error)
8847214f
UD		 596{
597 int ok = 0;
598 int print_diff = 0;
599 FLOAT diff = 0;
600 FLOAT ulp = 0;
f2da7793 601 int errno_value = errno;
8847214f
UD		 602
603 test_exceptions (test_name, exceptions);
f2da7793 604 test_errno (test_name, errno_value, exceptions);
57267616
TS		 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))
8847214f
UD		 610 ok = 1;
611 else if (isinf (computed) && isinf (expected))
612 {
613 /* Test for sign of infinities. */
ba3752d5
UD		 614 if ((exceptions & IGNORE_ZERO_INF_SIGN) == 0
615 && signbit (computed) != signbit (expected))
8847214f
UD		 616 {
617 ok = 0;
618 printf ("infinity has wrong sign.\n");
619 }
620 else
621 ok = 1;
622 }
57267616
TS		 623 /* Don't calculate ULPs for infinities or any kind of NaNs. */
624 else if (isinf (computed) || isnan (computed)
625 || isinf (expected) || isnan (expected))
8847214f
UD		 626 ok = 0;
627 else
628 {
629 diff = FUNC(fabs) (computed - expected);
e6b29af8
UD		 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:
6c23e11c
JM		 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);
e6b29af8
UD		 643 break;
644 default:
645 /* It should never happen. */
646 abort ();
647 break;
648 }
6815fabc 649 set_max_error (ulp, curr_max_error);
8847214f 650 print_diff = 1;
ba3752d5
UD		 651 if ((exceptions & IGNORE_ZERO_INF_SIGN) == 0
652 && computed == 0.0 && expected == 0.0
653 && signbit(computed) != signbit (expected))
3a8e65a0 654 ok = 0;
f964490f 655 else if (ulp <= 0.5 || (ulp <= max_ulp && !ignore_max_ulp))
8847214f
UD		 656 ok = 1;
657 else
658 {
659 ok = 0;
660 print_ulps (test_name, ulp);
661 }
662
663 }
b7dab1e4 664 if (print_screen (ok))
8847214f
UD		 665 {
666 if (!ok)
667 printf ("Failure: ");
668 printf ("Test: %s\n", test_name);
669 printf ("Result:\n");
57267616
TS		 670 printf (" is: ");
671 print_float (computed);
672 printf (" should be: ");
673 print_float (expected);
8847214f
UD		 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 }
b7dab1e4 682 update_stats (ok);
8847214f
UD		 683
684 fpstack_test (test_name);
f2da7793 685 errno = 0;
8847214f
UD		 686}
687
688
689static void
6815fabc 690check_float (const char *test_name, FLOAT computed, FLOAT expected,
b7dab1e4 691 FLOAT max_ulp, int exceptions)
6815fabc 692{
b7dab1e4 693 check_float_internal (test_name, computed, expected, max_ulp,
6815fabc
UD		 694 exceptions, &max_error);
695}
696
697
698static void
699check_complex (const char *test_name, __complex__ FLOAT computed,
700 __complex__ FLOAT expected,
b7dab1e4 701 __complex__ FLOAT max_ulp,
6815fabc 702 int exception)
8847214f 703{
6815fabc 704 FLOAT part_comp, part_exp, part_max_ulp;
2fd89785
MS		 705 char *str;
706
707 if (asprintf (&str, "Real part of: %s", test_name) == -1)
708 abort ();
8847214f 709
8847214f
UD		 710 part_comp = __real__ computed;
711 part_exp = __real__ expected;
6815fabc 712 part_max_ulp = __real__ max_ulp;
15daa639 713
b7dab1e4 714 check_float_internal (str, part_comp, part_exp, part_max_ulp,
6815fabc 715 exception, &real_max_error);
2fd89785
MS		 716 free (str);
717
718 if (asprintf (&str, "Imaginary part of: %s", test_name) == -1)
719 abort ();
8847214f 720
8847214f
UD		 721 part_comp = __imag__ computed;
722 part_exp = __imag__ expected;
6815fabc 723 part_max_ulp = __imag__ max_ulp;
15daa639 724
f2da7793 725 /* Don't check again for exceptions or errno, just pass through the
8847214f 726 zero/inf sign test. */
b7dab1e4 727 check_float_internal (str, part_comp, part_exp, part_max_ulp,
6815fabc
UD		 728 exception & IGNORE_ZERO_INF_SIGN,
729 &imag_max_error);
2fd89785 730 free (str);
8847214f
UD		 731}
732
733
734/* Check that computed and expected values are equal (int values). */
735static void
736check_int (const char *test_name, int computed, int expected, int max_ulp,
b7dab1e4 737 int exceptions)
8847214f
UD		 738{
739 int diff = computed - expected;
740 int ok = 0;
f2da7793 741 int errno_value = errno;
8847214f
UD		 742
743 test_exceptions (test_name, exceptions);
f2da7793 744 test_errno (test_name, errno_value, exceptions);
8847214f
UD		 745 noTests++;
746 if (abs (diff) <= max_ulp)
747 ok = 1;
748
749 if (!ok)
750 print_ulps (test_name, diff);
751
b7dab1e4 752 if (print_screen (ok))
8847214f
UD		 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
b7dab1e4 762 update_stats (ok);
8847214f 763 fpstack_test (test_name);
f2da7793 764 errno = 0;
8847214f
UD		 765}
766
767
768/* Check that computed and expected values are equal (long int values). */
769static void
770check_long (const char *test_name, long int computed, long int expected,
b7dab1e4 771 long int max_ulp, int exceptions)
8847214f
UD		 772{
773 long int diff = computed - expected;
774 int ok = 0;
f2da7793 775 int errno_value = errno;
8847214f
UD		 776
777 test_exceptions (test_name, exceptions);
f2da7793 778 test_errno (test_name, errno_value, exceptions);
8847214f
UD		 779 noTests++;
780 if (labs (diff) <= max_ulp)
781 ok = 1;
782
783 if (!ok)
784 print_ulps (test_name, diff);
785
b7dab1e4 786 if (print_screen (ok))
8847214f
UD		 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
b7dab1e4 796 update_stats (ok);
8847214f 797 fpstack_test (test_name);
f2da7793 798 errno = 0;
8847214f
UD		 799}
800
801
802/* Check that computed value is true/false. */
803static void
804check_bool (const char *test_name, int computed, int expected,
b7dab1e4 805 long int max_ulp, int exceptions)
8847214f
UD		 806{
807 int ok = 0;
f2da7793 808 int errno_value = errno;
8847214f
UD		 809
810 test_exceptions (test_name, exceptions);
f2da7793 811 test_errno (test_name, errno_value, exceptions);
8847214f
UD		 812 noTests++;
813 if ((computed == 0) == (expected == 0))
814 ok = 1;
815
b7dab1e4 816 if (print_screen (ok))
8847214f
UD		 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
b7dab1e4 826 update_stats (ok);
8847214f 827 fpstack_test (test_name);
f2da7793 828 errno = 0;
8847214f
UD		 829}
830
831
832/* check that computed and expected values are equal (long int values) */
833static void
834check_longlong (const char *test_name, long long int computed,
835 long long int expected,
b7dab1e4 836 long long int max_ulp,
8847214f
UD		 837 int exceptions)
838{
839 long long int diff = computed - expected;
840 int ok = 0;
f2da7793 841 int errno_value = errno;
8847214f
UD		 842
843 test_exceptions (test_name, exceptions);
f2da7793 844 test_errno (test_name, errno_value, exceptions);
8847214f
UD		 845 noTests++;
846 if (llabs (diff) <= max_ulp)
847 ok = 1;
848
849 if (!ok)
850 print_ulps (test_name, diff);
851
b7dab1e4 852 if (print_screen (ok))
8847214f
UD		 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
b7dab1e4 862 update_stats (ok);
8847214f 863 fpstack_test (test_name);
f2da7793 864 errno = 0;
8847214f
UD		 865}
866
51df539d
JM		 867/* Structures for each kind of test. */
868struct test_f_f_data
869{
870 const char *test_name;
871 FLOAT arg;
872 FLOAT expected;
873 FLOAT max_ulp;
874 int exceptions;
875};
601a3a5f
JM		 876struct 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};
884struct 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};
243216e1
JM		 893struct test_fi_f_data
894{
895 const char *test_name;
896 FLOAT arg1;
897 int arg2;
898 FLOAT expected;
899 FLOAT max_ulp;
900 int exceptions;
901};
68fc074c
JM		 902struct test_fl_f_data
903{
904 const char *test_name;
905 FLOAT arg1;
906 long int arg2;
907 FLOAT expected;
908 FLOAT max_ulp;
909 int exceptions;
910};
0e400df5
JM		 911struct test_if_f_data
912{
913 const char *test_name;
914 int arg1;
915 FLOAT arg2;
916 FLOAT expected;
917 FLOAT max_ulp;
918 int exceptions;
919};
4f184d30
JM		 920struct test_fff_f_data
921{
922 const char *test_name;
923 FLOAT arg1, arg2, arg3;
924 FLOAT expected;
925 FLOAT max_ulp;
926 int exceptions;
927};
6a1992e2
JM		 928struct test_c_f_data
929{
930 const char *test_name;
931 FLOAT argr, argc;
932 FLOAT expected;
933 FLOAT max_ulp;
934 int exceptions;
935};
87aa21df
JM		 936struct test_f_f1_data
937{
938 const char *test_name;
939 FLOAT arg;
940 FLOAT expected;
941 FLOAT max_ulp;
942 int exceptions;
943 const char *extra_name;
944 int extra_init;
945 int extra_test;
946 int extra_expected;
947 int extra_ulp;
948};
9dc9095d
JM		 949struct test_fF_f1_data
950{
951 const char *test_name;
952 FLOAT arg;
953 FLOAT expected;
954 FLOAT max_ulp;
955 int exceptions;
956 const char *extra_name;
957 FLOAT extra_init;
958 FLOAT extra_test;
959 FLOAT extra_expected;
960 FLOAT extra_ulp;
961};
08198877
JM		 962struct test_c_c_data
963{
964 const char *test_name;
965 FLOAT argr, argc;
966 FLOAT expr, expc;
967 __complex__ FLOAT max_ulp;
968 int exceptions;
969};
51df539d
JM		 970
971/* Set the rounding mode, or restore the saved value. */
972#define IF_ROUND_INIT_ /* Empty. */
973#define IF_ROUND_INIT_FE_DOWNWARD \
974 int save_round_mode = fegetround (); \
975 if (fesetround (FE_DOWNWARD) == 0)
976#define IF_ROUND_INIT_FE_TONEAREST \
977 int save_round_mode = fegetround (); \
978 if (fesetround (FE_TONEAREST) == 0)
979#define IF_ROUND_INIT_FE_TOWARDZERO \
980 int save_round_mode = fegetround (); \
981 if (fesetround (FE_TOWARDZERO) == 0)
982#define IF_ROUND_INIT_FE_UPWARD \
983 int save_round_mode = fegetround (); \
984 if (fesetround (FE_UPWARD) == 0)
985#define ROUND_RESTORE_ /* Empty. */
986#define ROUND_RESTORE_FE_DOWNWARD \
987 fesetround (save_round_mode)
988#define ROUND_RESTORE_FE_TONEAREST \
989 fesetround (save_round_mode)
990#define ROUND_RESTORE_FE_TOWARDZERO \
991 fesetround (save_round_mode)
992#define ROUND_RESTORE_FE_UPWARD \
993 fesetround (save_round_mode)
994
f44bf14a 995/* Run an individual test, including any required setup and checking
51df539d 996 of results, or loop over all tests in an array. */
f44bf14a
JM		 997#define RUN_TEST_f_f(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
998 MAX_ULP, EXCEPTIONS) \
999 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1000 MAX_ULP, EXCEPTIONS)
51df539d
JM		 1001#define RUN_TEST_LOOP_f_f(FUNC_NAME, ARRAY, ROUNDING_MODE) \
1002 IF_ROUND_INIT_ ## ROUNDING_MODE \
1003 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1004 RUN_TEST_f_f ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg, \
1005 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
1006 (ARRAY)[i].exceptions); \
1007 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 1008#define RUN_TEST_2_f(TEST_NAME, FUNC_NAME, ARG1, ARG2, EXPECTED, \
1009 MAX_ULP, EXCEPTIONS) \
1010 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG1, ARG2), EXPECTED, \
1011 MAX_ULP, EXCEPTIONS)
601a3a5f
JM		 1012#define RUN_TEST_LOOP_2_f(FUNC_NAME, ARRAY, ROUNDING_MODE) \
1013 IF_ROUND_INIT_ ## ROUNDING_MODE \
1014 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1015 RUN_TEST_2_f ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg1, \
1016 (ARRAY)[i].arg2, (ARRAY)[i].expected, \
1017 (ARRAY)[i].max_ulp, (ARRAY)[i].exceptions); \
1018 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a 1019#define RUN_TEST_ff_f RUN_TEST_2_f
601a3a5f 1020#define RUN_TEST_LOOP_ff_f RUN_TEST_LOOP_2_f
f44bf14a 1021#define RUN_TEST_fi_f RUN_TEST_2_f
243216e1 1022#define RUN_TEST_LOOP_fi_f RUN_TEST_LOOP_2_f
f44bf14a 1023#define RUN_TEST_fl_f RUN_TEST_2_f
68fc074c 1024#define RUN_TEST_LOOP_fl_f RUN_TEST_LOOP_2_f
ae08db3b 1025#define RUN_TEST_if_f RUN_TEST_2_f
0e400df5 1026#define RUN_TEST_LOOP_if_f RUN_TEST_LOOP_2_f
f44bf14a
JM		 1027#define RUN_TEST_fff_f(TEST_NAME, FUNC_NAME, ARG1, ARG2, ARG3, \
1028 EXPECTED, MAX_ULP, EXCEPTIONS) \
1029 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG1, ARG2, ARG3), \
1030 EXPECTED, MAX_ULP, EXCEPTIONS)
4f184d30
JM		 1031#define RUN_TEST_LOOP_fff_f(FUNC_NAME, ARRAY, ROUNDING_MODE) \
1032 IF_ROUND_INIT_ ## ROUNDING_MODE \
1033 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1034 RUN_TEST_fff_f ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg1, \
1035 (ARRAY)[i].arg2, (ARRAY)[i].arg3, \
1036 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
1037 (ARRAY)[i].exceptions); \
1038 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 1039#define RUN_TEST_c_f(TEST_NAME, FUNC_NAME, ARG1, ARG2, EXPECTED, \
1040 MAX_ULP, EXCEPTIONS) \
1041 check_float (TEST_NAME, \
1042 FUNC (FUNC_NAME) (BUILD_COMPLEX (ARG1, ARG2)), \
1043 EXPECTED, MAX_ULP, EXCEPTIONS)
6a1992e2
JM		 1044#define RUN_TEST_LOOP_c_f(FUNC_NAME, ARRAY, ROUNDING_MODE) \
1045 IF_ROUND_INIT_ ## ROUNDING_MODE \
1046 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1047 RUN_TEST_c_f ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].argr, \
1048 (ARRAY)[i].argc, (ARRAY)[i].expected, \
1049 (ARRAY)[i].max_ulp, (ARRAY)[i].exceptions); \
1050 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 1051#define RUN_TEST_f_f1(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1052 MAX_ULP, EXCEPTIONS, \
1053 EXTRA_NAME, EXTRA_VAR, EXTRA_INIT, EXTRA_TEST, \
1054 EXTRA_EXPECTED, EXTRA_ULP) \
1055 do \
1056 { \
1057 (EXTRA_VAR) = (EXTRA_INIT); \
1058 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1059 MAX_ULP, EXCEPTIONS); \
1060 if (EXTRA_TEST) \
1061 check_int (EXTRA_NAME, EXTRA_VAR, EXTRA_EXPECTED, \
1062 EXTRA_ULP, 0); \
1063 } \
1064 while (0)
87aa21df
JM		 1065#define RUN_TEST_LOOP_f_f1(FUNC_NAME, ARRAY, ROUNDING_MODE, EXTRA_VAR) \
1066 IF_ROUND_INIT_ ## ROUNDING_MODE \
1067 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1068 RUN_TEST_f_f1 ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg, \
1069 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
1070 (ARRAY)[i].exceptions, (ARRAY)[i].extra_name, \
1071 EXTRA_VAR, (ARRAY)[i].extra_init, \
1072 (ARRAY)[i].extra_test, (ARRAY)[i].extra_expected, \
1073 (ARRAY)[i].extra_ulp); \
1074 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 1075#define RUN_TEST_fF_f1(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1076 MAX_ULP, EXCEPTIONS, \
1077 EXTRA_NAME, EXTRA_VAR, EXTRA_INIT, EXTRA_TEST, \
1078 EXTRA_EXPECTED, EXTRA_ULP) \
1079 do \
1080 { \
1081 (EXTRA_VAR) = (EXTRA_INIT); \
1082 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG, &(EXTRA_VAR)), \
1083 EXPECTED, MAX_ULP, EXCEPTIONS); \
1084 if (EXTRA_TEST) \
1085 check_float (EXTRA_NAME, EXTRA_VAR, EXTRA_EXPECTED, \
1086 EXTRA_ULP, 0); \
1087 } \
1088 while (0)
9dc9095d
JM		 1089#define RUN_TEST_LOOP_fF_f1(FUNC_NAME, ARRAY, ROUNDING_MODE, EXTRA_VAR) \
1090 IF_ROUND_INIT_ ## ROUNDING_MODE \
1091 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1092 RUN_TEST_fF_f1 ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg, \
1093 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
1094 (ARRAY)[i].exceptions, (ARRAY)[i].extra_name, \
1095 EXTRA_VAR, (ARRAY)[i].extra_init, \
1096 (ARRAY)[i].extra_test, (ARRAY)[i].extra_expected, \
1097 (ARRAY)[i].extra_ulp); \
1098 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 1099#define RUN_TEST_fI_f1(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1100 MAX_ULP, EXCEPTIONS, \
1101 EXTRA_NAME, EXTRA_VAR, EXTRA_INIT, EXTRA_TEST, \
1102 EXTRA_EXPECTED, EXTRA_ULP) \
1103 do \
1104 { \
1105 (EXTRA_VAR) = (EXTRA_INIT); \
1106 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG, &(EXTRA_VAR)), \
1107 EXPECTED, MAX_ULP, EXCEPTIONS); \
1108 if (EXTRA_TEST) \
1109 check_int (EXTRA_NAME, EXTRA_VAR, EXTRA_EXPECTED, \
1110 EXTRA_ULP, 0); \
1111 } \
1112 while (0)
1113#define RUN_TEST_ffI_f1(TEST_NAME, FUNC_NAME, ARG1, ARG2, EXPECTED, \
1114 MAX_ULP, EXCEPTIONS, \
1115 EXTRA_NAME, EXTRA_VAR, EXTRA_INIT, EXTRA_TEST, \
1116 EXTRA_EXPECTED, EXTRA_ULP) \
1117 do \
1118 { \
1119 (EXTRA_VAR) = (EXTRA_INIT); \
1120 check_float (TEST_NAME, \
1121 FUNC (FUNC_NAME) (ARG1, ARG2, &(EXTRA_VAR)), \
1122 EXPECTED, MAX_ULP, EXCEPTIONS); \
1123 if (EXTRA_TEST) \
1124 check_int (EXTRA_NAME, EXTRA_VAR, EXTRA_EXPECTED, \
1125 EXTRA_ULP, 0); \
1126 } \
1127 while (0)
1128#define RUN_TEST_c_c(TEST_NAME, FUNC_NAME, ARGR, ARGC, EXPR, EXPC, \
1129 MAX_ULP, EXCEPTIONS) \
1130 check_complex (TEST_NAME, \
1131 FUNC (FUNC_NAME) (BUILD_COMPLEX (ARGR, ARGC)), \
1132 BUILD_COMPLEX (EXPR, EXPC), \
1133 MAX_ULP, EXCEPTIONS)
08198877
JM		 1134#define RUN_TEST_LOOP_c_c(FUNC_NAME, ARRAY, ROUNDING_MODE) \
1135 IF_ROUND_INIT_ ## ROUNDING_MODE \
1136 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1137 RUN_TEST_c_c ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].argr, \
1138 (ARRAY)[i].argc, (ARRAY)[i].expr, (ARRAY)[i].expc, \
1139 (ARRAY)[i].max_ulp, (ARRAY)[i].exceptions); \
1140 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 1141#define RUN_TEST_cc_c(TEST_NAME, FUNC_NAME, ARG1R, ARG1C, ARG2R, ARG2C, \
1142 EXPR, EXPC, MAX_ULP, EXCEPTIONS) \
1143 check_complex (TEST_NAME, \
1144 FUNC (FUNC_NAME) (BUILD_COMPLEX (ARG1R, ARG1C), \
1145 BUILD_COMPLEX (ARG2R, ARG2C)), \
1146 BUILD_COMPLEX (EXPR, EXPC), \
1147 MAX_ULP, EXCEPTIONS)
1148#define RUN_TEST_f_i(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1149 MAX_ULP, EXCEPTIONS) \
1150 check_int (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1151 MAX_ULP, EXCEPTIONS)
1152#define RUN_TEST_f_i_tg(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1153 MAX_ULP, EXCEPTIONS) \
1154 check_int (TEST_NAME, FUNC_NAME (ARG), EXPECTED, \
1155 MAX_ULP, EXCEPTIONS)
1156#define RUN_TEST_ff_i_tg(TEST_NAME, FUNC_NAME, ARG1, ARG2, EXPECTED, \
1157 MAX_ULP, EXCEPTIONS) \
1158 check_int (TEST_NAME, FUNC_NAME (ARG1, ARG2), EXPECTED, \
1159 MAX_ULP, EXCEPTIONS)
1160#define RUN_TEST_f_b(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1161 MAX_ULP, EXCEPTIONS) \
1162 check_bool (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1163 MAX_ULP, EXCEPTIONS)
1164#define RUN_TEST_f_b_tg(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1165 MAX_ULP, EXCEPTIONS) \
1166 check_bool (TEST_NAME, FUNC_NAME (ARG), EXPECTED, \
1167 MAX_ULP, EXCEPTIONS)
1168#define RUN_TEST_f_l(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1169 MAX_ULP, EXCEPTIONS) \
1170 check_long (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1171 MAX_ULP, EXCEPTIONS)
1172#define RUN_TEST_f_L(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1173 MAX_ULP, EXCEPTIONS) \
1174 check_longlong (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1175 MAX_ULP, EXCEPTIONS)
1176#define RUN_TEST_sincos(ARG, TEST_NAME_SIN, SIN_RES_VAR, EXPECTED_SIN, \
1177 MAX_ULP_SIN, TEST_NAME_COS, COS_RES_VAR, \
1178 EXPECTED_COS, MAX_ULP_COS, EXCEPTIONS) \
1179 do \
1180 { \
1181 FUNC (sincos) (ARG, &(SIN_RES_VAR), &(COS_RES_VAR)); \
1182 check_float (TEST_NAME_SIN, SIN_RES_VAR, \
1183 EXPECTED_SIN, MAX_ULP_SIN, EXCEPTIONS); \
1184 check_float (TEST_NAME_COS, COS_RES_VAR, \
1185 EXPECTED_COS, MAX_ULP_COS, 0); \
1186 } \
1187 while (0)
1188
8847214f
UD		 1189
1190
1191/* This is to prevent messages from the SVID libm emulation. */
1192int
1193matherr (struct exception *x __attribute__ ((unused)))
1194{
1195 return 1;
1196}
1197
1198
1199/****************************************************************************
1200 Tests for single functions of libm.
1201 Please keep them alphabetically sorted!
1202****************************************************************************/
1203
51df539d
JM		 1204static const struct test_f_f_data acos_test_data[] =
1205 {
1206 START_DATA (acos),
1207 TEST_f_f (acos, plus_infty, qnan_value, INVALID_EXCEPTION),
1208 TEST_f_f (acos, minus_infty, qnan_value, INVALID_EXCEPTION),
1209 TEST_f_f (acos, qnan_value, qnan_value),
1210
1211 /* |x| > 1: */
1212 TEST_f_f (acos, 1.125L, qnan_value, INVALID_EXCEPTION),
1213 TEST_f_f (acos, -1.125L, qnan_value, INVALID_EXCEPTION),
1214 TEST_f_f (acos, max_value, qnan_value, INVALID_EXCEPTION),
1215 TEST_f_f (acos, -max_value, qnan_value, INVALID_EXCEPTION),
1216
1217 TEST_f_f (acos, 0, M_PI_2l),
1218 TEST_f_f (acos, minus_zero, M_PI_2l),
1219 TEST_f_f (acos, 1, 0),
1220 TEST_f_f (acos, -1, M_PIl),
1221 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1222 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1223 TEST_f_f (acos, 0.75L, 0.722734247813415611178377352641333362L),
1224 TEST_f_f (acos, 2e-17L, 1.57079632679489659923132169163975144L),
1225 TEST_f_f (acos, 0.0625L, 1.50825556499840522843072005474337068L),
1226 TEST_f_f (acos, 0x0.ffffffp0L, 3.4526698471620358760324948263873649728491e-4L),
1227 TEST_f_f (acos, -0x0.ffffffp0L, 3.1412473866050770348750401337968641476999L),
1228#ifndef TEST_FLOAT
1229 TEST_f_f (acos, 0x0.ffffffff8p0L, 1.5258789062648029736620564947844627548516e-5L),
1230 TEST_f_f (acos, -0x0.ffffffff8p0L, 3.1415773948007305904329067627145550395696L),
1231 TEST_f_f (acos, 0x0.ffffffffffffp0L, 8.4293697021788088529885473244391795127130e-8L),
1232 TEST_f_f (acos, -0x0.ffffffffffffp0L, 3.1415925692960962166745548533940296398054L),
1233#endif
1234#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
1235 TEST_f_f (acos, 0x0.ffffffffffffffffp0L, 3.2927225399135962333718255320079907245059e-10L),
1236 TEST_f_f (acos, -0x0.ffffffffffffffffp0L, 3.1415926532605209844712837599423203309964L),
1237#endif
1238 END_DATA (acos)
1239 };
1240
8847214f
UD		 1241static void
1242acos_test (void)
1243{
e6d3c4a7
AJ		 1244 errno = 0;
1245 FUNC(acos) (0);
1246 if (errno == ENOSYS)
1247 /* Function not implemented. */
1248 return;
1249
8847214f 1250 START (acos);
51df539d 1251 RUN_TEST_LOOP_f_f (acos, acos_test_data, );
8847214f
UD		 1252 END (acos);
1253}
1254
5ba3cc69 1255
51df539d
JM		 1256static const struct test_f_f_data acos_tonearest_test_data[] =
1257 {
1258 START_DATA (acos_tonearest),
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_tonearest)
1266 };
1267
5ba3cc69
JM		 1268static void
1269acos_test_tonearest (void)
1270{
5ba3cc69
JM		 1271 errno = 0;
1272 FUNC(acos) (0);
1273 if (errno == ENOSYS)
1274 /* Function not implemented. */
1275 return;
1276
1277 START (acos_tonearest);
51df539d 1278 RUN_TEST_LOOP_f_f (acos, acos_tonearest_test_data, FE_TONEAREST);
5ba3cc69
JM		 1279 END (acos_tonearest);
1280}
1281
1282
74c57478
JM		 1283static const struct test_f_f_data acos_towardzero_test_data[] =
1284 {
1285 START_DATA (acos_towardzero),
1286 TEST_f_f (acos, 0, M_PI_2l),
1287 TEST_f_f (acos, minus_zero, M_PI_2l),
1288 TEST_f_f (acos, 1, 0),
1289 TEST_f_f (acos, -1, M_PIl),
1290 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1291 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1292 END_DATA (acos_towardzero)
1293 };
1294
5ba3cc69
JM		 1295static void
1296acos_test_towardzero (void)
1297{
5ba3cc69
JM		 1298 errno = 0;
1299 FUNC(acos) (0);
1300 if (errno == ENOSYS)
1301 /* Function not implemented. */
1302 return;
1303
1304 START (acos_towardzero);
74c57478 1305 RUN_TEST_LOOP_f_f (acos, acos_towardzero_test_data, FE_TOWARDZERO);
5ba3cc69
JM		 1306 END (acos_towardzero);
1307}
1308
1309
74c57478
JM		 1310static const struct test_f_f_data acos_downward_test_data[] =
1311 {
1312 START_DATA (acos_downward),
1313 TEST_f_f (acos, 0, M_PI_2l),
1314 TEST_f_f (acos, minus_zero, M_PI_2l),
1315 TEST_f_f (acos, 1, 0),
1316 TEST_f_f (acos, -1, M_PIl),
1317 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1318 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1319 END_DATA (acos_downward)
1320 };
1321
5ba3cc69
JM		 1322static void
1323acos_test_downward (void)
1324{
5ba3cc69
JM		 1325 errno = 0;
1326 FUNC(acos) (0);
1327 if (errno == ENOSYS)
1328 /* Function not implemented. */
1329 return;
1330
1331 START (acos_downward);
74c57478 1332 RUN_TEST_LOOP_f_f (acos, acos_downward_test_data, FE_DOWNWARD);
5ba3cc69
JM		 1333 END (acos_downward);
1334}
1335
1336
74c57478
JM		 1337static const struct test_f_f_data acos_upward_test_data[] =
1338 {
1339 START_DATA (acos_upward),
1340 TEST_f_f (acos, 0, M_PI_2l),
1341 TEST_f_f (acos, minus_zero, M_PI_2l),
1342 TEST_f_f (acos, 1, 0),
1343 TEST_f_f (acos, -1, M_PIl),
1344 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1345 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1346 END_DATA (acos_upward)
1347 };
1348
5ba3cc69
JM		 1349static void
1350acos_test_upward (void)
1351{
5ba3cc69
JM		 1352 errno = 0;
1353 FUNC(acos) (0);
1354 if (errno == ENOSYS)
1355 /* Function not implemented. */
1356 return;
1357
1358 START (acos_upward);
74c57478 1359 RUN_TEST_LOOP_f_f (acos, acos_upward_test_data, FE_UPWARD);
5ba3cc69
JM		 1360 END (acos_upward);
1361}
1362
74c57478
JM		 1363static const struct test_f_f_data acosh_test_data[] =
1364 {
1365 START_DATA (acosh),
1366 TEST_f_f (acosh, plus_infty, plus_infty),
1367 TEST_f_f (acosh, minus_infty, qnan_value, INVALID_EXCEPTION),
1368 TEST_f_f (acosh, qnan_value, qnan_value),
1369
1370 /* x < 1: */
1371 TEST_f_f (acosh, -1.125L, qnan_value, INVALID_EXCEPTION),
1372 TEST_f_f (acosh, -max_value, qnan_value, INVALID_EXCEPTION),
1373
1374 TEST_f_f (acosh, 1, 0),
1375 TEST_f_f (acosh, 7, 2.63391579384963341725009269461593689L),
1376 END_DATA (acosh)
1377 };
1378
8847214f
UD		 1379static void
1380acosh_test (void)
1381{
aaca11d8
UD		 1382 errno = 0;
1383 FUNC(acosh) (7);
1384 if (errno == ENOSYS)
1385 /* Function not implemented. */
1386 return;
1387
8847214f 1388 START (acosh);
74c57478 1389 RUN_TEST_LOOP_f_f (acosh, acosh_test_data, );
8847214f
UD		 1390 END (acosh);
1391}
1392
74c57478
JM		 1393static const struct test_f_f_data asin_test_data[] =
1394 {
1395 START_DATA (asin),
1396 TEST_f_f (asin, plus_infty, qnan_value, INVALID_EXCEPTION),
1397 TEST_f_f (asin, minus_infty, qnan_value, INVALID_EXCEPTION),
1398 TEST_f_f (asin, qnan_value, qnan_value),
1399
1400 /* asin x == qNaN plus invalid exception for |x| > 1. */
1401 TEST_f_f (asin, 1.125L, qnan_value, INVALID_EXCEPTION),
1402 TEST_f_f (asin, -1.125L, qnan_value, INVALID_EXCEPTION),
1403 TEST_f_f (asin, max_value, qnan_value, INVALID_EXCEPTION),
1404 TEST_f_f (asin, -max_value, qnan_value, INVALID_EXCEPTION),
1405
1406 TEST_f_f (asin, 0, 0),
1407 TEST_f_f (asin, minus_zero, minus_zero),
1408 TEST_f_f (asin, 0.5, M_PI_6l),
1409 TEST_f_f (asin, -0.5, -M_PI_6l),
1410 TEST_f_f (asin, 1.0, M_PI_2l),
1411 TEST_f_f (asin, -1.0, -M_PI_2l),
1412 TEST_f_f (asin, 0.75L, 0.848062078981481008052944338998418080L),
1413 TEST_f_f (asin, 0x0.ffffffp0L, 1.5704510598101804156437184421571127056013L),
1414 TEST_f_f (asin, -0x0.ffffffp0L, -1.5704510598101804156437184421571127056013L),
1415#ifndef TEST_FLOAT
1416 TEST_f_f (asin, 0x0.ffffffff8p0L, 1.5707810680058339712015850710748035974710L),
1417 TEST_f_f (asin, -0x0.ffffffff8p0L, -1.5707810680058339712015850710748035974710L),
1418 TEST_f_f (asin, 0x0.ffffffffffffp0L, 1.5707962425011995974432331617542781977068L),
1419 TEST_f_f (asin, -0x0.ffffffffffffp0L, -1.5707962425011995974432331617542781977068L),
1420#endif
1421#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
1422 TEST_f_f (asin, 0x0.ffffffffffffffffp0L, 1.5707963264656243652399620683025688888978L),
1423 TEST_f_f (asin, -0x0.ffffffffffffffffp0L, -1.5707963264656243652399620683025688888978L),
1424#endif
1425 END_DATA (asin)
1426 };
1427
8847214f
UD		 1428static void
1429asin_test (void)
1430{
e6d3c4a7
AJ		 1431 errno = 0;
1432 FUNC(asin) (0);
1433 if (errno == ENOSYS)
1434 /* Function not implemented. */
1435 return;
8847214f
UD		 1436
1437 START (asin);
74c57478 1438 RUN_TEST_LOOP_f_f (asin, asin_test_data, );
8847214f
UD		 1439 END (asin);
1440}
1441
5ba3cc69 1442
74c57478
JM		 1443static const struct test_f_f_data asin_tonearest_test_data[] =
1444 {
1445 START_DATA (asin_tonearest),
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_tonearest)
1453 };
1454
5ba3cc69
JM		 1455static void
1456asin_test_tonearest (void)
1457{
5ba3cc69
JM		 1458 errno = 0;
1459 FUNC(asin) (0);
1460 if (errno == ENOSYS)
1461 /* Function not implemented. */
1462 return;
1463
1464 START (asin_tonearest);
74c57478 1465 RUN_TEST_LOOP_f_f (asin, asin_tonearest_test_data, FE_TONEAREST);
5ba3cc69
JM		 1466 END (asin_tonearest);
1467}
1468
1469
74c57478
JM		 1470static const struct test_f_f_data asin_towardzero_test_data[] =
1471 {
1472 START_DATA (asin_towardzero),
1473 TEST_f_f (asin, 0, 0),
1474 TEST_f_f (asin, minus_zero, minus_zero),
1475 TEST_f_f (asin, 0.5, M_PI_6l),
1476 TEST_f_f (asin, -0.5, -M_PI_6l),
1477 TEST_f_f (asin, 1.0, M_PI_2l),
1478 TEST_f_f (asin, -1.0, -M_PI_2l),
1479 END_DATA (asin_towardzero)
1480 };
1481
5ba3cc69
JM		 1482static void
1483asin_test_towardzero (void)
1484{
5ba3cc69
JM		 1485 errno = 0;
1486 FUNC(asin) (0);
1487 if (errno == ENOSYS)
1488 /* Function not implemented. */
1489 return;
1490
1491 START (asin_towardzero);
74c57478 1492 RUN_TEST_LOOP_f_f (asin, asin_towardzero_test_data, FE_TOWARDZERO);
5ba3cc69
JM		 1493 END (asin_towardzero);
1494}
1495
1496
74c57478
JM		 1497static const struct test_f_f_data asin_downward_test_data[] =
1498 {
1499 START_DATA (asin_downward),
1500 TEST_f_f (asin, 0, 0),
1501 TEST_f_f (asin, minus_zero, minus_zero),
1502 TEST_f_f (asin, 0.5, M_PI_6l),
1503 TEST_f_f (asin, -0.5, -M_PI_6l),
1504 TEST_f_f (asin, 1.0, M_PI_2l),
1505 TEST_f_f (asin, -1.0, -M_PI_2l),
1506 END_DATA (asin_downward)
1507 };
1508
5ba3cc69
JM		 1509static void
1510asin_test_downward (void)
1511{
5ba3cc69
JM		 1512 errno = 0;
1513 FUNC(asin) (0);
1514 if (errno == ENOSYS)
1515 /* Function not implemented. */
1516 return;
1517
1518 START (asin_downward);
74c57478 1519 RUN_TEST_LOOP_f_f (asin, asin_downward_test_data, FE_DOWNWARD);
5ba3cc69
JM		 1520 END (asin_downward);
1521}
1522
1523
74c57478
JM		 1524static const struct test_f_f_data asin_upward_test_data[] =
1525 {
1526 START_DATA (asin_upward),
1527 TEST_f_f (asin, 0, 0),
1528 TEST_f_f (asin, minus_zero, minus_zero),
1529 TEST_f_f (asin, 0.5, M_PI_6l),
1530 TEST_f_f (asin, -0.5, -M_PI_6l),
1531 TEST_f_f (asin, 1.0, M_PI_2l),
1532 TEST_f_f (asin, -1.0, -M_PI_2l),
1533 END_DATA (asin_upward)
1534 };
1535
5ba3cc69
JM		 1536static void
1537asin_test_upward (void)
1538{
5ba3cc69
JM		 1539 errno = 0;
1540 FUNC(asin) (0);
1541 if (errno == ENOSYS)
1542 /* Function not implemented. */
1543 return;
1544
1545 START (asin_upward);
74c57478 1546 RUN_TEST_LOOP_f_f (asin, asin_upward_test_data, FE_UPWARD);
5ba3cc69
JM		 1547 END (asin_upward);
1548}
1549
74c57478
JM		 1550static const struct test_f_f_data asinh_test_data[] =
1551 {
1552 START_DATA (asinh),
1553 TEST_f_f (asinh, 0, 0),
1554 TEST_f_f (asinh, minus_zero, minus_zero),
1555#ifndef TEST_INLINE
1556 TEST_f_f (asinh, plus_infty, plus_infty),
1557 TEST_f_f (asinh, minus_infty, minus_infty),
1558#endif
1559 TEST_f_f (asinh, qnan_value, qnan_value),
1560 TEST_f_f (asinh, 0.75L, 0.693147180559945309417232121458176568L),
1561 END_DATA (asinh)
1562 };
1563
8847214f
UD		 1564static void
1565asinh_test (void)
1566{
aaca11d8 1567 errno = 0;
3c6cad26 1568 FUNC(asinh) (0.7L);
aaca11d8
UD		 1569 if (errno == ENOSYS)
1570 /* Function not implemented. */
1571 return;
1572
8847214f 1573 START (asinh);
74c57478 1574 RUN_TEST_LOOP_f_f (asinh, asinh_test_data, );
8847214f
UD		 1575 END (asinh);
1576}
1577
74c57478
JM		 1578static const struct test_f_f_data atan_test_data[] =
1579 {
1580 START_DATA (atan),
1581 TEST_f_f (atan, 0, 0),
1582 TEST_f_f (atan, minus_zero, minus_zero),
1583
1584 TEST_f_f (atan, plus_infty, M_PI_2l),
1585 TEST_f_f (atan, minus_infty, -M_PI_2l),
1586 TEST_f_f (atan, qnan_value, qnan_value),
1587 TEST_f_f (atan, max_value, M_PI_2l),
1588 TEST_f_f (atan, -max_value, -M_PI_2l),
1589
1590 TEST_f_f (atan, 1, M_PI_4l),
1591 TEST_f_f (atan, -1, -M_PI_4l),
1592
1593 TEST_f_f (atan, 0.75L, 0.643501108793284386802809228717322638L),
1594
1595 TEST_f_f (atan, 0x1p-100L, 0x1p-100L),
1596#ifndef TEST_FLOAT
1597 TEST_f_f (atan, 0x1p-600L, 0x1p-600L),
1598#endif
1599#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
1600 TEST_f_f (atan, 0x1p-10000L, 0x1p-10000L),
1601#endif
1602 END_DATA (atan)
1603 };
1604
8847214f
UD		 1605static void
1606atan_test (void)
1607{
e6d3c4a7
AJ		 1608 errno = 0;
1609 FUNC(atan) (0);
1610 if (errno == ENOSYS)
1611 /* Function not implemented. */
1612 return;
8847214f
UD		 1613
1614 START (atan);
74c57478 1615 RUN_TEST_LOOP_f_f (atan, atan_test_data, );
8847214f
UD		 1616 END (atan);
1617}
1618
1619
1620
74c57478
JM		 1621static const struct test_f_f_data atanh_test_data[] =
1622 {
1623 START_DATA (atanh),
1624 TEST_f_f (atanh, 0, 0),
1625 TEST_f_f (atanh, minus_zero, minus_zero),
1626
1627 TEST_f_f (atanh, 1, plus_infty, DIVIDE_BY_ZERO_EXCEPTION),
1628 TEST_f_f (atanh, -1, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
1629 TEST_f_f (atanh, qnan_value, qnan_value),
1630
1631 /* atanh (x) == qNaN plus invalid exception if |x| > 1. */
1632 TEST_f_f (atanh, 1.125L, qnan_value, INVALID_EXCEPTION),
1633 TEST_f_f (atanh, -1.125L, qnan_value, INVALID_EXCEPTION),
1634 TEST_f_f (atanh, max_value, qnan_value, INVALID_EXCEPTION),
1635 TEST_f_f (atanh, -max_value, qnan_value, INVALID_EXCEPTION),
1636
1637 TEST_f_f (atanh, 0.75L, 0.972955074527656652552676371721589865L),
1638 END_DATA (atanh)
1639 };
1640
8847214f
UD		 1641static void
1642atanh_test (void)
1643{
aaca11d8 1644 errno = 0;
3c6cad26 1645 FUNC(atanh) (0.7L);
aaca11d8
UD		 1646 if (errno == ENOSYS)
1647 /* Function not implemented. */
1648 return;
8847214f
UD		 1649
1650 START (atanh);
74c57478 1651 RUN_TEST_LOOP_f_f (atanh, atanh_test_data, );
8847214f
UD		 1652 END (atanh);
1653}
1654
601a3a5f
JM		 1655static const struct test_ff_f_data atan2_test_data[] =
1656 {
1657 START_DATA (atan2),
1658 /* atan2 (0,x) == 0 for x > 0. */
1659 TEST_ff_f (atan2, 0, 1, 0),
8847214f 1660
601a3a5f
JM		 1661 /* atan2 (-0,x) == -0 for x > 0. */
1662 TEST_ff_f (atan2, minus_zero, 1, minus_zero),
8847214f 1663
601a3a5f
JM		 1664 TEST_ff_f (atan2, 0, 0, 0),
1665 TEST_ff_f (atan2, minus_zero, 0, minus_zero),
8847214f 1666
601a3a5f
JM		 1667 /* atan2 (+0,x) == +pi for x < 0. */
1668 TEST_ff_f (atan2, 0, -1, M_PIl),
8847214f 1669
601a3a5f
JM		 1670 /* atan2 (-0,x) == -pi for x < 0. */
1671 TEST_ff_f (atan2, minus_zero, -1, -M_PIl),
8847214f 1672
601a3a5f
JM		 1673 TEST_ff_f (atan2, 0, minus_zero, M_PIl),
1674 TEST_ff_f (atan2, minus_zero, minus_zero, -M_PIl),
8847214f 1675
601a3a5f
JM		 1676 /* atan2 (y,+0) == pi/2 for y > 0. */
1677 TEST_ff_f (atan2, 1, 0, M_PI_2l),
8847214f 1678
601a3a5f
JM		 1679 /* atan2 (y,-0) == pi/2 for y > 0. */
1680 TEST_ff_f (atan2, 1, minus_zero, M_PI_2l),
8847214f 1681
601a3a5f
JM		 1682 /* atan2 (y,+0) == -pi/2 for y < 0. */
1683 TEST_ff_f (atan2, -1, 0, -M_PI_2l),
8847214f 1684
601a3a5f
JM		 1685 /* atan2 (y,-0) == -pi/2 for y < 0. */
1686 TEST_ff_f (atan2, -1, minus_zero, -M_PI_2l),
8847214f 1687
601a3a5f
JM		 1688 /* atan2 (y,inf) == +0 for finite y > 0. */
1689 TEST_ff_f (atan2, 1, plus_infty, 0),
8847214f 1690
601a3a5f
JM		 1691 /* atan2 (y,inf) == -0 for finite y < 0. */
1692 TEST_ff_f (atan2, -1, plus_infty, minus_zero),
8847214f 1693
601a3a5f
JM		 1694 /* atan2(+inf, x) == pi/2 for finite x. */
1695 TEST_ff_f (atan2, plus_infty, -1, M_PI_2l),
8847214f 1696
601a3a5f
JM		 1697 /* atan2(-inf, x) == -pi/2 for finite x. */
1698 TEST_ff_f (atan2, minus_infty, 1, -M_PI_2l),
8847214f 1699
601a3a5f
JM		 1700 /* atan2 (y,-inf) == +pi for finite y > 0. */
1701 TEST_ff_f (atan2, 1, minus_infty, M_PIl),
8847214f 1702
601a3a5f
JM		 1703 /* atan2 (y,-inf) == -pi for finite y < 0. */
1704 TEST_ff_f (atan2, -1, minus_infty, -M_PIl),
8847214f 1705
601a3a5f
JM		 1706 TEST_ff_f (atan2, plus_infty, plus_infty, M_PI_4l),
1707 TEST_ff_f (atan2, minus_infty, plus_infty, -M_PI_4l),
1708 TEST_ff_f (atan2, plus_infty, minus_infty, M_PI_34l),
1709 TEST_ff_f (atan2, minus_infty, minus_infty, -M_PI_34l),
1710 TEST_ff_f (atan2, qnan_value, qnan_value, qnan_value),
8847214f 1711
601a3a5f 1712 TEST_ff_f (atan2, max_value, max_value, M_PI_4l),
7726d6a9 1713
601a3a5f
JM		 1714 TEST_ff_f (atan2, max_value, min_value, M_PI_2l),
1715 TEST_ff_f (atan2, -max_value, -min_value, -M_PI_2l),
6d33cc9d 1716
601a3a5f
JM		 1717 TEST_ff_f (atan2, 0.75L, 1, 0.643501108793284386802809228717322638L),
1718 TEST_ff_f (atan2, -0.75L, 1.0L, -0.643501108793284386802809228717322638L),
1719 TEST_ff_f (atan2, 0.75L, -1.0L, 2.49809154479650885165983415456218025L),
1720 TEST_ff_f (atan2, -0.75L, -1.0L, -2.49809154479650885165983415456218025L),
1721 TEST_ff_f (atan2, 0.390625L, .00029L, 1.57005392693128974780151246612928941L),
1722 TEST_ff_f (atan2, 1.390625L, 0.9296875L, 0.981498387184244311516296577615519772L),
8847214f 1723
601a3a5f 1724 TEST_ff_f (atan2, -0.00756827042671106339L, -.001792735857538728036L, -1.80338464113663849327153994379639112L),
16a0e2ec 1725#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
601a3a5f 1726 TEST_ff_f (atan2, 0x1.00000000000001p0L, 0x1.00000000000001p0L, M_PI_4l),
16a0e2ec 1727#endif
601a3a5f
JM		 1728 END_DATA (atan2)
1729 };
bb3f4825 1730
601a3a5f
JM		 1731static void
1732atan2_test (void)
1733{
1734 errno = 0;
1735 FUNC(atan2) (-0, 1);
1736 if (errno == ENOSYS)
1737 /* Function not implemented. */
1738 return;
1739
1740 START (atan2);
1741 RUN_TEST_LOOP_ff_f (atan2, atan2_test_data, );
8847214f
UD		 1742 END (atan2);
1743}
1744
6a1992e2
JM		 1745static const struct test_c_f_data cabs_test_data[] =
1746 {
1747 START_DATA (cabs);
1748 /* cabs (x + iy) is specified as hypot (x,y) */
1749
1750 /* cabs (+inf + i x) == +inf. */
1751 TEST_c_f (cabs, plus_infty, 1.0, plus_infty),
1752 /* cabs (-inf + i x) == +inf. */
1753 TEST_c_f (cabs, minus_infty, 1.0, plus_infty),
1754
1755 TEST_c_f (cabs, minus_infty, qnan_value, plus_infty),
1756 TEST_c_f (cabs, minus_infty, qnan_value, plus_infty),
1757
1758 TEST_c_f (cabs, qnan_value, qnan_value, qnan_value),
1759
1760 /* cabs (x,y) == cabs (y,x). */
1761 TEST_c_f (cabs, 0.75L, 12.390625L, 12.4133028598606664302388810868156657L),
1762 /* cabs (x,y) == cabs (-x,y). */
1763 TEST_c_f (cabs, -12.390625L, 0.75L, 12.4133028598606664302388810868156657L),
1764 /* cabs (x,y) == cabs (-y,x). */
1765 TEST_c_f (cabs, -0.75L, 12.390625L, 12.4133028598606664302388810868156657L),
1766 /* cabs (x,y) == cabs (-x,-y). */
1767 TEST_c_f (cabs, -12.390625L, -0.75L, 12.4133028598606664302388810868156657L),
1768 /* cabs (x,y) == cabs (-y,-x). */
1769 TEST_c_f (cabs, -0.75L, -12.390625L, 12.4133028598606664302388810868156657L),
1770 /* cabs (x,0) == fabs (x). */
1771 TEST_c_f (cabs, -0.75L, 0, 0.75L),
1772 TEST_c_f (cabs, 0.75L, 0, 0.75L),
1773 TEST_c_f (cabs, -1.0L, 0, 1.0L),
1774 TEST_c_f (cabs, 1.0L, 0, 1.0L),
1775 TEST_c_f (cabs, -5.7e7L, 0, 5.7e7L),
1776 TEST_c_f (cabs, 5.7e7L, 0, 5.7e7L),
1777
1778 TEST_c_f (cabs, 0.75L, 1.25L, 1.45773797371132511771853821938639577L),
1779 END_DATA (cabs);
1780 };
1781
8847214f
UD		 1782static void
1783cabs_test (void)
1784{
aaca11d8 1785 errno = 0;
3c6cad26 1786 FUNC(cabs) (BUILD_COMPLEX (0.7L, 12.4L));
aaca11d8
UD		 1787 if (errno == ENOSYS)
1788 /* Function not implemented. */
1789 return;
1790
8847214f 1791 START (cabs);
6a1992e2 1792 RUN_TEST_LOOP_c_f (cabs, cabs_test_data, );
8847214f
UD		 1793 END (cabs);
1794}
1795
2550dfe9 1796
08198877
JM		 1797static const struct test_c_c_data cacos_test_data[] =
1798 {
1799 START_DATA (cacos),
1800 TEST_c_c (cacos, 0, 0, M_PI_2l, minus_zero),
1801 TEST_c_c (cacos, minus_zero, 0, M_PI_2l, minus_zero),
1802 TEST_c_c (cacos, minus_zero, minus_zero, M_PI_2l, 0.0),
1803 TEST_c_c (cacos, 0, minus_zero, M_PI_2l, 0.0),
1804
1805 TEST_c_c (cacos, minus_infty, plus_infty, M_PI_34l, minus_infty),
1806 TEST_c_c (cacos, minus_infty, minus_infty, M_PI_34l, plus_infty),
1807
1808 TEST_c_c (cacos, plus_infty, plus_infty, M_PI_4l, minus_infty),
1809 TEST_c_c (cacos, plus_infty, minus_infty, M_PI_4l, plus_infty),
1810
1811 TEST_c_c (cacos, -10.0, plus_infty, M_PI_2l, minus_infty),
1812 TEST_c_c (cacos, -10.0, minus_infty, M_PI_2l, plus_infty),
1813 TEST_c_c (cacos, 0, plus_infty, M_PI_2l, minus_infty),
1814 TEST_c_c (cacos, 0, minus_infty, M_PI_2l, plus_infty),
1815 TEST_c_c (cacos, 0.1L, plus_infty, M_PI_2l, minus_infty),
1816 TEST_c_c (cacos, 0.1L, minus_infty, M_PI_2l, plus_infty),
1817
1818 TEST_c_c (cacos, minus_infty, 0, M_PIl, minus_infty),
1819 TEST_c_c (cacos, minus_infty, minus_zero, M_PIl, plus_infty),
1820 TEST_c_c (cacos, minus_infty, 100, M_PIl, minus_infty),
1821 TEST_c_c (cacos, minus_infty, -100, M_PIl, plus_infty),
1822
1823 TEST_c_c (cacos, plus_infty, 0, 0.0, minus_infty),
1824 TEST_c_c (cacos, plus_infty, minus_zero, 0.0, plus_infty),
1825 TEST_c_c (cacos, plus_infty, 0.5, 0.0, minus_infty),
1826 TEST_c_c (cacos, plus_infty, -0.5, 0.0, plus_infty),
1827
1828 TEST_c_c (cacos, plus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
1829 TEST_c_c (cacos, minus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
1830
1831 TEST_c_c (cacos, 0, qnan_value, M_PI_2l, qnan_value),
1832 TEST_c_c (cacos, minus_zero, qnan_value, M_PI_2l, qnan_value),
1833
1834 TEST_c_c (cacos, qnan_value, plus_infty, qnan_value, minus_infty),
1835 TEST_c_c (cacos, qnan_value, minus_infty, qnan_value, plus_infty),
1836
1837 TEST_c_c (cacos, 10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
1838 TEST_c_c (cacos, -10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
1839
1840 TEST_c_c (cacos, qnan_value, 0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
1841 TEST_c_c (cacos, qnan_value, -0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
1842
1843 TEST_c_c (cacos, qnan_value, qnan_value, qnan_value, qnan_value),
1844
1845 TEST_c_c (cacos, plus_zero, -1.5L, M_PI_2l, 1.194763217287109304111930828519090523536L),
1846 TEST_c_c (cacos, minus_zero, -1.5L, M_PI_2l, 1.194763217287109304111930828519090523536L),
1847 TEST_c_c (cacos, plus_zero, -1.0L, M_PI_2l, 0.8813735870195430252326093249797923090282L),
1848 TEST_c_c (cacos, minus_zero, -1.0L, M_PI_2l, 0.8813735870195430252326093249797923090282L),
1849 TEST_c_c (cacos, plus_zero, -0.5L, M_PI_2l, 0.4812118250596034474977589134243684231352L),
1850 TEST_c_c (cacos, minus_zero, -0.5L, M_PI_2l, 0.4812118250596034474977589134243684231352L),
1851 TEST_c_c (cacos, plus_zero, 0.5L, M_PI_2l, -0.4812118250596034474977589134243684231352L),
1852 TEST_c_c (cacos, minus_zero, 0.5L, M_PI_2l, -0.4812118250596034474977589134243684231352L),
1853 TEST_c_c (cacos, plus_zero, 1.0L, M_PI_2l, -0.8813735870195430252326093249797923090282L),
1854 TEST_c_c (cacos, minus_zero, 1.0L, M_PI_2l, -0.8813735870195430252326093249797923090282L),
1855 TEST_c_c (cacos, plus_zero, 1.5L, M_PI_2l, -1.194763217287109304111930828519090523536L),
1856 TEST_c_c (cacos, minus_zero, 1.5L, M_PI_2l, -1.194763217287109304111930828519090523536L),
1857
1858 TEST_c_c (cacos, -1.5L, plus_zero, M_PIl, -0.9624236501192068949955178268487368462704L),
1859 TEST_c_c (cacos, -1.5L, minus_zero, M_PIl, 0.9624236501192068949955178268487368462704L),
1860 TEST_c_c (cacos, -1.0L, plus_zero, M_PIl, minus_zero),
1861 TEST_c_c (cacos, -1.0L, minus_zero, M_PIl, plus_zero),
1862 TEST_c_c (cacos, -0.5L, plus_zero, 2.094395102393195492308428922186335256131L, minus_zero),
1863 TEST_c_c (cacos, -0.5L, minus_zero, 2.094395102393195492308428922186335256131L, plus_zero),
1864 TEST_c_c (cacos, 0.5L, plus_zero, 1.047197551196597746154214461093167628066L, minus_zero),
1865 TEST_c_c (cacos, 0.5L, minus_zero, 1.047197551196597746154214461093167628066L, plus_zero),
1866 TEST_c_c (cacos, 1.0L, plus_zero, plus_zero, minus_zero),
1867 TEST_c_c (cacos, 1.0L, minus_zero, plus_zero, plus_zero),
1868 TEST_c_c (cacos, 1.5L, plus_zero, plus_zero, -0.9624236501192068949955178268487368462704L),
1869 TEST_c_c (cacos, 1.5L, minus_zero, plus_zero, 0.9624236501192068949955178268487368462704L),
1870
1871 TEST_c_c (cacos, 0x1p50L, 1.0L, 8.881784197001252323389053344727730248720e-16L, -3.535050620855721078027883819436720218708e1L),
1872 TEST_c_c (cacos, 0x1p50L, -1.0L, 8.881784197001252323389053344727730248720e-16L, 3.535050620855721078027883819436720218708e1L),
1873 TEST_c_c (cacos, -0x1p50L, 1.0L, 3.141592653589792350284223683154270545292L, -3.535050620855721078027883819436720218708e1L),
1874 TEST_c_c (cacos, -0x1p50L, -1.0L, 3.141592653589792350284223683154270545292L, 3.535050620855721078027883819436720218708e1L),
1875 TEST_c_c (cacos, 1.0L, 0x1p50L, 1.570796326794895731052901991514519103193L, -3.535050620855721078027883819436759661753e1L),
1876 TEST_c_c (cacos, -1.0L, 0x1p50L, 1.570796326794897507409741391764983781004L, -3.535050620855721078027883819436759661753e1L),
1877 TEST_c_c (cacos, 1.0L, -0x1p50L, 1.570796326794895731052901991514519103193L, 3.535050620855721078027883819436759661753e1L),
1878 TEST_c_c (cacos, -1.0L, -0x1p50L, 1.570796326794897507409741391764983781004L, 3.535050620855721078027883819436759661753e1L),
728d7b43 1879#ifndef TEST_FLOAT
08198877
JM		 1880 TEST_c_c (cacos, 0x1p500L, 1.0L, 3.054936363499604682051979393213617699789e-151L, -3.472667374605326000180332928505464606058e2L),
1881 TEST_c_c (cacos, 0x1p500L, -1.0L, 3.054936363499604682051979393213617699789e-151L, 3.472667374605326000180332928505464606058e2L),
1882 TEST_c_c (cacos, -0x1p500L, 1.0L, 3.141592653589793238462643383279502884197L, -3.472667374605326000180332928505464606058e2L),
1883 TEST_c_c (cacos, -0x1p500L, -1.0L, 3.141592653589793238462643383279502884197L, 3.472667374605326000180332928505464606058e2L),
1884 TEST_c_c (cacos, 1.0L, 0x1p500L, 1.570796326794896619231321691639751442099L, -3.472667374605326000180332928505464606058e2L),
1885 TEST_c_c (cacos, -1.0L, 0x1p500L, 1.570796326794896619231321691639751442099L, -3.472667374605326000180332928505464606058e2L),
1886 TEST_c_c (cacos, 1.0L, -0x1p500L, 1.570796326794896619231321691639751442099L, 3.472667374605326000180332928505464606058e2L),
1887 TEST_c_c (cacos, -1.0L, -0x1p500L, 1.570796326794896619231321691639751442099L, 3.472667374605326000180332928505464606058e2L),
728d7b43
JM		 1888#endif
1889#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 1890 TEST_c_c (cacos, 0x1p5000L, 1.0L, 7.079811261048172892385615158694057552948e-1506L, -3.466429049980286492395577839412341016946e3L),
1891 TEST_c_c (cacos, 0x1p5000L, -1.0L, 7.079811261048172892385615158694057552948e-1506L, 3.466429049980286492395577839412341016946e3L),
1892 TEST_c_c (cacos, -0x1p5000L, 1.0L, 3.141592653589793238462643383279502884197L, -3.466429049980286492395577839412341016946e3L),
1893 TEST_c_c (cacos, -0x1p5000L, -1.0L, 3.141592653589793238462643383279502884197L, 3.466429049980286492395577839412341016946e3L),
1894 TEST_c_c (cacos, 1.0L, 0x1p5000L, 1.570796326794896619231321691639751442099L, -3.466429049980286492395577839412341016946e3L),
1895 TEST_c_c (cacos, -1.0L, 0x1p5000L, 1.570796326794896619231321691639751442099L, -3.466429049980286492395577839412341016946e3L),
1896 TEST_c_c (cacos, 1.0L, -0x1p5000L, 1.570796326794896619231321691639751442099L, 3.466429049980286492395577839412341016946e3L),
1897 TEST_c_c (cacos, -1.0L, -0x1p5000L, 1.570796326794896619231321691639751442099L, 3.466429049980286492395577839412341016946e3L),
728d7b43
JM		 1898#endif
1899
08198877 1900 TEST_c_c (cacos, 0x1.fp127L, 0x1.fp127L, 7.853981633974483096156608458198757210493e-1L, -8.973081118419833726837456344608533993585e1L),
728d7b43 1901#ifndef TEST_FLOAT
08198877 1902 TEST_c_c (cacos, 0x1.fp1023L, 0x1.fp1023L, 7.853981633974483096156608458198757210493e-1L, -7.107906849659093345062145442726115449315e2L),
728d7b43
JM		 1903#endif
1904#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 1905 TEST_c_c (cacos, 0x1.fp16383L, 0x1.fp16383L, 7.853981633974483096156608458198757210493e-1L, -1.135753137836666928715489992987020363057e4L),
728d7b43
JM		 1906#endif
1907
08198877
JM		 1908 TEST_c_c (cacos, 0x1.fp-129L, 1.5L, 1.570796326794896619231321691639751442097L, -1.194763217287109304111930828519090523536L),
1909 TEST_c_c (cacos, 0x1.fp-129L, -1.5L, 1.570796326794896619231321691639751442097L, 1.194763217287109304111930828519090523536L),
1910 TEST_c_c (cacos, -0x1.fp-129L, 1.5L, 1.570796326794896619231321691639751442100L, -1.194763217287109304111930828519090523536L),
1911 TEST_c_c (cacos, -0x1.fp-129L, -1.5L, 1.570796326794896619231321691639751442100L, 1.194763217287109304111930828519090523536L),
1912 TEST_c_c (cacos, 1.5L, 0x1.fp-129L, 2.546345110742945032959687790021055102355e-39L, -9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION_FLOAT),
1913 TEST_c_c (cacos, -1.5L, 0x1.fp-129L, 3.141592653589793238462643383279502884195L, -9.624236501192068949955178268487368462704e-1L),
1914 TEST_c_c (cacos, 1.5L, -0x1.fp-129L, 2.546345110742945032959687790021055102355e-39L, 9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION_FLOAT),
1915 TEST_c_c (cacos, -1.5L, -0x1.fp-129L, 3.141592653589793238462643383279502884195L, 9.624236501192068949955178268487368462704e-1L),
8cf28c5e 1916#ifndef TEST_FLOAT
08198877
JM		 1917 TEST_c_c (cacos, 0x1.fp-1025L, 1.5L, 1.570796326794896619231321691639751442099L, -1.194763217287109304111930828519090523536L),
1918 TEST_c_c (cacos, 0x1.fp-1025L, -1.5L, 1.570796326794896619231321691639751442099L, 1.194763217287109304111930828519090523536L),
1919 TEST_c_c (cacos, -0x1.fp-1025L, 1.5L, 1.570796326794896619231321691639751442099L, -1.194763217287109304111930828519090523536L),
1920 TEST_c_c (cacos, -0x1.fp-1025L, -1.5L, 1.570796326794896619231321691639751442099L, 1.194763217287109304111930828519090523536L),
1921 TEST_c_c (cacos, 1.5L, 0x1.fp-1025L, 4.819934639999230680322935210539402497827e-309L, -9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
1922 TEST_c_c (cacos, -1.5L, 0x1.fp-1025L, 3.141592653589793238462643383279502884197L, -9.624236501192068949955178268487368462704e-1L),
1923 TEST_c_c (cacos, 1.5L, -0x1.fp-1025L, 4.819934639999230680322935210539402497827e-309L, 9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
1924 TEST_c_c (cacos, -1.5L, -0x1.fp-1025L, 3.141592653589793238462643383279502884197L, 9.624236501192068949955178268487368462704e-1L),
8cf28c5e
JM		 1925#endif
1926#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 1927 TEST_c_c (cacos, 0x1.fp-16385L, 1.5L, 1.570796326794896619231321691639751442099L, -1.194763217287109304111930828519090523536L),
1928 TEST_c_c (cacos, 0x1.fp-16385L, -1.5L, 1.570796326794896619231321691639751442099L, 1.194763217287109304111930828519090523536L),
1929 TEST_c_c (cacos, -0x1.fp-16385L, 1.5L, 1.570796326794896619231321691639751442099L, -1.194763217287109304111930828519090523536L),
1930 TEST_c_c (cacos, -0x1.fp-16385L, -1.5L, 1.570796326794896619231321691639751442099L, 1.194763217287109304111930828519090523536L),
1931 TEST_c_c (cacos, 1.5L, 0x1.fp-16385L, 7.282957076134209141226696333885150260319e-4933L, -9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION),
1932 TEST_c_c (cacos, -1.5L, 0x1.fp-16385L, 3.141592653589793238462643383279502884197L, -9.624236501192068949955178268487368462704e-1L),
1933 TEST_c_c (cacos, 1.5L, -0x1.fp-16385L, 7.282957076134209141226696333885150260319e-4933L, 9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION),
1934 TEST_c_c (cacos, -1.5L, -0x1.fp-16385L, 3.141592653589793238462643383279502884197L, 9.624236501192068949955178268487368462704e-1L),
1935#endif
1936
1937 TEST_c_c (cacos, 0.5L, 1.0L, 1.221357263937683325603909865564381489366L, -9.261330313501824245501244453057873152694e-1L),
1938 TEST_c_c (cacos, 0.5L, -1.0L, 1.221357263937683325603909865564381489366L, 9.261330313501824245501244453057873152694e-1L),
1939 TEST_c_c (cacos, -0.5L, 1.0L, 1.920235389652109912858733517715121394831L, -9.261330313501824245501244453057873152694e-1L),
1940 TEST_c_c (cacos, -0.5L, -1.0L, 1.920235389652109912858733517715121394831L, 9.261330313501824245501244453057873152694e-1L),
1941 TEST_c_c (cacos, 1.0L, 0.5L, 6.748888455860063801646649673121744318756e-1L, -7.328576759736452608886724437653071523305e-1L),
1942 TEST_c_c (cacos, -1.0L, 0.5L, 2.466703808003786858297978415967328452322L, -7.328576759736452608886724437653071523305e-1L),
1943 TEST_c_c (cacos, 1.0L, -0.5L, 6.748888455860063801646649673121744318756e-1L, 7.328576759736452608886724437653071523305e-1L),
1944 TEST_c_c (cacos, -1.0L, -0.5L, 2.466703808003786858297978415967328452322L, 7.328576759736452608886724437653071523305e-1L),
1945 TEST_c_c (cacos, 0.25L, 1.0L, 1.394493894017929688812643125003661339452L, -8.924633639033482359562124741744951972772e-1L),
1946 TEST_c_c (cacos, 0.25L, -1.0L, 1.394493894017929688812643125003661339452L, 8.924633639033482359562124741744951972772e-1L),
1947 TEST_c_c (cacos, -0.25L, 1.0L, 1.747098759571863549650000258275841544745L, -8.924633639033482359562124741744951972772e-1L),
1948 TEST_c_c (cacos, -0.25L, -1.0L, 1.747098759571863549650000258275841544745L, 8.924633639033482359562124741744951972772e-1L),
1949 TEST_c_c (cacos, 1.0L, 0.25L, 4.890443302710802929202843732146540079124e-1L, -5.097911466811016354623559941115413499164e-1L),
1950 TEST_c_c (cacos, -1.0L, 0.25L, 2.652548323318712945542359010064848876285L, -5.097911466811016354623559941115413499164e-1L),
1951 TEST_c_c (cacos, 1.0L, -0.25L, 4.890443302710802929202843732146540079124e-1L, 5.097911466811016354623559941115413499164e-1L),
1952 TEST_c_c (cacos, -1.0L, -0.25L, 2.652548323318712945542359010064848876285L, 5.097911466811016354623559941115413499164e-1L),
1953 TEST_c_c (cacos, 0x1.fp-10L, 1.0L, 1.569458417435338878318763342108699202986L, -8.813742198809567991336704287826445879025e-1L),
1954 TEST_c_c (cacos, 0x1.fp-10L, -1.0L, 1.569458417435338878318763342108699202986L, 8.813742198809567991336704287826445879025e-1L),
1955 TEST_c_c (cacos, -0x1.fp-10L, 1.0L, 1.572134236154454360143880041170803681211L, -8.813742198809567991336704287826445879025e-1L),
1956 TEST_c_c (cacos, -0x1.fp-10L, -1.0L, 1.572134236154454360143880041170803681211L, 8.813742198809567991336704287826445879025e-1L),
1957 TEST_c_c (cacos, 1.0L, 0x1.fp-10L, 4.349129763101882771258049954181971959031e-2L, -4.350501469856803800217957402220976497152e-2L),
1958 TEST_c_c (cacos, -1.0L, 0x1.fp-10L, 3.098101355958774410750062883737683164607L, -4.350501469856803800217957402220976497152e-2L),
1959 TEST_c_c (cacos, 1.0L, -0x1.fp-10L, 4.349129763101882771258049954181971959031e-2L, 4.350501469856803800217957402220976497152e-2L),
1960 TEST_c_c (cacos, -1.0L, -0x1.fp-10L, 3.098101355958774410750062883737683164607L, 4.350501469856803800217957402220976497152e-2L),
1961 TEST_c_c (cacos, 0x1.fp-30L, 1.0L, 1.570796325518966635014803151387033957091L, -8.813735870195430258081932989769495326854e-1L),
1962 TEST_c_c (cacos, 0x1.fp-30L, -1.0L, 1.570796325518966635014803151387033957091L, 8.813735870195430258081932989769495326854e-1L),
1963 TEST_c_c (cacos, -0x1.fp-30L, 1.0L, 1.570796328070826603447840231892468927106L, -8.813735870195430258081932989769495326854e-1L),
1964 TEST_c_c (cacos, -0x1.fp-30L, -1.0L, 1.570796328070826603447840231892468927106L, 8.813735870195430258081932989769495326854e-1L),
1965 TEST_c_c (cacos, 1.0L, 0x1.fp-30L, 4.247867097467650115899790787875186617316e-5L, -4.247867098745151888768727039216644758847e-5L),
1966 TEST_c_c (cacos, -1.0L, 0x1.fp-30L, 3.141550174918818561961484385371624132331L, -4.247867098745151888768727039216644758847e-5L),
1967 TEST_c_c (cacos, 1.0L, -0x1.fp-30L, 4.247867097467650115899790787875186617316e-5L, 4.247867098745151888768727039216644758847e-5L),
1968 TEST_c_c (cacos, -1.0L, -0x1.fp-30L, 3.141550174918818561961484385371624132331L, 4.247867098745151888768727039216644758847e-5L),
1969 TEST_c_c (cacos, 0x1.fp-100L, 1.0L, 1.570796326794896619231321691638670687364L, -8.813735870195430252326093249797923090282e-1L),
1970 TEST_c_c (cacos, 0x1.fp-100L, -1.0L, 1.570796326794896619231321691638670687364L, 8.813735870195430252326093249797923090282e-1L),
1971 TEST_c_c (cacos, -0x1.fp-100L, 1.0L, 1.570796326794896619231321691640832196834L, -8.813735870195430252326093249797923090282e-1L),
1972 TEST_c_c (cacos, -0x1.fp-100L, -1.0L, 1.570796326794896619231321691640832196834L, 8.813735870195430252326093249797923090282e-1L),
1973 TEST_c_c (cacos, 1.0L, 0x1.fp-100L, 1.236292038260260888664514866456887257525e-15L, -1.236292038260260888664514866457202186027e-15L),
1974 TEST_c_c (cacos, -1.0L, 0x1.fp-100L, 3.141592653589792002170605123018614219682L, -1.236292038260260888664514866457202186027e-15L),
1975 TEST_c_c (cacos, 1.0L, -0x1.fp-100L, 1.236292038260260888664514866456887257525e-15L, 1.236292038260260888664514866457202186027e-15L),
1976 TEST_c_c (cacos, -1.0L, -0x1.fp-100L, 3.141592653589792002170605123018614219682L, 1.236292038260260888664514866457202186027e-15L),
1977 TEST_c_c (cacos, 0x1.fp-129L, 1.0L, 1.570796326794896619231321691639751442097L, -8.813735870195430252326093249797923090282e-1L),
1978 TEST_c_c (cacos, 0x1.fp-129L, -1.0L, 1.570796326794896619231321691639751442097L, 8.813735870195430252326093249797923090282e-1L),
1979 TEST_c_c (cacos, -0x1.fp-129L, 1.0L, 1.570796326794896619231321691639751442101L, -8.813735870195430252326093249797923090282e-1L),
1980 TEST_c_c (cacos, -0x1.fp-129L, -1.0L, 1.570796326794896619231321691639751442101L, 8.813735870195430252326093249797923090282e-1L),
1981 TEST_c_c (cacos, 1.0L, 0x1.fp-129L, 5.335635276982233498398987585285818977930e-20L, -5.335635276982233498398987585285818977933e-20L),
1982 TEST_c_c (cacos, -1.0L, 0x1.fp-129L, 3.141592653589793238409287030509680549213L, -5.335635276982233498398987585285818977933e-20L),
1983 TEST_c_c (cacos, 1.0L, -0x1.fp-129L, 5.335635276982233498398987585285818977930e-20L, 5.335635276982233498398987585285818977933e-20L),
1984 TEST_c_c (cacos, -1.0L, -0x1.fp-129L, 3.141592653589793238409287030509680549213L, 5.335635276982233498398987585285818977933e-20L),
0a1b2ae6 1985#ifndef TEST_FLOAT
08198877
JM		 1986 TEST_c_c (cacos, 0x1.fp-1000L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1987 TEST_c_c (cacos, 0x1.fp-1000L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1988 TEST_c_c (cacos, -0x1.fp-1000L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1989 TEST_c_c (cacos, -0x1.fp-1000L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1990 TEST_c_c (cacos, 1.0L, 0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, -4.252291453851660175550490409247739011867e-151L),
1991 TEST_c_c (cacos, -1.0L, 0x1.fp-1000L, 3.141592653589793238462643383279502884197L, -4.252291453851660175550490409247739011867e-151L),
1992 TEST_c_c (cacos, 1.0L, -0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, 4.252291453851660175550490409247739011867e-151L),
1993 TEST_c_c (cacos, -1.0L, -0x1.fp-1000L, 3.141592653589793238462643383279502884197L, 4.252291453851660175550490409247739011867e-151L),
1994 TEST_c_c (cacos, 0x1.fp-1025L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1995 TEST_c_c (cacos, 0x1.fp-1025L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1996 TEST_c_c (cacos, -0x1.fp-1025L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1997 TEST_c_c (cacos, -0x1.fp-1025L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1998 TEST_c_c (cacos, 1.0L, 0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, -7.340879205566679497036857179189356754017e-155L),
1999 TEST_c_c (cacos, -1.0L, 0x1.fp-1025L, 3.141592653589793238462643383279502884197L, -7.340879205566679497036857179189356754017e-155L),
2000 TEST_c_c (cacos, 1.0L, -0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, 7.340879205566679497036857179189356754017e-155L),
2001 TEST_c_c (cacos, -1.0L, -0x1.fp-1025L, 3.141592653589793238462643383279502884197L, 7.340879205566679497036857179189356754017e-155L),
0a1b2ae6
JM		 2002#endif
2003#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2004 TEST_c_c (cacos, 0x1.fp-10000L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
2005 TEST_c_c (cacos, 0x1.fp-10000L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
2006 TEST_c_c (cacos, -0x1.fp-10000L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
2007 TEST_c_c (cacos, -0x1.fp-10000L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
2008 TEST_c_c (cacos, 1.0L, 0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, -9.854680208706673586644342922051388714633e-1506L),
2009 TEST_c_c (cacos, -1.0L, 0x1.fp-10000L, 3.141592653589793238462643383279502884197L, -9.854680208706673586644342922051388714633e-1506L),
2010 TEST_c_c (cacos, 1.0L, -0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, 9.854680208706673586644342922051388714633e-1506L),
2011 TEST_c_c (cacos, -1.0L, -0x1.fp-10000L, 3.141592653589793238462643383279502884197L, 9.854680208706673586644342922051388714633e-1506L),
2012 TEST_c_c (cacos, 0x1.fp-16385L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
2013 TEST_c_c (cacos, 0x1.fp-16385L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
2014 TEST_c_c (cacos, -0x1.fp-16385L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
2015 TEST_c_c (cacos, -0x1.fp-16385L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
2016 TEST_c_c (cacos, 1.0L, 0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, -9.023632056840860275214893047597614177639e-2467L),
2017 TEST_c_c (cacos, -1.0L, 0x1.fp-16385L, 3.141592653589793238462643383279502884197L, -9.023632056840860275214893047597614177639e-2467L),
2018 TEST_c_c (cacos, 1.0L, -0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, 9.023632056840860275214893047597614177639e-2467L),
2019 TEST_c_c (cacos, -1.0L, -0x1.fp-16385L, 3.141592653589793238462643383279502884197L, 9.023632056840860275214893047597614177639e-2467L),
2020#endif
2021
2022 TEST_c_c (cacos, 0x1p-23L, 0x1.000002p0L, 1.570796242501204621739026081991856762292L, -8.813736713132400470205730751186547909968e-1L),
2023 TEST_c_c (cacos, 0x1p-23L, -0x1.000002p0L, 1.570796242501204621739026081991856762292L, 8.813736713132400470205730751186547909968e-1L),
2024 TEST_c_c (cacos, -0x1p-23L, 0x1.000002p0L, 1.570796411088588616723617301287646121905L, -8.813736713132400470205730751186547909968e-1L),
2025 TEST_c_c (cacos, -0x1p-23L, -0x1.000002p0L, 1.570796411088588616723617301287646121905L, 8.813736713132400470205730751186547909968e-1L),
2026 TEST_c_c (cacos, 0x1.000002p0L, 0x1p-23L, 2.222118384408546368406374049167636760903e-4L, -5.364668491573609633134147164031476452679e-4L),
2027 TEST_c_c (cacos, -0x1.000002p0L, 0x1p-23L, 3.141370441751352383825802745874586120521L, -5.364668491573609633134147164031476452679e-4L),
2028 TEST_c_c (cacos, 0x1.000002p0L, -0x1p-23L, 2.222118384408546368406374049167636760903e-4L, 5.364668491573609633134147164031476452679e-4L),
2029 TEST_c_c (cacos, -0x1.000002p0L, -0x1p-23L, 3.141370441751352383825802745874586120521L, 5.364668491573609633134147164031476452679e-4L),
2030 TEST_c_c (cacos, 0x1.fp-129L, 0x1.000002p0L, 1.570796326794896619231321691639751442097L, -8.813736713132375348727889167749389235161e-1L),
2031 TEST_c_c (cacos, 0x1.fp-129L, -0x1.000002p0L, 1.570796326794896619231321691639751442097L, 8.813736713132375348727889167749389235161e-1L),
2032 TEST_c_c (cacos, -0x1.fp-129L, 0x1.000002p0L, 1.570796326794896619231321691639751442101L, -8.813736713132375348727889167749389235161e-1L),
2033 TEST_c_c (cacos, -0x1.fp-129L, -0x1.000002p0L, 1.570796326794896619231321691639751442101L, 8.813736713132375348727889167749389235161e-1L),
2034 TEST_c_c (cacos, 0x1.000002p0L, 0x1.fp-129L, 5.830451806317544230969669308596361881467e-36L, -4.882812451493617206486388134172712975070e-4L),
2035 TEST_c_c (cacos, -0x1.000002p0L, 0x1.fp-129L, 3.141592653589793238462643383279502878367L, -4.882812451493617206486388134172712975070e-4L),
2036 TEST_c_c (cacos, 0x1.000002p0L, -0x1.fp-129L, 5.830451806317544230969669308596361881467e-36L, 4.882812451493617206486388134172712975070e-4L),
2037 TEST_c_c (cacos, -0x1.000002p0L, -0x1.fp-129L, 3.141592653589793238462643383279502878367L, 4.882812451493617206486388134172712975070e-4L),
2038 TEST_c_c (cacos, 0.0L, 0x1.000002p0L, 1.570796326794896619231321691639751442099L, -8.813736713132375348727889167749389235161e-1L),
2039 TEST_c_c (cacos, 0.0L, -0x1.000002p0L, 1.570796326794896619231321691639751442099L, 8.813736713132375348727889167749389235161e-1L),
2040 TEST_c_c (cacos, -0.0L, 0x1.000002p0L, 1.570796326794896619231321691639751442099L, -8.813736713132375348727889167749389235161e-1L),
2041 TEST_c_c (cacos, -0.0L, -0x1.000002p0L, 1.570796326794896619231321691639751442099L, 8.813736713132375348727889167749389235161e-1L),
2042 TEST_c_c (cacos, 0x1.000002p0L, 0.0L, 0.0L, -4.882812451493617206486388134172712975070e-4L),
2043 TEST_c_c (cacos, -0x1.000002p0L, 0.0L, 3.141592653589793238462643383279502884197L, -4.882812451493617206486388134172712975070e-4L),
2044 TEST_c_c (cacos, 0x1.000002p0L, -0.0L, 0.0L, 4.882812451493617206486388134172712975070e-4L),
2045 TEST_c_c (cacos, -0x1.000002p0L, -0.0L, 3.141592653589793238462643383279502884197L, 4.882812451493617206486388134172712975070e-4L),
3a7182a1 2046#ifndef TEST_FLOAT
08198877
JM		 2047 TEST_c_c (cacos, 0x1p-52L, 0x1.0000000000001p0L, 1.570796326794896462222075823262262934288L, -8.813735870195431822418551933572982483664e-1L),
2048 TEST_c_c (cacos, 0x1p-52L, -0x1.0000000000001p0L, 1.570796326794896462222075823262262934288L, 8.813735870195431822418551933572982483664e-1L),
2049 TEST_c_c (cacos, -0x1p-52L, 0x1.0000000000001p0L, 1.570796326794896776240567560017239949909L, -8.813735870195431822418551933572982483664e-1L),
2050 TEST_c_c (cacos, -0x1p-52L, -0x1.0000000000001p0L, 1.570796326794896776240567560017239949909L, 8.813735870195431822418551933572982483664e-1L),
2051 TEST_c_c (cacos, 0x1.0000000000001p0L, 0x1p-52L, 9.590301705980041385828904092662391018164e-9L, -2.315303644582684770975188768022139415020e-8L),
2052 TEST_c_c (cacos, -0x1.0000000000001p0L, 0x1p-52L, 3.141592643999491532482601997450598791535L, -2.315303644582684770975188768022139415020e-8L),
2053 TEST_c_c (cacos, 0x1.0000000000001p0L, -0x1p-52L, 9.590301705980041385828904092662391018164e-9L, 2.315303644582684770975188768022139415020e-8L),
2054 TEST_c_c (cacos, -0x1.0000000000001p0L, -0x1p-52L, 3.141592643999491532482601997450598791535L, 2.315303644582684770975188768022139415020e-8L),
2055 TEST_c_c (cacos, 0x1.fp-1025L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195431822418551933572895326024e-1L),
2056 TEST_c_c (cacos, 0x1.fp-1025L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195431822418551933572895326024e-1L),
2057 TEST_c_c (cacos, -0x1.fp-1025L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195431822418551933572895326024e-1L),
2058 TEST_c_c (cacos, -0x1.fp-1025L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195431822418551933572895326024e-1L),
2059 TEST_c_c (cacos, 0x1.0000000000001p0L, 0x1.fp-1025L, 2.557178503953494342609835913586108008322e-301L, -2.107342425544701550354780375182800088393e-8L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2060 TEST_c_c (cacos, -0x1.0000000000001p0L, 0x1.fp-1025L, 3.141592653589793238462643383279502884197L, -2.107342425544701550354780375182800088393e-8L),
2061 TEST_c_c (cacos, 0x1.0000000000001p0L, -0x1.fp-1025L, 2.557178503953494342609835913586108008322e-301L, 2.107342425544701550354780375182800088393e-8L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2062 TEST_c_c (cacos, -0x1.0000000000001p0L, -0x1.fp-1025L, 3.141592653589793238462643383279502884197L, 2.107342425544701550354780375182800088393e-8L),
2063 TEST_c_c (cacos, 0.0L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195431822418551933572895326024e-1L),
2064 TEST_c_c (cacos, 0.0L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195431822418551933572895326024e-1L),
2065 TEST_c_c (cacos, -0.0L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195431822418551933572895326024e-1L),
2066 TEST_c_c (cacos, -0.0L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195431822418551933572895326024e-1L),
2067 TEST_c_c (cacos, 0x1.0000000000001p0L, 0.0L, 0.0L, -2.107342425544701550354780375182800088393e-8L),
2068 TEST_c_c (cacos, -0x1.0000000000001p0L, 0.0L, 3.141592653589793238462643383279502884197L, -2.107342425544701550354780375182800088393e-8L),
2069 TEST_c_c (cacos, 0x1.0000000000001p0L, -0.0L, 0.0L, 2.107342425544701550354780375182800088393e-8L),
2070 TEST_c_c (cacos, -0x1.0000000000001p0L, -0.0L, 3.141592653589793238462643383279502884197L, 2.107342425544701550354780375182800088393e-8L),
3a7182a1
JM		 2071#endif
2072#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 2073 TEST_c_c (cacos, 0x1p-63L, 0x1.0000000000000002p0L, 1.570796326794896619154657020805582738031L, -8.813735870195430253092739958139610131001e-1L),
2074 TEST_c_c (cacos, 0x1p-63L, -0x1.0000000000000002p0L, 1.570796326794896619154657020805582738031L, 8.813735870195430253092739958139610131001e-1L),
2075 TEST_c_c (cacos, -0x1p-63L, 0x1.0000000000000002p0L, 1.570796326794896619307986362473920146166L, -8.813735870195430253092739958139610131001e-1L),
2076 TEST_c_c (cacos, -0x1p-63L, -0x1.0000000000000002p0L, 1.570796326794896619307986362473920146166L, 8.813735870195430253092739958139610131001e-1L),
2077 TEST_c_c (cacos, 0x1.0000000000000002p0L, 0x1p-63L, 2.119177303101063432592523199680782317447e-10L, -5.116146586219826555037807251857670783420e-10L),
2078 TEST_c_c (cacos, -0x1.0000000000000002p0L, 0x1p-63L, 3.141592653377875508152537040020250564229L, -5.116146586219826555037807251857670783420e-10L),
2079 TEST_c_c (cacos, 0x1.0000000000000002p0L, -0x1p-63L, 2.119177303101063432592523199680782317447e-10L, 5.116146586219826555037807251857670783420e-10L),
2080 TEST_c_c (cacos, -0x1.0000000000000002p0L, -0x1p-63L, 3.141592653377875508152537040020250564229L, 5.116146586219826555037807251857670783420e-10L),
3a7182a1 2081# if LDBL_MIN_EXP <= -16381
08198877
JM		 2082 TEST_c_c (cacos, 0x1.fp-16385L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430253092739958139610130980e-1L),
2083 TEST_c_c (cacos, 0x1.fp-16385L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430253092739958139610130980e-1L),
2084 TEST_c_c (cacos, -0x1.fp-16385L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430253092739958139610130980e-1L),
2085 TEST_c_c (cacos, -0x1.fp-16385L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430253092739958139610130980e-1L),
2086 TEST_c_c (cacos, 0x1.0000000000000002p0L, 0x1.fp-16385L, 1.748608650034385653922359120438227480943e-4923L, -4.656612873077392578082927418388212703712e-10L),
2087 TEST_c_c (cacos, -0x1.0000000000000002p0L, 0x1.fp-16385L, 3.141592653589793238462643383279502884197L, -4.656612873077392578082927418388212703712e-10L),
2088 TEST_c_c (cacos, 0x1.0000000000000002p0L, -0x1.fp-16385L, 1.748608650034385653922359120438227480943e-4923L, 4.656612873077392578082927418388212703712e-10L),
2089 TEST_c_c (cacos, -0x1.0000000000000002p0L, -0x1.fp-16385L, 3.141592653589793238462643383279502884197L, 4.656612873077392578082927418388212703712e-10L),
3a7182a1 2090# endif
08198877
JM		 2091 TEST_c_c (cacos, 0.0L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430253092739958139610130980e-1L),
2092 TEST_c_c (cacos, 0.0L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430253092739958139610130980e-1L),
2093 TEST_c_c (cacos, -0.0L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430253092739958139610130980e-1L),
2094 TEST_c_c (cacos, -0.0L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430253092739958139610130980e-1L),
2095 TEST_c_c (cacos, 0x1.0000000000000002p0L, 0.0L, 0.0L, -4.656612873077392578082927418388212703712e-10L),
2096 TEST_c_c (cacos, -0x1.0000000000000002p0L, 0.0L, 3.141592653589793238462643383279502884197L, -4.656612873077392578082927418388212703712e-10L),
2097 TEST_c_c (cacos, 0x1.0000000000000002p0L, -0.0L, 0.0L, 4.656612873077392578082927418388212703712e-10L),
2098 TEST_c_c (cacos, -0x1.0000000000000002p0L, -0.0L, 3.141592653589793238462643383279502884197L, 4.656612873077392578082927418388212703712e-10L),
3a7182a1
JM		 2099#endif
2100#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 2101 TEST_c_c (cacos, 0x1p-106L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639742726335L, -8.813735870195430252326093249798097405561e-1L),
2102 TEST_c_c (cacos, 0x1p-106L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639742726335L, 8.813735870195430252326093249798097405561e-1L),
2103 TEST_c_c (cacos, -0x1p-106L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639760157863L, -8.813735870195430252326093249798097405561e-1L),
2104 TEST_c_c (cacos, -0x1p-106L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639760157863L, 8.813735870195430252326093249798097405561e-1L),
2105 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, 0x1p-106L, 5.394221422390606848017034778914096659726e-17L, -2.285028863093221674154232933662774454211e-16L),
2106 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, 0x1p-106L, 3.141592653589793184520429159373434404027L, -2.285028863093221674154232933662774454211e-16L),
2107 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, -0x1p-106L, 5.394221422390606848017034778914096659726e-17L, 2.285028863093221674154232933662774454211e-16L),
2108 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, -0x1p-106L, 3.141592653589793184520429159373434404027L, 2.285028863093221674154232933662774454211e-16L),
2109 TEST_c_c (cacos, 0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249798097405561e-1L),
2110 TEST_c_c (cacos, 0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249798097405561e-1L),
2111 TEST_c_c (cacos, -0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249798097405561e-1L),
2112 TEST_c_c (cacos, -0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249798097405561e-1L),
2113 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 2.426922623448365473354662093431821897807e-293L, -2.220446049250313080847263336181636063482e-16L),
2114 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 3.141592653589793238462643383279502884197L, -2.220446049250313080847263336181636063482e-16L),
2115 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 2.426922623448365473354662093431821897807e-293L, 2.220446049250313080847263336181636063482e-16L),
2116 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 3.141592653589793238462643383279502884197L, 2.220446049250313080847263336181636063482e-16L),
2117 TEST_c_c (cacos, 0.0L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249798097405561e-1L),
2118 TEST_c_c (cacos, 0.0L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249798097405561e-1L),
2119 TEST_c_c (cacos, -0.0L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249798097405561e-1L),
2120 TEST_c_c (cacos, -0.0L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249798097405561e-1L),
2121 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, 0.0L, 0.0L, -2.220446049250313080847263336181636063482e-16L),
2122 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, 0.0L, 3.141592653589793238462643383279502884197L, -2.220446049250313080847263336181636063482e-16L),
2123 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, -0.0L, 0.0L, 2.220446049250313080847263336181636063482e-16L),
2124 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, -0.0L, 3.141592653589793238462643383279502884197L, 2.220446049250313080847263336181636063482e-16L),
3a7182a1
JM		 2125#endif
2126#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 2127 TEST_c_c (cacos, 0x1p-113L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751374007L, -8.813735870195430252326093249797924452120e-1L),
2128 TEST_c_c (cacos, 0x1p-113L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751374007L, 8.813735870195430252326093249797924452120e-1L),
2129 TEST_c_c (cacos, -0x1p-113L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751510190L, -8.813735870195430252326093249797924452120e-1L),
2130 TEST_c_c (cacos, -0x1p-113L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751510190L, 8.813735870195430252326093249797924452120e-1L),
2131 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, 0x1p-113L, 4.767863183742677481693563511435642755521e-18L, -2.019699255375255198156433710951064632386e-17L),
2132 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, 0x1p-113L, 3.141592653589793233694780199536825402504L, -2.019699255375255198156433710951064632386e-17L),
2133 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, -0x1p-113L, 4.767863183742677481693563511435642755521e-18L, 2.019699255375255198156433710951064632386e-17L),
2134 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, -0x1p-113L, 3.141592653589793233694780199536825402504L, 2.019699255375255198156433710951064632386e-17L),
2135 TEST_c_c (cacos, 0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797924452120e-1L),
2136 TEST_c_c (cacos, 0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797924452120e-1L),
2137 TEST_c_c (cacos, -0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797924452120e-1L),
2138 TEST_c_c (cacos, -0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797924452120e-1L),
2139 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 4.148847925325683229178506116378864361396e-4916L, -1.962615573354718824241727964954454332780e-17L),
2140 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 3.141592653589793238462643383279502884197L, -1.962615573354718824241727964954454332780e-17L),
2141 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 4.148847925325683229178506116378864361396e-4916L, 1.962615573354718824241727964954454332780e-17L),
2142 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 3.141592653589793238462643383279502884197L, 1.962615573354718824241727964954454332780e-17L),
2143 TEST_c_c (cacos, 0.0L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797924452120e-1L),
2144 TEST_c_c (cacos, 0.0L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797924452120e-1L),
2145 TEST_c_c (cacos, -0.0L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797924452120e-1L),
2146 TEST_c_c (cacos, -0.0L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797924452120e-1L),
2147 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, 0.0L, 0.0L, -1.962615573354718824241727964954454332780e-17L),
2148 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, 0.0L, 3.141592653589793238462643383279502884197L, -1.962615573354718824241727964954454332780e-17L),
2149 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, -0.0L, 0.0L, 1.962615573354718824241727964954454332780e-17L),
2150 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, -0.0L, 3.141592653589793238462643383279502884197L, 1.962615573354718824241727964954454332780e-17L),
2151#endif
2152
2153 TEST_c_c (cacos, 0x1p-23L, 0x0.ffffffp0L, 1.570796242501197085295336701632142060969L, -8.813735448726963984495965873956465777250e-1L),
2154 TEST_c_c (cacos, 0x1p-23L, -0x0.ffffffp0L, 1.570796242501197085295336701632142060969L, 8.813735448726963984495965873956465777250e-1L),
2155 TEST_c_c (cacos, -0x1p-23L, 0x0.ffffffp0L, 1.570796411088596153167306681647360823228L, -8.813735448726963984495965873956465777250e-1L),
2156 TEST_c_c (cacos, -0x1p-23L, -0x0.ffffffp0L, 1.570796411088596153167306681647360823228L, 8.813735448726963984495965873956465777250e-1L),
2157 TEST_c_c (cacos, 0x0.ffffffp0L, 0x1p-23L, 4.391863861910487109445187743978204002614e-4L, -2.714321200917194650737217746780928423385e-4L),
2158 TEST_c_c (cacos, -0x0.ffffffp0L, 0x1p-23L, 3.141153467203602189751698864505105063797L, -2.714321200917194650737217746780928423385e-4L),
2159 TEST_c_c (cacos, 0x0.ffffffp0L, -0x1p-23L, 4.391863861910487109445187743978204002614e-4L, 2.714321200917194650737217746780928423385e-4L),
2160 TEST_c_c (cacos, -0x0.ffffffp0L, -0x1p-23L, 3.141153467203602189751698864505105063797L, 2.714321200917194650737217746780928423385e-4L),
2161 TEST_c_c (cacos, 0x1.fp-129L, 0x0.ffffffp0L, 1.570796326794896619231321691639751442097L, -8.813735448726938863015878255140556727969e-1L),
2162 TEST_c_c (cacos, 0x1.fp-129L, -0x0.ffffffp0L, 1.570796326794896619231321691639751442097L, 8.813735448726938863015878255140556727969e-1L),
2163 TEST_c_c (cacos, -0x1.fp-129L, 0x0.ffffffp0L, 1.570796326794896619231321691639751442101L, -8.813735448726938863015878255140556727969e-1L),
2164 TEST_c_c (cacos, -0x1.fp-129L, -0x0.ffffffp0L, 1.570796326794896619231321691639751442101L, 8.813735448726938863015878255140556727969e-1L),
2165 TEST_c_c (cacos, 0x0.ffffffp0L, 0x1.fp-129L, 3.452669847162035876032494826387364972849e-4L, -8.245504387859737323891843603996428534945e-36L),
2166 TEST_c_c (cacos, -0x0.ffffffp0L, 0x1.fp-129L, 3.141247386605077034875040133796864147700L, -8.245504387859737323891843603996428534945e-36L),
2167 TEST_c_c (cacos, 0x0.ffffffp0L, -0x1.fp-129L, 3.452669847162035876032494826387364972849e-4L, 8.245504387859737323891843603996428534945e-36L),
2168 TEST_c_c (cacos, -0x0.ffffffp0L, -0x1.fp-129L, 3.141247386605077034875040133796864147700L, 8.245504387859737323891843603996428534945e-36L),
2169 TEST_c_c (cacos, 0.0L, 0x0.ffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735448726938863015878255140556727969e-1L),
2170 TEST_c_c (cacos, 0.0L, -0x0.ffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735448726938863015878255140556727969e-1L),
2171 TEST_c_c (cacos, -0.0L, 0x0.ffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735448726938863015878255140556727969e-1L),
2172 TEST_c_c (cacos, -0.0L, -0x0.ffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735448726938863015878255140556727969e-1L),
2173 TEST_c_c (cacos, 0x0.ffffffp0L, 0.0L, 3.452669847162035876032494826387364972849e-4L, -0.0L),
2174 TEST_c_c (cacos, -0x0.ffffffp0L, 0.0L, 3.141247386605077034875040133796864147700L, -0.0L),
2175 TEST_c_c (cacos, 0x0.ffffffp0L, -0.0L, 3.452669847162035876032494826387364972849e-4L, 0.0L),
2176 TEST_c_c (cacos, -0x0.ffffffp0L, -0.0L, 3.141247386605077034875040133796864147700L, 0.0L),
2177 TEST_c_c (cacos, 0x1p-23L, 0.5L, 1.570796220170866625230343643673321150378L, -4.812118250596059896127318386463676808798e-1L),
2178 TEST_c_c (cacos, 0x1p-23L, -0.5L, 1.570796220170866625230343643673321150378L, 4.812118250596059896127318386463676808798e-1L),
2179 TEST_c_c (cacos, -0x1p-23L, 0.5L, 1.570796433418926613232299739606181733819L, -4.812118250596059896127318386463676808798e-1L),
2180 TEST_c_c (cacos, -0x1p-23L, -0.5L, 1.570796433418926613232299739606181733819L, 4.812118250596059896127318386463676808798e-1L),
2181 TEST_c_c (cacos, 0.5L, 0x1p-23L, 1.047197551196603215914744618665204532273L, -1.376510308240943236356088341381173571841e-7L),
2182 TEST_c_c (cacos, -0.5L, 0x1p-23L, 2.094395102393190022547898764614298351924L, -1.376510308240943236356088341381173571841e-7L),
2183 TEST_c_c (cacos, 0.5L, -0x1p-23L, 1.047197551196603215914744618665204532273L, 1.376510308240943236356088341381173571841e-7L),
2184 TEST_c_c (cacos, -0.5L, -0x1p-23L, 2.094395102393190022547898764614298351924L, 1.376510308240943236356088341381173571841e-7L),
2185 TEST_c_c (cacos, 0x1.fp-129L, 0.5L, 1.570796326794896619231321691639751442096L, -4.812118250596034474977589134243684231352e-1L),
2186 TEST_c_c (cacos, 0x1.fp-129L, -0.5L, 1.570796326794896619231321691639751442096L, 4.812118250596034474977589134243684231352e-1L),
2187 TEST_c_c (cacos, -0x1.fp-129L, 0.5L, 1.570796326794896619231321691639751442101L, -4.812118250596034474977589134243684231352e-1L),
2188 TEST_c_c (cacos, -0x1.fp-129L, -0.5L, 1.570796326794896619231321691639751442101L, 4.812118250596034474977589134243684231352e-1L),
2189 TEST_c_c (cacos, 0.5L, 0x1.fp-129L, 1.047197551196597746154214461093167628066L, -3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2190 TEST_c_c (cacos, -0.5L, 0x1.fp-129L, 2.094395102393195492308428922186335256131L, -3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2191 TEST_c_c (cacos, 0.5L, -0x1.fp-129L, 1.047197551196597746154214461093167628066L, 3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2192 TEST_c_c (cacos, -0.5L, -0x1.fp-129L, 2.094395102393195492308428922186335256131L, 3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2193 TEST_c_c (cacos, 0x1p-23L, 0x1p-23L, 1.570796207585607068450636380271254316214L, -1.192092895507818146886315028596704749235e-7L),
2194 TEST_c_c (cacos, 0x1p-23L, -0x1p-23L, 1.570796207585607068450636380271254316214L, 1.192092895507818146886315028596704749235e-7L),
2195 TEST_c_c (cacos, -0x1p-23L, 0x1p-23L, 1.570796446004186170012007003008248567984L, -1.192092895507818146886315028596704749235e-7L),
2196 TEST_c_c (cacos, -0x1p-23L, -0x1p-23L, 1.570796446004186170012007003008248567984L, 1.192092895507818146886315028596704749235e-7L),
2197 TEST_c_c (cacos, 0x1.fp-129L, 0x1p-23L, 1.570796326794896619231321691639751442096L, -1.192092895507809676556842485683592032154e-7L),
2198 TEST_c_c (cacos, 0x1.fp-129L, -0x1p-23L, 1.570796326794896619231321691639751442096L, 1.192092895507809676556842485683592032154e-7L),
2199 TEST_c_c (cacos, -0x1.fp-129L, 0x1p-23L, 1.570796326794896619231321691639751442101L, -1.192092895507809676556842485683592032154e-7L),
2200 TEST_c_c (cacos, -0x1.fp-129L, -0x1p-23L, 1.570796326794896619231321691639751442101L, 1.192092895507809676556842485683592032154e-7L),
2201 TEST_c_c (cacos, 0x1p-23L, 0x1.fp-129L, 1.570796207585607068449789347324000006847L, -2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2202 TEST_c_c (cacos, -0x1p-23L, 0x1.fp-129L, 1.570796446004186170012854035955502877351L, -2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2203 TEST_c_c (cacos, 0x1p-23L, -0x1.fp-129L, 1.570796207585607068449789347324000006847L, 2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2204 TEST_c_c (cacos, -0x1p-23L, -0x1.fp-129L, 1.570796446004186170012854035955502877351L, 2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2205 TEST_c_c (cacos, 0.0L, 0x1p-23L, 1.570796326794896619231321691639751442099L, -1.192092895507809676556842485683592032154e-7L),
2206 TEST_c_c (cacos, 0.0L, -0x1p-23L, 1.570796326794896619231321691639751442099L, 1.192092895507809676556842485683592032154e-7L),
2207 TEST_c_c (cacos, -0.0L, 0x1p-23L, 1.570796326794896619231321691639751442099L, -1.192092895507809676556842485683592032154e-7L),
2208 TEST_c_c (cacos, -0.0L, -0x1p-23L, 1.570796326794896619231321691639751442099L, 1.192092895507809676556842485683592032154e-7L),
2209 TEST_c_c (cacos, 0x1p-23L, 0.0L, 1.570796207585607068449789347324000006847L, -0.0L),
2210 TEST_c_c (cacos, -0x1p-23L, 0.0L, 1.570796446004186170012854035955502877351L, -0.0L),
2211 TEST_c_c (cacos, 0x1p-23L, -0.0L, 1.570796207585607068449789347324000006847L, 0.0L),
2212 TEST_c_c (cacos, -0x1p-23L, -0.0L, 1.570796446004186170012854035955502877351L, 0.0L),
2213 TEST_c_c (cacos, 0x1.fp-129L, 0x1.fp-129L, 1.570796326794896619231321691639751442096L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2214 TEST_c_c (cacos, 0x1.fp-129L, -0x1.fp-129L, 1.570796326794896619231321691639751442096L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2215 TEST_c_c (cacos, -0x1.fp-129L, 0x1.fp-129L, 1.570796326794896619231321691639751442101L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2216 TEST_c_c (cacos, -0x1.fp-129L, -0x1.fp-129L, 1.570796326794896619231321691639751442101L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
ccc8cadf 2217#ifndef TEST_FLOAT
08198877
JM		 2218 TEST_c_c (cacos, 0x1p-52L, 0x0.fffffffffffff8p0L, 1.570796326794896462222075823262236786996L, -8.813735870195429467279863907910458761820e-1L),
2219 TEST_c_c (cacos, 0x1p-52L, -0x0.fffffffffffff8p0L, 1.570796326794896462222075823262236786996L, 8.813735870195429467279863907910458761820e-1L),
2220 TEST_c_c (cacos, -0x1p-52L, 0x0.fffffffffffff8p0L, 1.570796326794896776240567560017266097201L, -8.813735870195429467279863907910458761820e-1L),
2221 TEST_c_c (cacos, -0x1p-52L, -0x0.fffffffffffff8p0L, 1.570796326794896776240567560017266097201L, 8.813735870195429467279863907910458761820e-1L),
2222 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, 0x1p-52L, 1.895456983915074112227925127005564372844e-8L, -1.171456840272878582596796205397918831268e-8L),
2223 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, 0x1p-52L, 3.141592634635223399311902261000251614142L, -1.171456840272878582596796205397918831268e-8L),
2224 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, -0x1p-52L, 1.895456983915074112227925127005564372844e-8L, 1.171456840272878582596796205397918831268e-8L),
2225 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, -0x1p-52L, 3.141592634635223399311902261000251614142L, 1.171456840272878582596796205397918831268e-8L),
2226 TEST_c_c (cacos, 0x1.fp-1025L, 0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195429467279863907910371604180e-1L),
2227 TEST_c_c (cacos, 0x1.fp-1025L, -0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195429467279863907910371604180e-1L),
2228 TEST_c_c (cacos, -0x1.fp-1025L, 0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195429467279863907910371604180e-1L),
2229 TEST_c_c (cacos, -0x1.fp-1025L, -0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195429467279863907910371604180e-1L),
2230 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, 0x1.fp-1025L, 1.490116119384765638786343542550461592240e-8L, -3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2231 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, 0x1.fp-1025L, 3.141592638688632044614986995416067458693L, -3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2232 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, -0x1.fp-1025L, 1.490116119384765638786343542550461592240e-8L, 3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2233 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, -0x1.fp-1025L, 3.141592638688632044614986995416067458693L, 3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2234 TEST_c_c (cacos, 0.0L, 0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195429467279863907910371604180e-1L),
2235 TEST_c_c (cacos, 0.0L, -0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195429467279863907910371604180e-1L),
2236 TEST_c_c (cacos, -0.0L, 0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195429467279863907910371604180e-1L),
2237 TEST_c_c (cacos, -0.0L, -0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195429467279863907910371604180e-1L),
2238 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, 0.0L, 1.490116119384765638786343542550461592240e-8L, -0.0L),
2239 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, 0.0L, 3.141592638688632044614986995416067458693L, -0.0L),
2240 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, -0.0L, 1.490116119384765638786343542550461592240e-8L, 0.0L),
2241 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, -0.0L, 3.141592638688632044614986995416067458693L, 0.0L),
2242#endif
2243 TEST_c_c (cacos, 0x1p-52L, 0.5L, 1.570796326794896420628589431857911675917L, -4.812118250596034474977589134243772428682e-1L),
2244 TEST_c_c (cacos, 0x1p-52L, -0.5L, 1.570796326794896420628589431857911675917L, 4.812118250596034474977589134243772428682e-1L),
2245 TEST_c_c (cacos, -0x1p-52L, 0.5L, 1.570796326794896817834053951421591208280L, -4.812118250596034474977589134243772428682e-1L),
2246 TEST_c_c (cacos, -0x1p-52L, -0.5L, 1.570796326794896817834053951421591208280L, 4.812118250596034474977589134243772428682e-1L),
2247 TEST_c_c (cacos, 0.5L, 0x1p-52L, 1.047197551196597746154214461093186605110L, -2.563950248511418570403591756798643804971e-16L),
2248 TEST_c_c (cacos, -0.5L, 0x1p-52L, 2.094395102393195492308428922186316279087L, -2.563950248511418570403591756798643804971e-16L),
2249 TEST_c_c (cacos, 0.5L, -0x1p-52L, 1.047197551196597746154214461093186605110L, 2.563950248511418570403591756798643804971e-16L),
2250 TEST_c_c (cacos, -0.5L, -0x1p-52L, 2.094395102393195492308428922186316279087L, 2.563950248511418570403591756798643804971e-16L),
ccc8cadf 2251#ifndef TEST_FLOAT
08198877
JM		 2252 TEST_c_c (cacos, 0x1.fp-1025L, 0.5L, 1.570796326794896619231321691639751442099L, -4.812118250596034474977589134243684231352e-1L),
2253 TEST_c_c (cacos, 0x1.fp-1025L, -0.5L, 1.570796326794896619231321691639751442099L, 4.812118250596034474977589134243684231352e-1L),
2254 TEST_c_c (cacos, -0x1.fp-1025L, 0.5L, 1.570796326794896619231321691639751442099L, -4.812118250596034474977589134243684231352e-1L),
2255 TEST_c_c (cacos, -0x1.fp-1025L, -0.5L, 1.570796326794896619231321691639751442099L, 4.812118250596034474977589134243684231352e-1L),
2256 TEST_c_c (cacos, 0.5L, 0x1.fp-1025L, 1.047197551196597746154214461093167628066L, -6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2257 TEST_c_c (cacos, -0.5L, 0x1.fp-1025L, 2.094395102393195492308428922186335256131L, -6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2258 TEST_c_c (cacos, 0.5L, -0x1.fp-1025L, 1.047197551196597746154214461093167628066L, 6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2259 TEST_c_c (cacos, -0.5L, -0x1.fp-1025L, 2.094395102393195492308428922186335256131L, 6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2260#endif
2261 TEST_c_c (cacos, 0x1p-52L, 0x1p-52L, 1.570796326794896397186716766608443357372L, -2.220446049250313080847263336181677117148e-16L),
2262 TEST_c_c (cacos, 0x1p-52L, -0x1p-52L, 1.570796326794896397186716766608443357372L, 2.220446049250313080847263336181677117148e-16L),
2263 TEST_c_c (cacos, -0x1p-52L, 0x1p-52L, 1.570796326794896841275926616671059526825L, -2.220446049250313080847263336181677117148e-16L),
2264 TEST_c_c (cacos, -0x1p-52L, -0x1p-52L, 1.570796326794896841275926616671059526825L, 2.220446049250313080847263336181677117148e-16L),
ccc8cadf 2265#ifndef TEST_FLOAT
08198877
JM		 2266 TEST_c_c (cacos, 0x1.fp-1025L, 0x1p-52L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181622378926e-16L),
2267 TEST_c_c (cacos, 0x1.fp-1025L, -0x1p-52L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181622378926e-16L),
2268 TEST_c_c (cacos, -0x1.fp-1025L, 0x1p-52L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181622378926e-16L),
2269 TEST_c_c (cacos, -0x1.fp-1025L, -0x1p-52L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181622378926e-16L),
2270 TEST_c_c (cacos, 0x1p-52L, 0x1.fp-1025L, 1.570796326794896397186716766608443357372L, -5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2271 TEST_c_c (cacos, -0x1p-52L, 0x1.fp-1025L, 1.570796326794896841275926616671059526825L, -5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2272 TEST_c_c (cacos, 0x1p-52L, -0x1.fp-1025L, 1.570796326794896397186716766608443357372L, 5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2273 TEST_c_c (cacos, -0x1p-52L, -0x1.fp-1025L, 1.570796326794896841275926616671059526825L, 5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2274#endif
2275 TEST_c_c (cacos, 0.0L, 0x1p-52L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181622378926e-16L),
2276 TEST_c_c (cacos, 0.0L, -0x1p-52L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181622378926e-16L),
2277 TEST_c_c (cacos, -0.0L, 0x1p-52L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181622378926e-16L),
2278 TEST_c_c (cacos, -0.0L, -0x1p-52L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181622378926e-16L),
2279 TEST_c_c (cacos, 0x1p-52L, 0.0L, 1.570796326794896397186716766608443357372L, -0.0L),
2280 TEST_c_c (cacos, -0x1p-52L, 0.0L, 1.570796326794896841275926616671059526825L, -0.0L),
2281 TEST_c_c (cacos, 0x1p-52L, -0.0L, 1.570796326794896397186716766608443357372L, 0.0L),
2282 TEST_c_c (cacos, -0x1p-52L, -0.0L, 1.570796326794896841275926616671059526825L, 0.0L),
ccc8cadf 2283#ifndef TEST_FLOAT
08198877
JM		 2284 TEST_c_c (cacos, 0x1.fp-1025L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2285 TEST_c_c (cacos, 0x1.fp-1025L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2286 TEST_c_c (cacos, -0x1.fp-1025L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2287 TEST_c_c (cacos, -0x1.fp-1025L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
ccc8cadf
JM		 2288#endif
2289#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 2290 TEST_c_c (cacos, 0x1p-63L, 0x0.ffffffffffffffffp0L, 1.570796326794896619154657020805582738025L, -8.813735870195430251942769895627079569937e-1L),
2291 TEST_c_c (cacos, 0x1p-63L, -0x0.ffffffffffffffffp0L, 1.570796326794896619154657020805582738025L, 8.813735870195430251942769895627079569937e-1L),
2292 TEST_c_c (cacos, -0x1p-63L, 0x0.ffffffffffffffffp0L, 1.570796326794896619307986362473920146173L, -8.813735870195430251942769895627079569937e-1L),
2293 TEST_c_c (cacos, -0x1p-63L, -0x0.ffffffffffffffffp0L, 1.570796326794896619307986362473920146173L, 8.813735870195430251942769895627079569937e-1L),
2294 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, 0x1p-63L, 4.188407771167967636741951941902992986043e-10L, -2.588578361325995866221775673638805081337e-10L),
2295 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, 0x1p-63L, 3.141592653170952461345846619605307690007L, -2.588578361325995866221775673638805081337e-10L),
2296 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, -0x1p-63L, 4.188407771167967636741951941902992986043e-10L, 2.588578361325995866221775673638805081337e-10L),
2297 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, -0x1p-63L, 3.141592653170952461345846619605307690007L, 2.588578361325995866221775673638805081337e-10L),
ccc8cadf 2298# if LDBL_MIN_EXP <= -16381
08198877
JM		 2299 TEST_c_c (cacos, 0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430251942769895627079569917e-1L),
2300 TEST_c_c (cacos, 0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430251942769895627079569917e-1L),
2301 TEST_c_c (cacos, -0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430251942769895627079569917e-1L),
2302 TEST_c_c (cacos, -0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430251942769895627079569917e-1L),
2303 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 3.292722539913596233371825532007990724506e-10L, -2.472906068161537187835415298076415423459e-4923L),
2304 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 3.141592653260520984471283759942320330996L, -2.472906068161537187835415298076415423459e-4923L),
2305 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 3.292722539913596233371825532007990724506e-10L, 2.472906068161537187835415298076415423459e-4923L),
2306 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 3.141592653260520984471283759942320330996L, 2.472906068161537187835415298076415423459e-4923L),
ccc8cadf 2307# endif
08198877
JM		 2308 TEST_c_c (cacos, 0.0L, 0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430251942769895627079569917e-1L),
2309 TEST_c_c (cacos, 0.0L, -0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430251942769895627079569917e-1L),
2310 TEST_c_c (cacos, -0.0L, 0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430251942769895627079569917e-1L),
2311 TEST_c_c (cacos, -0.0L, -0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430251942769895627079569917e-1L),
2312 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, 0.0L, 3.292722539913596233371825532007990724506e-10L, -0.0L),
2313 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, 0.0L, 3.141592653260520984471283759942320330996L, -0.0L),
2314 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, -0.0L, 3.292722539913596233371825532007990724506e-10L, 0.0L),
2315 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, -0.0L, 3.141592653260520984471283759942320330996L, 0.0L),
2316#endif
2317 TEST_c_c (cacos, 0x1p-63L, 0.5L, 1.570796326794896619134347701278529840650L, -4.812118250596034474977589134243684231373e-1L),
2318 TEST_c_c (cacos, 0x1p-63L, -0.5L, 1.570796326794896619134347701278529840650L, 4.812118250596034474977589134243684231373e-1L),
2319 TEST_c_c (cacos, -0x1p-63L, 0.5L, 1.570796326794896619328295682000973043547L, -4.812118250596034474977589134243684231373e-1L),
2320 TEST_c_c (cacos, -0x1p-63L, -0.5L, 1.570796326794896619328295682000973043547L, 4.812118250596034474977589134243684231373e-1L),
2321 TEST_c_c (cacos, 0.5L, 0x1p-63L, 1.047197551196597746154214461093167628070L, -1.251928832280966098829878787499365228659e-19L),
2322 TEST_c_c (cacos, -0.5L, 0x1p-63L, 2.094395102393195492308428922186335256127L, -1.251928832280966098829878787499365228659e-19L),
2323 TEST_c_c (cacos, 0.5L, -0x1p-63L, 1.047197551196597746154214461093167628070L, 1.251928832280966098829878787499365228659e-19L),
2324 TEST_c_c (cacos, -0.5L, -0x1p-63L, 2.094395102393195492308428922186335256127L, 1.251928832280966098829878787499365228659e-19L),
ccc8cadf 2325#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2326 TEST_c_c (cacos, 0x1.fp-16385L, 0.5L, 1.570796326794896619231321691639751442099L, -4.812118250596034474977589134243684231352e-1L),
2327 TEST_c_c (cacos, 0x1.fp-16385L, -0.5L, 1.570796326794896619231321691639751442099L, 4.812118250596034474977589134243684231352e-1L),
2328 TEST_c_c (cacos, -0x1.fp-16385L, 0.5L, 1.570796326794896619231321691639751442099L, -4.812118250596034474977589134243684231352e-1L),
2329 TEST_c_c (cacos, -0x1.fp-16385L, -0.5L, 1.570796326794896619231321691639751442099L, 4.812118250596034474977589134243684231352e-1L),
2330 TEST_c_c (cacos, 0.5L, 0x1.fp-16385L, 1.047197551196597746154214461093167628066L, -9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
2331 TEST_c_c (cacos, -0.5L, 0x1.fp-16385L, 2.094395102393195492308428922186335256131L, -9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
2332 TEST_c_c (cacos, 0.5L, -0x1.fp-16385L, 1.047197551196597746154214461093167628066L, 9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
2333 TEST_c_c (cacos, -0.5L, -0x1.fp-16385L, 2.094395102393195492308428922186335256131L, 9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
2334#endif
2335 TEST_c_c (cacos, 0x1p-63L, 0x1p-63L, 1.570796326794896619122901474391200998698L, -1.084202172485504434007452800869941711430e-19L),
2336 TEST_c_c (cacos, 0x1p-63L, -0x1p-63L, 1.570796326794896619122901474391200998698L, 1.084202172485504434007452800869941711430e-19L),
2337 TEST_c_c (cacos, -0x1p-63L, 0x1p-63L, 1.570796326794896619339741908888301885499L, -1.084202172485504434007452800869941711430e-19L),
2338 TEST_c_c (cacos, -0x1p-63L, -0x1p-63L, 1.570796326794896619339741908888301885499L, 1.084202172485504434007452800869941711430e-19L),
ccc8cadf 2339#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2340 TEST_c_c (cacos, 0x1.fp-16385L, 0x1p-63L, 1.570796326794896619231321691639751442099L, -1.084202172485504434007452800869941711424e-19L),
2341 TEST_c_c (cacos, 0x1.fp-16385L, -0x1p-63L, 1.570796326794896619231321691639751442099L, 1.084202172485504434007452800869941711424e-19L),
2342 TEST_c_c (cacos, -0x1.fp-16385L, 0x1p-63L, 1.570796326794896619231321691639751442099L, -1.084202172485504434007452800869941711424e-19L),
2343 TEST_c_c (cacos, -0x1.fp-16385L, -0x1p-63L, 1.570796326794896619231321691639751442099L, 1.084202172485504434007452800869941711424e-19L),
2344 TEST_c_c (cacos, 0x1p-63L, 0x1.fp-16385L, 1.570796326794896619122901474391200998698L, -8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
2345 TEST_c_c (cacos, -0x1p-63L, 0x1.fp-16385L, 1.570796326794896619339741908888301885499L, -8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
2346 TEST_c_c (cacos, 0x1p-63L, -0x1.fp-16385L, 1.570796326794896619122901474391200998698L, 8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
2347 TEST_c_c (cacos, -0x1p-63L, -0x1.fp-16385L, 1.570796326794896619339741908888301885499L, 8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
2348#endif
2349 TEST_c_c (cacos, 0.0L, 0x1p-63L, 1.570796326794896619231321691639751442099L, -1.084202172485504434007452800869941711424e-19L),
2350 TEST_c_c (cacos, 0.0L, -0x1p-63L, 1.570796326794896619231321691639751442099L, 1.084202172485504434007452800869941711424e-19L),
2351 TEST_c_c (cacos, -0.0L, 0x1p-63L, 1.570796326794896619231321691639751442099L, -1.084202172485504434007452800869941711424e-19L),
2352 TEST_c_c (cacos, -0.0L, -0x1p-63L, 1.570796326794896619231321691639751442099L, 1.084202172485504434007452800869941711424e-19L),
2353 TEST_c_c (cacos, 0x1p-63L, 0.0L, 1.570796326794896619122901474391200998698L, -0.0L),
2354 TEST_c_c (cacos, -0x1p-63L, 0.0L, 1.570796326794896619339741908888301885499L, -0.0L),
2355 TEST_c_c (cacos, 0x1p-63L, -0.0L, 1.570796326794896619122901474391200998698L, 0.0L),
2356 TEST_c_c (cacos, -0x1p-63L, -0.0L, 1.570796326794896619339741908888301885499L, 0.0L),
ccc8cadf 2357#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2358 TEST_c_c (cacos, 0x1.fp-16385L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2359 TEST_c_c (cacos, 0x1.fp-16385L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2360 TEST_c_c (cacos, -0x1.fp-16385L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2361 TEST_c_c (cacos, -0x1.fp-16385L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
ccc8cadf
JM		 2362#endif
2363#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 2364 TEST_c_c (cacos, 0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639734010571L, -8.813735870195430252326093249797835932642e-1L),
2365 TEST_c_c (cacos, 0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639734010571L, 8.813735870195430252326093249797835932642e-1L),
2366 TEST_c_c (cacos, -0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639768873627L, -8.813735870195430252326093249797835932642e-1L),
2367 TEST_c_c (cacos, -0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639768873627L, 8.813735870195430252326093249797835932642e-1L),
2368 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 1.997188458999618357060632049675702684031e-16L, -1.234330349600789959989661887846005659983e-16L),
2369 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 3.141592653589793038743797483317667178134L, -1.234330349600789959989661887846005659983e-16L),
2370 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 1.997188458999618357060632049675702684031e-16L, 1.234330349600789959989661887846005659983e-16L),
2371 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 3.141592653589793038743797483317667178134L, 1.234330349600789959989661887846005659983e-16L),
2372 TEST_c_c (cacos, 0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797835932642e-1L),
2373 TEST_c_c (cacos, 0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797835932642e-1L),
2374 TEST_c_c (cacos, -0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797835932642e-1L),
2375 TEST_c_c (cacos, -0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797835932642e-1L),
2376 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 1.570092458683775059393382371963565104164e-16L, -3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2377 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 3.141592653589793081453397514901996944859L, -3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2378 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 1.570092458683775059393382371963565104164e-16L, 3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2379 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 3.141592653589793081453397514901996944859L, 3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2380 TEST_c_c (cacos, 0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797835932642e-1L),
2381 TEST_c_c (cacos, 0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797835932642e-1L),
2382 TEST_c_c (cacos, -0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797835932642e-1L),
2383 TEST_c_c (cacos, -0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797835932642e-1L),
2384 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 1.570092458683775059393382371963565104164e-16L, -0.0L),
2385 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 3.141592653589793081453397514901996944859L, -0.0L),
2386 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 1.570092458683775059393382371963565104164e-16L, 0.0L),
2387 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 3.141592653589793081453397514901996944859L, 0.0L),
2388#endif
2389 TEST_c_c (cacos, 0x1p-105L, 0.5L, 1.570796326794896619231321691639729392766L, -4.812118250596034474977589134243684231352e-1L),
2390 TEST_c_c (cacos, 0x1p-105L, -0.5L, 1.570796326794896619231321691639729392766L, 4.812118250596034474977589134243684231352e-1L),
2391 TEST_c_c (cacos, -0x1p-105L, 0.5L, 1.570796326794896619231321691639773491431L, -4.812118250596034474977589134243684231352e-1L),
2392 TEST_c_c (cacos, -0x1p-105L, -0.5L, 1.570796326794896619231321691639773491431L, 4.812118250596034474977589134243684231352e-1L),
2393 TEST_c_c (cacos, 0.5L, 0x1p-105L, 1.047197551196597746154214461093167628066L, -2.846556599890768890940941645338546615370e-32L),
2394 TEST_c_c (cacos, -0.5L, 0x1p-105L, 2.094395102393195492308428922186335256131L, -2.846556599890768890940941645338546615370e-32L),
2395 TEST_c_c (cacos, 0.5L, -0x1p-105L, 1.047197551196597746154214461093167628066L, 2.846556599890768890940941645338546615370e-32L),
2396 TEST_c_c (cacos, -0.5L, -0x1p-105L, 2.094395102393195492308428922186335256131L, 2.846556599890768890940941645338546615370e-32L),
2397 TEST_c_c (cacos, 0x1p-105L, 0x1p-105L, 1.570796326794896619231321691639726790195L, -2.465190328815661891911651766508706967729e-32L),
2398 TEST_c_c (cacos, 0x1p-105L, -0x1p-105L, 1.570796326794896619231321691639726790195L, 2.465190328815661891911651766508706967729e-32L),
2399 TEST_c_c (cacos, -0x1p-105L, 0x1p-105L, 1.570796326794896619231321691639776094002L, -2.465190328815661891911651766508706967729e-32L),
2400 TEST_c_c (cacos, -0x1p-105L, -0x1p-105L, 1.570796326794896619231321691639776094002L, 2.465190328815661891911651766508706967729e-32L),
ccc8cadf 2401#ifndef TEST_FLOAT
08198877
JM		 2402 TEST_c_c (cacos, 0x1.fp-1025L, 0x1p-105L, 1.570796326794896619231321691639751442099L, -2.465190328815661891911651766508706967729e-32L),
2403 TEST_c_c (cacos, 0x1.fp-1025L, -0x1p-105L, 1.570796326794896619231321691639751442099L, 2.465190328815661891911651766508706967729e-32L),
2404 TEST_c_c (cacos, -0x1.fp-1025L, 0x1p-105L, 1.570796326794896619231321691639751442099L, -2.465190328815661891911651766508706967729e-32L),
2405 TEST_c_c (cacos, -0x1.fp-1025L, -0x1p-105L, 1.570796326794896619231321691639751442099L, 2.465190328815661891911651766508706967729e-32L),
2406 TEST_c_c (cacos, 0x1p-105L, 0x1.fp-1025L, 1.570796326794896619231321691639726790195L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2407 TEST_c_c (cacos, -0x1p-105L, 0x1.fp-1025L, 1.570796326794896619231321691639776094002L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2408 TEST_c_c (cacos, 0x1p-105L, -0x1.fp-1025L, 1.570796326794896619231321691639726790195L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2409 TEST_c_c (cacos, -0x1p-105L, -0x1.fp-1025L, 1.570796326794896619231321691639776094002L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2410#endif
2411 TEST_c_c (cacos, 0.0L, 0x1p-105L, 1.570796326794896619231321691639751442099L, -2.465190328815661891911651766508706967729e-32L),
2412 TEST_c_c (cacos, 0.0L, -0x1p-105L, 1.570796326794896619231321691639751442099L, 2.465190328815661891911651766508706967729e-32L),
2413 TEST_c_c (cacos, -0.0L, 0x1p-105L, 1.570796326794896619231321691639751442099L, -2.465190328815661891911651766508706967729e-32L),
2414 TEST_c_c (cacos, -0.0L, -0x1p-105L, 1.570796326794896619231321691639751442099L, 2.465190328815661891911651766508706967729e-32L),
2415 TEST_c_c (cacos, 0x1p-105L, 0.0L, 1.570796326794896619231321691639726790195L, -0.0L),
2416 TEST_c_c (cacos, -0x1p-105L, 0.0L, 1.570796326794896619231321691639776094002L, -0.0L),
2417 TEST_c_c (cacos, 0x1p-105L, -0.0L, 1.570796326794896619231321691639726790195L, 0.0L),
2418 TEST_c_c (cacos, -0x1p-105L, -0.0L, 1.570796326794896619231321691639776094002L, 0.0L),
ccc8cadf 2419#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 2420 TEST_c_c (cacos, 0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751305915L, -8.813735870195430252326093249797922409363e-1L),
2421 TEST_c_c (cacos, 0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751305915L, 8.813735870195430252326093249797922409363e-1L),
2422 TEST_c_c (cacos, -0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751578282L, -8.813735870195430252326093249797922409363e-1L),
2423 TEST_c_c (cacos, -0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751578282L, 8.813735870195430252326093249797922409363e-1L),
2424 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 1.765281878332676474347460257221369818872e-17L, -1.091004200533850618345330909857103457781e-17L),
2425 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 3.141592653589793220809824599952738140723L, -1.091004200533850618345330909857103457781e-17L),
2426 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 1.765281878332676474347460257221369818872e-17L, 1.091004200533850618345330909857103457781e-17L),
2427 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 3.141592653589793220809824599952738140723L, 1.091004200533850618345330909857103457781e-17L),
2428 TEST_c_c (cacos, 0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797922409363e-1L),
2429 TEST_c_c (cacos, 0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797922409363e-1L),
2430 TEST_c_c (cacos, -0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797922409363e-1L),
2431 TEST_c_c (cacos, -0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797922409363e-1L),
2432 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 1.387778780781445675529539585113525401762e-17L, -5.867357004219059108790368268900490184505e-4916L),
2433 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 3.141592653589793224584855575465046128902L, -5.867357004219059108790368268900490184505e-4916L),
2434 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 1.387778780781445675529539585113525401762e-17L, 5.867357004219059108790368268900490184505e-4916L),
2435 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 3.141592653589793224584855575465046128902L, 5.867357004219059108790368268900490184505e-4916L),
2436 TEST_c_c (cacos, 0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797922409363e-1L),
2437 TEST_c_c (cacos, 0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797922409363e-1L),
2438 TEST_c_c (cacos, -0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797922409363e-1L),
2439 TEST_c_c (cacos, -0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797922409363e-1L),
2440 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 1.387778780781445675529539585113525401762e-17L, -0.0L),
2441 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 3.141592653589793224584855575465046128902L, -0.0L),
2442 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 1.387778780781445675529539585113525401762e-17L, 0.0L),
2443 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 3.141592653589793224584855575465046128902L, 0.0L),
2444#endif
2445 TEST_c_c (cacos, 0x1p-112L, 0.5L, 1.570796326794896619231321691639751269838L, -4.812118250596034474977589134243684231352e-1L),
2446 TEST_c_c (cacos, 0x1p-112L, -0.5L, 1.570796326794896619231321691639751269838L, 4.812118250596034474977589134243684231352e-1L),
2447 TEST_c_c (cacos, -0x1p-112L, 0.5L, 1.570796326794896619231321691639751614359L, -4.812118250596034474977589134243684231352e-1L),
2448 TEST_c_c (cacos, -0x1p-112L, -0.5L, 1.570796326794896619231321691639751614359L, 4.812118250596034474977589134243684231352e-1L),
2449 TEST_c_c (cacos, 0.5L, 0x1p-112L, 1.047197551196597746154214461093167628066L, -2.223872343664663196047610660420739543258e-34L),
2450 TEST_c_c (cacos, -0.5L, 0x1p-112L, 2.094395102393195492308428922186335256131L, -2.223872343664663196047610660420739543258e-34L),
2451 TEST_c_c (cacos, 0.5L, -0x1p-112L, 1.047197551196597746154214461093167628066L, 2.223872343664663196047610660420739543258e-34L),
2452 TEST_c_c (cacos, -0.5L, -0x1p-112L, 2.094395102393195492308428922186335256131L, 2.223872343664663196047610660420739543258e-34L),
2453 TEST_c_c (cacos, 0x1p-112L, 0x1p-112L, 1.570796326794896619231321691639751249506L, -1.925929944387235853055977942584927318538e-34L),
2454 TEST_c_c (cacos, 0x1p-112L, -0x1p-112L, 1.570796326794896619231321691639751249506L, 1.925929944387235853055977942584927318538e-34L),
2455 TEST_c_c (cacos, -0x1p-112L, 0x1p-112L, 1.570796326794896619231321691639751634692L, -1.925929944387235853055977942584927318538e-34L),
2456 TEST_c_c (cacos, -0x1p-112L, -0x1p-112L, 1.570796326794896619231321691639751634692L, 1.925929944387235853055977942584927318538e-34L),
ccc8cadf 2457#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2458 TEST_c_c (cacos, 0x1.fp-16385L, 0x1p-112L, 1.570796326794896619231321691639751442099L, -1.925929944387235853055977942584927318538e-34L),
2459 TEST_c_c (cacos, 0x1.fp-16385L, -0x1p-112L, 1.570796326794896619231321691639751442099L, 1.925929944387235853055977942584927318538e-34L),
2460 TEST_c_c (cacos, -0x1.fp-16385L, 0x1p-112L, 1.570796326794896619231321691639751442099L, -1.925929944387235853055977942584927318538e-34L),
2461 TEST_c_c (cacos, -0x1.fp-16385L, -0x1p-112L, 1.570796326794896619231321691639751442099L, 1.925929944387235853055977942584927318538e-34L),
2462 TEST_c_c (cacos, 0x1p-112L, 0x1.fp-16385L, 1.570796326794896619231321691639751249506L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2463 TEST_c_c (cacos, -0x1p-112L, 0x1.fp-16385L, 1.570796326794896619231321691639751634692L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2464 TEST_c_c (cacos, 0x1p-112L, -0x1.fp-16385L, 1.570796326794896619231321691639751249506L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2465 TEST_c_c (cacos, -0x1p-112L, -0x1.fp-16385L, 1.570796326794896619231321691639751634692L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2466#endif
2467 TEST_c_c (cacos, 0.0L, 0x1p-112L, 1.570796326794896619231321691639751442099L, -1.925929944387235853055977942584927318538e-34L),
2468 TEST_c_c (cacos, 0.0L, -0x1p-112L, 1.570796326794896619231321691639751442099L, 1.925929944387235853055977942584927318538e-34L),
2469 TEST_c_c (cacos, -0.0L, 0x1p-112L, 1.570796326794896619231321691639751442099L, -1.925929944387235853055977942584927318538e-34L),
2470 TEST_c_c (cacos, -0.0L, -0x1p-112L, 1.570796326794896619231321691639751442099L, 1.925929944387235853055977942584927318538e-34L),
2471 TEST_c_c (cacos, 0x1p-112L, 0.0L, 1.570796326794896619231321691639751249506L, -0.0L),
2472 TEST_c_c (cacos, -0x1p-112L, 0.0L, 1.570796326794896619231321691639751634692L, -0.0L),
2473 TEST_c_c (cacos, 0x1p-112L, -0.0L, 1.570796326794896619231321691639751249506L, 0.0L),
2474 TEST_c_c (cacos, -0x1p-112L, -0.0L, 1.570796326794896619231321691639751634692L, 0.0L),
2475
2476 TEST_c_c (cacos, 0.75L, 1.25L, 1.11752014915610270578240049553777969L, -1.13239363160530819522266333696834467L),
2477 TEST_c_c (cacos, -2, -3, 2.1414491111159960199416055713254211L, 1.9833870299165354323470769028940395L),
2478 END_DATA (cacos)
2479 };
8847214f 2480
8847214f 2481static void
08198877 2482cacos_test (void)
8847214f 2483{
aaca11d8 2484 errno = 0;
08198877 2485 FUNC(cacos) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD		 2486 if (errno == ENOSYS)
2487 /* Function not implemented. */
2488 return;
2489
08198877
JM		 2490 START (cacos);
2491 RUN_TEST_LOOP_c_c (cacos, cacos_test_data, );
2492 END (cacos, complex);
2493}
8847214f 2494
08198877
JM		 2495static const struct test_c_c_data cacosh_test_data[] =
2496 {
2497 START_DATA (cacosh),
2498 TEST_c_c (cacosh, 0, 0, 0.0, M_PI_2l),
2499 TEST_c_c (cacosh, minus_zero, 0, 0.0, M_PI_2l),
2500 TEST_c_c (cacosh, 0, minus_zero, 0.0, -M_PI_2l),
2501 TEST_c_c (cacosh, minus_zero, minus_zero, 0.0, -M_PI_2l),
2502 TEST_c_c (cacosh, minus_infty, plus_infty, plus_infty, M_PI_34l),
2503 TEST_c_c (cacosh, minus_infty, minus_infty, plus_infty, -M_PI_34l),
2504
2505 TEST_c_c (cacosh, plus_infty, plus_infty, plus_infty, M_PI_4l),
2506 TEST_c_c (cacosh, plus_infty, minus_infty, plus_infty, -M_PI_4l),
2507
2508 TEST_c_c (cacosh, -10.0, plus_infty, plus_infty, M_PI_2l),
2509 TEST_c_c (cacosh, -10.0, minus_infty, plus_infty, -M_PI_2l),
2510 TEST_c_c (cacosh, 0, plus_infty, plus_infty, M_PI_2l),
2511 TEST_c_c (cacosh, 0, minus_infty, plus_infty, -M_PI_2l),
2512 TEST_c_c (cacosh, 0.1L, plus_infty, plus_infty, M_PI_2l),
2513 TEST_c_c (cacosh, 0.1L, minus_infty, plus_infty, -M_PI_2l),
2514
2515 TEST_c_c (cacosh, minus_infty, 0, plus_infty, M_PIl),
2516 TEST_c_c (cacosh, minus_infty, minus_zero, plus_infty, -M_PIl),
2517 TEST_c_c (cacosh, minus_infty, 100, plus_infty, M_PIl),
2518 TEST_c_c (cacosh, minus_infty, -100, plus_infty, -M_PIl),
2519
2520 TEST_c_c (cacosh, plus_infty, 0, plus_infty, 0.0),
2521 TEST_c_c (cacosh, plus_infty, minus_zero, plus_infty, minus_zero),
2522 TEST_c_c (cacosh, plus_infty, 0.5, plus_infty, 0.0),
2523 TEST_c_c (cacosh, plus_infty, -0.5, plus_infty, minus_zero),
2524
2525 TEST_c_c (cacosh, plus_infty, qnan_value, plus_infty, qnan_value),
2526 TEST_c_c (cacosh, minus_infty, qnan_value, plus_infty, qnan_value),
2527
2528 TEST_c_c (cacosh, 0, qnan_value, qnan_value, qnan_value),
2529 TEST_c_c (cacosh, minus_zero, qnan_value, qnan_value, qnan_value),
2530
2531 TEST_c_c (cacosh, qnan_value, plus_infty, plus_infty, qnan_value),
2532 TEST_c_c (cacosh, qnan_value, minus_infty, plus_infty, qnan_value),
2533
2534 TEST_c_c (cacosh, 10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
2535 TEST_c_c (cacosh, -10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
2536
2537 TEST_c_c (cacosh, qnan_value, 0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
2538 TEST_c_c (cacosh, qnan_value, -0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
2539
2540 TEST_c_c (cacosh, qnan_value, qnan_value, qnan_value, qnan_value),
2541
2542 TEST_c_c (cacosh, plus_zero, -1.5L, 1.194763217287109304111930828519090523536L, -M_PI_2l),
2543 TEST_c_c (cacosh, minus_zero, -1.5L, 1.194763217287109304111930828519090523536L, -M_PI_2l),
2544 TEST_c_c (cacosh, plus_zero, -1.0L, 0.8813735870195430252326093249797923090282L, -M_PI_2l),
2545 TEST_c_c (cacosh, minus_zero, -1.0L, 0.8813735870195430252326093249797923090282L, -M_PI_2l),
2546 TEST_c_c (cacosh, plus_zero, -0.5L, 0.4812118250596034474977589134243684231352L, -M_PI_2l),
2547 TEST_c_c (cacosh, minus_zero, -0.5L, 0.4812118250596034474977589134243684231352L, -M_PI_2l),
2548 TEST_c_c (cacosh, plus_zero, 0.5L, 0.4812118250596034474977589134243684231352L, M_PI_2l),
2549 TEST_c_c (cacosh, minus_zero, 0.5L, 0.4812118250596034474977589134243684231352L, M_PI_2l),
2550 TEST_c_c (cacosh, plus_zero, 1.0L, 0.8813735870195430252326093249797923090282L, M_PI_2l),
2551 TEST_c_c (cacosh, minus_zero, 1.0L, 0.8813735870195430252326093249797923090282L, M_PI_2l),
2552 TEST_c_c (cacosh, plus_zero, 1.5L, 1.194763217287109304111930828519090523536L, M_PI_2l),
2553 TEST_c_c (cacosh, minus_zero, 1.5L, 1.194763217287109304111930828519090523536L, M_PI_2l),
2554
2555 TEST_c_c (cacosh, -1.5L, plus_zero, 0.9624236501192068949955178268487368462704L, M_PIl),
2556 TEST_c_c (cacosh, -1.5L, minus_zero, 0.9624236501192068949955178268487368462704L, -M_PIl),
2557 TEST_c_c (cacosh, -1.0L, plus_zero, plus_zero, M_PIl),
2558 TEST_c_c (cacosh, -1.0L, minus_zero, plus_zero, -M_PIl),
2559 TEST_c_c (cacosh, -0.5L, plus_zero, plus_zero, 2.094395102393195492308428922186335256131L),
2560 TEST_c_c (cacosh, -0.5L, minus_zero, plus_zero, -2.094395102393195492308428922186335256131L),
2561 TEST_c_c (cacosh, 0.5L, plus_zero, plus_zero, 1.047197551196597746154214461093167628066L),
2562 TEST_c_c (cacosh, 0.5L, minus_zero, plus_zero, -1.047197551196597746154214461093167628066L),
2563 TEST_c_c (cacosh, 1.0L, plus_zero, plus_zero, plus_zero),
2564 TEST_c_c (cacosh, 1.0L, minus_zero, plus_zero, minus_zero),
2565 TEST_c_c (cacosh, 1.5L, plus_zero, 0.9624236501192068949955178268487368462704L, plus_zero),
2566 TEST_c_c (cacosh, 1.5L, minus_zero, 0.9624236501192068949955178268487368462704L, minus_zero),
2567
2568 TEST_c_c (cacosh, 0x1p50L, 1.0L, 3.535050620855721078027883819436720218708e1L, 8.881784197001252323389053344727730248720e-16L),
2569 TEST_c_c (cacosh, 0x1p50L, -1.0L, 3.535050620855721078027883819436720218708e1L, -8.881784197001252323389053344727730248720e-16L),
2570 TEST_c_c (cacosh, -0x1p50L, 1.0L, 3.535050620855721078027883819436720218708e1L, 3.141592653589792350284223683154270545292L),
2571 TEST_c_c (cacosh, -0x1p50L, -1.0L, 3.535050620855721078027883819436720218708e1L, -3.141592653589792350284223683154270545292L),
2572 TEST_c_c (cacosh, 1.0L, 0x1p50L, 3.535050620855721078027883819436759661753e1L, 1.570796326794895731052901991514519103193L),
2573 TEST_c_c (cacosh, -1.0L, 0x1p50L, 3.535050620855721078027883819436759661753e1L, 1.570796326794897507409741391764983781004L),
2574 TEST_c_c (cacosh, 1.0L, -0x1p50L, 3.535050620855721078027883819436759661753e1L, -1.570796326794895731052901991514519103193L),
2575 TEST_c_c (cacosh, -1.0L, -0x1p50L, 3.535050620855721078027883819436759661753e1L, -1.570796326794897507409741391764983781004L),
52ce4860 2576#ifndef TEST_FLOAT
08198877
JM		 2577 TEST_c_c (cacosh, 0x1p500L, 1.0L, 3.472667374605326000180332928505464606058e2L, 3.054936363499604682051979393213617699789e-151L),
2578 TEST_c_c (cacosh, 0x1p500L, -1.0L, 3.472667374605326000180332928505464606058e2L, -3.054936363499604682051979393213617699789e-151L),
2579 TEST_c_c (cacosh, -0x1p500L, 1.0L, 3.472667374605326000180332928505464606058e2L, 3.141592653589793238462643383279502884197L),
2580 TEST_c_c (cacosh, -0x1p500L, -1.0L, 3.472667374605326000180332928505464606058e2L, -3.141592653589793238462643383279502884197L),
2581 TEST_c_c (cacosh, 1.0L, 0x1p500L, 3.472667374605326000180332928505464606058e2L, 1.570796326794896619231321691639751442099L),
2582 TEST_c_c (cacosh, -1.0L, 0x1p500L, 3.472667374605326000180332928505464606058e2L, 1.570796326794896619231321691639751442099L),
2583 TEST_c_c (cacosh, 1.0L, -0x1p500L, 3.472667374605326000180332928505464606058e2L, -1.570796326794896619231321691639751442099L),
2584 TEST_c_c (cacosh, -1.0L, -0x1p500L, 3.472667374605326000180332928505464606058e2L, -1.570796326794896619231321691639751442099L),
52ce4860
JM		 2585#endif
2586#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 2587 TEST_c_c (cacosh, 0x1p5000L, 1.0L, 3.466429049980286492395577839412341016946e3L, 7.079811261048172892385615158694057552948e-1506L),
2588 TEST_c_c (cacosh, 0x1p5000L, -1.0L, 3.466429049980286492395577839412341016946e3L, -7.079811261048172892385615158694057552948e-1506L),
2589 TEST_c_c (cacosh, -0x1p5000L, 1.0L, 3.466429049980286492395577839412341016946e3L, 3.141592653589793238462643383279502884197L),
2590 TEST_c_c (cacosh, -0x1p5000L, -1.0L, 3.466429049980286492395577839412341016946e3L, -3.141592653589793238462643383279502884197L),
2591 TEST_c_c (cacosh, 1.0L, 0x1p5000L, 3.466429049980286492395577839412341016946e3L, 1.570796326794896619231321691639751442099L),
2592 TEST_c_c (cacosh, -1.0L, 0x1p5000L, 3.466429049980286492395577839412341016946e3L, 1.570796326794896619231321691639751442099L),
2593 TEST_c_c (cacosh, 1.0L, -0x1p5000L, 3.466429049980286492395577839412341016946e3L, -1.570796326794896619231321691639751442099L),
2594 TEST_c_c (cacosh, -1.0L, -0x1p5000L, 3.466429049980286492395577839412341016946e3L, -1.570796326794896619231321691639751442099L),
2595#endif
2596 TEST_c_c (cacosh, 0x1.fp127L, 0x1.fp127L, 8.973081118419833726837456344608533993585e1L, 7.853981633974483096156608458198757210493e-1L),
52ce4860 2597#ifndef TEST_FLOAT
08198877 2598 TEST_c_c (cacosh, 0x1.fp1023L, 0x1.fp1023L, 7.107906849659093345062145442726115449315e2L, 7.853981633974483096156608458198757210493e-1L),
52ce4860
JM		 2599#endif
2600#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 2601 TEST_c_c (cacosh, 0x1.fp16383L, 0x1.fp16383L, 1.135753137836666928715489992987020363057e4L, 7.853981633974483096156608458198757210493e-1L),
2602#endif
2603 TEST_c_c (cacosh, 0x1.fp-129L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442097L),
2604 TEST_c_c (cacosh, 0x1.fp-129L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442097L),
2605 TEST_c_c (cacosh, -0x1.fp-129L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442100L),
2606 TEST_c_c (cacosh, -0x1.fp-129L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442100L),
2607 TEST_c_c (cacosh, 1.5L, 0x1.fp-129L, 9.624236501192068949955178268487368462704e-1L, 2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2608 TEST_c_c (cacosh, -1.5L, 0x1.fp-129L, 9.624236501192068949955178268487368462704e-1L, 3.141592653589793238462643383279502884195L),
2609 TEST_c_c (cacosh, 1.5L, -0x1.fp-129L, 9.624236501192068949955178268487368462704e-1L, -2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2610 TEST_c_c (cacosh, -1.5L, -0x1.fp-129L, 9.624236501192068949955178268487368462704e-1L, -3.141592653589793238462643383279502884195L),
52ce4860 2611#ifndef TEST_FLOAT
08198877
JM		 2612 TEST_c_c (cacosh, 0x1.fp-1025L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442099L),
2613 TEST_c_c (cacosh, 0x1.fp-1025L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442099L),
2614 TEST_c_c (cacosh, -0x1.fp-1025L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442099L),
2615 TEST_c_c (cacosh, -0x1.fp-1025L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442099L),
2616 TEST_c_c (cacosh, 1.5L, 0x1.fp-1025L, 9.624236501192068949955178268487368462704e-1L, 4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2617 TEST_c_c (cacosh, -1.5L, 0x1.fp-1025L, 9.624236501192068949955178268487368462704e-1L, 3.141592653589793238462643383279502884197L),
2618 TEST_c_c (cacosh, 1.5L, -0x1.fp-1025L, 9.624236501192068949955178268487368462704e-1L, -4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2619 TEST_c_c (cacosh, -1.5L, -0x1.fp-1025L, 9.624236501192068949955178268487368462704e-1L, -3.141592653589793238462643383279502884197L),
52ce4860
JM		 2620#endif
2621#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2622 TEST_c_c (cacosh, 0x1.fp-16385L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442099L),
2623 TEST_c_c (cacosh, 0x1.fp-16385L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442099L),
2624 TEST_c_c (cacosh, -0x1.fp-16385L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442099L),
2625 TEST_c_c (cacosh, -0x1.fp-16385L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442099L),
2626 TEST_c_c (cacosh, 1.5L, 0x1.fp-16385L, 9.624236501192068949955178268487368462704e-1L, 7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
2627 TEST_c_c (cacosh, -1.5L, 0x1.fp-16385L, 9.624236501192068949955178268487368462704e-1L, 3.141592653589793238462643383279502884197L),
2628 TEST_c_c (cacosh, 1.5L, -0x1.fp-16385L, 9.624236501192068949955178268487368462704e-1L, -7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
2629 TEST_c_c (cacosh, -1.5L, -0x1.fp-16385L, 9.624236501192068949955178268487368462704e-1L, -3.141592653589793238462643383279502884197L),
2630#endif
2631 TEST_c_c (cacosh, 0.5L, 1.0L, 9.261330313501824245501244453057873152694e-1L, 1.221357263937683325603909865564381489366L),
2632 TEST_c_c (cacosh, 0.5L, -1.0L, 9.261330313501824245501244453057873152694e-1L, -1.221357263937683325603909865564381489366L),
2633 TEST_c_c (cacosh, -0.5L, 1.0L, 9.261330313501824245501244453057873152694e-1L, 1.920235389652109912858733517715121394831L),
2634 TEST_c_c (cacosh, -0.5L, -1.0L, 9.261330313501824245501244453057873152694e-1L, -1.920235389652109912858733517715121394831L),
2635 TEST_c_c (cacosh, 1.0L, 0.5L, 7.328576759736452608886724437653071523305e-1L, 6.748888455860063801646649673121744318756e-1L),
2636 TEST_c_c (cacosh, -1.0L, 0.5L, 7.328576759736452608886724437653071523305e-1L, 2.466703808003786858297978415967328452322L),
2637 TEST_c_c (cacosh, 1.0L, -0.5L, 7.328576759736452608886724437653071523305e-1L, -6.748888455860063801646649673121744318756e-1L),
2638 TEST_c_c (cacosh, -1.0L, -0.5L, 7.328576759736452608886724437653071523305e-1L, -2.466703808003786858297978415967328452322L),
2639 TEST_c_c (cacosh, 0.25L, 1.0L, 8.924633639033482359562124741744951972772e-1L, 1.394493894017929688812643125003661339452L),
2640 TEST_c_c (cacosh, 0.25L, -1.0L, 8.924633639033482359562124741744951972772e-1L, -1.394493894017929688812643125003661339452L),
2641 TEST_c_c (cacosh, -0.25L, 1.0L, 8.924633639033482359562124741744951972772e-1L, 1.747098759571863549650000258275841544745L),
2642 TEST_c_c (cacosh, -0.25L, -1.0L, 8.924633639033482359562124741744951972772e-1L, -1.747098759571863549650000258275841544745L),
2643 TEST_c_c (cacosh, 1.0L, 0.25L, 5.097911466811016354623559941115413499164e-1L, 4.890443302710802929202843732146540079124e-1L),
2644 TEST_c_c (cacosh, -1.0L, 0.25L, 5.097911466811016354623559941115413499164e-1L, 2.652548323318712945542359010064848876285L),
2645 TEST_c_c (cacosh, 1.0L, -0.25L, 5.097911466811016354623559941115413499164e-1L, -4.890443302710802929202843732146540079124e-1L),
2646 TEST_c_c (cacosh, -1.0L, -0.25L, 5.097911466811016354623559941115413499164e-1L, -2.652548323318712945542359010064848876285L),
2647 TEST_c_c (cacosh, 0x1.fp-10L, 1.0L, 8.813742198809567991336704287826445879025e-1L, 1.569458417435338878318763342108699202986L),
2648 TEST_c_c (cacosh, 0x1.fp-10L, -1.0L, 8.813742198809567991336704287826445879025e-1L, -1.569458417435338878318763342108699202986L),
2649 TEST_c_c (cacosh, -0x1.fp-10L, 1.0L, 8.813742198809567991336704287826445879025e-1L, 1.572134236154454360143880041170803681211L),
2650 TEST_c_c (cacosh, -0x1.fp-10L, -1.0L, 8.813742198809567991336704287826445879025e-1L, -1.572134236154454360143880041170803681211L),
2651 TEST_c_c (cacosh, 1.0L, 0x1.fp-10L, 4.350501469856803800217957402220976497152e-2L, 4.349129763101882771258049954181971959031e-2L),
2652 TEST_c_c (cacosh, -1.0L, 0x1.fp-10L, 4.350501469856803800217957402220976497152e-2L, 3.098101355958774410750062883737683164607L),
2653 TEST_c_c (cacosh, 1.0L, -0x1.fp-10L, 4.350501469856803800217957402220976497152e-2L, -4.349129763101882771258049954181971959031e-2L),
2654 TEST_c_c (cacosh, -1.0L, -0x1.fp-10L, 4.350501469856803800217957402220976497152e-2L, -3.098101355958774410750062883737683164607L),
2655 TEST_c_c (cacosh, 0x1.fp-30L, 1.0L, 8.813735870195430258081932989769495326854e-1L, 1.570796325518966635014803151387033957091L),
2656 TEST_c_c (cacosh, 0x1.fp-30L, -1.0L, 8.813735870195430258081932989769495326854e-1L, -1.570796325518966635014803151387033957091L),
2657 TEST_c_c (cacosh, -0x1.fp-30L, 1.0L, 8.813735870195430258081932989769495326854e-1L, 1.570796328070826603447840231892468927106L),
2658 TEST_c_c (cacosh, -0x1.fp-30L, -1.0L, 8.813735870195430258081932989769495326854e-1L, -1.570796328070826603447840231892468927106L),
2659 TEST_c_c (cacosh, 1.0L, 0x1.fp-30L, 4.247867098745151888768727039216644758847e-5L, 4.247867097467650115899790787875186617316e-5L),
2660 TEST_c_c (cacosh, -1.0L, 0x1.fp-30L, 4.247867098745151888768727039216644758847e-5L, 3.141550174918818561961484385371624132331L),
2661 TEST_c_c (cacosh, 1.0L, -0x1.fp-30L, 4.247867098745151888768727039216644758847e-5L, -4.247867097467650115899790787875186617316e-5L),
2662 TEST_c_c (cacosh, -1.0L, -0x1.fp-30L, 4.247867098745151888768727039216644758847e-5L, -3.141550174918818561961484385371624132331L),
2663 TEST_c_c (cacosh, 0x1.fp-100L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691638670687364L),
2664 TEST_c_c (cacosh, 0x1.fp-100L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691638670687364L),
2665 TEST_c_c (cacosh, -0x1.fp-100L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691640832196834L),
2666 TEST_c_c (cacosh, -0x1.fp-100L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691640832196834L),
2667 TEST_c_c (cacosh, 1.0L, 0x1.fp-100L, 1.236292038260260888664514866457202186027e-15L, 1.236292038260260888664514866456887257525e-15L),
2668 TEST_c_c (cacosh, -1.0L, 0x1.fp-100L, 1.236292038260260888664514866457202186027e-15L, 3.141592653589792002170605123018614219682L),
2669 TEST_c_c (cacosh, 1.0L, -0x1.fp-100L, 1.236292038260260888664514866457202186027e-15L, -1.236292038260260888664514866456887257525e-15L),
2670 TEST_c_c (cacosh, -1.0L, -0x1.fp-100L, 1.236292038260260888664514866457202186027e-15L, -3.141592653589792002170605123018614219682L),
2671 TEST_c_c (cacosh, 0x1.fp-129L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442097L),
2672 TEST_c_c (cacosh, 0x1.fp-129L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442097L),
2673 TEST_c_c (cacosh, -0x1.fp-129L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442101L),
2674 TEST_c_c (cacosh, -0x1.fp-129L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442101L),
2675 TEST_c_c (cacosh, 1.0L, 0x1.fp-129L, 5.335635276982233498398987585285818977933e-20L, 5.335635276982233498398987585285818977930e-20L),
2676 TEST_c_c (cacosh, -1.0L, 0x1.fp-129L, 5.335635276982233498398987585285818977933e-20L, 3.141592653589793238409287030509680549213L),
2677 TEST_c_c (cacosh, 1.0L, -0x1.fp-129L, 5.335635276982233498398987585285818977933e-20L, -5.335635276982233498398987585285818977930e-20L),
2678 TEST_c_c (cacosh, -1.0L, -0x1.fp-129L, 5.335635276982233498398987585285818977933e-20L, -3.141592653589793238409287030509680549213L),
52ce4860 2679#ifndef TEST_FLOAT
08198877
JM		 2680 TEST_c_c (cacosh, 0x1.fp-1000L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2681 TEST_c_c (cacosh, 0x1.fp-1000L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2682 TEST_c_c (cacosh, -0x1.fp-1000L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2683 TEST_c_c (cacosh, -0x1.fp-1000L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2684 TEST_c_c (cacosh, 1.0L, 0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, 4.252291453851660175550490409247739011867e-151L),
2685 TEST_c_c (cacosh, -1.0L, 0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, 3.141592653589793238462643383279502884197L),
2686 TEST_c_c (cacosh, 1.0L, -0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, -4.252291453851660175550490409247739011867e-151L),
2687 TEST_c_c (cacosh, -1.0L, -0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, -3.141592653589793238462643383279502884197L),
2688 TEST_c_c (cacosh, 0x1.fp-1025L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2689 TEST_c_c (cacosh, 0x1.fp-1025L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2690 TEST_c_c (cacosh, -0x1.fp-1025L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2691 TEST_c_c (cacosh, -0x1.fp-1025L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2692 TEST_c_c (cacosh, 1.0L, 0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, 7.340879205566679497036857179189356754017e-155L),
2693 TEST_c_c (cacosh, -1.0L, 0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, 3.141592653589793238462643383279502884197L),
2694 TEST_c_c (cacosh, 1.0L, -0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, -7.340879205566679497036857179189356754017e-155L),
2695 TEST_c_c (cacosh, -1.0L, -0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, -3.141592653589793238462643383279502884197L),
52ce4860
JM		 2696#endif
2697#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2698 TEST_c_c (cacosh, 0x1.fp-10000L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2699 TEST_c_c (cacosh, 0x1.fp-10000L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2700 TEST_c_c (cacosh, -0x1.fp-10000L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2701 TEST_c_c (cacosh, -0x1.fp-10000L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2702 TEST_c_c (cacosh, 1.0L, 0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, 9.854680208706673586644342922051388714633e-1506L),
2703 TEST_c_c (cacosh, -1.0L, 0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, 3.141592653589793238462643383279502884197L),
2704 TEST_c_c (cacosh, 1.0L, -0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, -9.854680208706673586644342922051388714633e-1506L),
2705 TEST_c_c (cacosh, -1.0L, -0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, -3.141592653589793238462643383279502884197L),
2706 TEST_c_c (cacosh, 0x1.fp-16385L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2707 TEST_c_c (cacosh, 0x1.fp-16385L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2708 TEST_c_c (cacosh, -0x1.fp-16385L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2709 TEST_c_c (cacosh, -0x1.fp-16385L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2710 TEST_c_c (cacosh, 1.0L, 0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, 9.023632056840860275214893047597614177639e-2467L),
2711 TEST_c_c (cacosh, -1.0L, 0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, 3.141592653589793238462643383279502884197L),
2712 TEST_c_c (cacosh, 1.0L, -0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, -9.023632056840860275214893047597614177639e-2467L),
2713 TEST_c_c (cacosh, -1.0L, -0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, -3.141592653589793238462643383279502884197L),
2714#endif
2715 TEST_c_c (cacosh, 0x1p-23L, 0x1.000002p0L, 8.813736713132400470205730751186547909968e-1L, 1.570796242501204621739026081991856762292L),
2716 TEST_c_c (cacosh, 0x1p-23L, -0x1.000002p0L, 8.813736713132400470205730751186547909968e-1L, -1.570796242501204621739026081991856762292L),
2717 TEST_c_c (cacosh, -0x1p-23L, 0x1.000002p0L, 8.813736713132400470205730751186547909968e-1L, 1.570796411088588616723617301287646121905L),
2718 TEST_c_c (cacosh, -0x1p-23L, -0x1.000002p0L, 8.813736713132400470205730751186547909968e-1L, -1.570796411088588616723617301287646121905L),
2719 TEST_c_c (cacosh, 0x1.000002p0L, 0x1p-23L, 5.364668491573609633134147164031476452679e-4L, 2.222118384408546368406374049167636760903e-4L),
2720 TEST_c_c (cacosh, -0x1.000002p0L, 0x1p-23L, 5.364668491573609633134147164031476452679e-4L, 3.141370441751352383825802745874586120521L),
2721 TEST_c_c (cacosh, 0x1.000002p0L, -0x1p-23L, 5.364668491573609633134147164031476452679e-4L, -2.222118384408546368406374049167636760903e-4L),
2722 TEST_c_c (cacosh, -0x1.000002p0L, -0x1p-23L, 5.364668491573609633134147164031476452679e-4L, -3.141370441751352383825802745874586120521L),
2723 TEST_c_c (cacosh, 0x1.fp-129L, 0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, 1.570796326794896619231321691639751442097L),
2724 TEST_c_c (cacosh, 0x1.fp-129L, -0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, -1.570796326794896619231321691639751442097L),
2725 TEST_c_c (cacosh, -0x1.fp-129L, 0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, 1.570796326794896619231321691639751442101L),
2726 TEST_c_c (cacosh, -0x1.fp-129L, -0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, -1.570796326794896619231321691639751442101L),
2727 TEST_c_c (cacosh, 0x1.000002p0L, 0x1.fp-129L, 4.882812451493617206486388134172712975070e-4L, 5.830451806317544230969669308596361881467e-36L),
2728 TEST_c_c (cacosh, -0x1.000002p0L, 0x1.fp-129L, 4.882812451493617206486388134172712975070e-4L, 3.141592653589793238462643383279502878367L),
2729 TEST_c_c (cacosh, 0x1.000002p0L, -0x1.fp-129L, 4.882812451493617206486388134172712975070e-4L, -5.830451806317544230969669308596361881467e-36L),
2730 TEST_c_c (cacosh, -0x1.000002p0L, -0x1.fp-129L, 4.882812451493617206486388134172712975070e-4L, -3.141592653589793238462643383279502878367L),
2731 TEST_c_c (cacosh, 0.0L, 0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, 1.570796326794896619231321691639751442099L),
2732 TEST_c_c (cacosh, 0.0L, -0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, -1.570796326794896619231321691639751442099L),
2733 TEST_c_c (cacosh, -0.0L, 0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, 1.570796326794896619231321691639751442099L),
2734 TEST_c_c (cacosh, -0.0L, -0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, -1.570796326794896619231321691639751442099L),
2735 TEST_c_c (cacosh, 0x1.000002p0L, 0.0L, 4.882812451493617206486388134172712975070e-4L, 0.0L),
2736 TEST_c_c (cacosh, -0x1.000002p0L, 0.0L, 4.882812451493617206486388134172712975070e-4L, 3.141592653589793238462643383279502884197L),
2737 TEST_c_c (cacosh, 0x1.000002p0L, -0.0L, 4.882812451493617206486388134172712975070e-4L, -0.0L),
2738 TEST_c_c (cacosh, -0x1.000002p0L, -0.0L, 4.882812451493617206486388134172712975070e-4L, -3.141592653589793238462643383279502884197L),
52ce4860 2739#ifndef TEST_FLOAT
08198877
JM		 2740 TEST_c_c (cacosh, 0x1p-52L, 0x1.0000000000001p0L, 8.813735870195431822418551933572982483664e-1L, 1.570796326794896462222075823262262934288L),
2741 TEST_c_c (cacosh, 0x1p-52L, -0x1.0000000000001p0L, 8.813735870195431822418551933572982483664e-1L, -1.570796326794896462222075823262262934288L),
2742 TEST_c_c (cacosh, -0x1p-52L, 0x1.0000000000001p0L, 8.813735870195431822418551933572982483664e-1L, 1.570796326794896776240567560017239949909L),
2743 TEST_c_c (cacosh, -0x1p-52L, -0x1.0000000000001p0L, 8.813735870195431822418551933572982483664e-1L, -1.570796326794896776240567560017239949909L),
2744 TEST_c_c (cacosh, 0x1.0000000000001p0L, 0x1p-52L, 2.315303644582684770975188768022139415020e-8L, 9.590301705980041385828904092662391018164e-9L),
2745 TEST_c_c (cacosh, -0x1.0000000000001p0L, 0x1p-52L, 2.315303644582684770975188768022139415020e-8L, 3.141592643999491532482601997450598791535L),
2746 TEST_c_c (cacosh, 0x1.0000000000001p0L, -0x1p-52L, 2.315303644582684770975188768022139415020e-8L, -9.590301705980041385828904092662391018164e-9L),
2747 TEST_c_c (cacosh, -0x1.0000000000001p0L, -0x1p-52L, 2.315303644582684770975188768022139415020e-8L, -3.141592643999491532482601997450598791535L),
2748 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, 1.570796326794896619231321691639751442099L),
2749 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, -1.570796326794896619231321691639751442099L),
2750 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, 1.570796326794896619231321691639751442099L),
2751 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, -1.570796326794896619231321691639751442099L),
2752 TEST_c_c (cacosh, 0x1.0000000000001p0L, 0x1.fp-1025L, 2.107342425544701550354780375182800088393e-8L, 2.557178503953494342609835913586108008322e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2753 TEST_c_c (cacosh, -0x1.0000000000001p0L, 0x1.fp-1025L, 2.107342425544701550354780375182800088393e-8L, 3.141592653589793238462643383279502884197L),
2754 TEST_c_c (cacosh, 0x1.0000000000001p0L, -0x1.fp-1025L, 2.107342425544701550354780375182800088393e-8L, -2.557178503953494342609835913586108008322e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2755 TEST_c_c (cacosh, -0x1.0000000000001p0L, -0x1.fp-1025L, 2.107342425544701550354780375182800088393e-8L, -3.141592653589793238462643383279502884197L),
2756 TEST_c_c (cacosh, 0.0L, 0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, 1.570796326794896619231321691639751442099L),
2757 TEST_c_c (cacosh, 0.0L, -0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, -1.570796326794896619231321691639751442099L),
2758 TEST_c_c (cacosh, -0.0L, 0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, 1.570796326794896619231321691639751442099L),
2759 TEST_c_c (cacosh, -0.0L, -0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, -1.570796326794896619231321691639751442099L),
2760 TEST_c_c (cacosh, 0x1.0000000000001p0L, 0.0L, 2.107342425544701550354780375182800088393e-8L, 0.0L),
2761 TEST_c_c (cacosh, -0x1.0000000000001p0L, 0.0L, 2.107342425544701550354780375182800088393e-8L, 3.141592653589793238462643383279502884197L),
2762 TEST_c_c (cacosh, 0x1.0000000000001p0L, -0.0L, 2.107342425544701550354780375182800088393e-8L, -0.0L),
2763 TEST_c_c (cacosh, -0x1.0000000000001p0L, -0.0L, 2.107342425544701550354780375182800088393e-8L, -3.141592653589793238462643383279502884197L),
52ce4860
JM		 2764#endif
2765#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 2766 TEST_c_c (cacosh, 0x1p-63L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610131001e-1L, 1.570796326794896619154657020805582738031L),
2767 TEST_c_c (cacosh, 0x1p-63L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610131001e-1L, -1.570796326794896619154657020805582738031L),
2768 TEST_c_c (cacosh, -0x1p-63L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610131001e-1L, 1.570796326794896619307986362473920146166L),
2769 TEST_c_c (cacosh, -0x1p-63L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610131001e-1L, -1.570796326794896619307986362473920146166L),
2770 TEST_c_c (cacosh, 0x1.0000000000000002p0L, 0x1p-63L, 5.116146586219826555037807251857670783420e-10L, 2.119177303101063432592523199680782317447e-10L),
2771 TEST_c_c (cacosh, -0x1.0000000000000002p0L, 0x1p-63L, 5.116146586219826555037807251857670783420e-10L, 3.141592653377875508152537040020250564229L),
2772 TEST_c_c (cacosh, 0x1.0000000000000002p0L, -0x1p-63L, 5.116146586219826555037807251857670783420e-10L, -2.119177303101063432592523199680782317447e-10L),
2773 TEST_c_c (cacosh, -0x1.0000000000000002p0L, -0x1p-63L, 5.116146586219826555037807251857670783420e-10L, -3.141592653377875508152537040020250564229L),
52ce4860 2774# if LDBL_MIN_EXP <= -16381
08198877
JM		 2775 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, 1.570796326794896619231321691639751442099L),
2776 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, -1.570796326794896619231321691639751442099L),
2777 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, 1.570796326794896619231321691639751442099L),
2778 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, -1.570796326794896619231321691639751442099L),
2779 TEST_c_c (cacosh, 0x1.0000000000000002p0L, 0x1.fp-16385L, 4.656612873077392578082927418388212703712e-10L, 1.748608650034385653922359120438227480943e-4923L),
2780 TEST_c_c (cacosh, -0x1.0000000000000002p0L, 0x1.fp-16385L, 4.656612873077392578082927418388212703712e-10L, 3.141592653589793238462643383279502884197L),
2781 TEST_c_c (cacosh, 0x1.0000000000000002p0L, -0x1.fp-16385L, 4.656612873077392578082927418388212703712e-10L, -1.748608650034385653922359120438227480943e-4923L),
2782 TEST_c_c (cacosh, -0x1.0000000000000002p0L, -0x1.fp-16385L, 4.656612873077392578082927418388212703712e-10L, -3.141592653589793238462643383279502884197L),
52ce4860 2783# endif
08198877
JM		 2784 TEST_c_c (cacosh, 0.0L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, 1.570796326794896619231321691639751442099L),
2785 TEST_c_c (cacosh, 0.0L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, -1.570796326794896619231321691639751442099L),
2786 TEST_c_c (cacosh, -0.0L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, 1.570796326794896619231321691639751442099L),
2787 TEST_c_c (cacosh, -0.0L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, -1.570796326794896619231321691639751442099L),
2788 TEST_c_c (cacosh, 0x1.0000000000000002p0L, 0.0L, 4.656612873077392578082927418388212703712e-10L, 0.0L),
2789 TEST_c_c (cacosh, -0x1.0000000000000002p0L, 0.0L, 4.656612873077392578082927418388212703712e-10L, 3.141592653589793238462643383279502884197L),
2790 TEST_c_c (cacosh, 0x1.0000000000000002p0L, -0.0L, 4.656612873077392578082927418388212703712e-10L, -0.0L),
2791 TEST_c_c (cacosh, -0x1.0000000000000002p0L, -0.0L, 4.656612873077392578082927418388212703712e-10L, -3.141592653589793238462643383279502884197L),
52ce4860
JM		 2792#endif
2793#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 2794 TEST_c_c (cacosh, 0x1p-106L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639742726335L),
2795 TEST_c_c (cacosh, 0x1p-106L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639742726335L),
2796 TEST_c_c (cacosh, -0x1p-106L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639760157863L),
2797 TEST_c_c (cacosh, -0x1p-106L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639760157863L),
2798 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, 0x1p-106L, 2.285028863093221674154232933662774454211e-16L, 5.394221422390606848017034778914096659726e-17L),
2799 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, 0x1p-106L, 2.285028863093221674154232933662774454211e-16L, 3.141592653589793184520429159373434404027L),
2800 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, -0x1p-106L, 2.285028863093221674154232933662774454211e-16L, -5.394221422390606848017034778914096659726e-17L),
2801 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, -0x1p-106L, 2.285028863093221674154232933662774454211e-16L, -3.141592653589793184520429159373434404027L),
2802 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639751442099L),
2803 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639751442099L),
2804 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639751442099L),
2805 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639751442099L),
2806 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 2.220446049250313080847263336181636063482e-16L, 2.426922623448365473354662093431821897807e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2807 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 2.220446049250313080847263336181636063482e-16L, 3.141592653589793238462643383279502884197L),
2808 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 2.220446049250313080847263336181636063482e-16L, -2.426922623448365473354662093431821897807e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2809 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 2.220446049250313080847263336181636063482e-16L, -3.141592653589793238462643383279502884197L),
2810 TEST_c_c (cacosh, 0.0L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639751442099L),
2811 TEST_c_c (cacosh, 0.0L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639751442099L),
2812 TEST_c_c (cacosh, -0.0L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639751442099L),
2813 TEST_c_c (cacosh, -0.0L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639751442099L),
2814 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, 0.0L, 2.220446049250313080847263336181636063482e-16L, 0.0L),
2815 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, 0.0L, 2.220446049250313080847263336181636063482e-16L, 3.141592653589793238462643383279502884197L),
2816 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, -0.0L, 2.220446049250313080847263336181636063482e-16L, -0.0L),
2817 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, -0.0L, 2.220446049250313080847263336181636063482e-16L, -3.141592653589793238462643383279502884197L),
52ce4860
JM		 2818#endif
2819#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 2820 TEST_c_c (cacosh, 0x1p-113L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751374007L),
2821 TEST_c_c (cacosh, 0x1p-113L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751374007L),
2822 TEST_c_c (cacosh, -0x1p-113L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751510190L),
2823 TEST_c_c (cacosh, -0x1p-113L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751510190L),
2824 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, 0x1p-113L, 2.019699255375255198156433710951064632386e-17L, 4.767863183742677481693563511435642755521e-18L),
2825 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, 0x1p-113L, 2.019699255375255198156433710951064632386e-17L, 3.141592653589793233694780199536825402504L),
2826 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, -0x1p-113L, 2.019699255375255198156433710951064632386e-17L, -4.767863183742677481693563511435642755521e-18L),
2827 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, -0x1p-113L, 2.019699255375255198156433710951064632386e-17L, -3.141592653589793233694780199536825402504L),
2828 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751442099L),
2829 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751442099L),
2830 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751442099L),
2831 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751442099L),
2832 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 1.962615573354718824241727964954454332780e-17L, 4.148847925325683229178506116378864361396e-4916L),
2833 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 1.962615573354718824241727964954454332780e-17L, 3.141592653589793238462643383279502884197L),
2834 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 1.962615573354718824241727964954454332780e-17L, -4.148847925325683229178506116378864361396e-4916L),
2835 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 1.962615573354718824241727964954454332780e-17L, -3.141592653589793238462643383279502884197L),
2836 TEST_c_c (cacosh, 0.0L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751442099L),
2837 TEST_c_c (cacosh, 0.0L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751442099L),
2838 TEST_c_c (cacosh, -0.0L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751442099L),
2839 TEST_c_c (cacosh, -0.0L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751442099L),
2840 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, 0.0L, 1.962615573354718824241727964954454332780e-17L, 0.0L),
2841 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, 0.0L, 1.962615573354718824241727964954454332780e-17L, 3.141592653589793238462643383279502884197L),
2842 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, -0.0L, 1.962615573354718824241727964954454332780e-17L, -0.0L),
2843 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, -0.0L, 1.962615573354718824241727964954454332780e-17L, -3.141592653589793238462643383279502884197L),
2844#endif
2845 TEST_c_c (cacosh, 0x1p-23L, 0x0.ffffffp0L, 8.813735448726963984495965873956465777250e-1L, 1.570796242501197085295336701632142060969L),
2846 TEST_c_c (cacosh, 0x1p-23L, -0x0.ffffffp0L, 8.813735448726963984495965873956465777250e-1L, -1.570796242501197085295336701632142060969L),
2847 TEST_c_c (cacosh, -0x1p-23L, 0x0.ffffffp0L, 8.813735448726963984495965873956465777250e-1L, 1.570796411088596153167306681647360823228L),
2848 TEST_c_c (cacosh, -0x1p-23L, -0x0.ffffffp0L, 8.813735448726963984495965873956465777250e-1L, -1.570796411088596153167306681647360823228L),
2849 TEST_c_c (cacosh, 0x0.ffffffp0L, 0x1p-23L, 2.714321200917194650737217746780928423385e-4L, 4.391863861910487109445187743978204002614e-4L),
2850 TEST_c_c (cacosh, -0x0.ffffffp0L, 0x1p-23L, 2.714321200917194650737217746780928423385e-4L, 3.141153467203602189751698864505105063797L),
2851 TEST_c_c (cacosh, 0x0.ffffffp0L, -0x1p-23L, 2.714321200917194650737217746780928423385e-4L, -4.391863861910487109445187743978204002614e-4L),
2852 TEST_c_c (cacosh, -0x0.ffffffp0L, -0x1p-23L, 2.714321200917194650737217746780928423385e-4L, -3.141153467203602189751698864505105063797L),
2853 TEST_c_c (cacosh, 0x1.fp-129L, 0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, 1.570796326794896619231321691639751442097L),
2854 TEST_c_c (cacosh, 0x1.fp-129L, -0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, -1.570796326794896619231321691639751442097L),
2855 TEST_c_c (cacosh, -0x1.fp-129L, 0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, 1.570796326794896619231321691639751442101L),
2856 TEST_c_c (cacosh, -0x1.fp-129L, -0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, -1.570796326794896619231321691639751442101L),
2857 TEST_c_c (cacosh, 0x0.ffffffp0L, 0x1.fp-129L, 8.245504387859737323891843603996428534945e-36L, 3.452669847162035876032494826387364972849e-4L),
2858 TEST_c_c (cacosh, -0x0.ffffffp0L, 0x1.fp-129L, 8.245504387859737323891843603996428534945e-36L, 3.141247386605077034875040133796864147700L),
2859 TEST_c_c (cacosh, 0x0.ffffffp0L, -0x1.fp-129L, 8.245504387859737323891843603996428534945e-36L, -3.452669847162035876032494826387364972849e-4L),
2860 TEST_c_c (cacosh, -0x0.ffffffp0L, -0x1.fp-129L, 8.245504387859737323891843603996428534945e-36L, -3.141247386605077034875040133796864147700L),
2861 TEST_c_c (cacosh, 0.0L, 0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, 1.570796326794896619231321691639751442099L),
2862 TEST_c_c (cacosh, 0.0L, -0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, -1.570796326794896619231321691639751442099L),
2863 TEST_c_c (cacosh, -0.0L, 0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, 1.570796326794896619231321691639751442099L),
2864 TEST_c_c (cacosh, -0.0L, -0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, -1.570796326794896619231321691639751442099L),
2865 TEST_c_c (cacosh, 0x0.ffffffp0L, 0.0L, 0.0L, 3.452669847162035876032494826387364972849e-4L),
2866 TEST_c_c (cacosh, -0x0.ffffffp0L, 0.0L, 0.0L, 3.141247386605077034875040133796864147700L),
2867 TEST_c_c (cacosh, 0x0.ffffffp0L, -0.0L, 0.0L, -3.452669847162035876032494826387364972849e-4L),
2868 TEST_c_c (cacosh, -0x0.ffffffp0L, -0.0L, 0.0L, -3.141247386605077034875040133796864147700L),
2869 TEST_c_c (cacosh, 0x1p-23L, 0.5L, 4.812118250596059896127318386463676808798e-1L, 1.570796220170866625230343643673321150378L),
2870 TEST_c_c (cacosh, 0x1p-23L, -0.5L, 4.812118250596059896127318386463676808798e-1L, -1.570796220170866625230343643673321150378L),
2871 TEST_c_c (cacosh, -0x1p-23L, 0.5L, 4.812118250596059896127318386463676808798e-1L, 1.570796433418926613232299739606181733819L),
2872 TEST_c_c (cacosh, -0x1p-23L, -0.5L, 4.812118250596059896127318386463676808798e-1L, -1.570796433418926613232299739606181733819L),
2873 TEST_c_c (cacosh, 0.5L, 0x1p-23L, 1.376510308240943236356088341381173571841e-7L, 1.047197551196603215914744618665204532273L),
2874 TEST_c_c (cacosh, -0.5L, 0x1p-23L, 1.376510308240943236356088341381173571841e-7L, 2.094395102393190022547898764614298351924L),
2875 TEST_c_c (cacosh, 0.5L, -0x1p-23L, 1.376510308240943236356088341381173571841e-7L, -1.047197551196603215914744618665204532273L),
2876 TEST_c_c (cacosh, -0.5L, -0x1p-23L, 1.376510308240943236356088341381173571841e-7L, -2.094395102393190022547898764614298351924L),
2877 TEST_c_c (cacosh, 0x1.fp-129L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442096L),
2878 TEST_c_c (cacosh, 0x1.fp-129L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442096L),
2879 TEST_c_c (cacosh, -0x1.fp-129L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442101L),
2880 TEST_c_c (cacosh, -0x1.fp-129L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442101L),
2881 TEST_c_c (cacosh, 0.5L, 0x1.fp-129L, 3.287317402534702257036015056278368274737e-39L, 1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION_FLOAT),
2882 TEST_c_c (cacosh, -0.5L, 0x1.fp-129L, 3.287317402534702257036015056278368274737e-39L, 2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION_FLOAT),
2883 TEST_c_c (cacosh, 0.5L, -0x1.fp-129L, 3.287317402534702257036015056278368274737e-39L, -1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION_FLOAT),
2884 TEST_c_c (cacosh, -0.5L, -0x1.fp-129L, 3.287317402534702257036015056278368274737e-39L, -2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION_FLOAT),
2885 TEST_c_c (cacosh, 0x1p-23L, 0x1p-23L, 1.192092895507818146886315028596704749235e-7L, 1.570796207585607068450636380271254316214L),
2886 TEST_c_c (cacosh, 0x1p-23L, -0x1p-23L, 1.192092895507818146886315028596704749235e-7L, -1.570796207585607068450636380271254316214L),
2887 TEST_c_c (cacosh, -0x1p-23L, 0x1p-23L, 1.192092895507818146886315028596704749235e-7L, 1.570796446004186170012007003008248567984L),
2888 TEST_c_c (cacosh, -0x1p-23L, -0x1p-23L, 1.192092895507818146886315028596704749235e-7L, -1.570796446004186170012007003008248567984L),
2889 TEST_c_c (cacosh, 0x1.fp-129L, 0x1p-23L, 1.192092895507809676556842485683592032154e-7L, 1.570796326794896619231321691639751442096L),
2890 TEST_c_c (cacosh, 0x1.fp-129L, -0x1p-23L, 1.192092895507809676556842485683592032154e-7L, -1.570796326794896619231321691639751442096L),
2891 TEST_c_c (cacosh, -0x1.fp-129L, 0x1p-23L, 1.192092895507809676556842485683592032154e-7L, 1.570796326794896619231321691639751442101L),
2892 TEST_c_c (cacosh, -0x1.fp-129L, -0x1p-23L, 1.192092895507809676556842485683592032154e-7L, -1.570796326794896619231321691639751442101L),
2893 TEST_c_c (cacosh, 0x1p-23L, 0x1.fp-129L, 2.846900380897747786805634596726756660388e-39L, 1.570796207585607068449789347324000006847L, UNDERFLOW_EXCEPTION_FLOAT),
2894 TEST_c_c (cacosh, -0x1p-23L, 0x1.fp-129L, 2.846900380897747786805634596726756660388e-39L, 1.570796446004186170012854035955502877351L, UNDERFLOW_EXCEPTION_FLOAT),
2895 TEST_c_c (cacosh, 0x1p-23L, -0x1.fp-129L, 2.846900380897747786805634596726756660388e-39L, -1.570796207585607068449789347324000006847L, UNDERFLOW_EXCEPTION_FLOAT),
2896 TEST_c_c (cacosh, -0x1p-23L, -0x1.fp-129L, 2.846900380897747786805634596726756660388e-39L, -1.570796446004186170012854035955502877351L, UNDERFLOW_EXCEPTION_FLOAT),
2897 TEST_c_c (cacosh, 0.0L, 0x1p-23L, 1.192092895507809676556842485683592032154e-7L, 1.570796326794896619231321691639751442099L),
2898 TEST_c_c (cacosh, 0.0L, -0x1p-23L, 1.192092895507809676556842485683592032154e-7L, -1.570796326794896619231321691639751442099L),
2899 TEST_c_c (cacosh, -0.0L, 0x1p-23L, 1.192092895507809676556842485683592032154e-7L, 1.570796326794896619231321691639751442099L),
2900 TEST_c_c (cacosh, -0.0L, -0x1p-23L, 1.192092895507809676556842485683592032154e-7L, -1.570796326794896619231321691639751442099L),
2901 TEST_c_c (cacosh, 0x1p-23L, 0.0L, 0.0L, 1.570796207585607068449789347324000006847L),
2902 TEST_c_c (cacosh, -0x1p-23L, 0.0L, 0.0L, 1.570796446004186170012854035955502877351L),
2903 TEST_c_c (cacosh, 0x1p-23L, -0.0L, 0.0L, -1.570796207585607068449789347324000006847L),
2904 TEST_c_c (cacosh, -0x1p-23L, -0.0L, 0.0L, -1.570796446004186170012854035955502877351L),
2905 TEST_c_c (cacosh, 0x1.fp-129L, 0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, 1.570796326794896619231321691639751442096L, UNDERFLOW_EXCEPTION_FLOAT),
2906 TEST_c_c (cacosh, 0x1.fp-129L, -0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, -1.570796326794896619231321691639751442096L, UNDERFLOW_EXCEPTION_FLOAT),
2907 TEST_c_c (cacosh, -0x1.fp-129L, 0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, 1.570796326794896619231321691639751442101L, UNDERFLOW_EXCEPTION_FLOAT),
2908 TEST_c_c (cacosh, -0x1.fp-129L, -0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, -1.570796326794896619231321691639751442101L, UNDERFLOW_EXCEPTION_FLOAT),
52ce4860 2909#ifndef TEST_FLOAT
08198877
JM		 2910 TEST_c_c (cacosh, 0x1p-52L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910458761820e-1L, 1.570796326794896462222075823262236786996L),
2911 TEST_c_c (cacosh, 0x1p-52L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910458761820e-1L, -1.570796326794896462222075823262236786996L),
2912 TEST_c_c (cacosh, -0x1p-52L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910458761820e-1L, 1.570796326794896776240567560017266097201L),
2913 TEST_c_c (cacosh, -0x1p-52L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910458761820e-1L, -1.570796326794896776240567560017266097201L),
2914 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, 0x1p-52L, 1.171456840272878582596796205397918831268e-8L, 1.895456983915074112227925127005564372844e-8L),
2915 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, 0x1p-52L, 1.171456840272878582596796205397918831268e-8L, 3.141592634635223399311902261000251614142L),
2916 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, -0x1p-52L, 1.171456840272878582596796205397918831268e-8L, -1.895456983915074112227925127005564372844e-8L),
2917 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, -0x1p-52L, 1.171456840272878582596796205397918831268e-8L, -3.141592634635223399311902261000251614142L),
2918 TEST_c_c (cacosh, 0x1.fp-1025L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, 1.570796326794896619231321691639751442099L),
2919 TEST_c_c (cacosh, 0x1.fp-1025L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, -1.570796326794896619231321691639751442099L),
2920 TEST_c_c (cacosh, -0x1.fp-1025L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, 1.570796326794896619231321691639751442099L),
2921 TEST_c_c (cacosh, -0x1.fp-1025L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, -1.570796326794896619231321691639751442099L),
2922 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, 0x1.fp-1025L, 3.616396521699973256461764099945789620604e-301L, 1.490116119384765638786343542550461592240e-8L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2923 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, 0x1.fp-1025L, 3.616396521699973256461764099945789620604e-301L, 3.141592638688632044614986995416067458693L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2924 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, -0x1.fp-1025L, 3.616396521699973256461764099945789620604e-301L, -1.490116119384765638786343542550461592240e-8L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2925 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, -0x1.fp-1025L, 3.616396521699973256461764099945789620604e-301L, -3.141592638688632044614986995416067458693L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2926 TEST_c_c (cacosh, 0.0L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, 1.570796326794896619231321691639751442099L),
2927 TEST_c_c (cacosh, 0.0L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, -1.570796326794896619231321691639751442099L),
2928 TEST_c_c (cacosh, -0.0L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, 1.570796326794896619231321691639751442099L),
2929 TEST_c_c (cacosh, -0.0L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, -1.570796326794896619231321691639751442099L),
2930 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, 0.0L, 0.0L, 1.490116119384765638786343542550461592240e-8L),
2931 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, 0.0L, 0.0L, 3.141592638688632044614986995416067458693L),
2932 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, -0.0L, 0.0L, -1.490116119384765638786343542550461592240e-8L),
2933 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, -0.0L, 0.0L, -3.141592638688632044614986995416067458693L),
2934#endif
2935 TEST_c_c (cacosh, 0x1p-52L, 0.5L, 4.812118250596034474977589134243772428682e-1L, 1.570796326794896420628589431857911675917L),
2936 TEST_c_c (cacosh, 0x1p-52L, -0.5L, 4.812118250596034474977589134243772428682e-1L, -1.570796326794896420628589431857911675917L),
2937 TEST_c_c (cacosh, -0x1p-52L, 0.5L, 4.812118250596034474977589134243772428682e-1L, 1.570796326794896817834053951421591208280L),
2938 TEST_c_c (cacosh, -0x1p-52L, -0.5L, 4.812118250596034474977589134243772428682e-1L, -1.570796326794896817834053951421591208280L),
2939 TEST_c_c (cacosh, 0.5L, 0x1p-52L, 2.563950248511418570403591756798643804971e-16L, 1.047197551196597746154214461093186605110L),
2940 TEST_c_c (cacosh, -0.5L, 0x1p-52L, 2.563950248511418570403591756798643804971e-16L, 2.094395102393195492308428922186316279087L),
2941 TEST_c_c (cacosh, 0.5L, -0x1p-52L, 2.563950248511418570403591756798643804971e-16L, -1.047197551196597746154214461093186605110L),
2942 TEST_c_c (cacosh, -0.5L, -0x1p-52L, 2.563950248511418570403591756798643804971e-16L, -2.094395102393195492308428922186316279087L),
52ce4860 2943#ifndef TEST_FLOAT
08198877
JM		 2944 TEST_c_c (cacosh, 0x1.fp-1025L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442099L),
2945 TEST_c_c (cacosh, 0x1.fp-1025L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442099L),
2946 TEST_c_c (cacosh, -0x1.fp-1025L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442099L),
2947 TEST_c_c (cacosh, -0x1.fp-1025L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442099L),
2948 TEST_c_c (cacosh, 0.5L, 0x1.fp-1025L, 6.222508863508420569166420770843207333493e-309L, 1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION_DOUBLE),
2949 TEST_c_c (cacosh, -0.5L, 0x1.fp-1025L, 6.222508863508420569166420770843207333493e-309L, 2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION_DOUBLE),
2950 TEST_c_c (cacosh, 0.5L, -0x1.fp-1025L, 6.222508863508420569166420770843207333493e-309L, -1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION_DOUBLE),
2951 TEST_c_c (cacosh, -0.5L, -0x1.fp-1025L, 6.222508863508420569166420770843207333493e-309L, -2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION_DOUBLE),
2952#endif
2953 TEST_c_c (cacosh, 0x1p-52L, 0x1p-52L, 2.220446049250313080847263336181677117148e-16L, 1.570796326794896397186716766608443357372L),
2954 TEST_c_c (cacosh, 0x1p-52L, -0x1p-52L, 2.220446049250313080847263336181677117148e-16L, -1.570796326794896397186716766608443357372L),
2955 TEST_c_c (cacosh, -0x1p-52L, 0x1p-52L, 2.220446049250313080847263336181677117148e-16L, 1.570796326794896841275926616671059526825L),
2956 TEST_c_c (cacosh, -0x1p-52L, -0x1p-52L, 2.220446049250313080847263336181677117148e-16L, -1.570796326794896841275926616671059526825L),
52ce4860 2957#ifndef TEST_FLOAT
08198877
JM		 2958 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1p-52L, 2.220446049250313080847263336181622378926e-16L, 1.570796326794896619231321691639751442099L),
2959 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1p-52L, 2.220446049250313080847263336181622378926e-16L, -1.570796326794896619231321691639751442099L),
2960 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1p-52L, 2.220446049250313080847263336181622378926e-16L, 1.570796326794896619231321691639751442099L),
2961 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1p-52L, 2.220446049250313080847263336181622378926e-16L, -1.570796326794896619231321691639751442099L),
2962 TEST_c_c (cacosh, 0x1p-52L, 0x1.fp-1025L, 5.388850751072128349671657362289548938458e-309L, 1.570796326794896397186716766608443357372L, UNDERFLOW_EXCEPTION_DOUBLE),
2963 TEST_c_c (cacosh, -0x1p-52L, 0x1.fp-1025L, 5.388850751072128349671657362289548938458e-309L, 1.570796326794896841275926616671059526825L, UNDERFLOW_EXCEPTION_DOUBLE),
2964 TEST_c_c (cacosh, 0x1p-52L, -0x1.fp-1025L, 5.388850751072128349671657362289548938458e-309L, -1.570796326794896397186716766608443357372L, UNDERFLOW_EXCEPTION_DOUBLE),
2965 TEST_c_c (cacosh, -0x1p-52L, -0x1.fp-1025L, 5.388850751072128349671657362289548938458e-309L, -1.570796326794896841275926616671059526825L, UNDERFLOW_EXCEPTION_DOUBLE),
2966#endif
2967 TEST_c_c (cacosh, 0.0L, 0x1p-52L, 2.220446049250313080847263336181622378926e-16L, 1.570796326794896619231321691639751442099L),
2968 TEST_c_c (cacosh, 0.0L, -0x1p-52L, 2.220446049250313080847263336181622378926e-16L, -1.570796326794896619231321691639751442099L),
2969 TEST_c_c (cacosh, -0.0L, 0x1p-52L, 2.220446049250313080847263336181622378926e-16L, 1.570796326794896619231321691639751442099L),
2970 TEST_c_c (cacosh, -0.0L, -0x1p-52L, 2.220446049250313080847263336181622378926e-16L, -1.570796326794896619231321691639751442099L),
2971 TEST_c_c (cacosh, 0x1p-52L, 0.0L, 0.0L, 1.570796326794896397186716766608443357372L),
2972 TEST_c_c (cacosh, -0x1p-52L, 0.0L, 0.0L, 1.570796326794896841275926616671059526825L),
2973 TEST_c_c (cacosh, 0x1p-52L, -0.0L, 0.0L, -1.570796326794896397186716766608443357372L),
2974 TEST_c_c (cacosh, -0x1p-52L, -0.0L, 0.0L, -1.570796326794896841275926616671059526825L),
52ce4860 2975#ifndef TEST_FLOAT
08198877
JM		 2976 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
2977 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
2978 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
2979 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
52ce4860
JM		 2980#endif
2981#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 2982 TEST_c_c (cacosh, 0x1p-63L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569937e-1L, 1.570796326794896619154657020805582738025L),
2983 TEST_c_c (cacosh, 0x1p-63L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569937e-1L, -1.570796326794896619154657020805582738025L),
2984 TEST_c_c (cacosh, -0x1p-63L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569937e-1L, 1.570796326794896619307986362473920146173L),
2985 TEST_c_c (cacosh, -0x1p-63L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569937e-1L, -1.570796326794896619307986362473920146173L),
2986 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, 0x1p-63L, 2.588578361325995866221775673638805081337e-10L, 4.188407771167967636741951941902992986043e-10L),
2987 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, 0x1p-63L, 2.588578361325995866221775673638805081337e-10L, 3.141592653170952461345846619605307690007L),
2988 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, -0x1p-63L, 2.588578361325995866221775673638805081337e-10L, -4.188407771167967636741951941902992986043e-10L),
2989 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, -0x1p-63L, 2.588578361325995866221775673638805081337e-10L, -3.141592653170952461345846619605307690007L),
52ce4860 2990# if LDBL_MIN_EXP <= -16381
08198877
JM		 2991 TEST_c_c (cacosh, 0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, 1.570796326794896619231321691639751442099L),
2992 TEST_c_c (cacosh, 0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, -1.570796326794896619231321691639751442099L),
2993 TEST_c_c (cacosh, -0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, 1.570796326794896619231321691639751442099L),
2994 TEST_c_c (cacosh, -0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, -1.570796326794896619231321691639751442099L),
2995 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 2.472906068161537187835415298076415423459e-4923L, 3.292722539913596233371825532007990724506e-10L),
2996 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 2.472906068161537187835415298076415423459e-4923L, 3.141592653260520984471283759942320330996L),
2997 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 2.472906068161537187835415298076415423459e-4923L, -3.292722539913596233371825532007990724506e-10L),
2998 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 2.472906068161537187835415298076415423459e-4923L, -3.141592653260520984471283759942320330996L),
52ce4860 2999# endif
08198877
JM		 3000 TEST_c_c (cacosh, 0.0L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, 1.570796326794896619231321691639751442099L),
3001 TEST_c_c (cacosh, 0.0L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, -1.570796326794896619231321691639751442099L),
3002 TEST_c_c (cacosh, -0.0L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, 1.570796326794896619231321691639751442099L),
3003 TEST_c_c (cacosh, -0.0L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, -1.570796326794896619231321691639751442099L),
3004 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, 0.0L, 0.0L, 3.292722539913596233371825532007990724506e-10L),
3005 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, 0.0L, 0.0L, 3.141592653260520984471283759942320330996L),
3006 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, -0.0L, 0.0L, -3.292722539913596233371825532007990724506e-10L),
3007 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, -0.0L, 0.0L, -3.141592653260520984471283759942320330996L),
3008#endif
3009 TEST_c_c (cacosh, 0x1p-63L, 0.5L, 4.812118250596034474977589134243684231373e-1L, 1.570796326794896619134347701278529840650L),
3010 TEST_c_c (cacosh, 0x1p-63L, -0.5L, 4.812118250596034474977589134243684231373e-1L, -1.570796326794896619134347701278529840650L),
3011 TEST_c_c (cacosh, -0x1p-63L, 0.5L, 4.812118250596034474977589134243684231373e-1L, 1.570796326794896619328295682000973043547L),
3012 TEST_c_c (cacosh, -0x1p-63L, -0.5L, 4.812118250596034474977589134243684231373e-1L, -1.570796326794896619328295682000973043547L),
3013 TEST_c_c (cacosh, 0.5L, 0x1p-63L, 1.251928832280966098829878787499365228659e-19L, 1.047197551196597746154214461093167628070L),
3014 TEST_c_c (cacosh, -0.5L, 0x1p-63L, 1.251928832280966098829878787499365228659e-19L, 2.094395102393195492308428922186335256127L),
3015 TEST_c_c (cacosh, 0.5L, -0x1p-63L, 1.251928832280966098829878787499365228659e-19L, -1.047197551196597746154214461093167628070L),
3016 TEST_c_c (cacosh, -0.5L, -0x1p-63L, 1.251928832280966098829878787499365228659e-19L, -2.094395102393195492308428922186335256127L),
52ce4860 3017#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3018 TEST_c_c (cacosh, 0x1.fp-16385L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442099L),
3019 TEST_c_c (cacosh, 0x1.fp-16385L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442099L),
3020 TEST_c_c (cacosh, -0x1.fp-16385L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442099L),
3021 TEST_c_c (cacosh, -0x1.fp-16385L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442099L),
3022 TEST_c_c (cacosh, 0.5L, 0x1.fp-16385L, 9.402257155670418112159334875199821342890e-4933L, 1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION),
3023 TEST_c_c (cacosh, -0.5L, 0x1.fp-16385L, 9.402257155670418112159334875199821342890e-4933L, 2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION),
3024 TEST_c_c (cacosh, 0.5L, -0x1.fp-16385L, 9.402257155670418112159334875199821342890e-4933L, -1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION),
3025 TEST_c_c (cacosh, -0.5L, -0x1.fp-16385L, 9.402257155670418112159334875199821342890e-4933L, -2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION),
3026#endif
3027 TEST_c_c (cacosh, 0x1p-63L, 0x1p-63L, 1.084202172485504434007452800869941711430e-19L, 1.570796326794896619122901474391200998698L),
3028 TEST_c_c (cacosh, 0x1p-63L, -0x1p-63L, 1.084202172485504434007452800869941711430e-19L, -1.570796326794896619122901474391200998698L),
3029 TEST_c_c (cacosh, -0x1p-63L, 0x1p-63L, 1.084202172485504434007452800869941711430e-19L, 1.570796326794896619339741908888301885499L),
3030 TEST_c_c (cacosh, -0x1p-63L, -0x1p-63L, 1.084202172485504434007452800869941711430e-19L, -1.570796326794896619339741908888301885499L),
52ce4860 3031#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3032 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1p-63L, 1.084202172485504434007452800869941711424e-19L, 1.570796326794896619231321691639751442099L),
3033 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1p-63L, 1.084202172485504434007452800869941711424e-19L, -1.570796326794896619231321691639751442099L),
3034 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1p-63L, 1.084202172485504434007452800869941711424e-19L, 1.570796326794896619231321691639751442099L),
3035 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1p-63L, 1.084202172485504434007452800869941711424e-19L, -1.570796326794896619231321691639751442099L),
3036 TEST_c_c (cacosh, 0x1p-63L, 0x1.fp-16385L, 8.142593549724601460479922838826119584465e-4933L, 1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION),
3037 TEST_c_c (cacosh, -0x1p-63L, 0x1.fp-16385L, 8.142593549724601460479922838826119584465e-4933L, 1.570796326794896619339741908888301885499L, UNDERFLOW_EXCEPTION),
3038 TEST_c_c (cacosh, 0x1p-63L, -0x1.fp-16385L, 8.142593549724601460479922838826119584465e-4933L, -1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION),
3039 TEST_c_c (cacosh, -0x1p-63L, -0x1.fp-16385L, 8.142593549724601460479922838826119584465e-4933L, -1.570796326794896619339741908888301885499L, UNDERFLOW_EXCEPTION),
3040#endif
3041 TEST_c_c (cacosh, 0.0L, 0x1p-63L, 1.084202172485504434007452800869941711424e-19L, 1.570796326794896619231321691639751442099L),
3042 TEST_c_c (cacosh, 0.0L, -0x1p-63L, 1.084202172485504434007452800869941711424e-19L, -1.570796326794896619231321691639751442099L),
3043 TEST_c_c (cacosh, -0.0L, 0x1p-63L, 1.084202172485504434007452800869941711424e-19L, 1.570796326794896619231321691639751442099L),
3044 TEST_c_c (cacosh, -0.0L, -0x1p-63L, 1.084202172485504434007452800869941711424e-19L, -1.570796326794896619231321691639751442099L),
3045 TEST_c_c (cacosh, 0x1p-63L, 0.0L, 0.0L, 1.570796326794896619122901474391200998698L),
3046 TEST_c_c (cacosh, -0x1p-63L, 0.0L, 0.0L, 1.570796326794896619339741908888301885499L),
3047 TEST_c_c (cacosh, 0x1p-63L, -0.0L, 0.0L, -1.570796326794896619122901474391200998698L),
3048 TEST_c_c (cacosh, -0x1p-63L, -0.0L, 0.0L, -1.570796326794896619339741908888301885499L),
52ce4860 3049#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3050 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
3051 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
3052 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
3053 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
52ce4860
JM		 3054#endif
3055#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 3056 TEST_c_c (cacosh, 0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639734010571L),
3057 TEST_c_c (cacosh, 0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639734010571L),
3058 TEST_c_c (cacosh, -0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639768873627L),
3059 TEST_c_c (cacosh, -0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639768873627L),
3060 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 1.234330349600789959989661887846005659983e-16L, 1.997188458999618357060632049675702684031e-16L),
3061 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 1.234330349600789959989661887846005659983e-16L, 3.141592653589793038743797483317667178134L),
3062 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 1.234330349600789959989661887846005659983e-16L, -1.997188458999618357060632049675702684031e-16L),
3063 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 1.234330349600789959989661887846005659983e-16L, -3.141592653589793038743797483317667178134L),
3064 TEST_c_c (cacosh, 0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639751442099L),
3065 TEST_c_c (cacosh, 0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639751442099L),
3066 TEST_c_c (cacosh, -0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639751442099L),
3067 TEST_c_c (cacosh, -0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639751442099L),
3068 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 3.432186888910770473784103112009399360940e-293L, 1.570092458683775059393382371963565104164e-16L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3069 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 3.432186888910770473784103112009399360940e-293L, 3.141592653589793081453397514901996944859L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3070 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 3.432186888910770473784103112009399360940e-293L, -1.570092458683775059393382371963565104164e-16L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3071 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 3.432186888910770473784103112009399360940e-293L, -3.141592653589793081453397514901996944859L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3072 TEST_c_c (cacosh, 0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639751442099L),
3073 TEST_c_c (cacosh, 0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639751442099L),
3074 TEST_c_c (cacosh, -0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639751442099L),
3075 TEST_c_c (cacosh, -0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639751442099L),
3076 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 0.0L, 1.570092458683775059393382371963565104164e-16L),
3077 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 0.0L, 3.141592653589793081453397514901996944859L),
3078 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 0.0L, -1.570092458683775059393382371963565104164e-16L),
3079 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 0.0L, -3.141592653589793081453397514901996944859L),
3080#endif
3081 TEST_c_c (cacosh, 0x1p-105L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639729392766L),
3082 TEST_c_c (cacosh, 0x1p-105L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639729392766L),
3083 TEST_c_c (cacosh, -0x1p-105L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639773491431L),
3084 TEST_c_c (cacosh, -0x1p-105L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639773491431L),
3085 TEST_c_c (cacosh, 0.5L, 0x1p-105L, 2.846556599890768890940941645338546615370e-32L, 1.047197551196597746154214461093167628066L),
3086 TEST_c_c (cacosh, -0.5L, 0x1p-105L, 2.846556599890768890940941645338546615370e-32L, 2.094395102393195492308428922186335256131L),
3087 TEST_c_c (cacosh, 0.5L, -0x1p-105L, 2.846556599890768890940941645338546615370e-32L, -1.047197551196597746154214461093167628066L),
3088 TEST_c_c (cacosh, -0.5L, -0x1p-105L, 2.846556599890768890940941645338546615370e-32L, -2.094395102393195492308428922186335256131L),
3089 TEST_c_c (cacosh, 0x1p-105L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639726790195L),
3090 TEST_c_c (cacosh, 0x1p-105L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639726790195L),
3091 TEST_c_c (cacosh, -0x1p-105L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639776094002L),
3092 TEST_c_c (cacosh, -0x1p-105L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639776094002L),
52ce4860 3093#ifndef TEST_FLOAT
08198877
JM		 3094 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639751442099L),
3095 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639751442099L),
3096 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639751442099L),
3097 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639751442099L),
3098 TEST_c_c (cacosh, 0x1p-105L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 1.570796326794896619231321691639726790195L, UNDERFLOW_EXCEPTION_DOUBLE),
3099 TEST_c_c (cacosh, -0x1p-105L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 1.570796326794896619231321691639776094002L, UNDERFLOW_EXCEPTION_DOUBLE),
3100 TEST_c_c (cacosh, 0x1p-105L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -1.570796326794896619231321691639726790195L, UNDERFLOW_EXCEPTION_DOUBLE),
3101 TEST_c_c (cacosh, -0x1p-105L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -1.570796326794896619231321691639776094002L, UNDERFLOW_EXCEPTION_DOUBLE),
3102#endif
3103 TEST_c_c (cacosh, 0.0L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639751442099L),
3104 TEST_c_c (cacosh, 0.0L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639751442099L),
3105 TEST_c_c (cacosh, -0.0L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639751442099L),
3106 TEST_c_c (cacosh, -0.0L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639751442099L),
3107 TEST_c_c (cacosh, 0x1p-105L, 0.0L, 0.0L, 1.570796326794896619231321691639726790195L),
3108 TEST_c_c (cacosh, -0x1p-105L, 0.0L, 0.0L, 1.570796326794896619231321691639776094002L),
3109 TEST_c_c (cacosh, 0x1p-105L, -0.0L, 0.0L, -1.570796326794896619231321691639726790195L),
3110 TEST_c_c (cacosh, -0x1p-105L, -0.0L, 0.0L, -1.570796326794896619231321691639776094002L),
52ce4860 3111#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 3112 TEST_c_c (cacosh, 0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751305915L),
3113 TEST_c_c (cacosh, 0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751305915L),
3114 TEST_c_c (cacosh, -0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751578282L),
3115 TEST_c_c (cacosh, -0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751578282L),
3116 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 1.091004200533850618345330909857103457781e-17L, 1.765281878332676474347460257221369818872e-17L),
3117 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 1.091004200533850618345330909857103457781e-17L, 3.141592653589793220809824599952738140723L),
3118 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 1.091004200533850618345330909857103457781e-17L, -1.765281878332676474347460257221369818872e-17L),
3119 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 1.091004200533850618345330909857103457781e-17L, -3.141592653589793220809824599952738140723L),
3120 TEST_c_c (cacosh, 0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751442099L),
3121 TEST_c_c (cacosh, 0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751442099L),
3122 TEST_c_c (cacosh, -0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751442099L),
3123 TEST_c_c (cacosh, -0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751442099L),
3124 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 5.867357004219059108790368268900490184505e-4916L, 1.387778780781445675529539585113525401762e-17L),
3125 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 5.867357004219059108790368268900490184505e-4916L, 3.141592653589793224584855575465046128902L),
3126 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 5.867357004219059108790368268900490184505e-4916L, -1.387778780781445675529539585113525401762e-17L),
3127 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 5.867357004219059108790368268900490184505e-4916L, -3.141592653589793224584855575465046128902L),
3128 TEST_c_c (cacosh, 0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751442099L),
3129 TEST_c_c (cacosh, 0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751442099L),
3130 TEST_c_c (cacosh, -0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751442099L),
3131 TEST_c_c (cacosh, -0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751442099L),
3132 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 0.0L, 1.387778780781445675529539585113525401762e-17L),
3133 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 0.0L, 3.141592653589793224584855575465046128902L),
3134 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 0.0L, -1.387778780781445675529539585113525401762e-17L),
3135 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 0.0L, -3.141592653589793224584855575465046128902L),
3136#endif
3137 TEST_c_c (cacosh, 0x1p-112L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751269838L),
3138 TEST_c_c (cacosh, 0x1p-112L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751269838L),
3139 TEST_c_c (cacosh, -0x1p-112L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751614359L),
3140 TEST_c_c (cacosh, -0x1p-112L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751614359L),
3141 TEST_c_c (cacosh, 0.5L, 0x1p-112L, 2.223872343664663196047610660420739543258e-34L, 1.047197551196597746154214461093167628066L),
3142 TEST_c_c (cacosh, -0.5L, 0x1p-112L, 2.223872343664663196047610660420739543258e-34L, 2.094395102393195492308428922186335256131L),
3143 TEST_c_c (cacosh, 0.5L, -0x1p-112L, 2.223872343664663196047610660420739543258e-34L, -1.047197551196597746154214461093167628066L),
3144 TEST_c_c (cacosh, -0.5L, -0x1p-112L, 2.223872343664663196047610660420739543258e-34L, -2.094395102393195492308428922186335256131L),
3145 TEST_c_c (cacosh, 0x1p-112L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751249506L),
3146 TEST_c_c (cacosh, 0x1p-112L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751249506L),
3147 TEST_c_c (cacosh, -0x1p-112L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751634692L),
3148 TEST_c_c (cacosh, -0x1p-112L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751634692L),
52ce4860 3149#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3150 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751442099L),
3151 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751442099L),
3152 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751442099L),
3153 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751442099L),
3154 TEST_c_c (cacosh, 0x1p-112L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 1.570796326794896619231321691639751249506L, UNDERFLOW_EXCEPTION),
3155 TEST_c_c (cacosh, -0x1p-112L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 1.570796326794896619231321691639751634692L, UNDERFLOW_EXCEPTION),
3156 TEST_c_c (cacosh, 0x1p-112L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -1.570796326794896619231321691639751249506L, UNDERFLOW_EXCEPTION),
3157 TEST_c_c (cacosh, -0x1p-112L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -1.570796326794896619231321691639751634692L, UNDERFLOW_EXCEPTION),
3158#endif
3159 TEST_c_c (cacosh, 0.0L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751442099L),
3160 TEST_c_c (cacosh, 0.0L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751442099L),
3161 TEST_c_c (cacosh, -0.0L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751442099L),
3162 TEST_c_c (cacosh, -0.0L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751442099L),
3163 TEST_c_c (cacosh, 0x1p-112L, 0.0L, 0.0L, 1.570796326794896619231321691639751249506L),
3164 TEST_c_c (cacosh, -0x1p-112L, 0.0L, 0.0L, 1.570796326794896619231321691639751634692L),
3165 TEST_c_c (cacosh, 0x1p-112L, -0.0L, 0.0L, -1.570796326794896619231321691639751249506L),
3166 TEST_c_c (cacosh, -0x1p-112L, -0.0L, 0.0L, -1.570796326794896619231321691639751634692L),
3167
3168 TEST_c_c (cacosh, 0.75L, 1.25L, 1.13239363160530819522266333696834467L, 1.11752014915610270578240049553777969L),
3169 TEST_c_c (cacosh, -2, -3, 1.9833870299165354323470769028940395L, -2.1414491111159960199416055713254211L),
3170 END_DATA (cacosh)
3171 };
3172
3173static void
3174cacosh_test (void)
3175{
3176 errno = 0;
3177 FUNC(cacosh) (BUILD_COMPLEX (0.7L, 1.2L));
3178 if (errno == ENOSYS)
3179 /* Function not implemented. */
3180 return;
8847214f 3181
08198877
JM		 3182 START (cacosh);
3183 RUN_TEST_LOOP_c_c (cacosh, cacosh_test_data, );
6815fabc 3184 END (cacosh, complex);
8847214f
UD		 3185}
3186
2550dfe9 3187
6a1992e2
JM		 3188static const struct test_c_f_data carg_test_data[] =
3189 {
3190 START_DATA (carg);
3191 /* carg (x + iy) is specified as atan2 (y, x) */
8847214f 3192
6a1992e2
JM		 3193 /* carg (x + i 0) == 0 for x > 0. */
3194 TEST_c_f (carg, 2.0, 0, 0),
3195 /* carg (x - i 0) == -0 for x > 0. */
3196 TEST_c_f (carg, 2.0, minus_zero, minus_zero),
8847214f 3197
6a1992e2
JM		 3198 TEST_c_f (carg, 0, 0, 0),
3199 TEST_c_f (carg, 0, minus_zero, minus_zero),
8847214f 3200
6a1992e2
JM		 3201 /* carg (x + i 0) == +pi for x < 0. */
3202 TEST_c_f (carg, -2.0, 0, M_PIl),
8847214f 3203
6a1992e2
JM		 3204 /* carg (x - i 0) == -pi for x < 0. */
3205 TEST_c_f (carg, -2.0, minus_zero, -M_PIl),
8847214f 3206
6a1992e2
JM		 3207 TEST_c_f (carg, minus_zero, 0, M_PIl),
3208 TEST_c_f (carg, minus_zero, minus_zero, -M_PIl),
8847214f 3209
6a1992e2
JM		 3210 /* carg (+0 + i y) == pi/2 for y > 0. */
3211 TEST_c_f (carg, 0, 2.0, M_PI_2l),
8847214f 3212
6a1992e2
JM		 3213 /* carg (-0 + i y) == pi/2 for y > 0. */
3214 TEST_c_f (carg, minus_zero, 2.0, M_PI_2l),
8847214f 3215
6a1992e2
JM		 3216 /* carg (+0 + i y) == -pi/2 for y < 0. */
3217 TEST_c_f (carg, 0, -2.0, -M_PI_2l),
8847214f 3218
6a1992e2
JM		 3219 /* carg (-0 + i y) == -pi/2 for y < 0. */
3220 TEST_c_f (carg, minus_zero, -2.0, -M_PI_2l),
8847214f 3221
6a1992e2
JM		 3222 /* carg (inf + i y) == +0 for finite y > 0. */
3223 TEST_c_f (carg, plus_infty, 2.0, 0),
8847214f 3224
6a1992e2
JM		 3225 /* carg (inf + i y) == -0 for finite y < 0. */
3226 TEST_c_f (carg, plus_infty, -2.0, minus_zero),
8847214f 3227
6a1992e2
JM		 3228 /* carg(x + i inf) == pi/2 for finite x. */
3229 TEST_c_f (carg, 10.0, plus_infty, M_PI_2l),
8847214f 3230
6a1992e2
JM		 3231 /* carg(x - i inf) == -pi/2 for finite x. */
3232 TEST_c_f (carg, 10.0, minus_infty, -M_PI_2l),
8847214f 3233
6a1992e2
JM		 3234 /* carg (-inf + i y) == +pi for finite y > 0. */
3235 TEST_c_f (carg, minus_infty, 10.0, M_PIl),
8847214f 3236
6a1992e2
JM		 3237 /* carg (-inf + i y) == -pi for finite y < 0. */
3238 TEST_c_f (carg, minus_infty, -10.0, -M_PIl),
8847214f 3239
6a1992e2 3240 TEST_c_f (carg, plus_infty, plus_infty, M_PI_4l),
8847214f 3241
6a1992e2 3242 TEST_c_f (carg, plus_infty, minus_infty, -M_PI_4l),
8847214f 3243
6a1992e2 3244 TEST_c_f (carg, minus_infty, plus_infty, M_PI_34l),
8847214f 3245
6a1992e2 3246 TEST_c_f (carg, minus_infty, minus_infty, -M_PI_34l),
8847214f 3247
6a1992e2
JM		 3248 TEST_c_f (carg, qnan_value, qnan_value, qnan_value),
3249 END_DATA (carg);
3250 };
15daa639 3251
6a1992e2
JM		 3252static void
3253carg_test (void)
3254{
3255 START (carg);
3256 RUN_TEST_LOOP_c_f (carg, carg_test_data, );
8847214f
UD		 3257 END (carg);
3258}
3259
08198877
JM		 3260static const struct test_c_c_data casin_test_data[] =
3261 {
3262 START_DATA (casin),
3263 TEST_c_c (casin, 0, 0, 0.0, 0.0),
3264 TEST_c_c (casin, minus_zero, 0, minus_zero, 0.0),
3265 TEST_c_c (casin, 0, minus_zero, 0.0, minus_zero),
3266 TEST_c_c (casin, minus_zero, minus_zero, minus_zero, minus_zero),
3267
3268 TEST_c_c (casin, plus_infty, plus_infty, M_PI_4l, plus_infty),
3269 TEST_c_c (casin, plus_infty, minus_infty, M_PI_4l, minus_infty),
3270 TEST_c_c (casin, minus_infty, plus_infty, -M_PI_4l, plus_infty),
3271 TEST_c_c (casin, minus_infty, minus_infty, -M_PI_4l, minus_infty),
3272
3273 TEST_c_c (casin, -10.0, plus_infty, minus_zero, plus_infty),
3274 TEST_c_c (casin, -10.0, minus_infty, minus_zero, minus_infty),
3275 TEST_c_c (casin, 0, plus_infty, 0.0, plus_infty),
3276 TEST_c_c (casin, 0, minus_infty, 0.0, minus_infty),
3277 TEST_c_c (casin, minus_zero, plus_infty, minus_zero, plus_infty),
3278 TEST_c_c (casin, minus_zero, minus_infty, minus_zero, minus_infty),
3279 TEST_c_c (casin, 0.1L, plus_infty, 0.0, plus_infty),
3280 TEST_c_c (casin, 0.1L, minus_infty, 0.0, minus_infty),
3281
3282 TEST_c_c (casin, minus_infty, 0, -M_PI_2l, plus_infty),
3283 TEST_c_c (casin, minus_infty, minus_zero, -M_PI_2l, minus_infty),
3284 TEST_c_c (casin, minus_infty, 100, -M_PI_2l, plus_infty),
3285 TEST_c_c (casin, minus_infty, -100, -M_PI_2l, minus_infty),
3286
3287 TEST_c_c (casin, plus_infty, 0, M_PI_2l, plus_infty),
3288 TEST_c_c (casin, plus_infty, minus_zero, M_PI_2l, minus_infty),
3289 TEST_c_c (casin, plus_infty, 0.5, M_PI_2l, plus_infty),
3290 TEST_c_c (casin, plus_infty, -0.5, M_PI_2l, minus_infty),
3291
3292 TEST_c_c (casin, qnan_value, plus_infty, qnan_value, plus_infty),
3293 TEST_c_c (casin, qnan_value, minus_infty, qnan_value, minus_infty),
3294
3295 TEST_c_c (casin, 0.0, qnan_value, 0.0, qnan_value),
3296 TEST_c_c (casin, minus_zero, qnan_value, minus_zero, qnan_value),
3297
3298 TEST_c_c (casin, plus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
3299 TEST_c_c (casin, minus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
3300
3301 TEST_c_c (casin, qnan_value, 10.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3302 TEST_c_c (casin, qnan_value, -10.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3303
3304 TEST_c_c (casin, 0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3305 TEST_c_c (casin, -0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3306
3307 TEST_c_c (casin, qnan_value, qnan_value, qnan_value, qnan_value),
3308
3309 TEST_c_c (casin, plus_zero, -1.5L, plus_zero, -1.194763217287109304111930828519090523536L),
3310 TEST_c_c (casin, minus_zero, -1.5L, minus_zero, -1.194763217287109304111930828519090523536L),
3311 TEST_c_c (casin, plus_zero, -1.0L, plus_zero, -0.8813735870195430252326093249797923090282L),
3312 TEST_c_c (casin, minus_zero, -1.0L, minus_zero, -0.8813735870195430252326093249797923090282L),
3313 TEST_c_c (casin, plus_zero, -0.5L, plus_zero, -0.4812118250596034474977589134243684231352L),
3314 TEST_c_c (casin, minus_zero, -0.5L, minus_zero, -0.4812118250596034474977589134243684231352L),
3315 TEST_c_c (casin, plus_zero, 0.5L, plus_zero, 0.4812118250596034474977589134243684231352L),
3316 TEST_c_c (casin, minus_zero, 0.5L, minus_zero, 0.4812118250596034474977589134243684231352L),
3317 TEST_c_c (casin, plus_zero, 1.0L, plus_zero, 0.8813735870195430252326093249797923090282L),
3318 TEST_c_c (casin, minus_zero, 1.0L, minus_zero, 0.8813735870195430252326093249797923090282L),
3319 TEST_c_c (casin, plus_zero, 1.5L, plus_zero, 1.194763217287109304111930828519090523536L),
3320 TEST_c_c (casin, minus_zero, 1.5L, minus_zero, 1.194763217287109304111930828519090523536L),
3321
3322 TEST_c_c (casin, -1.5L, plus_zero, -M_PI_2l, 0.9624236501192068949955178268487368462704L),
3323 TEST_c_c (casin, -1.5L, minus_zero, -M_PI_2l, -0.9624236501192068949955178268487368462704L),
3324 TEST_c_c (casin, -1.0L, plus_zero, -M_PI_2l, plus_zero),
3325 TEST_c_c (casin, -1.0L, minus_zero, -M_PI_2l, minus_zero),
3326 TEST_c_c (casin, -0.5L, plus_zero, -0.5235987755982988730771072305465838140329L, plus_zero),
3327 TEST_c_c (casin, -0.5L, minus_zero, -0.5235987755982988730771072305465838140329L, minus_zero),
3328 TEST_c_c (casin, 0.5L, plus_zero, 0.5235987755982988730771072305465838140329L, plus_zero),
3329 TEST_c_c (casin, 0.5L, minus_zero, 0.5235987755982988730771072305465838140329L, minus_zero),
3330 TEST_c_c (casin, 1.0L, plus_zero, M_PI_2l, plus_zero),
3331 TEST_c_c (casin, 1.0L, minus_zero, M_PI_2l, minus_zero),
3332 TEST_c_c (casin, 1.5L, plus_zero, M_PI_2l, 0.9624236501192068949955178268487368462704L),
3333 TEST_c_c (casin, 1.5L, minus_zero, M_PI_2l, -0.9624236501192068949955178268487368462704L),
3334
3335 TEST_c_c (casin, 0x1p50L, 1.0L, 1.570796326794895731052901991514519103193L, 3.535050620855721078027883819436720218708e1L),
3336 TEST_c_c (casin, 0x1p50L, -1.0L, 1.570796326794895731052901991514519103193L, -3.535050620855721078027883819436720218708e1L),
3337 TEST_c_c (casin, -0x1p50L, 1.0L, -1.570796326794895731052901991514519103193L, 3.535050620855721078027883819436720218708e1L),
3338 TEST_c_c (casin, -0x1p50L, -1.0L, -1.570796326794895731052901991514519103193L, -3.535050620855721078027883819436720218708e1L),
3339 TEST_c_c (casin, 1.0L, 0x1p50L, 8.881784197001252323389053344720723756399e-16L, 3.535050620855721078027883819436759661753e1L),
3340 TEST_c_c (casin, -1.0L, 0x1p50L, -8.881784197001252323389053344720723756399e-16L, 3.535050620855721078027883819436759661753e1L),
3341 TEST_c_c (casin, 1.0L, -0x1p50L, 8.881784197001252323389053344720723756399e-16L, -3.535050620855721078027883819436759661753e1L),
3342 TEST_c_c (casin, -1.0L, -0x1p50L, -8.881784197001252323389053344720723756399e-16L, -3.535050620855721078027883819436759661753e1L),
cdc1c96f 3343#ifndef TEST_FLOAT
08198877
JM		 3344 TEST_c_c (casin, 0x1p500L, 1.0L, 1.570796326794896619231321691639751442099L, 3.472667374605326000180332928505464606058e2L),
3345 TEST_c_c (casin, 0x1p500L, -1.0L, 1.570796326794896619231321691639751442099L, -3.472667374605326000180332928505464606058e2L),
3346 TEST_c_c (casin, -0x1p500L, 1.0L, -1.570796326794896619231321691639751442099L, 3.472667374605326000180332928505464606058e2L),
3347 TEST_c_c (casin, -0x1p500L, -1.0L, -1.570796326794896619231321691639751442099L, -3.472667374605326000180332928505464606058e2L),
3348 TEST_c_c (casin, 1.0L, 0x1p500L, 3.054936363499604682051979393213617699789e-151L, 3.472667374605326000180332928505464606058e2L),
3349 TEST_c_c (casin, -1.0L, 0x1p500L, -3.054936363499604682051979393213617699789e-151L, 3.472667374605326000180332928505464606058e2L),
3350 TEST_c_c (casin, 1.0L, -0x1p500L, 3.054936363499604682051979393213617699789e-151L, -3.472667374605326000180332928505464606058e2L),
3351 TEST_c_c (casin, -1.0L, -0x1p500L, -3.054936363499604682051979393213617699789e-151L, -3.472667374605326000180332928505464606058e2L),
cdc1c96f
JM		 3352#endif
3353#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 3354 TEST_c_c (casin, 0x1p5000L, 1.0L, 1.570796326794896619231321691639751442099L, 3.466429049980286492395577839412341016946e3L),
3355 TEST_c_c (casin, 0x1p5000L, -1.0L, 1.570796326794896619231321691639751442099L, -3.466429049980286492395577839412341016946e3L),
3356 TEST_c_c (casin, -0x1p5000L, 1.0L, -1.570796326794896619231321691639751442099L, 3.466429049980286492395577839412341016946e3L),
3357 TEST_c_c (casin, -0x1p5000L, -1.0L, -1.570796326794896619231321691639751442099L, -3.466429049980286492395577839412341016946e3L),
3358 TEST_c_c (casin, 1.0L, 0x1p5000L, 7.079811261048172892385615158694057552948e-1506L, 3.466429049980286492395577839412341016946e3L),
3359 TEST_c_c (casin, -1.0L, 0x1p5000L, -7.079811261048172892385615158694057552948e-1506L, 3.466429049980286492395577839412341016946e3L),
3360 TEST_c_c (casin, 1.0L, -0x1p5000L, 7.079811261048172892385615158694057552948e-1506L, -3.466429049980286492395577839412341016946e3L),
3361 TEST_c_c (casin, -1.0L, -0x1p5000L, -7.079811261048172892385615158694057552948e-1506L, -3.466429049980286492395577839412341016946e3L),
cdc1c96f
JM		 3362#endif
3363
08198877 3364 TEST_c_c (casin, 0x1.fp127L, 0x1.fp127L, 7.853981633974483096156608458198757210493e-1L, 8.973081118419833726837456344608533993585e1L),
a9708fed 3365#ifndef TEST_FLOAT
08198877 3366 TEST_c_c (casin, 0x1.fp1023L, 0x1.fp1023L, 7.853981633974483096156608458198757210493e-1L, 7.107906849659093345062145442726115449315e2L),
a9708fed
JM		 3367#endif
3368#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 3369 TEST_c_c (casin, 0x1.fp16383L, 0x1.fp16383L, 7.853981633974483096156608458198757210493e-1L, 1.135753137836666928715489992987020363057e4L),
a9708fed
JM		 3370#endif
3371
08198877
JM		 3372 TEST_c_c (casin, 0x1.fp-129L, 1.5L, 1.579176199917649005841160751101628985741e-39L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_FLOAT),
3373 TEST_c_c (casin, 0x1.fp-129L, -1.5L, 1.579176199917649005841160751101628985741e-39L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_FLOAT),
3374 TEST_c_c (casin, -0x1.fp-129L, 1.5L, -1.579176199917649005841160751101628985741e-39L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_FLOAT),
3375 TEST_c_c (casin, -0x1.fp-129L, -1.5L, -1.579176199917649005841160751101628985741e-39L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_FLOAT),
3376 TEST_c_c (casin, 1.5L, 0x1.fp-129L, 1.570796326794896619231321691639751442096L, 9.624236501192068949955178268487368462704e-1L),
3377 TEST_c_c (casin, -1.5L, 0x1.fp-129L, -1.570796326794896619231321691639751442096L, 9.624236501192068949955178268487368462704e-1L),
3378 TEST_c_c (casin, 1.5L, -0x1.fp-129L, 1.570796326794896619231321691639751442096L, -9.624236501192068949955178268487368462704e-1L),
3379 TEST_c_c (casin, -1.5L, -0x1.fp-129L, -1.570796326794896619231321691639751442096L, -9.624236501192068949955178268487368462704e-1L),
8cf28c5e 3380#ifndef TEST_FLOAT
08198877
JM		 3381 TEST_c_c (casin, 0x1.fp-1025L, 1.5L, 2.989196569048182929051881765490354365918e-309L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_DOUBLE),
3382 TEST_c_c (casin, 0x1.fp-1025L, -1.5L, 2.989196569048182929051881765490354365918e-309L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_DOUBLE),
3383 TEST_c_c (casin, -0x1.fp-1025L, 1.5L, -2.989196569048182929051881765490354365918e-309L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_DOUBLE),
3384 TEST_c_c (casin, -0x1.fp-1025L, -1.5L, -2.989196569048182929051881765490354365918e-309L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_DOUBLE),
3385 TEST_c_c (casin, 1.5L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 9.624236501192068949955178268487368462704e-1L),
3386 TEST_c_c (casin, -1.5L, 0x1.fp-1025L, -1.570796326794896619231321691639751442099L, 9.624236501192068949955178268487368462704e-1L),
3387 TEST_c_c (casin, 1.5L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -9.624236501192068949955178268487368462704e-1L),
3388 TEST_c_c (casin, -1.5L, -0x1.fp-1025L, -1.570796326794896619231321691639751442099L, -9.624236501192068949955178268487368462704e-1L),
8cf28c5e
JM		 3389#endif
3390#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3391 TEST_c_c (casin, 0x1.fp-16385L, 1.5L, 4.516698239814521372306784062043266700598e-4933L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION),
3392 TEST_c_c (casin, 0x1.fp-16385L, -1.5L, 4.516698239814521372306784062043266700598e-4933L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION),
3393 TEST_c_c (casin, -0x1.fp-16385L, 1.5L, -4.516698239814521372306784062043266700598e-4933L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION),
3394 TEST_c_c (casin, -0x1.fp-16385L, -1.5L, -4.516698239814521372306784062043266700598e-4933L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION),
3395 TEST_c_c (casin, 1.5L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 9.624236501192068949955178268487368462704e-1L),
3396 TEST_c_c (casin, -1.5L, 0x1.fp-16385L, -1.570796326794896619231321691639751442099L, 9.624236501192068949955178268487368462704e-1L),
3397 TEST_c_c (casin, 1.5L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -9.624236501192068949955178268487368462704e-1L),
3398 TEST_c_c (casin, -1.5L, -0x1.fp-16385L, -1.570796326794896619231321691639751442099L, -9.624236501192068949955178268487368462704e-1L),
3399#endif
3400
3401 TEST_c_c (casin, 0.5L, 1.0L, 3.494390628572132936274118260753699527325e-1L, 9.261330313501824245501244453057873152694e-1L),
3402 TEST_c_c (casin, 0.5L, -1.0L, 3.494390628572132936274118260753699527325e-1L, -9.261330313501824245501244453057873152694e-1L),
3403 TEST_c_c (casin, -0.5L, 1.0L, -3.494390628572132936274118260753699527325e-1L, 9.261330313501824245501244453057873152694e-1L),
3404 TEST_c_c (casin, -0.5L, -1.0L, -3.494390628572132936274118260753699527325e-1L, -9.261330313501824245501244453057873152694e-1L),
3405 TEST_c_c (casin, 1.0L, 0.5L, 8.959074812088902390666567243275770102229e-1L, 7.328576759736452608886724437653071523305e-1L),
3406 TEST_c_c (casin, -1.0L, 0.5L, -8.959074812088902390666567243275770102229e-1L, 7.328576759736452608886724437653071523305e-1L),
3407 TEST_c_c (casin, 1.0L, -0.5L, 8.959074812088902390666567243275770102229e-1L, -7.328576759736452608886724437653071523305e-1L),
3408 TEST_c_c (casin, -1.0L, -0.5L, -8.959074812088902390666567243275770102229e-1L, -7.328576759736452608886724437653071523305e-1L),
3409 TEST_c_c (casin, 0.25L, 1.0L, 1.763024327769669304186785666360901026468e-1L, 8.924633639033482359562124741744951972772e-1L),
3410 TEST_c_c (casin, 0.25L, -1.0L, 1.763024327769669304186785666360901026468e-1L, -8.924633639033482359562124741744951972772e-1L),
3411 TEST_c_c (casin, -0.25L, 1.0L, -1.763024327769669304186785666360901026468e-1L, 8.924633639033482359562124741744951972772e-1L),
3412 TEST_c_c (casin, -0.25L, -1.0L, -1.763024327769669304186785666360901026468e-1L, -8.924633639033482359562124741744951972772e-1L),
3413 TEST_c_c (casin, 1.0L, 0.25L, 1.081751996523816326311037318425097434186L, 5.097911466811016354623559941115413499164e-1L),
3414 TEST_c_c (casin, -1.0L, 0.25L, -1.081751996523816326311037318425097434186L, 5.097911466811016354623559941115413499164e-1L),
3415 TEST_c_c (casin, 1.0L, -0.25L, 1.081751996523816326311037318425097434186L, -5.097911466811016354623559941115413499164e-1L),
3416 TEST_c_c (casin, -1.0L, -0.25L, -1.081751996523816326311037318425097434186L, -5.097911466811016354623559941115413499164e-1L),
3417 TEST_c_c (casin, 0x1.fp-10L, 1.0L, 1.337909359557740912558349531052239112857e-3L, 8.813742198809567991336704287826445879025e-1L),
3418 TEST_c_c (casin, 0x1.fp-10L, -1.0L, 1.337909359557740912558349531052239112857e-3L, -8.813742198809567991336704287826445879025e-1L),
3419 TEST_c_c (casin, -0x1.fp-10L, 1.0L, -1.337909359557740912558349531052239112857e-3L, 8.813742198809567991336704287826445879025e-1L),
3420 TEST_c_c (casin, -0x1.fp-10L, -1.0L, -1.337909359557740912558349531052239112857e-3L, -8.813742198809567991336704287826445879025e-1L),
3421 TEST_c_c (casin, 1.0L, 0x1.fp-10L, 1.527305029163877791518741192097931722508L, 4.350501469856803800217957402220976497152e-2L),
3422 TEST_c_c (casin, -1.0L, 0x1.fp-10L, -1.527305029163877791518741192097931722508L, 4.350501469856803800217957402220976497152e-2L),
3423 TEST_c_c (casin, 1.0L, -0x1.fp-10L, 1.527305029163877791518741192097931722508L, -4.350501469856803800217957402220976497152e-2L),
3424 TEST_c_c (casin, -1.0L, -0x1.fp-10L, -1.527305029163877791518741192097931722508L, -4.350501469856803800217957402220976497152e-2L),
3425 TEST_c_c (casin, 0x1.fp-30L, 1.0L, 1.275929984216518540252717485007112529021e-9L, 8.813735870195430258081932989769495326854e-1L),
3426 TEST_c_c (casin, 0x1.fp-30L, -1.0L, 1.275929984216518540252717485007112529021e-9L, -8.813735870195430258081932989769495326854e-1L),
3427 TEST_c_c (casin, -0x1.fp-30L, 1.0L, -1.275929984216518540252717485007112529021e-9L, 8.813735870195430258081932989769495326854e-1L),
3428 TEST_c_c (casin, -0x1.fp-30L, -1.0L, -1.275929984216518540252717485007112529021e-9L, -8.813735870195430258081932989769495326854e-1L),
3429 TEST_c_c (casin, 1.0L, 0x1.fp-30L, 1.570753848123921942730162693731872690232L, 4.247867098745151888768727039216644758847e-5L),
3430 TEST_c_c (casin, -1.0L, 0x1.fp-30L, -1.570753848123921942730162693731872690232L, 4.247867098745151888768727039216644758847e-5L),
3431 TEST_c_c (casin, 1.0L, -0x1.fp-30L, 1.570753848123921942730162693731872690232L, -4.247867098745151888768727039216644758847e-5L),
3432 TEST_c_c (casin, -1.0L, -0x1.fp-30L, -1.570753848123921942730162693731872690232L, -4.247867098745151888768727039216644758847e-5L),
3433 TEST_c_c (casin, 0x1.fp-100L, 1.0L, 1.080754735021050612990719608916167354321e-30L, 8.813735870195430252326093249797923090282e-1L),
3434 TEST_c_c (casin, 0x1.fp-100L, -1.0L, 1.080754735021050612990719608916167354321e-30L, -8.813735870195430252326093249797923090282e-1L),
3435 TEST_c_c (casin, -0x1.fp-100L, 1.0L, -1.080754735021050612990719608916167354321e-30L, 8.813735870195430252326093249797923090282e-1L),
3436 TEST_c_c (casin, -0x1.fp-100L, -1.0L, -1.080754735021050612990719608916167354321e-30L, -8.813735870195430252326093249797923090282e-1L),
3437 TEST_c_c (casin, 1.0L, 0x1.fp-100L, 1.570796326794895382939283431378862777584L, 1.236292038260260888664514866457202186027e-15L),
3438 TEST_c_c (casin, -1.0L, 0x1.fp-100L, -1.570796326794895382939283431378862777584L, 1.236292038260260888664514866457202186027e-15L),
3439 TEST_c_c (casin, 1.0L, -0x1.fp-100L, 1.570796326794895382939283431378862777584L, -1.236292038260260888664514866457202186027e-15L),
3440 TEST_c_c (casin, -1.0L, -0x1.fp-100L, -1.570796326794895382939283431378862777584L, -1.236292038260260888664514866457202186027e-15L),
3441 TEST_c_c (casin, 0x1.fp-129L, 1.0L, 2.013062564695348242280482517399205554874e-39L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3442 TEST_c_c (casin, 0x1.fp-129L, -1.0L, 2.013062564695348242280482517399205554874e-39L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3443 TEST_c_c (casin, -0x1.fp-129L, 1.0L, -2.013062564695348242280482517399205554874e-39L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3444 TEST_c_c (casin, -0x1.fp-129L, -1.0L, -2.013062564695348242280482517399205554874e-39L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3445 TEST_c_c (casin, 1.0L, 0x1.fp-129L, 1.570796326794896619177965338869929107115L, 5.335635276982233498398987585285818977933e-20L),
3446 TEST_c_c (casin, -1.0L, 0x1.fp-129L, -1.570796326794896619177965338869929107115L, 5.335635276982233498398987585285818977933e-20L),
3447 TEST_c_c (casin, 1.0L, -0x1.fp-129L, 1.570796326794896619177965338869929107115L, -5.335635276982233498398987585285818977933e-20L),
3448 TEST_c_c (casin, -1.0L, -0x1.fp-129L, -1.570796326794896619177965338869929107115L, -5.335635276982233498398987585285818977933e-20L),
0a1b2ae6 3449#ifndef TEST_FLOAT
08198877
JM		 3450 TEST_c_c (casin, 0x1.fp-1000L, 1.0L, 1.278589251976747242280879285935084814093e-301L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3451 TEST_c_c (casin, 0x1.fp-1000L, -1.0L, 1.278589251976747242280879285935084814093e-301L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3452 TEST_c_c (casin, -0x1.fp-1000L, 1.0L, -1.278589251976747242280879285935084814093e-301L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3453 TEST_c_c (casin, -0x1.fp-1000L, -1.0L, -1.278589251976747242280879285935084814093e-301L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3454 TEST_c_c (casin, 1.0L, 0x1.fp-1000L, 1.570796326794896619231321691639751442099L, 4.252291453851660175550490409247739011867e-151L),
3455 TEST_c_c (casin, -1.0L, 0x1.fp-1000L, -1.570796326794896619231321691639751442099L, 4.252291453851660175550490409247739011867e-151L),
3456 TEST_c_c (casin, 1.0L, -0x1.fp-1000L, 1.570796326794896619231321691639751442099L, -4.252291453851660175550490409247739011867e-151L),
3457 TEST_c_c (casin, -1.0L, -0x1.fp-1000L, -1.570796326794896619231321691639751442099L, -4.252291453851660175550490409247739011867e-151L),
3458 TEST_c_c (casin, 0x1.fp-1025L, 1.0L, 3.810492908885321743133304375216617626230e-309L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3459 TEST_c_c (casin, 0x1.fp-1025L, -1.0L, 3.810492908885321743133304375216617626230e-309L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3460 TEST_c_c (casin, -0x1.fp-1025L, 1.0L, -3.810492908885321743133304375216617626230e-309L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3461 TEST_c_c (casin, -0x1.fp-1025L, -1.0L, -3.810492908885321743133304375216617626230e-309L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3462 TEST_c_c (casin, 1.0L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 7.340879205566679497036857179189356754017e-155L),
3463 TEST_c_c (casin, -1.0L, 0x1.fp-1025L, -1.570796326794896619231321691639751442099L, 7.340879205566679497036857179189356754017e-155L),
3464 TEST_c_c (casin, 1.0L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -7.340879205566679497036857179189356754017e-155L),
3465 TEST_c_c (casin, -1.0L, -0x1.fp-1025L, -1.570796326794896619231321691639751442099L, -7.340879205566679497036857179189356754017e-155L),
0a1b2ae6
JM		 3466#endif
3467#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3468 TEST_c_c (casin, 0x1.fp-10000L, 1.0L, 6.867047849047171855399183659351043150871e-3011L, 8.813735870195430252326093249797923090282e-1L),
3469 TEST_c_c (casin, 0x1.fp-10000L, -1.0L, 6.867047849047171855399183659351043150871e-3011L, -8.813735870195430252326093249797923090282e-1L),
3470 TEST_c_c (casin, -0x1.fp-10000L, 1.0L, -6.867047849047171855399183659351043150871e-3011L, 8.813735870195430252326093249797923090282e-1L),
3471 TEST_c_c (casin, -0x1.fp-10000L, -1.0L, -6.867047849047171855399183659351043150871e-3011L, -8.813735870195430252326093249797923090282e-1L),
3472 TEST_c_c (casin, 1.0L, 0x1.fp-10000L, 1.570796326794896619231321691639751442099L, 9.854680208706673586644342922051388714633e-1506L),
3473 TEST_c_c (casin, -1.0L, 0x1.fp-10000L, -1.570796326794896619231321691639751442099L, 9.854680208706673586644342922051388714633e-1506L),
3474 TEST_c_c (casin, 1.0L, -0x1.fp-10000L, 1.570796326794896619231321691639751442099L, -9.854680208706673586644342922051388714633e-1506L),
3475 TEST_c_c (casin, -1.0L, -0x1.fp-10000L, -1.570796326794896619231321691639751442099L, -9.854680208706673586644342922051388714633e-1506L),
3476 TEST_c_c (casin, 0x1.fp-16385L, 1.0L, 5.757683115456107044131264955348448954458e-4933L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION),
3477 TEST_c_c (casin, 0x1.fp-16385L, -1.0L, 5.757683115456107044131264955348448954458e-4933L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION),
3478 TEST_c_c (casin, -0x1.fp-16385L, 1.0L, -5.757683115456107044131264955348448954458e-4933L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION),
3479 TEST_c_c (casin, -0x1.fp-16385L, -1.0L, -5.757683115456107044131264955348448954458e-4933L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION),
3480 TEST_c_c (casin, 1.0L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 9.023632056840860275214893047597614177639e-2467L),
3481 TEST_c_c (casin, -1.0L, 0x1.fp-16385L, -1.570796326794896619231321691639751442099L, 9.023632056840860275214893047597614177639e-2467L),
3482 TEST_c_c (casin, 1.0L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -9.023632056840860275214893047597614177639e-2467L),
3483 TEST_c_c (casin, -1.0L, -0x1.fp-16385L, -1.570796326794896619231321691639751442099L, -9.023632056840860275214893047597614177639e-2467L),
3484#endif
3485
3486 TEST_c_c (casin, 0x1p-23L, 0x1.000002p0L, 8.429369199749229560964789467980644296420e-8L, 8.813736713132400470205730751186547909968e-1L),
3487 TEST_c_c (casin, 0x1p-23L, -0x1.000002p0L, 8.429369199749229560964789467980644296420e-8L, -8.813736713132400470205730751186547909968e-1L),
3488 TEST_c_c (casin, -0x1p-23L, 0x1.000002p0L, -8.429369199749229560964789467980644296420e-8L, 8.813736713132400470205730751186547909968e-1L),
3489 TEST_c_c (casin, -0x1p-23L, -0x1.000002p0L, -8.429369199749229560964789467980644296420e-8L, -8.813736713132400470205730751186547909968e-1L),
3490 TEST_c_c (casin, 0x1.000002p0L, 0x1p-23L, 1.570574114956455764594481054234834678422L, 5.364668491573609633134147164031476452679e-4L),
3491 TEST_c_c (casin, -0x1.000002p0L, 0x1p-23L, -1.570574114956455764594481054234834678422L, 5.364668491573609633134147164031476452679e-4L),
3492 TEST_c_c (casin, 0x1.000002p0L, -0x1p-23L, 1.570574114956455764594481054234834678422L, -5.364668491573609633134147164031476452679e-4L),
3493 TEST_c_c (casin, -0x1.000002p0L, -0x1p-23L, -1.570574114956455764594481054234834678422L, -5.364668491573609633134147164031476452679e-4L),
3494 TEST_c_c (casin, 0x1.fp-129L, 0x1.000002p0L, 2.013062444707472738895109955455676357057e-39L, 8.813736713132375348727889167749389235161e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3495 TEST_c_c (casin, 0x1.fp-129L, -0x1.000002p0L, 2.013062444707472738895109955455676357057e-39L, -8.813736713132375348727889167749389235161e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3496 TEST_c_c (casin, -0x1.fp-129L, 0x1.000002p0L, -2.013062444707472738895109955455676357057e-39L, 8.813736713132375348727889167749389235161e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3497 TEST_c_c (casin, -0x1.fp-129L, -0x1.000002p0L, -2.013062444707472738895109955455676357057e-39L, -8.813736713132375348727889167749389235161e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3498 TEST_c_c (casin, 0x1.000002p0L, 0x1.fp-129L, 1.570796326794896619231321691639751436268L, 4.882812451493617206486388134172712975070e-4L),
3499 TEST_c_c (casin, -0x1.000002p0L, 0x1.fp-129L, -1.570796326794896619231321691639751436268L, 4.882812451493617206486388134172712975070e-4L),
3500 TEST_c_c (casin, 0x1.000002p0L, -0x1.fp-129L, 1.570796326794896619231321691639751436268L, -4.882812451493617206486388134172712975070e-4L),
3501 TEST_c_c (casin, -0x1.000002p0L, -0x1.fp-129L, -1.570796326794896619231321691639751436268L, -4.882812451493617206486388134172712975070e-4L),
3502 TEST_c_c (casin, 0.0L, 0x1.000002p0L, 0.0L, 8.813736713132375348727889167749389235161e-1L),
3503 TEST_c_c (casin, 0.0L, -0x1.000002p0L, 0.0L, -8.813736713132375348727889167749389235161e-1L),
3504 TEST_c_c (casin, -0.0L, 0x1.000002p0L, -0.0L, 8.813736713132375348727889167749389235161e-1L),
3505 TEST_c_c (casin, -0.0L, -0x1.000002p0L, -0.0L, -8.813736713132375348727889167749389235161e-1L),
3506 TEST_c_c (casin, 0x1.000002p0L, 0.0L, 1.570796326794896619231321691639751442099L, 4.882812451493617206486388134172712975070e-4L),
3507 TEST_c_c (casin, -0x1.000002p0L, 0.0L, -1.570796326794896619231321691639751442099L, 4.882812451493617206486388134172712975070e-4L),
3508 TEST_c_c (casin, 0x1.000002p0L, -0.0L, 1.570796326794896619231321691639751442099L, -4.882812451493617206486388134172712975070e-4L),
3509 TEST_c_c (casin, -0x1.000002p0L, -0.0L, -1.570796326794896619231321691639751442099L, -4.882812451493617206486388134172712975070e-4L),
3a7182a1 3510#ifndef TEST_FLOAT
08198877
JM		 3511 TEST_c_c (casin, 0x1p-52L, 0x1.0000000000001p0L, 1.570092458683774885078102529858632363236e-16L, 8.813735870195431822418551933572982483664e-1L),
3512 TEST_c_c (casin, 0x1p-52L, -0x1.0000000000001p0L, 1.570092458683774885078102529858632363236e-16L, -8.813735870195431822418551933572982483664e-1L),
3513 TEST_c_c (casin, -0x1p-52L, 0x1.0000000000001p0L, -1.570092458683774885078102529858632363236e-16L, 8.813735870195431822418551933572982483664e-1L),
3514 TEST_c_c (casin, -0x1p-52L, -0x1.0000000000001p0L, -1.570092458683774885078102529858632363236e-16L, -8.813735870195431822418551933572982483664e-1L),
3515 TEST_c_c (casin, 0x1.0000000000001p0L, 0x1p-52L, 1.570796317204594913251280305810847349436L, 2.315303644582684770975188768022139415020e-8L),
3516 TEST_c_c (casin, -0x1.0000000000001p0L, 0x1p-52L, -1.570796317204594913251280305810847349436L, 2.315303644582684770975188768022139415020e-8L),
3517 TEST_c_c (casin, 0x1.0000000000001p0L, -0x1p-52L, 1.570796317204594913251280305810847349436L, -2.315303644582684770975188768022139415020e-8L),
3518 TEST_c_c (casin, -0x1.0000000000001p0L, -0x1p-52L, -1.570796317204594913251280305810847349436L, -2.315303644582684770975188768022139415020e-8L),
3519 TEST_c_c (casin, 0x1.fp-1025L, 0x1.0000000000001p0L, 3.810492908885321320083608113679347200012e-309L, 8.813735870195431822418551933572895326024e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3520 TEST_c_c (casin, 0x1.fp-1025L, -0x1.0000000000001p0L, 3.810492908885321320083608113679347200012e-309L, -8.813735870195431822418551933572895326024e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3521 TEST_c_c (casin, -0x1.fp-1025L, 0x1.0000000000001p0L, -3.810492908885321320083608113679347200012e-309L, 8.813735870195431822418551933572895326024e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3522 TEST_c_c (casin, -0x1.fp-1025L, -0x1.0000000000001p0L, -3.810492908885321320083608113679347200012e-309L, -8.813735870195431822418551933572895326024e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3523 TEST_c_c (casin, 0x1.0000000000001p0L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 2.107342425544701550354780375182800088393e-8L),
3524 TEST_c_c (casin, -0x1.0000000000001p0L, 0x1.fp-1025L, -1.570796326794896619231321691639751442099L, 2.107342425544701550354780375182800088393e-8L),
3525 TEST_c_c (casin, 0x1.0000000000001p0L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -2.107342425544701550354780375182800088393e-8L),
3526 TEST_c_c (casin, -0x1.0000000000001p0L, -0x1.fp-1025L, -1.570796326794896619231321691639751442099L, -2.107342425544701550354780375182800088393e-8L),
3527 TEST_c_c (casin, 0.0L, 0x1.0000000000001p0L, 0.0L, 8.813735870195431822418551933572895326024e-1L),
3528 TEST_c_c (casin, 0.0L, -0x1.0000000000001p0L, 0.0L, -8.813735870195431822418551933572895326024e-1L),
3529 TEST_c_c (casin, -0.0L, 0x1.0000000000001p0L, -0.0L, 8.813735870195431822418551933572895326024e-1L),
3530 TEST_c_c (casin, -0.0L, -0x1.0000000000001p0L, -0.0L, -8.813735870195431822418551933572895326024e-1L),
3531 TEST_c_c (casin, 0x1.0000000000001p0L, 0.0L, 1.570796326794896619231321691639751442099L, 2.107342425544701550354780375182800088393e-8L),
3532 TEST_c_c (casin, -0x1.0000000000001p0L, 0.0L, -1.570796326794896619231321691639751442099L, 2.107342425544701550354780375182800088393e-8L),
3533 TEST_c_c (casin, 0x1.0000000000001p0L, -0.0L, 1.570796326794896619231321691639751442099L, -2.107342425544701550354780375182800088393e-8L),
3534 TEST_c_c (casin, -0x1.0000000000001p0L, -0.0L, -1.570796326794896619231321691639751442099L, -2.107342425544701550354780375182800088393e-8L),
3a7182a1
JM		 3535#endif
3536#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 3537 TEST_c_c (casin, 0x1p-63L, 0x1.0000000000000002p0L, 7.666467083416870406778649849746878368519e-20L, 8.813735870195430253092739958139610131001e-1L),
3538 TEST_c_c (casin, 0x1p-63L, -0x1.0000000000000002p0L, 7.666467083416870406778649849746878368519e-20L, -8.813735870195430253092739958139610131001e-1L),
3539 TEST_c_c (casin, -0x1p-63L, 0x1.0000000000000002p0L, -7.666467083416870406778649849746878368519e-20L, 8.813735870195430253092739958139610131001e-1L),
3540 TEST_c_c (casin, -0x1p-63L, -0x1.0000000000000002p0L, -7.666467083416870406778649849746878368519e-20L, -8.813735870195430253092739958139610131001e-1L),
3541 TEST_c_c (casin, 0x1.0000000000000002p0L, 0x1p-63L, 1.570796326582978888921215348380499122131L, 5.116146586219826555037807251857670783420e-10L),
3542 TEST_c_c (casin, -0x1.0000000000000002p0L, 0x1p-63L, -1.570796326582978888921215348380499122131L, 5.116146586219826555037807251857670783420e-10L),
3543 TEST_c_c (casin, 0x1.0000000000000002p0L, -0x1p-63L, 1.570796326582978888921215348380499122131L, -5.116146586219826555037807251857670783420e-10L),
3544 TEST_c_c (casin, -0x1.0000000000000002p0L, -0x1p-63L, -1.570796326582978888921215348380499122131L, -5.116146586219826555037807251857670783420e-10L),
3a7182a1 3545# if LDBL_MIN_EXP <= -16381
08198877
JM		 3546 TEST_c_c (casin, 0x1.fp-16385L, 0x1.0000000000000002p0L, 5.757683115456107043819140328235418018963e-4933L, 8.813735870195430253092739958139610130980e-1L, UNDERFLOW_EXCEPTION),
3547 TEST_c_c (casin, 0x1.fp-16385L, -0x1.0000000000000002p0L, 5.757683115456107043819140328235418018963e-4933L, -8.813735870195430253092739958139610130980e-1L, UNDERFLOW_EXCEPTION),
3548 TEST_c_c (casin, -0x1.fp-16385L, 0x1.0000000000000002p0L, -5.757683115456107043819140328235418018963e-4933L, 8.813735870195430253092739958139610130980e-1L, UNDERFLOW_EXCEPTION),
3549 TEST_c_c (casin, -0x1.fp-16385L, -0x1.0000000000000002p0L, -5.757683115456107043819140328235418018963e-4933L, -8.813735870195430253092739958139610130980e-1L, UNDERFLOW_EXCEPTION),
3550 TEST_c_c (casin, 0x1.0000000000000002p0L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 4.656612873077392578082927418388212703712e-10L),
3551 TEST_c_c (casin, -0x1.0000000000000002p0L, 0x1.fp-16385L, -1.570796326794896619231321691639751442099L, 4.656612873077392578082927418388212703712e-10L),
3552 TEST_c_c (casin, 0x1.0000000000000002p0L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -4.656612873077392578082927418388212703712e-10L),
3553 TEST_c_c (casin, -0x1.0000000000000002p0L, -0x1.fp-16385L, -1.570796326794896619231321691639751442099L, -4.656612873077392578082927418388212703712e-10L),
3a7182a1 3554# endif
08198877
JM		 3555 TEST_c_c (casin, 0.0L, 0x1.0000000000000002p0L, 0.0L, 8.813735870195430253092739958139610130980e-1L),
3556 TEST_c_c (casin, 0.0L, -0x1.0000000000000002p0L, 0.0L, -8.813735870195430253092739958139610130980e-1L),
3557 TEST_c_c (casin, -0.0L, 0x1.0000000000000002p0L, -0.0L, 8.813735870195430253092739958139610130980e-1L),
3558 TEST_c_c (casin, -0.0L, -0x1.0000000000000002p0L, -0.0L, -8.813735870195430253092739958139610130980e-1L),
3559 TEST_c_c (casin, 0x1.0000000000000002p0L, 0.0L, 1.570796326794896619231321691639751442099L, 4.656612873077392578082927418388212703712e-10L),
3560 TEST_c_c (casin, -0x1.0000000000000002p0L, 0.0L, -1.570796326794896619231321691639751442099L, 4.656612873077392578082927418388212703712e-10L),
3561 TEST_c_c (casin, 0x1.0000000000000002p0L, -0.0L, 1.570796326794896619231321691639751442099L, -4.656612873077392578082927418388212703712e-10L),
3562 TEST_c_c (casin, -0x1.0000000000000002p0L, -0.0L, -1.570796326794896619231321691639751442099L, -4.656612873077392578082927418388212703712e-10L),
3a7182a1
JM		 3563#endif
3564#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 3565 TEST_c_c (casin, 0x1p-106L, 0x1.000000000000000000000000008p0L, 8.715763992105246878957416200936726072500e-33L, 8.813735870195430252326093249798097405561e-1L),
3566 TEST_c_c (casin, 0x1p-106L, -0x1.000000000000000000000000008p0L, 8.715763992105246878957416200936726072500e-33L, -8.813735870195430252326093249798097405561e-1L),
3567 TEST_c_c (casin, -0x1p-106L, 0x1.000000000000000000000000008p0L, -8.715763992105246878957416200936726072500e-33L, 8.813735870195430252326093249798097405561e-1L),
3568 TEST_c_c (casin, -0x1p-106L, -0x1.000000000000000000000000008p0L, -8.715763992105246878957416200936726072500e-33L, -8.813735870195430252326093249798097405561e-1L),
3569 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, 0x1p-106L, 1.570796326794896565289107467733682961928L, 2.285028863093221674154232933662774454211e-16L),
3570 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, 0x1p-106L, -1.570796326794896565289107467733682961928L, 2.285028863093221674154232933662774454211e-16L),
3571 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, -0x1p-106L, 1.570796326794896565289107467733682961928L, -2.285028863093221674154232933662774454211e-16L),
3572 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, -0x1p-106L, -1.570796326794896565289107467733682961928L, -2.285028863093221674154232933662774454211e-16L),
3573 TEST_c_c (casin, 0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 3.810492908885321743133304375216570658278e-309L, 8.813735870195430252326093249798097405561e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3574 TEST_c_c (casin, 0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 3.810492908885321743133304375216570658278e-309L, -8.813735870195430252326093249798097405561e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3575 TEST_c_c (casin, -0x1.fp-1025L, 0x1.000000000000000000000000008p0L, -3.810492908885321743133304375216570658278e-309L, 8.813735870195430252326093249798097405561e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3576 TEST_c_c (casin, -0x1.fp-1025L, -0x1.000000000000000000000000008p0L, -3.810492908885321743133304375216570658278e-309L, -8.813735870195430252326093249798097405561e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3577 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181636063482e-16L),
3578 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, 0x1.fp-1025L, -1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181636063482e-16L),
3579 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181636063482e-16L),
3580 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, -0x1.fp-1025L, -1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181636063482e-16L),
3581 TEST_c_c (casin, 0.0L, 0x1.000000000000000000000000008p0L, 0.0L, 8.813735870195430252326093249798097405561e-1L),
3582 TEST_c_c (casin, 0.0L, -0x1.000000000000000000000000008p0L, 0.0L, -8.813735870195430252326093249798097405561e-1L),
3583 TEST_c_c (casin, -0.0L, 0x1.000000000000000000000000008p0L, -0.0L, 8.813735870195430252326093249798097405561e-1L),
3584 TEST_c_c (casin, -0.0L, -0x1.000000000000000000000000008p0L, -0.0L, -8.813735870195430252326093249798097405561e-1L),
3585 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, 0.0L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181636063482e-16L),
3586 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, 0.0L, -1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181636063482e-16L),
3587 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, -0.0L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181636063482e-16L),
3588 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, -0.0L, -1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181636063482e-16L),
3a7182a1
JM		 3589#endif
3590#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 3591 TEST_c_c (casin, 0x1p-113L, 0x1.0000000000000000000000000001p0L, 6.809190618832224124185481406981900518193e-35L, 8.813735870195430252326093249797924452120e-1L),
3592 TEST_c_c (casin, 0x1p-113L, -0x1.0000000000000000000000000001p0L, 6.809190618832224124185481406981900518193e-35L, -8.813735870195430252326093249797924452120e-1L),
3593 TEST_c_c (casin, -0x1p-113L, 0x1.0000000000000000000000000001p0L, -6.809190618832224124185481406981900518193e-35L, 8.813735870195430252326093249797924452120e-1L),
3594 TEST_c_c (casin, -0x1p-113L, -0x1.0000000000000000000000000001p0L, -6.809190618832224124185481406981900518193e-35L, -8.813735870195430252326093249797924452120e-1L),
3595 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, 0x1p-113L, 1.570796326794896614463458507897073960405L, 2.019699255375255198156433710951064632386e-17L),
3596 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, 0x1p-113L, -1.570796326794896614463458507897073960405L, 2.019699255375255198156433710951064632386e-17L),
3597 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, -0x1p-113L, 1.570796326794896614463458507897073960405L, -2.019699255375255198156433710951064632386e-17L),
3598 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, -0x1p-113L, -1.570796326794896614463458507897073960405L, -2.019699255375255198156433710951064632386e-17L),
3599 TEST_c_c (casin, 0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 5.757683115456107044131264955348448400014e-4933L, 8.813735870195430252326093249797924452120e-1L, UNDERFLOW_EXCEPTION),
3600 TEST_c_c (casin, 0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 5.757683115456107044131264955348448400014e-4933L, -8.813735870195430252326093249797924452120e-1L, UNDERFLOW_EXCEPTION),
3601 TEST_c_c (casin, -0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, -5.757683115456107044131264955348448400014e-4933L, 8.813735870195430252326093249797924452120e-1L, UNDERFLOW_EXCEPTION),
3602 TEST_c_c (casin, -0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, -5.757683115456107044131264955348448400014e-4933L, -8.813735870195430252326093249797924452120e-1L, UNDERFLOW_EXCEPTION),
3603 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 1.962615573354718824241727964954454332780e-17L),
3604 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, -1.570796326794896619231321691639751442099L, 1.962615573354718824241727964954454332780e-17L),
3605 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -1.962615573354718824241727964954454332780e-17L),
3606 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, -1.570796326794896619231321691639751442099L, -1.962615573354718824241727964954454332780e-17L),
3607 TEST_c_c (casin, 0.0L, 0x1.0000000000000000000000000001p0L, 0.0L, 8.813735870195430252326093249797924452120e-1L),
3608 TEST_c_c (casin, 0.0L, -0x1.0000000000000000000000000001p0L, 0.0L, -8.813735870195430252326093249797924452120e-1L),
3609 TEST_c_c (casin, -0.0L, 0x1.0000000000000000000000000001p0L, -0.0L, 8.813735870195430252326093249797924452120e-1L),
3610 TEST_c_c (casin, -0.0L, -0x1.0000000000000000000000000001p0L, -0.0L, -8.813735870195430252326093249797924452120e-1L),
3611 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, 0.0L, 1.570796326794896619231321691639751442099L, 1.962615573354718824241727964954454332780e-17L),
3612 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, 0.0L, -1.570796326794896619231321691639751442099L, 1.962615573354718824241727964954454332780e-17L),
3613 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, -0.0L, 1.570796326794896619231321691639751442099L, -1.962615573354718824241727964954454332780e-17L),
3614 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, -0.0L, -1.570796326794896619231321691639751442099L, -1.962615573354718824241727964954454332780e-17L),
3615#endif
3616
3617 TEST_c_c (casin, 0x1p-23L, 0x0.ffffffp0L, 8.429369953393598499000760938112968755257e-8L, 8.813735448726963984495965873956465777250e-1L),
3618 TEST_c_c (casin, 0x1p-23L, -0x0.ffffffp0L, 8.429369953393598499000760938112968755257e-8L, -8.813735448726963984495965873956465777250e-1L),
3619 TEST_c_c (casin, -0x1p-23L, 0x0.ffffffp0L, -8.429369953393598499000760938112968755257e-8L, 8.813735448726963984495965873956465777250e-1L),
3620 TEST_c_c (casin, -0x1p-23L, -0x0.ffffffp0L, -8.429369953393598499000760938112968755257e-8L, -8.813735448726963984495965873956465777250e-1L),
3621 TEST_c_c (casin, 0x0.ffffffp0L, 0x1p-23L, 1.570357140408705570520377172865353621698L, 2.714321200917194650737217746780928423385e-4L),
3622 TEST_c_c (casin, -0x0.ffffffp0L, 0x1p-23L, -1.570357140408705570520377172865353621698L, 2.714321200917194650737217746780928423385e-4L),
3623 TEST_c_c (casin, 0x0.ffffffp0L, -0x1p-23L, 1.570357140408705570520377172865353621698L, -2.714321200917194650737217746780928423385e-4L),
3624 TEST_c_c (casin, -0x0.ffffffp0L, -0x1p-23L, -1.570357140408705570520377172865353621698L, -2.714321200917194650737217746780928423385e-4L),
3625 TEST_c_c (casin, 0x1.fp-129L, 0x0.ffffffp0L, 2.013062624689288675911339929224634593425e-39L, 8.813735448726938863015878255140556727969e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3626 TEST_c_c (casin, 0x1.fp-129L, -0x0.ffffffp0L, 2.013062624689288675911339929224634593425e-39L, -8.813735448726938863015878255140556727969e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3627 TEST_c_c (casin, -0x1.fp-129L, 0x0.ffffffp0L, -2.013062624689288675911339929224634593425e-39L, 8.813735448726938863015878255140556727969e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3628 TEST_c_c (casin, -0x1.fp-129L, -0x0.ffffffp0L, -2.013062624689288675911339929224634593425e-39L, -8.813735448726938863015878255140556727969e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3629 TEST_c_c (casin, 0x0.ffffffp0L, 0x1.fp-129L, 1.570451059810180415643718442157112705601L, 8.245504387859737323891843603996428534945e-36L),
3630 TEST_c_c (casin, -0x0.ffffffp0L, 0x1.fp-129L, -1.570451059810180415643718442157112705601L, 8.245504387859737323891843603996428534945e-36L),
3631 TEST_c_c (casin, 0x0.ffffffp0L, -0x1.fp-129L, 1.570451059810180415643718442157112705601L, -8.245504387859737323891843603996428534945e-36L),
3632 TEST_c_c (casin, -0x0.ffffffp0L, -0x1.fp-129L, -1.570451059810180415643718442157112705601L, -8.245504387859737323891843603996428534945e-36L),
3633 TEST_c_c (casin, 0.0L, 0x0.ffffffp0L, 0.0L, 8.813735448726938863015878255140556727969e-1L),
3634 TEST_c_c (casin, 0.0L, -0x0.ffffffp0L, 0.0L, -8.813735448726938863015878255140556727969e-1L),
3635 TEST_c_c (casin, -0.0L, 0x0.ffffffp0L, -0.0L, 8.813735448726938863015878255140556727969e-1L),
3636 TEST_c_c (casin, -0.0L, -0x0.ffffffp0L, -0.0L, -8.813735448726938863015878255140556727969e-1L),
3637 TEST_c_c (casin, 0x0.ffffffp0L, 0.0L, 1.570451059810180415643718442157112705601L, 0.0L),
3638 TEST_c_c (casin, -0x0.ffffffp0L, 0.0L, -1.570451059810180415643718442157112705601L, 0.0L),
3639 TEST_c_c (casin, 0x0.ffffffp0L, -0.0L, 1.570451059810180415643718442157112705601L, -0.0L),
3640 TEST_c_c (casin, -0x0.ffffffp0L, -0.0L, -1.570451059810180415643718442157112705601L, -0.0L),
3641 TEST_c_c (casin, 0x1p-23L, 0.5L, 1.066240299940009780479664302917201696886e-7L, 4.812118250596059896127318386463676808798e-1L),
3642 TEST_c_c (casin, 0x1p-23L, -0.5L, 1.066240299940009780479664302917201696886e-7L, -4.812118250596059896127318386463676808798e-1L),
3643 TEST_c_c (casin, -0x1p-23L, 0.5L, -1.066240299940009780479664302917201696886e-7L, 4.812118250596059896127318386463676808798e-1L),
3644 TEST_c_c (casin, -0x1p-23L, -0.5L, -1.066240299940009780479664302917201696886e-7L, -4.812118250596059896127318386463676808798e-1L),
3645 TEST_c_c (casin, 0.5L, 0x1p-23L, 5.235987755982934033165770729745469098254e-1L, 1.376510308240943236356088341381173571841e-7L),
3646 TEST_c_c (casin, -0.5L, 0x1p-23L, -5.235987755982934033165770729745469098254e-1L, 1.376510308240943236356088341381173571841e-7L),
3647 TEST_c_c (casin, 0.5L, -0x1p-23L, 5.235987755982934033165770729745469098254e-1L, -1.376510308240943236356088341381173571841e-7L),
3648 TEST_c_c (casin, -0.5L, -0x1p-23L, -5.235987755982934033165770729745469098254e-1L, -1.376510308240943236356088341381173571841e-7L),
3649 TEST_c_c (casin, 0x1.fp-129L, 0.5L, 2.546345110742945032959687790021055102355e-39L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3650 TEST_c_c (casin, 0x1.fp-129L, -0.5L, 2.546345110742945032959687790021055102355e-39L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3651 TEST_c_c (casin, -0x1.fp-129L, 0.5L, -2.546345110742945032959687790021055102355e-39L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3652 TEST_c_c (casin, -0x1.fp-129L, -0.5L, -2.546345110742945032959687790021055102355e-39L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3653 TEST_c_c (casin, 0.5L, 0x1.fp-129L, 5.235987755982988730771072305465838140329e-1L, 3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3654 TEST_c_c (casin, -0.5L, 0x1.fp-129L, -5.235987755982988730771072305465838140329e-1L, 3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3655 TEST_c_c (casin, 0.5L, -0x1.fp-129L, 5.235987755982988730771072305465838140329e-1L, -3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3656 TEST_c_c (casin, -0.5L, -0x1.fp-129L, -5.235987755982988730771072305465838140329e-1L, -3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3657 TEST_c_c (casin, 0x1p-23L, 0x1p-23L, 1.192092895507806853113684971258850504935e-7L, 1.192092895507818146886315028596704749235e-7L),
3658 TEST_c_c (casin, 0x1p-23L, -0x1p-23L, 1.192092895507806853113684971258850504935e-7L, -1.192092895507818146886315028596704749235e-7L),
3659 TEST_c_c (casin, -0x1p-23L, 0x1p-23L, -1.192092895507806853113684971258850504935e-7L, 1.192092895507818146886315028596704749235e-7L),
3660 TEST_c_c (casin, -0x1p-23L, -0x1p-23L, -1.192092895507806853113684971258850504935e-7L, -1.192092895507818146886315028596704749235e-7L),
3661 /* Bug 15319: underflow exception may be missing. */
3662 TEST_c_c (casin, 0x1.fp-129L, 0x1p-23L, 2.846900380897707329917933005874691056564e-39L, 1.192092895507809676556842485683592032154e-7L, UNDERFLOW_EXCEPTION_OK_FLOAT),
3663 TEST_c_c (casin, 0x1.fp-129L, -0x1p-23L, 2.846900380897707329917933005874691056564e-39L, -1.192092895507809676556842485683592032154e-7L, UNDERFLOW_EXCEPTION_OK_FLOAT),
3664 TEST_c_c (casin, -0x1.fp-129L, 0x1p-23L, -2.846900380897707329917933005874691056564e-39L, 1.192092895507809676556842485683592032154e-7L, UNDERFLOW_EXCEPTION_OK_FLOAT),
3665 TEST_c_c (casin, -0x1.fp-129L, -0x1p-23L, -2.846900380897707329917933005874691056564e-39L, -1.192092895507809676556842485683592032154e-7L, UNDERFLOW_EXCEPTION_OK_FLOAT),
3666 TEST_c_c (casin, 0x1p-23L, 0x1.fp-129L, 1.192092895507815323443157514352519154304e-7L, 2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3667 TEST_c_c (casin, -0x1p-23L, 0x1.fp-129L, -1.192092895507815323443157514352519154304e-7L, 2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3668 TEST_c_c (casin, 0x1p-23L, -0x1.fp-129L, 1.192092895507815323443157514352519154304e-7L, -2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3669 TEST_c_c (casin, -0x1p-23L, -0x1.fp-129L, -1.192092895507815323443157514352519154304e-7L, -2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3670 TEST_c_c (casin, 0.0L, 0x1p-23L, 0.0L, 1.192092895507809676556842485683592032154e-7L),
3671 TEST_c_c (casin, 0.0L, -0x1p-23L, 0.0L, -1.192092895507809676556842485683592032154e-7L),
3672 TEST_c_c (casin, -0.0L, 0x1p-23L, -0.0L, 1.192092895507809676556842485683592032154e-7L),
3673 TEST_c_c (casin, -0.0L, -0x1p-23L, -0.0L, -1.192092895507809676556842485683592032154e-7L),
3674 TEST_c_c (casin, 0x1p-23L, 0.0L, 1.192092895507815323443157514352519154304e-7L, 0.0L),
3675 TEST_c_c (casin, -0x1p-23L, 0.0L, -1.192092895507815323443157514352519154304e-7L, 0.0L),
3676 TEST_c_c (casin, 0x1p-23L, -0.0L, 1.192092895507815323443157514352519154304e-7L, -0.0L),
3677 TEST_c_c (casin, -0x1p-23L, -0.0L, -1.192092895507815323443157514352519154304e-7L, -0.0L),
3678 TEST_c_c (casin, 0x1.fp-129L, 0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3679 TEST_c_c (casin, 0x1.fp-129L, -0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3680 TEST_c_c (casin, -0x1.fp-129L, 0x1.fp-129L, -2.846900380897727558361783801085126250967e-39L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3681 TEST_c_c (casin, -0x1.fp-129L, -0x1.fp-129L, -2.846900380897727558361783801085126250967e-39L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
ccc8cadf 3682#ifndef TEST_FLOAT
08198877
JM		 3683 TEST_c_c (casin, 0x1p-52L, 0x0.fffffffffffff8p0L, 1.570092458683775146551022293016031474627e-16L, 8.813735870195429467279863907910458761820e-1L),
3684 TEST_c_c (casin, 0x1p-52L, -0x0.fffffffffffff8p0L, 1.570092458683775146551022293016031474627e-16L, -8.813735870195429467279863907910458761820e-1L),
3685 TEST_c_c (casin, -0x1p-52L, 0x0.fffffffffffff8p0L, -1.570092458683775146551022293016031474627e-16L, 8.813735870195429467279863907910458761820e-1L),
3686 TEST_c_c (casin, -0x1p-52L, -0x0.fffffffffffff8p0L, -1.570092458683775146551022293016031474627e-16L, -8.813735870195429467279863907910458761820e-1L),
3687 TEST_c_c (casin, 0x0.fffffffffffff8p0L, 0x1p-52L, 1.570796307840326780080580569360500172043L, 1.171456840272878582596796205397918831268e-8L),
3688 TEST_c_c (casin, -0x0.fffffffffffff8p0L, 0x1p-52L, -1.570796307840326780080580569360500172043L, 1.171456840272878582596796205397918831268e-8L),
3689 TEST_c_c (casin, 0x0.fffffffffffff8p0L, -0x1p-52L, 1.570796307840326780080580569360500172043L, -1.171456840272878582596796205397918831268e-8L),
3690 TEST_c_c (casin, -0x0.fffffffffffff8p0L, -0x1p-52L, -1.570796307840326780080580569360500172043L, -1.171456840272878582596796205397918831268e-8L),
3691 TEST_c_c (casin, 0x1.fp-1025L, 0x0.fffffffffffff8p0L, 3.810492908885321954658152505985270452320e-309L, 8.813735870195429467279863907910371604180e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3692 TEST_c_c (casin, 0x1.fp-1025L, -0x0.fffffffffffff8p0L, 3.810492908885321954658152505985270452320e-309L, -8.813735870195429467279863907910371604180e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3693 TEST_c_c (casin, -0x1.fp-1025L, 0x0.fffffffffffff8p0L, -3.810492908885321954658152505985270452320e-309L, 8.813735870195429467279863907910371604180e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3694 TEST_c_c (casin, -0x1.fp-1025L, -0x0.fffffffffffff8p0L, -3.810492908885321954658152505985270452320e-309L, -8.813735870195429467279863907910371604180e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3695 TEST_c_c (casin, 0x0.fffffffffffff8p0L, 0x1.fp-1025L, 1.570796311893735425383665303776316016594L, 3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3696 TEST_c_c (casin, -0x0.fffffffffffff8p0L, 0x1.fp-1025L, -1.570796311893735425383665303776316016594L, 3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3697 TEST_c_c (casin, 0x0.fffffffffffff8p0L, -0x1.fp-1025L, 1.570796311893735425383665303776316016594L, -3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3698 TEST_c_c (casin, -0x0.fffffffffffff8p0L, -0x1.fp-1025L, -1.570796311893735425383665303776316016594L, -3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3699 TEST_c_c (casin, 0.0L, 0x0.fffffffffffff8p0L, 0.0L, 8.813735870195429467279863907910371604180e-1L),
3700 TEST_c_c (casin, 0.0L, -0x0.fffffffffffff8p0L, 0.0L, -8.813735870195429467279863907910371604180e-1L),
3701 TEST_c_c (casin, -0.0L, 0x0.fffffffffffff8p0L, -0.0L, 8.813735870195429467279863907910371604180e-1L),
3702 TEST_c_c (casin, -0.0L, -0x0.fffffffffffff8p0L, -0.0L, -8.813735870195429467279863907910371604180e-1L),
3703 TEST_c_c (casin, 0x0.fffffffffffff8p0L, 0.0L, 1.570796311893735425383665303776316016594L, 0.0L),
3704 TEST_c_c (casin, -0x0.fffffffffffff8p0L, 0.0L, -1.570796311893735425383665303776316016594L, 0.0L),
3705 TEST_c_c (casin, 0x0.fffffffffffff8p0L, -0.0L, 1.570796311893735425383665303776316016594L, -0.0L),
3706 TEST_c_c (casin, -0x0.fffffffffffff8p0L, -0.0L, -1.570796311893735425383665303776316016594L, -0.0L),
3707#endif
3708 TEST_c_c (casin, 0x1p-52L, 0.5L, 1.986027322597818397661816253158024383707e-16L, 4.812118250596034474977589134243772428682e-1L),
3709 TEST_c_c (casin, 0x1p-52L, -0.5L, 1.986027322597818397661816253158024383707e-16L, -4.812118250596034474977589134243772428682e-1L),
3710 TEST_c_c (casin, -0x1p-52L, 0.5L, -1.986027322597818397661816253158024383707e-16L, 4.812118250596034474977589134243772428682e-1L),
3711 TEST_c_c (casin, -0x1p-52L, -0.5L, -1.986027322597818397661816253158024383707e-16L, -4.812118250596034474977589134243772428682e-1L),
3712 TEST_c_c (casin, 0.5L, 0x1p-52L, 5.235987755982988730771072305465648369889e-1L, 2.563950248511418570403591756798643804971e-16L),
3713 TEST_c_c (casin, -0.5L, 0x1p-52L, -5.235987755982988730771072305465648369889e-1L, 2.563950248511418570403591756798643804971e-16L),
3714 TEST_c_c (casin, 0.5L, -0x1p-52L, 5.235987755982988730771072305465648369889e-1L, -2.563950248511418570403591756798643804971e-16L),
3715 TEST_c_c (casin, -0.5L, -0x1p-52L, -5.235987755982988730771072305465648369889e-1L, -2.563950248511418570403591756798643804971e-16L),
ccc8cadf 3716#ifndef TEST_FLOAT
08198877
JM		 3717 TEST_c_c (casin, 0x1.fp-1025L, 0.5L, 4.819934639999230680322935210539402497827e-309L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3718 TEST_c_c (casin, 0x1.fp-1025L, -0.5L, 4.819934639999230680322935210539402497827e-309L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3719 TEST_c_c (casin, -0x1.fp-1025L, 0.5L, -4.819934639999230680322935210539402497827e-309L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3720 TEST_c_c (casin, -0x1.fp-1025L, -0.5L, -4.819934639999230680322935210539402497827e-309L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3721 TEST_c_c (casin, 0.5L, 0x1.fp-1025L, 5.235987755982988730771072305465838140329e-1L, 6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3722 TEST_c_c (casin, -0.5L, 0x1.fp-1025L, -5.235987755982988730771072305465838140329e-1L, 6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3723 TEST_c_c (casin, 0.5L, -0x1.fp-1025L, 5.235987755982988730771072305465838140329e-1L, -6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3724 TEST_c_c (casin, -0.5L, -0x1.fp-1025L, -5.235987755982988730771072305465838140329e-1L, -6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3725#endif
3726 TEST_c_c (casin, 0x1p-52L, 0x1p-52L, 2.220446049250313080847263336181604132852e-16L, 2.220446049250313080847263336181677117148e-16L),
3727 TEST_c_c (casin, 0x1p-52L, -0x1p-52L, 2.220446049250313080847263336181604132852e-16L, -2.220446049250313080847263336181677117148e-16L),
3728 TEST_c_c (casin, -0x1p-52L, 0x1p-52L, -2.220446049250313080847263336181604132852e-16L, 2.220446049250313080847263336181677117148e-16L),
3729 TEST_c_c (casin, -0x1p-52L, -0x1p-52L, -2.220446049250313080847263336181604132852e-16L, -2.220446049250313080847263336181677117148e-16L),
ccc8cadf 3730#ifndef TEST_FLOAT
08198877
JM		 3731 /* Bug 15319: underflow exception may be missing. */
3732 TEST_c_c (casin, 0x1.fp-1025L, 0x1p-52L, 5.388850751072128349671657362289283247603e-309L, 2.220446049250313080847263336181622378926e-16L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3733 TEST_c_c (casin, 0x1.fp-1025L, -0x1p-52L, 5.388850751072128349671657362289283247603e-309L, -2.220446049250313080847263336181622378926e-16L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3734 TEST_c_c (casin, -0x1.fp-1025L, 0x1p-52L, -5.388850751072128349671657362289283247603e-309L, 2.220446049250313080847263336181622378926e-16L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3735 TEST_c_c (casin, -0x1.fp-1025L, -0x1p-52L, -5.388850751072128349671657362289283247603e-309L, -2.220446049250313080847263336181622378926e-16L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3736 TEST_c_c (casin, 0x1p-52L, 0x1.fp-1025L, 2.220446049250313080847263336181658871074e-16L, 5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3737 TEST_c_c (casin, -0x1p-52L, 0x1.fp-1025L, -2.220446049250313080847263336181658871074e-16L, 5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3738 TEST_c_c (casin, 0x1p-52L, -0x1.fp-1025L, 2.220446049250313080847263336181658871074e-16L, -5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3739 TEST_c_c (casin, -0x1p-52L, -0x1.fp-1025L, -2.220446049250313080847263336181658871074e-16L, -5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3740#endif
3741 TEST_c_c (casin, 0.0L, 0x1p-52L, 0.0L, 2.220446049250313080847263336181622378926e-16L),
3742 TEST_c_c (casin, 0.0L, -0x1p-52L, 0.0L, -2.220446049250313080847263336181622378926e-16L),
3743 TEST_c_c (casin, -0.0L, 0x1p-52L, -0.0L, 2.220446049250313080847263336181622378926e-16L),
3744 TEST_c_c (casin, -0.0L, -0x1p-52L, -0.0L, -2.220446049250313080847263336181622378926e-16L),
3745 TEST_c_c (casin, 0x1p-52L, 0.0L, 2.220446049250313080847263336181658871074e-16L, 0.0L),
3746 TEST_c_c (casin, -0x1p-52L, 0.0L, -2.220446049250313080847263336181658871074e-16L, 0.0L),
3747 TEST_c_c (casin, 0x1p-52L, -0.0L, 2.220446049250313080847263336181658871074e-16L, -0.0L),
3748 TEST_c_c (casin, -0x1p-52L, -0.0L, -2.220446049250313080847263336181658871074e-16L, -0.0L),
ccc8cadf 3749#ifndef TEST_FLOAT
08198877
JM		 3750 TEST_c_c (casin, 0x1.fp-1025L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3751 TEST_c_c (casin, 0x1.fp-1025L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3752 TEST_c_c (casin, -0x1.fp-1025L, 0x1.fp-1025L, -5.388850751072128349671657362289416093031e-309L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3753 TEST_c_c (casin, -0x1.fp-1025L, -0x1.fp-1025L, -5.388850751072128349671657362289416093031e-309L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
ccc8cadf
JM		 3754#endif
3755#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 3756 TEST_c_c (casin, 0x1p-63L, 0x0.ffffffffffffffffp0L, 7.666467083416870407402049869781566856442e-20L, 8.813735870195430251942769895627079569937e-1L),
3757 TEST_c_c (casin, 0x1p-63L, -0x0.ffffffffffffffffp0L, 7.666467083416870407402049869781566856442e-20L, -8.813735870195430251942769895627079569937e-1L),
3758 TEST_c_c (casin, -0x1p-63L, 0x0.ffffffffffffffffp0L, -7.666467083416870407402049869781566856442e-20L, 8.813735870195430251942769895627079569937e-1L),
3759 TEST_c_c (casin, -0x1p-63L, -0x0.ffffffffffffffffp0L, -7.666467083416870407402049869781566856442e-20L, -8.813735870195430251942769895627079569937e-1L),
3760 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, 0x1p-63L, 1.570796326376055842114524927965556247908L, 2.588578361325995866221775673638805081337e-10L),
3761 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, 0x1p-63L, -1.570796326376055842114524927965556247908L, 2.588578361325995866221775673638805081337e-10L),
3762 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, -0x1p-63L, 1.570796326376055842114524927965556247908L, -2.588578361325995866221775673638805081337e-10L),
3763 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, -0x1p-63L, -1.570796326376055842114524927965556247908L, -2.588578361325995866221775673638805081337e-10L),
ccc8cadf 3764# if LDBL_MIN_EXP <= -16381
08198877
JM		 3765 TEST_c_c (casin, 0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 5.757683115456107044287327268904964422212e-4933L, 8.813735870195430251942769895627079569917e-1L, UNDERFLOW_EXCEPTION),
3766 TEST_c_c (casin, 0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 5.757683115456107044287327268904964422212e-4933L, -8.813735870195430251942769895627079569917e-1L, UNDERFLOW_EXCEPTION),
3767 TEST_c_c (casin, -0x1.fp-16385L, 0x0.ffffffffffffffffp0L, -5.757683115456107044287327268904964422212e-4933L, 8.813735870195430251942769895627079569917e-1L, UNDERFLOW_EXCEPTION),
3768 TEST_c_c (casin, -0x1.fp-16385L, -0x0.ffffffffffffffffp0L, -5.757683115456107044287327268904964422212e-4933L, -8.813735870195430251942769895627079569917e-1L, UNDERFLOW_EXCEPTION),
3769 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 1.570796326465624365239962068302568888898L, 2.472906068161537187835415298076415423459e-4923L),
3770 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, 0x1.fp-16385L, -1.570796326465624365239962068302568888898L, 2.472906068161537187835415298076415423459e-4923L),
3771 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 1.570796326465624365239962068302568888898L, -2.472906068161537187835415298076415423459e-4923L),
3772 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, -0x1.fp-16385L, -1.570796326465624365239962068302568888898L, -2.472906068161537187835415298076415423459e-4923L),
ccc8cadf 3773# endif
08198877
JM		 3774 TEST_c_c (casin, 0.0L, 0x0.ffffffffffffffffp0L, 0.0L, 8.813735870195430251942769895627079569917e-1L),
3775 TEST_c_c (casin, 0.0L, -0x0.ffffffffffffffffp0L, 0.0L, -8.813735870195430251942769895627079569917e-1L),
3776 TEST_c_c (casin, -0.0L, 0x0.ffffffffffffffffp0L, -0.0L, 8.813735870195430251942769895627079569917e-1L),
3777 TEST_c_c (casin, -0.0L, -0x0.ffffffffffffffffp0L, -0.0L, -8.813735870195430251942769895627079569917e-1L),
3778 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, 0.0L, 1.570796326465624365239962068302568888898L, 0.0L),
3779 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, 0.0L, -1.570796326465624365239962068302568888898L, 0.0L),
3780 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, -0.0L, 1.570796326465624365239962068302568888898L, -0.0L),
3781 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, -0.0L, -1.570796326465624365239962068302568888898L, -0.0L),
3782#endif
3783 TEST_c_c (casin, 0x1p-63L, 0.5L, 9.697399036122160144833087173623140436413e-20L, 4.812118250596034474977589134243684231373e-1L),
3784 TEST_c_c (casin, 0x1p-63L, -0.5L, 9.697399036122160144833087173623140436413e-20L, -4.812118250596034474977589134243684231373e-1L),
3785 TEST_c_c (casin, -0x1p-63L, 0.5L, -9.697399036122160144833087173623140436413e-20L, 4.812118250596034474977589134243684231373e-1L),
3786 TEST_c_c (casin, -0x1p-63L, -0.5L, -9.697399036122160144833087173623140436413e-20L, -4.812118250596034474977589134243684231373e-1L),
3787 TEST_c_c (casin, 0.5L, 0x1p-63L, 5.235987755982988730771072305465838140283e-1L, 1.251928832280966098829878787499365228659e-19L),
3788 TEST_c_c (casin, -0.5L, 0x1p-63L, -5.235987755982988730771072305465838140283e-1L, 1.251928832280966098829878787499365228659e-19L),
3789 TEST_c_c (casin, 0.5L, -0x1p-63L, 5.235987755982988730771072305465838140283e-1L, -1.251928832280966098829878787499365228659e-19L),
3790 TEST_c_c (casin, -0.5L, -0x1p-63L, -5.235987755982988730771072305465838140283e-1L, -1.251928832280966098829878787499365228659e-19L),
ccc8cadf 3791#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3792 TEST_c_c (casin, 0x1.fp-16385L, 0.5L, 7.282957076134209141226696333885150260319e-4933L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION),
3793 TEST_c_c (casin, 0x1.fp-16385L, -0.5L, 7.282957076134209141226696333885150260319e-4933L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION),
3794 TEST_c_c (casin, -0x1.fp-16385L, 0.5L, -7.282957076134209141226696333885150260319e-4933L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION),
3795 TEST_c_c (casin, -0x1.fp-16385L, -0.5L, -7.282957076134209141226696333885150260319e-4933L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION),
3796 TEST_c_c (casin, 0.5L, 0x1.fp-16385L, 5.235987755982988730771072305465838140329e-1L, 9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
3797 TEST_c_c (casin, -0.5L, 0x1.fp-16385L, -5.235987755982988730771072305465838140329e-1L, 9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
3798 TEST_c_c (casin, 0.5L, -0x1.fp-16385L, 5.235987755982988730771072305465838140329e-1L, -9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
3799 TEST_c_c (casin, -0.5L, -0x1.fp-16385L, -5.235987755982988730771072305465838140329e-1L, -9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
3800#endif
3801 TEST_c_c (casin, 0x1p-63L, 0x1p-63L, 1.084202172485504434007452800869941711422e-19L, 1.084202172485504434007452800869941711430e-19L),
3802 TEST_c_c (casin, 0x1p-63L, -0x1p-63L, 1.084202172485504434007452800869941711422e-19L, -1.084202172485504434007452800869941711430e-19L),
3803 TEST_c_c (casin, -0x1p-63L, 0x1p-63L, -1.084202172485504434007452800869941711422e-19L, 1.084202172485504434007452800869941711430e-19L),
3804 TEST_c_c (casin, -0x1p-63L, -0x1p-63L, -1.084202172485504434007452800869941711422e-19L, -1.084202172485504434007452800869941711430e-19L),
ccc8cadf 3805#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3806 TEST_c_c (casin, 0x1.fp-16385L, 0x1p-63L, 8.142593549724601460479922838826119584369e-4933L, 1.084202172485504434007452800869941711424e-19L, UNDERFLOW_EXCEPTION),
3807 TEST_c_c (casin, 0x1.fp-16385L, -0x1p-63L, 8.142593549724601460479922838826119584369e-4933L, -1.084202172485504434007452800869941711424e-19L, UNDERFLOW_EXCEPTION),
3808 TEST_c_c (casin, -0x1.fp-16385L, 0x1p-63L, -8.142593549724601460479922838826119584369e-4933L, 1.084202172485504434007452800869941711424e-19L, UNDERFLOW_EXCEPTION),
3809 TEST_c_c (casin, -0x1.fp-16385L, -0x1p-63L, -8.142593549724601460479922838826119584369e-4933L, -1.084202172485504434007452800869941711424e-19L, UNDERFLOW_EXCEPTION),
3810 TEST_c_c (casin, 0x1p-63L, 0x1.fp-16385L, 1.084202172485504434007452800869941711428e-19L, 8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
3811 TEST_c_c (casin, -0x1p-63L, 0x1.fp-16385L, -1.084202172485504434007452800869941711428e-19L, 8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
3812 TEST_c_c (casin, 0x1p-63L, -0x1.fp-16385L, 1.084202172485504434007452800869941711428e-19L, -8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
3813 TEST_c_c (casin, -0x1p-63L, -0x1.fp-16385L, -1.084202172485504434007452800869941711428e-19L, -8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
3814#endif
3815 TEST_c_c (casin, 0.0L, 0x1p-63L, 0.0L, 1.084202172485504434007452800869941711424e-19L),
3816 TEST_c_c (casin, 0.0L, -0x1p-63L, 0.0L, -1.084202172485504434007452800869941711424e-19L),
3817 TEST_c_c (casin, -0.0L, 0x1p-63L, -0.0L, 1.084202172485504434007452800869941711424e-19L),
3818 TEST_c_c (casin, -0.0L, -0x1p-63L, -0.0L, -1.084202172485504434007452800869941711424e-19L),
3819 TEST_c_c (casin, 0x1p-63L, 0.0L, 1.084202172485504434007452800869941711428e-19L, 0.0L),
3820 TEST_c_c (casin, -0x1p-63L, 0.0L, -1.084202172485504434007452800869941711428e-19L, 0.0L),
3821 TEST_c_c (casin, 0x1p-63L, -0.0L, 1.084202172485504434007452800869941711428e-19L, -0.0L),
3822 TEST_c_c (casin, -0x1p-63L, -0.0L, -1.084202172485504434007452800869941711428e-19L, -0.0L),
ccc8cadf 3823#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3824 TEST_c_c (casin, 0x1.fp-16385L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3825 TEST_c_c (casin, 0x1.fp-16385L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3826 TEST_c_c (casin, -0x1.fp-16385L, 0x1.fp-16385L, -8.142593549724601460479922838826119584417e-4933L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3827 TEST_c_c (casin, -0x1.fp-16385L, -0x1.fp-16385L, -8.142593549724601460479922838826119584417e-4933L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
ccc8cadf
JM		 3828#endif
3829#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 3830 TEST_c_c (casin, 0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 1.743152798421049375791483240187377443526e-32L, 8.813735870195430252326093249797835932642e-1L),
3831 TEST_c_c (casin, 0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 1.743152798421049375791483240187377443526e-32L, -8.813735870195430252326093249797835932642e-1L),
3832 TEST_c_c (casin, -0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, -1.743152798421049375791483240187377443526e-32L, 8.813735870195430252326093249797835932642e-1L),
3833 TEST_c_c (casin, -0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, -1.743152798421049375791483240187377443526e-32L, -8.813735870195430252326093249797835932642e-1L),
3834 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 1.570796326794896419512475791677915736035L, 1.234330349600789959989661887846005659983e-16L),
3835 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, -1.570796326794896419512475791677915736035L, 1.234330349600789959989661887846005659983e-16L),
3836 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 1.570796326794896419512475791677915736035L, -1.234330349600789959989661887846005659983e-16L),
3837 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, -1.570796326794896419512475791677915736035L, -1.234330349600789959989661887846005659983e-16L),
3838 TEST_c_c (casin, 0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 3.810492908885321743133304375216641110205e-309L, 8.813735870195430252326093249797835932642e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3839 TEST_c_c (casin, 0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 3.810492908885321743133304375216641110205e-309L, -8.813735870195430252326093249797835932642e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3840 TEST_c_c (casin, -0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, -3.810492908885321743133304375216641110205e-309L, 8.813735870195430252326093249797835932642e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3841 TEST_c_c (casin, -0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, -3.810492908885321743133304375216641110205e-309L, -8.813735870195430252326093249797835932642e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3842 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 1.570796326794896462222075823262245502760L, 3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3843 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, -1.570796326794896462222075823262245502760L, 3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3844 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 1.570796326794896462222075823262245502760L, -3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3845 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, -1.570796326794896462222075823262245502760L, -3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3846 TEST_c_c (casin, 0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 8.813735870195430252326093249797835932642e-1L),
3847 TEST_c_c (casin, 0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, -8.813735870195430252326093249797835932642e-1L),
3848 TEST_c_c (casin, -0.0L, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 8.813735870195430252326093249797835932642e-1L),
3849 TEST_c_c (casin, -0.0L, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, -8.813735870195430252326093249797835932642e-1L),
3850 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 1.570796326794896462222075823262245502760L, 0.0L),
3851 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, -1.570796326794896462222075823262245502760L, 0.0L),
3852 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 1.570796326794896462222075823262245502760L, -0.0L),
3853 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, -1.570796326794896462222075823262245502760L, -0.0L),
3854#endif
3855 TEST_c_c (casin, 0x1p-105L, 0.5L, 2.204933261082751447436996198490110245167e-32L, 4.812118250596034474977589134243684231352e-1L),
3856 TEST_c_c (casin, 0x1p-105L, -0.5L, 2.204933261082751447436996198490110245167e-32L, -4.812118250596034474977589134243684231352e-1L),
3857 TEST_c_c (casin, -0x1p-105L, 0.5L, -2.204933261082751447436996198490110245167e-32L, 4.812118250596034474977589134243684231352e-1L),
3858 TEST_c_c (casin, -0x1p-105L, -0.5L, -2.204933261082751447436996198490110245167e-32L, -4.812118250596034474977589134243684231352e-1L),
3859 TEST_c_c (casin, 0.5L, 0x1p-105L, 5.235987755982988730771072305465838140329e-1L, 2.846556599890768890940941645338546615370e-32L),
3860 TEST_c_c (casin, -0.5L, 0x1p-105L, -5.235987755982988730771072305465838140329e-1L, 2.846556599890768890940941645338546615370e-32L),
3861 TEST_c_c (casin, 0.5L, -0x1p-105L, 5.235987755982988730771072305465838140329e-1L, -2.846556599890768890940941645338546615370e-32L),
3862 TEST_c_c (casin, -0.5L, -0x1p-105L, -5.235987755982988730771072305465838140329e-1L, -2.846556599890768890940941645338546615370e-32L),
3863 TEST_c_c (casin, 0x1p-105L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 2.465190328815661891911651766508706967729e-32L),
3864 TEST_c_c (casin, 0x1p-105L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -2.465190328815661891911651766508706967729e-32L),
3865 TEST_c_c (casin, -0x1p-105L, 0x1p-105L, -2.465190328815661891911651766508706967729e-32L, 2.465190328815661891911651766508706967729e-32L),
3866 TEST_c_c (casin, -0x1p-105L, -0x1p-105L, -2.465190328815661891911651766508706967729e-32L, -2.465190328815661891911651766508706967729e-32L),
ccc8cadf 3867#ifndef TEST_FLOAT
08198877
JM		 3868 /* Bug 15319: underflow exception may be missing. */
3869 TEST_c_c (casin, 0x1.fp-1025L, 0x1p-105L, 5.388850751072128349671657362289416093031e-309L, 2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3870 TEST_c_c (casin, 0x1.fp-1025L, -0x1p-105L, 5.388850751072128349671657362289416093031e-309L, -2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3871 TEST_c_c (casin, -0x1.fp-1025L, 0x1p-105L, -5.388850751072128349671657362289416093031e-309L, 2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3872 TEST_c_c (casin, -0x1.fp-1025L, -0x1p-105L, -5.388850751072128349671657362289416093031e-309L, -2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3873 TEST_c_c (casin, 0x1p-105L, 0x1.fp-1025L, 2.465190328815661891911651766508706967729e-32L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3874 TEST_c_c (casin, -0x1p-105L, 0x1.fp-1025L, -2.465190328815661891911651766508706967729e-32L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3875 TEST_c_c (casin, 0x1p-105L, -0x1.fp-1025L, 2.465190328815661891911651766508706967729e-32L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3876 TEST_c_c (casin, -0x1p-105L, -0x1.fp-1025L, -2.465190328815661891911651766508706967729e-32L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3877#endif
3878 TEST_c_c (casin, 0.0L, 0x1p-105L, 0.0L, 2.465190328815661891911651766508706967729e-32L),
3879 TEST_c_c (casin, 0.0L, -0x1p-105L, 0.0L, -2.465190328815661891911651766508706967729e-32L),
3880 TEST_c_c (casin, -0.0L, 0x1p-105L, -0.0L, 2.465190328815661891911651766508706967729e-32L),
3881 TEST_c_c (casin, -0.0L, -0x1p-105L, -0.0L, -2.465190328815661891911651766508706967729e-32L),
3882 TEST_c_c (casin, 0x1p-105L, 0.0L, 2.465190328815661891911651766508706967729e-32L, 0.0L),
3883 TEST_c_c (casin, -0x1p-105L, 0.0L, -2.465190328815661891911651766508706967729e-32L, 0.0L),
3884 TEST_c_c (casin, 0x1p-105L, -0.0L, 2.465190328815661891911651766508706967729e-32L, -0.0L),
3885 TEST_c_c (casin, -0x1p-105L, -0.0L, -2.465190328815661891911651766508706967729e-32L, -0.0L),
ccc8cadf 3886#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 3887 TEST_c_c (casin, 0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.361838123766444824837096281396380300349e-34L, 8.813735870195430252326093249797922409363e-1L),
3888 TEST_c_c (casin, 0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.361838123766444824837096281396380300349e-34L, -8.813735870195430252326093249797922409363e-1L),
3889 TEST_c_c (casin, -0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, -1.361838123766444824837096281396380300349e-34L, 8.813735870195430252326093249797922409363e-1L),
3890 TEST_c_c (casin, -0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, -1.361838123766444824837096281396380300349e-34L, -8.813735870195430252326093249797922409363e-1L),
3891 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 1.570796326794896601578502908312986698624L, 1.091004200533850618345330909857103457781e-17L),
3892 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, -1.570796326794896601578502908312986698624L, 1.091004200533850618345330909857103457781e-17L),
3893 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 1.570796326794896601578502908312986698624L, -1.091004200533850618345330909857103457781e-17L),
3894 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, -1.570796326794896601578502908312986698624L, -1.091004200533850618345330909857103457781e-17L),
3895 TEST_c_c (casin, 0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 5.757683115456107044131264955348449231681e-4933L, 8.813735870195430252326093249797922409363e-1L, UNDERFLOW_EXCEPTION),
3896 TEST_c_c (casin, 0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 5.757683115456107044131264955348449231681e-4933L, -8.813735870195430252326093249797922409363e-1L, UNDERFLOW_EXCEPTION),
3897 TEST_c_c (casin, -0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, -5.757683115456107044131264955348449231681e-4933L, 8.813735870195430252326093249797922409363e-1L, UNDERFLOW_EXCEPTION),
3898 TEST_c_c (casin, -0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, -5.757683115456107044131264955348449231681e-4933L, -8.813735870195430252326093249797922409363e-1L, UNDERFLOW_EXCEPTION),
3899 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 1.570796326794896605353533883825294686803L, 5.867357004219059108790368268900490184505e-4916L),
3900 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, -1.570796326794896605353533883825294686803L, 5.867357004219059108790368268900490184505e-4916L),
3901 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 1.570796326794896605353533883825294686803L, -5.867357004219059108790368268900490184505e-4916L),
3902 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, -1.570796326794896605353533883825294686803L, -5.867357004219059108790368268900490184505e-4916L),
3903 TEST_c_c (casin, 0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 8.813735870195430252326093249797922409363e-1L),
3904 TEST_c_c (casin, 0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, -8.813735870195430252326093249797922409363e-1L),
3905 TEST_c_c (casin, -0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 8.813735870195430252326093249797922409363e-1L),
3906 TEST_c_c (casin, -0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, -8.813735870195430252326093249797922409363e-1L),
3907 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 1.570796326794896605353533883825294686803L, 0.0L),
3908 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, -1.570796326794896605353533883825294686803L, 0.0L),
3909 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 1.570796326794896605353533883825294686803L, -0.0L),
3910 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, -1.570796326794896605353533883825294686803L, -0.0L),
3911#endif
3912 TEST_c_c (casin, 0x1p-112L, 0.5L, 1.722604110220899568310153280070398629037e-34L, 4.812118250596034474977589134243684231352e-1L),
3913 TEST_c_c (casin, 0x1p-112L, -0.5L, 1.722604110220899568310153280070398629037e-34L, -4.812118250596034474977589134243684231352e-1L),
3914 TEST_c_c (casin, -0x1p-112L, 0.5L, -1.722604110220899568310153280070398629037e-34L, 4.812118250596034474977589134243684231352e-1L),
3915 TEST_c_c (casin, -0x1p-112L, -0.5L, -1.722604110220899568310153280070398629037e-34L, -4.812118250596034474977589134243684231352e-1L),
3916 TEST_c_c (casin, 0.5L, 0x1p-112L, 5.235987755982988730771072305465838140329e-1L, 2.223872343664663196047610660420739543258e-34L),
3917 TEST_c_c (casin, -0.5L, 0x1p-112L, -5.235987755982988730771072305465838140329e-1L, 2.223872343664663196047610660420739543258e-34L),
3918 TEST_c_c (casin, 0.5L, -0x1p-112L, 5.235987755982988730771072305465838140329e-1L, -2.223872343664663196047610660420739543258e-34L),
3919 TEST_c_c (casin, -0.5L, -0x1p-112L, -5.235987755982988730771072305465838140329e-1L, -2.223872343664663196047610660420739543258e-34L),
3920 TEST_c_c (casin, 0x1p-112L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.925929944387235853055977942584927318538e-34L),
3921 TEST_c_c (casin, 0x1p-112L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.925929944387235853055977942584927318538e-34L),
3922 TEST_c_c (casin, -0x1p-112L, 0x1p-112L, -1.925929944387235853055977942584927318538e-34L, 1.925929944387235853055977942584927318538e-34L),
3923 TEST_c_c (casin, -0x1p-112L, -0x1p-112L, -1.925929944387235853055977942584927318538e-34L, -1.925929944387235853055977942584927318538e-34L),
ccc8cadf 3924#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3925 TEST_c_c (casin, 0x1.fp-16385L, 0x1p-112L, 8.142593549724601460479922838826119584417e-4933L, 1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
3926 TEST_c_c (casin, 0x1.fp-16385L, -0x1p-112L, 8.142593549724601460479922838826119584417e-4933L, -1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
3927 TEST_c_c (casin, -0x1.fp-16385L, 0x1p-112L, -8.142593549724601460479922838826119584417e-4933L, 1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
3928 TEST_c_c (casin, -0x1.fp-16385L, -0x1p-112L, -8.142593549724601460479922838826119584417e-4933L, -1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
3929 TEST_c_c (casin, 0x1p-112L, 0x1.fp-16385L, 1.925929944387235853055977942584927318538e-34L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3930 TEST_c_c (casin, -0x1p-112L, 0x1.fp-16385L, -1.925929944387235853055977942584927318538e-34L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3931 TEST_c_c (casin, 0x1p-112L, -0x1.fp-16385L, 1.925929944387235853055977942584927318538e-34L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3932 TEST_c_c (casin, -0x1p-112L, -0x1.fp-16385L, -1.925929944387235853055977942584927318538e-34L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3933#endif
3934 TEST_c_c (casin, 0.0L, 0x1p-112L, 0.0L, 1.925929944387235853055977942584927318538e-34L),
3935 TEST_c_c (casin, 0.0L, -0x1p-112L, 0.0L, -1.925929944387235853055977942584927318538e-34L),
3936 TEST_c_c (casin, -0.0L, 0x1p-112L, -0.0L, 1.925929944387235853055977942584927318538e-34L),
3937 TEST_c_c (casin, -0.0L, -0x1p-112L, -0.0L, -1.925929944387235853055977942584927318538e-34L),
3938 TEST_c_c (casin, 0x1p-112L, 0.0L, 1.925929944387235853055977942584927318538e-34L, 0.0L),
3939 TEST_c_c (casin, -0x1p-112L, 0.0L, -1.925929944387235853055977942584927318538e-34L, 0.0L),
3940 TEST_c_c (casin, 0x1p-112L, -0.0L, 1.925929944387235853055977942584927318538e-34L, -0.0L),
3941 TEST_c_c (casin, -0x1p-112L, -0.0L, -1.925929944387235853055977942584927318538e-34L, -0.0L),
3942
3943 TEST_c_c (casin, 0.75L, 1.25L, 0.453276177638793913448921196101971749L, 1.13239363160530819522266333696834467L),
3944 TEST_c_c (casin, -2, -3, -0.57065278432109940071028387968566963L, -1.9833870299165354323470769028940395L),
3945 END_DATA (casin)
3946 };
8847214f
UD		 3947
3948static void
08198877 3949casin_test (void)
8847214f 3950{
aaca11d8 3951 errno = 0;
08198877 3952 FUNC(casin) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD		 3953 if (errno == ENOSYS)
3954 /* Function not implemented. */
3955 return;
3956
08198877
JM		 3957 START (casin);
3958 RUN_TEST_LOOP_c_c (casin, casin_test_data, );
3959 END (casin, complex);
3960}
8847214f 3961
08198877
JM		 3962
3963static const struct test_c_c_data casinh_test_data[] =
3964 {
3965 START_DATA (casinh),
3966 TEST_c_c (casinh, 0, 0, 0.0, 0.0),
3967 TEST_c_c (casinh, minus_zero, 0, minus_zero, 0),
3968 TEST_c_c (casinh, 0, minus_zero, 0.0, minus_zero),
3969 TEST_c_c (casinh, minus_zero, minus_zero, minus_zero, minus_zero),
3970
3971 TEST_c_c (casinh, plus_infty, plus_infty, plus_infty, M_PI_4l),
3972 TEST_c_c (casinh, plus_infty, minus_infty, plus_infty, -M_PI_4l),
3973 TEST_c_c (casinh, minus_infty, plus_infty, minus_infty, M_PI_4l),
3974 TEST_c_c (casinh, minus_infty, minus_infty, minus_infty, -M_PI_4l),
3975
3976 TEST_c_c (casinh, -10.0, plus_infty, minus_infty, M_PI_2l),
3977 TEST_c_c (casinh, -10.0, minus_infty, minus_infty, -M_PI_2l),
3978 TEST_c_c (casinh, 0, plus_infty, plus_infty, M_PI_2l),
3979 TEST_c_c (casinh, 0, minus_infty, plus_infty, -M_PI_2l),
3980 TEST_c_c (casinh, minus_zero, plus_infty, minus_infty, M_PI_2l),
3981 TEST_c_c (casinh, minus_zero, minus_infty, minus_infty, -M_PI_2l),
3982 TEST_c_c (casinh, 0.1L, plus_infty, plus_infty, M_PI_2l),
3983 TEST_c_c (casinh, 0.1L, minus_infty, plus_infty, -M_PI_2l),
3984
3985 TEST_c_c (casinh, minus_infty, 0, minus_infty, 0.0),
3986 TEST_c_c (casinh, minus_infty, minus_zero, minus_infty, minus_zero),
3987 TEST_c_c (casinh, minus_infty, 100, minus_infty, 0.0),
3988 TEST_c_c (casinh, minus_infty, -100, minus_infty, minus_zero),
3989
3990 TEST_c_c (casinh, plus_infty, 0, plus_infty, 0.0),
3991 TEST_c_c (casinh, plus_infty, minus_zero, plus_infty, minus_zero),
3992 TEST_c_c (casinh, plus_infty, 0.5, plus_infty, 0.0),
3993 TEST_c_c (casinh, plus_infty, -0.5, plus_infty, minus_zero),
3994
3995 TEST_c_c (casinh, plus_infty, qnan_value, plus_infty, qnan_value),
3996 TEST_c_c (casinh, minus_infty, qnan_value, minus_infty, qnan_value),
3997
3998 TEST_c_c (casinh, qnan_value, 0, qnan_value, 0.0),
3999 TEST_c_c (casinh, qnan_value, minus_zero, qnan_value, minus_zero),
4000
4001 TEST_c_c (casinh, qnan_value, plus_infty, plus_infty, qnan_value, IGNORE_ZERO_INF_SIGN),
4002 TEST_c_c (casinh, qnan_value, minus_infty, plus_infty, qnan_value, IGNORE_ZERO_INF_SIGN),
4003
4004 TEST_c_c (casinh, 10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4005 TEST_c_c (casinh, -10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4006
4007 TEST_c_c (casinh, qnan_value, 0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4008 TEST_c_c (casinh, -0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4009
4010 TEST_c_c (casinh, qnan_value, qnan_value, qnan_value, qnan_value),
4011
4012 TEST_c_c (casinh, plus_zero, -1.5L, 0.9624236501192068949955178268487368462704L, -M_PI_2l),
4013 TEST_c_c (casinh, minus_zero, -1.5L, -0.9624236501192068949955178268487368462704L, -M_PI_2l),
4014 TEST_c_c (casinh, plus_zero, -1.0L, plus_zero, -M_PI_2l),
4015 TEST_c_c (casinh, minus_zero, -1.0L, minus_zero, -M_PI_2l),
4016 TEST_c_c (casinh, plus_zero, -0.5L, plus_zero, -0.5235987755982988730771072305465838140329L),
4017 TEST_c_c (casinh, minus_zero, -0.5L, minus_zero, -0.5235987755982988730771072305465838140329L),
4018 TEST_c_c (casinh, plus_zero, 0.5L, plus_zero, 0.5235987755982988730771072305465838140329L),
4019 TEST_c_c (casinh, minus_zero, 0.5L, minus_zero, 0.5235987755982988730771072305465838140329L),
4020 TEST_c_c (casinh, plus_zero, 1.0L, plus_zero, M_PI_2l),
4021 TEST_c_c (casinh, minus_zero, 1.0L, minus_zero, M_PI_2l),
4022 TEST_c_c (casinh, plus_zero, 1.5L, 0.9624236501192068949955178268487368462704L, M_PI_2l),
4023 TEST_c_c (casinh, minus_zero, 1.5L, -0.9624236501192068949955178268487368462704L, M_PI_2l),
4024
4025 TEST_c_c (casinh, -1.5L, plus_zero, -1.194763217287109304111930828519090523536L, plus_zero),
4026 TEST_c_c (casinh, -1.5L, minus_zero, -1.194763217287109304111930828519090523536L, minus_zero),
4027 TEST_c_c (casinh, -1.0L, plus_zero, -0.8813735870195430252326093249797923090282L, plus_zero),
4028 TEST_c_c (casinh, -1.0L, minus_zero, -0.8813735870195430252326093249797923090282L, minus_zero),
4029 TEST_c_c (casinh, -0.5L, plus_zero, -0.4812118250596034474977589134243684231352L, plus_zero),
4030 TEST_c_c (casinh, -0.5L, minus_zero, -0.4812118250596034474977589134243684231352L, minus_zero),
4031 TEST_c_c (casinh, 0.5L, plus_zero, 0.4812118250596034474977589134243684231352L, plus_zero),
4032 TEST_c_c (casinh, 0.5L, minus_zero, 0.4812118250596034474977589134243684231352L, minus_zero),
4033 TEST_c_c (casinh, 1.0L, plus_zero, 0.8813735870195430252326093249797923090282L, plus_zero),
4034 TEST_c_c (casinh, 1.0L, minus_zero, 0.8813735870195430252326093249797923090282L, minus_zero),
4035 TEST_c_c (casinh, 1.5L, plus_zero, 1.194763217287109304111930828519090523536L, plus_zero),
4036 TEST_c_c (casinh, 1.5L, minus_zero, 1.194763217287109304111930828519090523536L, minus_zero),
4037
4038 TEST_c_c (casinh, 0x1p50L, 1.0L, 3.535050620855721078027883819436759661753e1L, 8.881784197001252323389053344720723756399e-16L),
4039 TEST_c_c (casinh, 0x1p50L, -1.0L, 3.535050620855721078027883819436759661753e1L, -8.881784197001252323389053344720723756399e-16L),
4040 TEST_c_c (casinh, -0x1p50L, 1.0L, -3.535050620855721078027883819436759661753e1L, 8.881784197001252323389053344720723756399e-16L),
4041 TEST_c_c (casinh, -0x1p50L, -1.0L, -3.535050620855721078027883819436759661753e1L, -8.881784197001252323389053344720723756399e-16L),
4042 TEST_c_c (casinh, 1.0L, 0x1p50L, 3.535050620855721078027883819436720218708e1L, 1.570796326794895731052901991514519103193L),
4043 TEST_c_c (casinh, -1.0L, 0x1p50L, -3.535050620855721078027883819436720218708e1L, 1.570796326794895731052901991514519103193L),
4044 TEST_c_c (casinh, 1.0L, -0x1p50L, 3.535050620855721078027883819436720218708e1L, -1.570796326794895731052901991514519103193L),
4045 TEST_c_c (casinh, -1.0L, -0x1p50L, -3.535050620855721078027883819436720218708e1L, -1.570796326794895731052901991514519103193L),
cdc1c96f 4046#ifndef TEST_FLOAT
08198877
JM		 4047 TEST_c_c (casinh, 0x1p500L, 1.0L, 3.472667374605326000180332928505464606058e2L, 3.054936363499604682051979393213617699789e-151L),
4048 TEST_c_c (casinh, 0x1p500L, -1.0L, 3.472667374605326000180332928505464606058e2L, -3.054936363499604682051979393213617699789e-151L),
4049 TEST_c_c (casinh, -0x1p500L, 1.0L, -3.472667374605326000180332928505464606058e2L, 3.054936363499604682051979393213617699789e-151L),
4050 TEST_c_c (casinh, -0x1p500L, -1.0L, -3.472667374605326000180332928505464606058e2L, -3.054936363499604682051979393213617699789e-151L),
4051 TEST_c_c (casinh, 1.0L, 0x1p500L, 3.472667374605326000180332928505464606058e2L, 1.570796326794896619231321691639751442099L),
4052 TEST_c_c (casinh, -1.0L, 0x1p500L, -3.472667374605326000180332928505464606058e2L, 1.570796326794896619231321691639751442099L),
4053 TEST_c_c (casinh, 1.0L, -0x1p500L, 3.472667374605326000180332928505464606058e2L, -1.570796326794896619231321691639751442099L),
4054 TEST_c_c (casinh, -1.0L, -0x1p500L, -3.472667374605326000180332928505464606058e2L, -1.570796326794896619231321691639751442099L),
cdc1c96f
JM		 4055#endif
4056#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 4057 TEST_c_c (casinh, 0x1p5000L, 1.0L, 3.466429049980286492395577839412341016946e3L, 7.079811261048172892385615158694057552948e-1506L),
4058 TEST_c_c (casinh, 0x1p5000L, -1.0L, 3.466429049980286492395577839412341016946e3L, -7.079811261048172892385615158694057552948e-1506L),
4059 TEST_c_c (casinh, -0x1p5000L, 1.0L, -3.466429049980286492395577839412341016946e3L, 7.079811261048172892385615158694057552948e-1506L),
4060 TEST_c_c (casinh, -0x1p5000L, -1.0L, -3.466429049980286492395577839412341016946e3L, -7.079811261048172892385615158694057552948e-1506L),
4061 TEST_c_c (casinh, 1.0L, 0x1p5000L, 3.466429049980286492395577839412341016946e3L, 1.570796326794896619231321691639751442099L),
4062 TEST_c_c (casinh, -1.0L, 0x1p5000L, -3.466429049980286492395577839412341016946e3L, 1.570796326794896619231321691639751442099L),
4063 TEST_c_c (casinh, 1.0L, -0x1p5000L, 3.466429049980286492395577839412341016946e3L, -1.570796326794896619231321691639751442099L),
4064 TEST_c_c (casinh, -1.0L, -0x1p5000L, -3.466429049980286492395577839412341016946e3L, -1.570796326794896619231321691639751442099L),
cdc1c96f
JM		 4065#endif
4066
08198877 4067 TEST_c_c (casinh, 0x1.fp127L, 0x1.fp127L, 8.973081118419833726837456344608533993585e1L, 7.853981633974483096156608458198757210493e-1L),
a9708fed 4068#ifndef TEST_FLOAT
08198877 4069 TEST_c_c (casinh, 0x1.fp1023L, 0x1.fp1023L, 7.107906849659093345062145442726115449315e2L, 7.853981633974483096156608458198757210493e-1L),
a9708fed
JM		 4070#endif
4071#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 4072 TEST_c_c (casinh, 0x1.fp16383L, 0x1.fp16383L, 1.135753137836666928715489992987020363057e4L, 7.853981633974483096156608458198757210493e-1L),
a9708fed
JM		 4073#endif
4074
08198877
JM		 4075 TEST_c_c (casinh, 0x1.fp-129L, 1.5L, 9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442096L),
4076 TEST_c_c (casinh, 0x1.fp-129L, -1.5L, 9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442096L),
4077 TEST_c_c (casinh, -0x1.fp-129L, 1.5L, -9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442096L),
4078 TEST_c_c (casinh, -0x1.fp-129L, -1.5L, -9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442096L),
4079 TEST_c_c (casinh, 1.5L, 0x1.fp-129L, 1.194763217287109304111930828519090523536L, 1.579176199917649005841160751101628985741e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4080 TEST_c_c (casinh, -1.5L, 0x1.fp-129L, -1.194763217287109304111930828519090523536L, 1.579176199917649005841160751101628985741e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4081 TEST_c_c (casinh, 1.5L, -0x1.fp-129L, 1.194763217287109304111930828519090523536L, -1.579176199917649005841160751101628985741e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4082 TEST_c_c (casinh, -1.5L, -0x1.fp-129L, -1.194763217287109304111930828519090523536L, -1.579176199917649005841160751101628985741e-39L, UNDERFLOW_EXCEPTION_FLOAT),
8cf28c5e 4083#ifndef TEST_FLOAT
08198877
JM		 4084 TEST_c_c (casinh, 0x1.fp-1025L, 1.5L, 9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442099L),
4085 TEST_c_c (casinh, 0x1.fp-1025L, -1.5L, 9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442099L),
4086 TEST_c_c (casinh, -0x1.fp-1025L, 1.5L, -9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442099L),
4087 TEST_c_c (casinh, -0x1.fp-1025L, -1.5L, -9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442099L),
4088 TEST_c_c (casinh, 1.5L, 0x1.fp-1025L, 1.194763217287109304111930828519090523536L, 2.989196569048182929051881765490354365918e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4089 TEST_c_c (casinh, -1.5L, 0x1.fp-1025L, -1.194763217287109304111930828519090523536L, 2.989196569048182929051881765490354365918e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4090 TEST_c_c (casinh, 1.5L, -0x1.fp-1025L, 1.194763217287109304111930828519090523536L, -2.989196569048182929051881765490354365918e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4091 TEST_c_c (casinh, -1.5L, -0x1.fp-1025L, -1.194763217287109304111930828519090523536L, -2.989196569048182929051881765490354365918e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
8cf28c5e
JM		 4092#endif
4093#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 4094 TEST_c_c (casinh, 0x1.fp-16385L, 1.5L, 9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442099L),
4095 TEST_c_c (casinh, 0x1.fp-16385L, -1.5L, 9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442099L),
4096 TEST_c_c (casinh, -0x1.fp-16385L, 1.5L, -9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442099L),
4097 TEST_c_c (casinh, -0x1.fp-16385L, -1.5L, -9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442099L),
4098 TEST_c_c (casinh, 1.5L, 0x1.fp-16385L, 1.194763217287109304111930828519090523536L, 4.516698239814521372306784062043266700598e-4933L, UNDERFLOW_EXCEPTION),
4099 TEST_c_c (casinh, -1.5L, 0x1.fp-16385L, -1.194763217287109304111930828519090523536L, 4.516698239814521372306784062043266700598e-4933L, UNDERFLOW_EXCEPTION),
4100 TEST_c_c (casinh, 1.5L, -0x1.fp-16385L, 1.194763217287109304111930828519090523536L, -4.516698239814521372306784062043266700598e-4933L, UNDERFLOW_EXCEPTION),
4101 TEST_c_c (casinh, -1.5L, -0x1.fp-16385L, -1.194763217287109304111930828519090523536L, -4.516698239814521372306784062043266700598e-4933L, UNDERFLOW_EXCEPTION),
4102#endif
4103
4104 TEST_c_c (casinh, 0.5L, 1.0L, 7.328576759736452608886724437653071523305e-1L, 8.959074812088902390666567243275770102229e-1L),
4105 TEST_c_c (casinh, 0.5L, -1.0L, 7.328576759736452608886724437653071523305e-1L, -8.959074812088902390666567243275770102229e-1L),
4106 TEST_c_c (casinh, -0.5L, 1.0L, -7.328576759736452608886724437653071523305e-1L, 8.959074812088902390666567243275770102229e-1L),
4107 TEST_c_c (casinh, -0.5L, -1.0L, -7.328576759736452608886724437653071523305e-1L, -8.959074812088902390666567243275770102229e-1L),
4108 TEST_c_c (casinh, 1.0L, 0.5L, 9.261330313501824245501244453057873152694e-1L, 3.494390628572132936274118260753699527325e-1L),
4109 TEST_c_c (casinh, -1.0L, 0.5L, -9.261330313501824245501244453057873152694e-1L, 3.494390628572132936274118260753699527325e-1L),
4110 TEST_c_c (casinh, 1.0L, -0.5L, 9.261330313501824245501244453057873152694e-1L, -3.494390628572132936274118260753699527325e-1L),
4111 TEST_c_c (casinh, -1.0L, -0.5L, -9.261330313501824245501244453057873152694e-1L, -3.494390628572132936274118260753699527325e-1L),
4112 TEST_c_c (casinh, 0.25L, 1.0L, 5.097911466811016354623559941115413499164e-1L, 1.081751996523816326311037318425097434186L),
4113 TEST_c_c (casinh, 0.25L, -1.0L, 5.097911466811016354623559941115413499164e-1L, -1.081751996523816326311037318425097434186L),
4114 TEST_c_c (casinh, -0.25L, 1.0L, -5.097911466811016354623559941115413499164e-1L, 1.081751996523816326311037318425097434186L),
4115 TEST_c_c (casinh, -0.25L, -1.0L, -5.097911466811016354623559941115413499164e-1L, -1.081751996523816326311037318425097434186L),
4116 TEST_c_c (casinh, 1.0L, 0.25L, 8.924633639033482359562124741744951972772e-1L, 1.763024327769669304186785666360901026468e-1L),
4117 TEST_c_c (casinh, -1.0L, 0.25L, -8.924633639033482359562124741744951972772e-1L, 1.763024327769669304186785666360901026468e-1L),
4118 TEST_c_c (casinh, 1.0L, -0.25L, 8.924633639033482359562124741744951972772e-1L, -1.763024327769669304186785666360901026468e-1L),
4119 TEST_c_c (casinh, -1.0L, -0.25L, -8.924633639033482359562124741744951972772e-1L, -1.763024327769669304186785666360901026468e-1L),
4120 TEST_c_c (casinh, 0x1.fp-10L, 1.0L, 4.350501469856803800217957402220976497152e-2L, 1.527305029163877791518741192097931722508L),
4121 TEST_c_c (casinh, 0x1.fp-10L, -1.0L, 4.350501469856803800217957402220976497152e-2L, -1.527305029163877791518741192097931722508L),
4122 TEST_c_c (casinh, -0x1.fp-10L, 1.0L, -4.350501469856803800217957402220976497152e-2L, 1.527305029163877791518741192097931722508L),
4123 TEST_c_c (casinh, -0x1.fp-10L, -1.0L, -4.350501469856803800217957402220976497152e-2L, -1.527305029163877791518741192097931722508L),
4124 TEST_c_c (casinh, 1.0L, 0x1.fp-10L, 8.813742198809567991336704287826445879025e-1L, 1.337909359557740912558349531052239112857e-3L),
4125 TEST_c_c (casinh, -1.0L, 0x1.fp-10L, -8.813742198809567991336704287826445879025e-1L, 1.337909359557740912558349531052239112857e-3L),
4126 TEST_c_c (casinh, 1.0L, -0x1.fp-10L, 8.813742198809567991336704287826445879025e-1L, -1.337909359557740912558349531052239112857e-3L),
4127 TEST_c_c (casinh, -1.0L, -0x1.fp-10L, -8.813742198809567991336704287826445879025e-1L, -1.337909359557740912558349531052239112857e-3L),
4128 TEST_c_c (casinh, 0x1.fp-30L, 1.0L, 4.247867098745151888768727039216644758847e-5L, 1.570753848123921942730162693731872690232L),
4129 TEST_c_c (casinh, 0x1.fp-30L, -1.0L, 4.247867098745151888768727039216644758847e-5L, -1.570753848123921942730162693731872690232L),
4130 TEST_c_c (casinh, -0x1.fp-30L, 1.0L, -4.247867098745151888768727039216644758847e-5L, 1.570753848123921942730162693731872690232L),
4131 TEST_c_c (casinh, -0x1.fp-30L, -1.0L, -4.247867098745151888768727039216644758847e-5L, -1.570753848123921942730162693731872690232L),
4132 TEST_c_c (casinh, 1.0L, 0x1.fp-30L, 8.813735870195430258081932989769495326854e-1L, 1.275929984216518540252717485007112529021e-9L),
4133 TEST_c_c (casinh, -1.0L, 0x1.fp-30L, -8.813735870195430258081932989769495326854e-1L, 1.275929984216518540252717485007112529021e-9L),
4134 TEST_c_c (casinh, 1.0L, -0x1.fp-30L, 8.813735870195430258081932989769495326854e-1L, -1.275929984216518540252717485007112529021e-9L),
4135 TEST_c_c (casinh, -1.0L, -0x1.fp-30L, -8.813735870195430258081932989769495326854e-1L, -1.275929984216518540252717485007112529021e-9L),
4136 TEST_c_c (casinh, 0x1.fp-100L, 1.0L, 1.236292038260260888664514866457202186027e-15L, 1.570796326794895382939283431378862777584L),
4137 TEST_c_c (casinh, 0x1.fp-100L, -1.0L, 1.236292038260260888664514866457202186027e-15L, -1.570796326794895382939283431378862777584L),
4138 TEST_c_c (casinh, -0x1.fp-100L, 1.0L, -1.236292038260260888664514866457202186027e-15L, 1.570796326794895382939283431378862777584L),
4139 TEST_c_c (casinh, -0x1.fp-100L, -1.0L, -1.236292038260260888664514866457202186027e-15L, -1.570796326794895382939283431378862777584L),
4140 TEST_c_c (casinh, 1.0L, 0x1.fp-100L, 8.813735870195430252326093249797923090282e-1L, 1.080754735021050612990719608916167354321e-30L),
4141 TEST_c_c (casinh, -1.0L, 0x1.fp-100L, -8.813735870195430252326093249797923090282e-1L, 1.080754735021050612990719608916167354321e-30L),
4142 TEST_c_c (casinh, 1.0L, -0x1.fp-100L, 8.813735870195430252326093249797923090282e-1L, -1.080754735021050612990719608916167354321e-30L),
4143 TEST_c_c (casinh, -1.0L, -0x1.fp-100L, -8.813735870195430252326093249797923090282e-1L, -1.080754735021050612990719608916167354321e-30L),
4144 TEST_c_c (casinh, 0x1.fp-129L, 1.0L, 5.335635276982233498398987585285818977933e-20L, 1.570796326794896619177965338869929107115L),
4145 TEST_c_c (casinh, 0x1.fp-129L, -1.0L, 5.335635276982233498398987585285818977933e-20L, -1.570796326794896619177965338869929107115L),
4146 TEST_c_c (casinh, -0x1.fp-129L, 1.0L, -5.335635276982233498398987585285818977933e-20L, 1.570796326794896619177965338869929107115L),
4147 TEST_c_c (casinh, -0x1.fp-129L, -1.0L, -5.335635276982233498398987585285818977933e-20L, -1.570796326794896619177965338869929107115L),
4148 TEST_c_c (casinh, 1.0L, 0x1.fp-129L, 8.813735870195430252326093249797923090282e-1L, 2.013062564695348242280482517399205554874e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4149 TEST_c_c (casinh, -1.0L, 0x1.fp-129L, -8.813735870195430252326093249797923090282e-1L, 2.013062564695348242280482517399205554874e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4150 TEST_c_c (casinh, 1.0L, -0x1.fp-129L, 8.813735870195430252326093249797923090282e-1L, -2.013062564695348242280482517399205554874e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4151 TEST_c_c (casinh, -1.0L, -0x1.fp-129L, -8.813735870195430252326093249797923090282e-1L, -2.013062564695348242280482517399205554874e-39L, UNDERFLOW_EXCEPTION_FLOAT),
0a1b2ae6 4152#ifndef TEST_FLOAT
08198877
JM		 4153 TEST_c_c (casinh, 0x1.fp-1000L, 1.0L, 4.252291453851660175550490409247739011867e-151L, 1.570796326794896619231321691639751442099L),
4154 TEST_c_c (casinh, 0x1.fp-1000L, -1.0L, 4.252291453851660175550490409247739011867e-151L, -1.570796326794896619231321691639751442099L),
4155 TEST_c_c (casinh, -0x1.fp-1000L, 1.0L, -4.252291453851660175550490409247739011867e-151L, 1.570796326794896619231321691639751442099L),
4156 TEST_c_c (casinh, -0x1.fp-1000L, -1.0L, -4.252291453851660175550490409247739011867e-151L, -1.570796326794896619231321691639751442099L),
4157 TEST_c_c (casinh, 1.0L, 0x1.fp-1000L, 8.813735870195430252326093249797923090282e-1L, 1.278589251976747242280879285935084814093e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4158 TEST_c_c (casinh, -1.0L, 0x1.fp-1000L, -8.813735870195430252326093249797923090282e-1L, 1.278589251976747242280879285935084814093e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4159 TEST_c_c (casinh, 1.0L, -0x1.fp-1000L, 8.813735870195430252326093249797923090282e-1L, -1.278589251976747242280879285935084814093e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4160 TEST_c_c (casinh, -1.0L, -0x1.fp-1000L, -8.813735870195430252326093249797923090282e-1L, -1.278589251976747242280879285935084814093e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4161 TEST_c_c (casinh, 0x1.fp-1025L, 1.0L, 7.340879205566679497036857179189356754017e-155L, 1.570796326794896619231321691639751442099L),
4162 TEST_c_c (casinh, 0x1.fp-1025L, -1.0L, 7.340879205566679497036857179189356754017e-155L, -1.570796326794896619231321691639751442099L),
4163 TEST_c_c (casinh, -0x1.fp-1025L, 1.0L, -7.340879205566679497036857179189356754017e-155L, 1.570796326794896619231321691639751442099L),
4164 TEST_c_c (casinh, -0x1.fp-1025L, -1.0L, -7.340879205566679497036857179189356754017e-155L, -1.570796326794896619231321691639751442099L),
4165 TEST_c_c (casinh, 1.0L, 0x1.fp-1025L, 8.813735870195430252326093249797923090282e-1L, 3.810492908885321743133304375216617626230e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4166 TEST_c_c (casinh, -1.0L, 0x1.fp-1025L, -8.813735870195430252326093249797923090282e-1L, 3.810492908885321743133304375216617626230e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4167 TEST_c_c (casinh, 1.0L, -0x1.fp-1025L, 8.813735870195430252326093249797923090282e-1L, -3.810492908885321743133304375216617626230e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4168 TEST_c_c (casinh, -1.0L, -0x1.fp-1025L, -8.813735870195430252326093249797923090282e-1L, -3.810492908885321743133304375216617626230e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
0a1b2ae6
JM		 4169#endif
4170#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 4171 TEST_c_c (casinh, 0x1.fp-10000L, 1.0L, 9.854680208706673586644342922051388714633e-1506L, 1.570796326794896619231321691639751442099L),
4172 TEST_c_c (casinh, 0x1.fp-10000L, -1.0L, 9.854680208706673586644342922051388714633e-1506L, -1.570796326794896619231321691639751442099L),
4173 TEST_c_c (casinh, -0x1.fp-10000L, 1.0L, -9.854680208706673586644342922051388714633e-1506L, 1.570796326794896619231321691639751442099L),
4174 TEST_c_c (casinh, -0x1.fp-10000L, -1.0L, -9.854680208706673586644342922051388714633e-1506L, -1.570796326794896619231321691639751442099L),
4175 TEST_c_c (casinh, 1.0L, 0x1.fp-10000L, 8.813735870195430252326093249797923090282e-1L, 6.867047849047171855399183659351043150871e-3011L),
4176 TEST_c_c (casinh, -1.0L, 0x1.fp-10000L, -8.813735870195430252326093249797923090282e-1L, 6.867047849047171855399183659351043150871e-3011L),
4177 TEST_c_c (casinh, 1.0L, -0x1.fp-10000L, 8.813735870195430252326093249797923090282e-1L, -6.867047849047171855399183659351043150871e-3011L),
4178 TEST_c_c (casinh, -1.0L, -0x1.fp-10000L, -8.813735870195430252326093249797923090282e-1L, -6.867047849047171855399183659351043150871e-3011L),
4179 TEST_c_c (casinh, 0x1.fp-16385L, 1.0L, 9.023632056840860275214893047597614177639e-2467L, 1.570796326794896619231321691639751442099L),
4180 TEST_c_c (casinh, 0x1.fp-16385L, -1.0L, 9.023632056840860275214893047597614177639e-2467L, -1.570796326794896619231321691639751442099L),
4181 TEST_c_c (casinh, -0x1.fp-16385L, 1.0L, -9.023632056840860275214893047597614177639e-2467L, 1.570796326794896619231321691639751442099L),
4182 TEST_c_c (casinh, -0x1.fp-16385L, -1.0L, -9.023632056840860275214893047597614177639e-2467L, -1.570796326794896619231321691639751442099L),
4183 TEST_c_c (casinh, 1.0L, 0x1.fp-16385L, 8.813735870195430252326093249797923090282e-1L, 5.757683115456107044131264955348448954458e-4933L, UNDERFLOW_EXCEPTION),
4184 TEST_c_c (casinh, -1.0L, 0x1.fp-16385L, -8.813735870195430252326093249797923090282e-1L, 5.757683115456107044131264955348448954458e-4933L, UNDERFLOW_EXCEPTION),
4185 TEST_c_c (casinh, 1.0L, -0x1.fp-16385L, 8.813735870195430252326093249797923090282e-1L, -5.757683115456107044131264955348448954458e-4933L, UNDERFLOW_EXCEPTION),
4186 TEST_c_c (casinh, -1.0L, -0x1.fp-16385L, -8.813735870195430252326093249797923090282e-1L, -5.757683115456107044131264955348448954458e-4933L, UNDERFLOW_EXCEPTION),
4187#endif
4188
4189 TEST_c_c (casinh, 0x1p-23L, 0x1.000002p0L, 5.364668491573609633134147164031476452679e-4L, 1.570574114956455764594481054234834678422L),
4190 TEST_c_c (casinh, 0x1p-23L, -0x1.000002p0L, 5.364668491573609633134147164031476452679e-4L, -1.570574114956455764594481054234834678422L),
4191 TEST_c_c (casinh, -0x1p-23L, 0x1.000002p0L, -5.364668491573609633134147164031476452679e-4L, 1.570574114956455764594481054234834678422L),
4192 TEST_c_c (casinh, -0x1p-23L, -0x1.000002p0L, -5.364668491573609633134147164031476452679e-4L, -1.570574114956455764594481054234834678422L),
4193 TEST_c_c (casinh, 0x1.000002p0L, 0x1p-23L, 8.813736713132400470205730751186547909968e-1L, 8.429369199749229560964789467980644296420e-8L),
4194 TEST_c_c (casinh, -0x1.000002p0L, 0x1p-23L, -8.813736713132400470205730751186547909968e-1L, 8.429369199749229560964789467980644296420e-8L),
4195 TEST_c_c (casinh, 0x1.000002p0L, -0x1p-23L, 8.813736713132400470205730751186547909968e-1L, -8.429369199749229560964789467980644296420e-8L),
4196 TEST_c_c (casinh, -0x1.000002p0L, -0x1p-23L, -8.813736713132400470205730751186547909968e-1L, -8.429369199749229560964789467980644296420e-8L),
4197 TEST_c_c (casinh, 0x1.fp-129L, 0x1.000002p0L, 4.882812451493617206486388134172712975070e-4L, 1.570796326794896619231321691639751436268L),
4198 TEST_c_c (casinh, 0x1.fp-129L, -0x1.000002p0L, 4.882812451493617206486388134172712975070e-4L, -1.570796326794896619231321691639751436268L),
4199 TEST_c_c (casinh, -0x1.fp-129L, 0x1.000002p0L, -4.882812451493617206486388134172712975070e-4L, 1.570796326794896619231321691639751436268L),
4200 TEST_c_c (casinh, -0x1.fp-129L, -0x1.000002p0L, -4.882812451493617206486388134172712975070e-4L, -1.570796326794896619231321691639751436268L),
4201 TEST_c_c (casinh, 0x1.000002p0L, 0x1.fp-129L, 8.813736713132375348727889167749389235161e-1L, 2.013062444707472738895109955455676357057e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4202 TEST_c_c (casinh, -0x1.000002p0L, 0x1.fp-129L, -8.813736713132375348727889167749389235161e-1L, 2.013062444707472738895109955455676357057e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4203 TEST_c_c (casinh, 0x1.000002p0L, -0x1.fp-129L, 8.813736713132375348727889167749389235161e-1L, -2.013062444707472738895109955455676357057e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4204 TEST_c_c (casinh, -0x1.000002p0L, -0x1.fp-129L, -8.813736713132375348727889167749389235161e-1L, -2.013062444707472738895109955455676357057e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4205 TEST_c_c (casinh, 0.0L, 0x1.000002p0L, 4.882812451493617206486388134172712975070e-4L, 1.570796326794896619231321691639751442099L),
4206 TEST_c_c (casinh, 0.0L, -0x1.000002p0L, 4.882812451493617206486388134172712975070e-4L, -1.570796326794896619231321691639751442099L),
4207 TEST_c_c (casinh, -0.0L, 0x1.000002p0L, -4.882812451493617206486388134172712975070e-4L, 1.570796326794896619231321691639751442099L),
4208 TEST_c_c (casinh, -0.0L, -0x1.000002p0L, -4.882812451493617206486388134172712975070e-4L, -1.570796326794896619231321691639751442099L),
4209 TEST_c_c (casinh, 0x1.000002p0L, 0.0L, 8.813736713132375348727889167749389235161e-1L, 0.0L),
4210 TEST_c_c (casinh, -0x1.000002p0L, 0.0L, -8.813736713132375348727889167749389235161e-1L, 0.0L),
4211 TEST_c_c (casinh, 0x1.000002p0L, -0.0L, 8.813736713132375348727889167749389235161e-1L, -0.0L),
4212 TEST_c_c (casinh, -0x1.000002p0L, -0.0L, -8.813736713132375348727889167749389235161e-1L, -0.0L),
3a7182a1 4213#ifndef TEST_FLOAT
08198877
JM		 4214 TEST_c_c (casinh, 0x1p-52L, 0x1.0000000000001p0L, 2.315303644582684770975188768022139415020e-8L, 1.570796317204594913251280305810847349436L),
4215 TEST_c_c (casinh, 0x1p-52L, -0x1.0000000000001p0L, 2.315303644582684770975188768022139415020e-8L, -1.570796317204594913251280305810847349436L),
4216 TEST_c_c (casinh, -0x1p-52L, 0x1.0000000000001p0L, -2.315303644582684770975188768022139415020e-8L, 1.570796317204594913251280305810847349436L),
4217 TEST_c_c (casinh, -0x1p-52L, -0x1.0000000000001p0L, -2.315303644582684770975188768022139415020e-8L, -1.570796317204594913251280305810847349436L),
4218 TEST_c_c (casinh, 0x1.0000000000001p0L, 0x1p-52L, 8.813735870195431822418551933572982483664e-1L, 1.570092458683774885078102529858632363236e-16L),
4219 TEST_c_c (casinh, -0x1.0000000000001p0L, 0x1p-52L, -8.813735870195431822418551933572982483664e-1L, 1.570092458683774885078102529858632363236e-16L),
4220 TEST_c_c (casinh, 0x1.0000000000001p0L, -0x1p-52L, 8.813735870195431822418551933572982483664e-1L, -1.570092458683774885078102529858632363236e-16L),
4221 TEST_c_c (casinh, -0x1.0000000000001p0L, -0x1p-52L, -8.813735870195431822418551933572982483664e-1L, -1.570092458683774885078102529858632363236e-16L),
4222 TEST_c_c (casinh, 0x1.fp-1025L, 0x1.0000000000001p0L, 2.107342425544701550354780375182800088393e-8L, 1.570796326794896619231321691639751442099L),
4223 TEST_c_c (casinh, 0x1.fp-1025L, -0x1.0000000000001p0L, 2.107342425544701550354780375182800088393e-8L, -1.570796326794896619231321691639751442099L),
4224 TEST_c_c (casinh, -0x1.fp-1025L, 0x1.0000000000001p0L, -2.107342425544701550354780375182800088393e-8L, 1.570796326794896619231321691639751442099L),
4225 TEST_c_c (casinh, -0x1.fp-1025L, -0x1.0000000000001p0L, -2.107342425544701550354780375182800088393e-8L, -1.570796326794896619231321691639751442099L),
4226 TEST_c_c (casinh, 0x1.0000000000001p0L, 0x1.fp-1025L, 8.813735870195431822418551933572895326024e-1L, 3.810492908885321320083608113679347200012e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4227 TEST_c_c (casinh, -0x1.0000000000001p0L, 0x1.fp-1025L, -8.813735870195431822418551933572895326024e-1L, 3.810492908885321320083608113679347200012e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4228 TEST_c_c (casinh, 0x1.0000000000001p0L, -0x1.fp-1025L, 8.813735870195431822418551933572895326024e-1L, -3.810492908885321320083608113679347200012e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4229 TEST_c_c (casinh, -0x1.0000000000001p0L, -0x1.fp-1025L, -8.813735870195431822418551933572895326024e-1L, -3.810492908885321320083608113679347200012e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4230 TEST_c_c (casinh, 0.0L, 0x1.0000000000001p0L, 2.107342425544701550354780375182800088393e-8L, 1.570796326794896619231321691639751442099L),
4231 TEST_c_c (casinh, 0.0L, -0x1.0000000000001p0L, 2.107342425544701550354780375182800088393e-8L, -1.570796326794896619231321691639751442099L),
4232 TEST_c_c (casinh, -0.0L, 0x1.0000000000001p0L, -2.107342425544701550354780375182800088393e-8L, 1.570796326794896619231321691639751442099L),
4233 TEST_c_c (casinh, -0.0L, -0x1.0000000000001p0L, -2.107342425544701550354780375182800088393e-8L, -1.570796326794896619231321691639751442099L),
4234 TEST_c_c (casinh, 0x1.0000000000001p0L, 0.0L, 8.813735870195431822418551933572895326024e-1L, 0.0L),
4235 TEST_c_c (casinh, -0x1.0000000000001p0L, 0.0L, -8.813735870195431822418551933572895326024e-1L, 0.0L),
4236 TEST_c_c (casinh, 0x1.0000000000001p0L, -0.0L, 8.813735870195431822418551933572895326024e-1L, -0.0L),
4237 TEST_c_c (casinh, -0x1.0000000000001p0L, -0.0L, -8.813735870195431822418551933572895326024e-1L, -0.0L),
3a7182a1
JM		 4238#endif
4239#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 4240 TEST_c_c (casinh, 0x1p-63L, 0x1.0000000000000002p0L, 5.116146586219826555037807251857670783420e-10L, 1.570796326582978888921215348380499122131L),
4241 TEST_c_c (casinh, 0x1p-63L, -0x1.0000000000000002p0L, 5.116146586219826555037807251857670783420e-10L, -1.570796326582978888921215348380499122131L),
4242 TEST_c_c (casinh, -0x1p-63L, 0x1.0000000000000002p0L, -5.116146586219826555037807251857670783420e-10L, 1.570796326582978888921215348380499122131L),
4243 TEST_c_c (casinh, -0x1p-63L, -0x1.0000000000000002p0L, -5.116146586219826555037807251857670783420e-10L, -1.570796326582978888921215348380499122131L),
4244 TEST_c_c (casinh, 0x1.0000000000000002p0L, 0x1p-63L, 8.813735870195430253092739958139610131001e-1L, 7.666467083416870406778649849746878368519e-20L),
4245 TEST_c_c (casinh, -0x1.0000000000000002p0L, 0x1p-63L, -8.813735870195430253092739958139610131001e-1L, 7.666467083416870406778649849746878368519e-20L),
4246 TEST_c_c (casinh, 0x1.0000000000000002p0L, -0x1p-63L, 8.813735870195430253092739958139610131001e-1L, -7.666467083416870406778649849746878368519e-20L),
4247 TEST_c_c (casinh, -0x1.0000000000000002p0L, -0x1p-63L, -8.813735870195430253092739958139610131001e-1L, -7.666467083416870406778649849746878368519e-20L),
3a7182a1 4248# if LDBL_MIN_EXP <= -16381
08198877
JM		 4249 TEST_c_c (casinh, 0x1.fp-16385L, 0x1.0000000000000002p0L, 4.656612873077392578082927418388212703712e-10L, 1.570796326794896619231321691639751442099L),
4250 TEST_c_c (casinh, 0x1.fp-16385L, -0x1.0000000000000002p0L, 4.656612873077392578082927418388212703712e-10L, -1.570796326794896619231321691639751442099L),
4251 TEST_c_c (casinh, -0x1.fp-16385L, 0x1.0000000000000002p0L, -4.656612873077392578082927418388212703712e-10L, 1.570796326794896619231321691639751442099L),
4252 TEST_c_c (casinh, -0x1.fp-16385L, -0x1.0000000000000002p0L, -4.656612873077392578082927418388212703712e-10L, -1.570796326794896619231321691639751442099L),
4253 TEST_c_c (casinh, 0x1.0000000000000002p0L, 0x1.fp-16385L, 8.813735870195430253092739958139610130980e-1L, 5.757683115456107043819140328235418018963e-4933L, UNDERFLOW_EXCEPTION),
4254 TEST_c_c (casinh, -0x1.0000000000000002p0L, 0x1.fp-16385L, -8.813735870195430253092739958139610130980e-1L, 5.757683115456107043819140328235418018963e-4933L, UNDERFLOW_EXCEPTION),
4255 TEST_c_c (casinh, 0x1.0000000000000002p0L, -0x1.fp-16385L, 8.813735870195430253092739958139610130980e-1L, -5.757683115456107043819140328235418018963e-4933L, UNDERFLOW_EXCEPTION),
4256 TEST_c_c (casinh, -0x1.0000000000000002p0L, -0x1.fp-16385L, -8.813735870195430253092739958139610130980e-1L, -5.757683115456107043819140328235418018963e-4933L, UNDERFLOW_EXCEPTION),
3a7182a1 4257# endif
08198877
JM		 4258 TEST_c_c (casinh, 0.0L, 0x1.0000000000000002p0L, 4.656612873077392578082927418388212703712e-10L, 1.570796326794896619231321691639751442099L),
4259 TEST_c_c (casinh, 0.0L, -0x1.0000000000000002p0L, 4.656612873077392578082927418388212703712e-10L, -1.570796326794896619231321691639751442099L),
4260 TEST_c_c (casinh, -0.0L, 0x1.0000000000000002p0L, -4.656612873077392578082927418388212703712e-10L, 1.570796326794896619231321691639751442099L),
4261 TEST_c_c (casinh, -0.0L, -0x1.0000000000000002p0L, -4.656612873077392578082927418388212703712e-10L, -1.570796326794896619231321691639751442099L),
4262 TEST_c_c (casinh, 0x1.0000000000000002p0L, 0.0L, 8.813735870195430253092739958139610130980e-1L, 0.0L),
4263 TEST_c_c (casinh, -0x1.0000000000000002p0L, 0.0L, -8.813735870195430253092739958139610130980e-1L, 0.0L),
4264 TEST_c_c (casinh, 0x1.0000000000000002p0L, -0.0L, 8.813735870195430253092739958139610130980e-1L, -0.0L),
4265 TEST_c_c (casinh, -0x1.0000000000000002p0L, -0.0L, -8.813735870195430253092739958139610130980e-1L, -0.0L),
3a7182a1
JM		 4266#endif
4267#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 4268 TEST_c_c (casinh, 0x1p-106L, 0x1.000000000000000000000000008p0L, 2.285028863093221674154232933662774454211e-16L, 1.570796326794896565289107467733682961928L),
4269 TEST_c_c (casinh, 0x1p-106L, -0x1.000000000000000000000000008p0L, 2.285028863093221674154232933662774454211e-16L, -1.570796326794896565289107467733682961928L),
4270 TEST_c_c (casinh, -0x1p-106L, 0x1.000000000000000000000000008p0L, -2.285028863093221674154232933662774454211e-16L, 1.570796326794896565289107467733682961928L),
4271 TEST_c_c (casinh, -0x1p-106L, -0x1.000000000000000000000000008p0L, -2.285028863093221674154232933662774454211e-16L, -1.570796326794896565289107467733682961928L),
4272 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, 0x1p-106L, 8.813735870195430252326093249798097405561e-1L, 8.715763992105246878957416200936726072500e-33L),
4273 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, 0x1p-106L, -8.813735870195430252326093249798097405561e-1L, 8.715763992105246878957416200936726072500e-33L),
4274 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, -0x1p-106L, 8.813735870195430252326093249798097405561e-1L, -8.715763992105246878957416200936726072500e-33L),
4275 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, -0x1p-106L, -8.813735870195430252326093249798097405561e-1L, -8.715763992105246878957416200936726072500e-33L),
4276 TEST_c_c (casinh, 0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 2.220446049250313080847263336181636063482e-16L, 1.570796326794896619231321691639751442099L),
4277 TEST_c_c (casinh, 0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 2.220446049250313080847263336181636063482e-16L, -1.570796326794896619231321691639751442099L),
4278 TEST_c_c (casinh, -0x1.fp-1025L, 0x1.000000000000000000000000008p0L, -2.220446049250313080847263336181636063482e-16L, 1.570796326794896619231321691639751442099L),
4279 TEST_c_c (casinh, -0x1.fp-1025L, -0x1.000000000000000000000000008p0L, -2.220446049250313080847263336181636063482e-16L, -1.570796326794896619231321691639751442099L),
4280 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 8.813735870195430252326093249798097405561e-1L, 3.810492908885321743133304375216570658278e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4281 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, 0x1.fp-1025L, -8.813735870195430252326093249798097405561e-1L, 3.810492908885321743133304375216570658278e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4282 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 8.813735870195430252326093249798097405561e-1L, -3.810492908885321743133304375216570658278e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4283 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, -0x1.fp-1025L, -8.813735870195430252326093249798097405561e-1L, -3.810492908885321743133304375216570658278e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4284 TEST_c_c (casinh, 0.0L, 0x1.000000000000000000000000008p0L, 2.220446049250313080847263336181636063482e-16L, 1.570796326794896619231321691639751442099L),
4285 TEST_c_c (casinh, 0.0L, -0x1.000000000000000000000000008p0L, 2.220446049250313080847263336181636063482e-16L, -1.570796326794896619231321691639751442099L),
4286 TEST_c_c (casinh, -0.0L, 0x1.000000000000000000000000008p0L, -2.220446049250313080847263336181636063482e-16L, 1.570796326794896619231321691639751442099L),
4287 TEST_c_c (casinh, -0.0L, -0x1.000000000000000000000000008p0L, -2.220446049250313080847263336181636063482e-16L, -1.570796326794896619231321691639751442099L),
4288 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, 0.0L, 8.813735870195430252326093249798097405561e-1L, 0.0L),
4289 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, 0.0L, -8.813735870195430252326093249798097405561e-1L, 0.0L),
4290 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, -0.0L, 8.813735870195430252326093249798097405561e-1L, -0.0L),
4291 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, -0.0L, -8.813735870195430252326093249798097405561e-1L, -0.0L),
3a7182a1
JM		 4292#endif
4293#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 4294 TEST_c_c (casinh, 0x1p-113L, 0x1.0000000000000000000000000001p0L, 2.019699255375255198156433710951064632386e-17L, 1.570796326794896614463458507897073960405L),
4295 TEST_c_c (casinh, 0x1p-113L, -0x1.0000000000000000000000000001p0L, 2.019699255375255198156433710951064632386e-17L, -1.570796326794896614463458507897073960405L),
4296 TEST_c_c (casinh, -0x1p-113L, 0x1.0000000000000000000000000001p0L, -2.019699255375255198156433710951064632386e-17L, 1.570796326794896614463458507897073960405L),
4297 TEST_c_c (casinh, -0x1p-113L, -0x1.0000000000000000000000000001p0L, -2.019699255375255198156433710951064632386e-17L, -1.570796326794896614463458507897073960405L),
4298 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, 0x1p-113L, 8.813735870195430252326093249797924452120e-1L, 6.809190618832224124185481406981900518193e-35L),
4299 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, 0x1p-113L, -8.813735870195430252326093249797924452120e-1L, 6.809190618832224124185481406981900518193e-35L),
4300 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, -0x1p-113L, 8.813735870195430252326093249797924452120e-1L, -6.809190618832224124185481406981900518193e-35L),
4301 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, -0x1p-113L, -8.813735870195430252326093249797924452120e-1L, -6.809190618832224124185481406981900518193e-35L),
4302 TEST_c_c (casinh, 0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 1.962615573354718824241727964954454332780e-17L, 1.570796326794896619231321691639751442099L),
4303 TEST_c_c (casinh, 0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 1.962615573354718824241727964954454332780e-17L, -1.570796326794896619231321691639751442099L),
4304 TEST_c_c (casinh, -0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, -1.962615573354718824241727964954454332780e-17L, 1.570796326794896619231321691639751442099L),
4305 TEST_c_c (casinh, -0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, -1.962615573354718824241727964954454332780e-17L, -1.570796326794896619231321691639751442099L),
4306 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 8.813735870195430252326093249797924452120e-1L, 5.757683115456107044131264955348448400014e-4933L, UNDERFLOW_EXCEPTION),
4307 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, -8.813735870195430252326093249797924452120e-1L, 5.757683115456107044131264955348448400014e-4933L, UNDERFLOW_EXCEPTION),
4308 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 8.813735870195430252326093249797924452120e-1L, -5.757683115456107044131264955348448400014e-4933L, UNDERFLOW_EXCEPTION),
4309 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, -8.813735870195430252326093249797924452120e-1L, -5.757683115456107044131264955348448400014e-4933L, UNDERFLOW_EXCEPTION),
4310 TEST_c_c (casinh, 0.0L, 0x1.0000000000000000000000000001p0L, 1.962615573354718824241727964954454332780e-17L, 1.570796326794896619231321691639751442099L),
4311 TEST_c_c (casinh, 0.0L, -0x1.0000000000000000000000000001p0L, 1.962615573354718824241727964954454332780e-17L, -1.570796326794896619231321691639751442099L),
4312 TEST_c_c (casinh, -0.0L, 0x1.0000000000000000000000000001p0L, -1.962615573354718824241727964954454332780e-17L, 1.570796326794896619231321691639751442099L),
4313 TEST_c_c (casinh, -0.0L, -0x1.0000000000000000000000000001p0L, -1.962615573354718824241727964954454332780e-17L, -1.570796326794896619231321691639751442099L),
4314 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, 0.0L, 8.813735870195430252326093249797924452120e-1L, 0.0L),
4315 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, 0.0L, -8.813735870195430252326093249797924452120e-1L, 0.0L),
4316 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, -0.0L, 8.813735870195430252326093249797924452120e-1L, -0.0L),
4317 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, -0.0L, -8.813735870195430252326093249797924452120e-1L, -0.0L),
4318#endif
4319
4320 TEST_c_c (casinh, 0x1p-23L, 0x0.ffffffp0L, 2.714321200917194650737217746780928423385e-4L, 1.570357140408705570520377172865353621698L),
4321 TEST_c_c (casinh, 0x1p-23L, -0x0.ffffffp0L, 2.714321200917194650737217746780928423385e-4L, -1.570357140408705570520377172865353621698L),
4322 TEST_c_c (casinh, -0x1p-23L, 0x0.ffffffp0L, -2.714321200917194650737217746780928423385e-4L, 1.570357140408705570520377172865353621698L),
4323 TEST_c_c (casinh, -0x1p-23L, -0x0.ffffffp0L, -2.714321200917194650737217746780928423385e-4L, -1.570357140408705570520377172865353621698L),
4324 TEST_c_c (casinh, 0x0.ffffffp0L, 0x1p-23L, 8.813735448726963984495965873956465777250e-1L, 8.429369953393598499000760938112968755257e-8L),
4325 TEST_c_c (casinh, -0x0.ffffffp0L, 0x1p-23L, -8.813735448726963984495965873956465777250e-1L, 8.429369953393598499000760938112968755257e-8L),
4326 TEST_c_c (casinh, 0x0.ffffffp0L, -0x1p-23L, 8.813735448726963984495965873956465777250e-1L, -8.429369953393598499000760938112968755257e-8L),
4327 TEST_c_c (casinh, -0x0.ffffffp0L, -0x1p-23L, -8.813735448726963984495965873956465777250e-1L, -8.429369953393598499000760938112968755257e-8L),
4328 TEST_c_c (casinh, 0x1.fp-129L, 0x0.ffffffp0L, 8.245504387859737323891843603996428534945e-36L, 1.570451059810180415643718442157112705601L),
4329 TEST_c_c (casinh, 0x1.fp-129L, -0x0.ffffffp0L, 8.245504387859737323891843603996428534945e-36L, -1.570451059810180415643718442157112705601L),
4330 TEST_c_c (casinh, -0x1.fp-129L, 0x0.ffffffp0L, -8.245504387859737323891843603996428534945e-36L, 1.570451059810180415643718442157112705601L),
4331 TEST_c_c (casinh, -0x1.fp-129L, -0x0.ffffffp0L, -8.245504387859737323891843603996428534945e-36L, -1.570451059810180415643718442157112705601L),
4332 TEST_c_c (casinh, 0x0.ffffffp0L, 0x1.fp-129L, 8.813735448726938863015878255140556727969e-1L, 2.013062624689288675911339929224634593425e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4333 TEST_c_c (casinh, -0x0.ffffffp0L, 0x1.fp-129L, -8.813735448726938863015878255140556727969e-1L, 2.013062624689288675911339929224634593425e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4334 TEST_c_c (casinh, 0x0.ffffffp0L, -0x1.fp-129L, 8.813735448726938863015878255140556727969e-1L, -2.013062624689288675911339929224634593425e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4335 TEST_c_c (casinh, -0x0.ffffffp0L, -0x1.fp-129L, -8.813735448726938863015878255140556727969e-1L, -2.013062624689288675911339929224634593425e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4336 TEST_c_c (casinh, 0.0L, 0x0.ffffffp0L, 0.0L, 1.570451059810180415643718442157112705601L),
4337 TEST_c_c (casinh, 0.0L, -0x0.ffffffp0L, 0.0L, -1.570451059810180415643718442157112705601L),
4338 TEST_c_c (casinh, -0.0L, 0x0.ffffffp0L, -0.0L, 1.570451059810180415643718442157112705601L),
4339 TEST_c_c (casinh, -0.0L, -0x0.ffffffp0L, -0.0L, -1.570451059810180415643718442157112705601L),
4340 TEST_c_c (casinh, 0x0.ffffffp0L, 0.0L, 8.813735448726938863015878255140556727969e-1L, 0.0L),
4341 TEST_c_c (casinh, -0x0.ffffffp0L, 0.0L, -8.813735448726938863015878255140556727969e-1L, 0.0L),
4342 TEST_c_c (casinh, 0x0.ffffffp0L, -0.0L, 8.813735448726938863015878255140556727969e-1L, -0.0L),
4343 TEST_c_c (casinh, -0x0.ffffffp0L, -0.0L, -8.813735448726938863015878255140556727969e-1L, -0.0L),
4344 TEST_c_c (casinh, 0x1p-23L, 0.5L, 1.376510308240943236356088341381173571841e-7L, 5.235987755982934033165770729745469098254e-1L),
4345 TEST_c_c (casinh, 0x1p-23L, -0.5L, 1.376510308240943236356088341381173571841e-7L, -5.235987755982934033165770729745469098254e-1L),
4346 TEST_c_c (casinh, -0x1p-23L, 0.5L, -1.376510308240943236356088341381173571841e-7L, 5.235987755982934033165770729745469098254e-1L),
4347 TEST_c_c (casinh, -0x1p-23L, -0.5L, -1.376510308240943236356088341381173571841e-7L, -5.235987755982934033165770729745469098254e-1L),
4348 TEST_c_c (casinh, 0.5L, 0x1p-23L, 4.812118250596059896127318386463676808798e-1L, 1.066240299940009780479664302917201696886e-7L),
4349 TEST_c_c (casinh, -0.5L, 0x1p-23L, -4.812118250596059896127318386463676808798e-1L, 1.066240299940009780479664302917201696886e-7L),
4350 TEST_c_c (casinh, 0.5L, -0x1p-23L, 4.812118250596059896127318386463676808798e-1L, -1.066240299940009780479664302917201696886e-7L),
4351 TEST_c_c (casinh, -0.5L, -0x1p-23L, -4.812118250596059896127318386463676808798e-1L, -1.066240299940009780479664302917201696886e-7L),
4352 TEST_c_c (casinh, 0x1.fp-129L, 0.5L, 3.287317402534702257036015056278368274737e-39L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_FLOAT),
4353 TEST_c_c (casinh, 0x1.fp-129L, -0.5L, 3.287317402534702257036015056278368274737e-39L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_FLOAT),
4354 TEST_c_c (casinh, -0x1.fp-129L, 0.5L, -3.287317402534702257036015056278368274737e-39L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_FLOAT),
4355 TEST_c_c (casinh, -0x1.fp-129L, -0.5L, -3.287317402534702257036015056278368274737e-39L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_FLOAT),
4356 TEST_c_c (casinh, 0.5L, 0x1.fp-129L, 4.812118250596034474977589134243684231352e-1L, 2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4357 TEST_c_c (casinh, -0.5L, 0x1.fp-129L, -4.812118250596034474977589134243684231352e-1L, 2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4358 TEST_c_c (casinh, 0.5L, -0x1.fp-129L, 4.812118250596034474977589134243684231352e-1L, -2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4359 TEST_c_c (casinh, -0.5L, -0x1.fp-129L, -4.812118250596034474977589134243684231352e-1L, -2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4360 TEST_c_c (casinh, 0x1p-23L, 0x1p-23L, 1.192092895507818146886315028596704749235e-7L, 1.192092895507806853113684971258850504935e-7L),
4361 TEST_c_c (casinh, 0x1p-23L, -0x1p-23L, 1.192092895507818146886315028596704749235e-7L, -1.192092895507806853113684971258850504935e-7L),
4362 TEST_c_c (casinh, -0x1p-23L, 0x1p-23L, -1.192092895507818146886315028596704749235e-7L, 1.192092895507806853113684971258850504935e-7L),
4363 TEST_c_c (casinh, -0x1p-23L, -0x1p-23L, -1.192092895507818146886315028596704749235e-7L, -1.192092895507806853113684971258850504935e-7L),
4364 TEST_c_c (casinh, 0x1.fp-129L, 0x1p-23L, 2.846900380897747786805634596726756660388e-39L, 1.192092895507815323443157514352519154304e-7L, UNDERFLOW_EXCEPTION_FLOAT),
4365 TEST_c_c (casinh, 0x1.fp-129L, -0x1p-23L, 2.846900380897747786805634596726756660388e-39L, -1.192092895507815323443157514352519154304e-7L, UNDERFLOW_EXCEPTION_FLOAT),
4366 TEST_c_c (casinh, -0x1.fp-129L, 0x1p-23L, -2.846900380897747786805634596726756660388e-39L, 1.192092895507815323443157514352519154304e-7L, UNDERFLOW_EXCEPTION_FLOAT),
4367 TEST_c_c (casinh, -0x1.fp-129L, -0x1p-23L, -2.846900380897747786805634596726756660388e-39L, -1.192092895507815323443157514352519154304e-7L, UNDERFLOW_EXCEPTION_FLOAT),
4368 /* Bug 15319: underflow exception may be missing. */
4369 TEST_c_c (casinh, 0x1p-23L, 0x1.fp-129L, 1.192092895507809676556842485683592032154e-7L, 2.846900380897707329917933005874691056564e-39L, UNDERFLOW_EXCEPTION_OK_FLOAT),
4370 TEST_c_c (casinh, -0x1p-23L, 0x1.fp-129L, -1.192092895507809676556842485683592032154e-7L, 2.846900380897707329917933005874691056564e-39L, UNDERFLOW_EXCEPTION_OK_FLOAT),
4371 TEST_c_c (casinh, 0x1p-23L, -0x1.fp-129L, 1.192092895507809676556842485683592032154e-7L, -2.846900380897707329917933005874691056564e-39L, UNDERFLOW_EXCEPTION_OK_FLOAT),
4372 TEST_c_c (casinh, -0x1p-23L, -0x1.fp-129L, -1.192092895507809676556842485683592032154e-7L, -2.846900380897707329917933005874691056564e-39L, UNDERFLOW_EXCEPTION_OK_FLOAT),
4373 TEST_c_c (casinh, 0.0L, 0x1p-23L, 0.0L, 1.192092895507815323443157514352519154304e-7L),
4374 TEST_c_c (casinh, 0.0L, -0x1p-23L, 0.0L, -1.192092895507815323443157514352519154304e-7L),
4375 TEST_c_c (casinh, -0.0L, 0x1p-23L, -0.0L, 1.192092895507815323443157514352519154304e-7L),
4376 TEST_c_c (casinh, -0.0L, -0x1p-23L, -0.0L, -1.192092895507815323443157514352519154304e-7L),
4377 TEST_c_c (casinh, 0x1p-23L, 0.0L, 1.192092895507809676556842485683592032154e-7L, 0.0L),
4378 TEST_c_c (casinh, -0x1p-23L, 0.0L, -1.192092895507809676556842485683592032154e-7L, 0.0L),
4379 TEST_c_c (casinh, 0x1p-23L, -0.0L, 1.192092895507809676556842485683592032154e-7L, -0.0L),
4380 TEST_c_c (casinh, -0x1p-23L, -0.0L, -1.192092895507809676556842485683592032154e-7L, -0.0L),
4381 TEST_c_c (casinh, 0x1.fp-129L, 0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4382 TEST_c_c (casinh, 0x1.fp-129L, -0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4383 TEST_c_c (casinh, -0x1.fp-129L, 0x1.fp-129L, -2.846900380897727558361783801085126250967e-39L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4384 TEST_c_c (casinh, -0x1.fp-129L, -0x1.fp-129L, -2.846900380897727558361783801085126250967e-39L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
ccc8cadf 4385#ifndef TEST_FLOAT
08198877
JM		 4386 TEST_c_c (casinh, 0x1p-52L, 0x0.fffffffffffff8p0L, 1.171456840272878582596796205397918831268e-8L, 1.570796307840326780080580569360500172043L),
4387 TEST_c_c (casinh, 0x1p-52L, -0x0.fffffffffffff8p0L, 1.171456840272878582596796205397918831268e-8L, -1.570796307840326780080580569360500172043L),
4388 TEST_c_c (casinh, -0x1p-52L, 0x0.fffffffffffff8p0L, -1.171456840272878582596796205397918831268e-8L, 1.570796307840326780080580569360500172043L),
4389 TEST_c_c (casinh, -0x1p-52L, -0x0.fffffffffffff8p0L, -1.171456840272878582596796205397918831268e-8L, -1.570796307840326780080580569360500172043L),
4390 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, 0x1p-52L, 8.813735870195429467279863907910458761820e-1L, 1.570092458683775146551022293016031474627e-16L),
4391 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, 0x1p-52L, -8.813735870195429467279863907910458761820e-1L, 1.570092458683775146551022293016031474627e-16L),
4392 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, -0x1p-52L, 8.813735870195429467279863907910458761820e-1L, -1.570092458683775146551022293016031474627e-16L),
4393 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, -0x1p-52L, -8.813735870195429467279863907910458761820e-1L, -1.570092458683775146551022293016031474627e-16L),
4394 TEST_c_c (casinh, 0x1.fp-1025L, 0x0.fffffffffffff8p0L, 3.616396521699973256461764099945789620604e-301L, 1.570796311893735425383665303776316016594L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4395 TEST_c_c (casinh, 0x1.fp-1025L, -0x0.fffffffffffff8p0L, 3.616396521699973256461764099945789620604e-301L, -1.570796311893735425383665303776316016594L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4396 TEST_c_c (casinh, -0x1.fp-1025L, 0x0.fffffffffffff8p0L, -3.616396521699973256461764099945789620604e-301L, 1.570796311893735425383665303776316016594L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4397 TEST_c_c (casinh, -0x1.fp-1025L, -0x0.fffffffffffff8p0L, -3.616396521699973256461764099945789620604e-301L, -1.570796311893735425383665303776316016594L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4398 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, 0x1.fp-1025L, 8.813735870195429467279863907910371604180e-1L, 3.810492908885321954658152505985270452320e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4399 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, 0x1.fp-1025L, -8.813735870195429467279863907910371604180e-1L, 3.810492908885321954658152505985270452320e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4400 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, -0x1.fp-1025L, 8.813735870195429467279863907910371604180e-1L, -3.810492908885321954658152505985270452320e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4401 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, -0x1.fp-1025L, -8.813735870195429467279863907910371604180e-1L, -3.810492908885321954658152505985270452320e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4402 TEST_c_c (casinh, 0.0L, 0x0.fffffffffffff8p0L, 0.0L, 1.570796311893735425383665303776316016594L),
4403 TEST_c_c (casinh, 0.0L, -0x0.fffffffffffff8p0L, 0.0L, -1.570796311893735425383665303776316016594L),
4404 TEST_c_c (casinh, -0.0L, 0x0.fffffffffffff8p0L, -0.0L, 1.570796311893735425383665303776316016594L),
4405 TEST_c_c (casinh, -0.0L, -0x0.fffffffffffff8p0L, -0.0L, -1.570796311893735425383665303776316016594L),
4406 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, 0.0L, 8.813735870195429467279863907910371604180e-1L, 0.0L),
4407 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, 0.0L, -8.813735870195429467279863907910371604180e-1L, 0.0L),
4408 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, -0.0L, 8.813735870195429467279863907910371604180e-1L, -0.0L),
4409 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, -0.0L, -8.813735870195429467279863907910371604180e-1L, -0.0L),
4410#endif
4411 TEST_c_c (casinh, 0x1p-52L, 0.5L, 2.563950248511418570403591756798643804971e-16L, 5.235987755982988730771072305465648369889e-1L),
4412 TEST_c_c (casinh, 0x1p-52L, -0.5L, 2.563950248511418570403591756798643804971e-16L, -5.235987755982988730771072305465648369889e-1L),
4413 TEST_c_c (casinh, -0x1p-52L, 0.5L, -2.563950248511418570403591756798643804971e-16L, 5.235987755982988730771072305465648369889e-1L),
4414 TEST_c_c (casinh, -0x1p-52L, -0.5L, -2.563950248511418570403591756798643804971e-16L, -5.235987755982988730771072305465648369889e-1L),
4415 TEST_c_c (casinh, 0.5L, 0x1p-52L, 4.812118250596034474977589134243772428682e-1L, 1.986027322597818397661816253158024383707e-16L),
4416 TEST_c_c (casinh, -0.5L, 0x1p-52L, -4.812118250596034474977589134243772428682e-1L, 1.986027322597818397661816253158024383707e-16L),
4417 TEST_c_c (casinh, 0.5L, -0x1p-52L, 4.812118250596034474977589134243772428682e-1L, -1.986027322597818397661816253158024383707e-16L),
4418 TEST_c_c (casinh, -0.5L, -0x1p-52L, -4.812118250596034474977589134243772428682e-1L, -1.986027322597818397661816253158024383707e-16L),
ccc8cadf 4419#ifndef TEST_FLOAT
08198877
JM		 4420 TEST_c_c (casinh, 0x1.fp-1025L, 0.5L, 6.222508863508420569166420770843207333493e-309L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
4421 TEST_c_c (casinh, 0x1.fp-1025L, -0.5L, 6.222508863508420569166420770843207333493e-309L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
4422 TEST_c_c (casinh, -0x1.fp-1025L, 0.5L, -6.222508863508420569166420770843207333493e-309L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
4423 TEST_c_c (casinh, -0x1.fp-1025L, -0.5L, -6.222508863508420569166420770843207333493e-309L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
4424 TEST_c_c (casinh, 0.5L, 0x1.fp-1025L, 4.812118250596034474977589134243684231352e-1L, 4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4425 TEST_c_c (casinh, -0.5L, 0x1.fp-1025L, -4.812118250596034474977589134243684231352e-1L, 4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4426 TEST_c_c (casinh, 0.5L, -0x1.fp-1025L, 4.812118250596034474977589134243684231352e-1L, -4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4427 TEST_c_c (casinh, -0.5L, -0x1.fp-1025L, -4.812118250596034474977589134243684231352e-1L, -4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4428#endif
4429 TEST_c_c (casinh, 0x1p-52L, 0x1p-52L, 2.220446049250313080847263336181677117148e-16L, 2.220446049250313080847263336181604132852e-16L),
4430 TEST_c_c (casinh, 0x1p-52L, -0x1p-52L, 2.220446049250313080847263336181677117148e-16L, -2.220446049250313080847263336181604132852e-16L),
4431 TEST_c_c (casinh, -0x1p-52L, 0x1p-52L, -2.220446049250313080847263336181677117148e-16L, 2.220446049250313080847263336181604132852e-16L),
4432 TEST_c_c (casinh, -0x1p-52L, -0x1p-52L, -2.220446049250313080847263336181677117148e-16L, -2.220446049250313080847263336181604132852e-16L),
ccc8cadf 4433#ifndef TEST_FLOAT
08198877
JM		 4434 TEST_c_c (casinh, 0x1.fp-1025L, 0x1p-52L, 5.388850751072128349671657362289548938458e-309L, 2.220446049250313080847263336181658871074e-16L, UNDERFLOW_EXCEPTION_DOUBLE),
4435 TEST_c_c (casinh, 0x1.fp-1025L, -0x1p-52L, 5.388850751072128349671657362289548938458e-309L, -2.220446049250313080847263336181658871074e-16L, UNDERFLOW_EXCEPTION_DOUBLE),
4436 TEST_c_c (casinh, -0x1.fp-1025L, 0x1p-52L, -5.388850751072128349671657362289548938458e-309L, 2.220446049250313080847263336181658871074e-16L, UNDERFLOW_EXCEPTION_DOUBLE),
4437 TEST_c_c (casinh, -0x1.fp-1025L, -0x1p-52L, -5.388850751072128349671657362289548938458e-309L, -2.220446049250313080847263336181658871074e-16L, UNDERFLOW_EXCEPTION_DOUBLE),
4438 /* Bug 15319: underflow exception may be missing. */
4439 TEST_c_c (casinh, 0x1p-52L, 0x1.fp-1025L, 2.220446049250313080847263336181622378926e-16L, 5.388850751072128349671657362289283247603e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4440 TEST_c_c (casinh, -0x1p-52L, 0x1.fp-1025L, -2.220446049250313080847263336181622378926e-16L, 5.388850751072128349671657362289283247603e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4441 TEST_c_c (casinh, 0x1p-52L, -0x1.fp-1025L, 2.220446049250313080847263336181622378926e-16L, -5.388850751072128349671657362289283247603e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4442 TEST_c_c (casinh, -0x1p-52L, -0x1.fp-1025L, -2.220446049250313080847263336181622378926e-16L, -5.388850751072128349671657362289283247603e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4443#endif
4444 TEST_c_c (casinh, 0.0L, 0x1p-52L, 0.0L, 2.220446049250313080847263336181658871074e-16L),
4445 TEST_c_c (casinh, 0.0L, -0x1p-52L, 0.0L, -2.220446049250313080847263336181658871074e-16L),
4446 TEST_c_c (casinh, -0.0L, 0x1p-52L, -0.0L, 2.220446049250313080847263336181658871074e-16L),
4447 TEST_c_c (casinh, -0.0L, -0x1p-52L, -0.0L, -2.220446049250313080847263336181658871074e-16L),
4448 TEST_c_c (casinh, 0x1p-52L, 0.0L, 2.220446049250313080847263336181622378926e-16L, 0.0L),
4449 TEST_c_c (casinh, -0x1p-52L, 0.0L, -2.220446049250313080847263336181622378926e-16L, 0.0L),
4450 TEST_c_c (casinh, 0x1p-52L, -0.0L, 2.220446049250313080847263336181622378926e-16L, -0.0L),
4451 TEST_c_c (casinh, -0x1p-52L, -0.0L, -2.220446049250313080847263336181622378926e-16L, -0.0L),
ccc8cadf 4452#ifndef TEST_FLOAT
08198877
JM		 4453 TEST_c_c (casinh, 0x1.fp-1025L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4454 TEST_c_c (casinh, 0x1.fp-1025L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4455 TEST_c_c (casinh, -0x1.fp-1025L, 0x1.fp-1025L, -5.388850751072128349671657362289416093031e-309L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4456 TEST_c_c (casinh, -0x1.fp-1025L, -0x1.fp-1025L, -5.388850751072128349671657362289416093031e-309L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
ccc8cadf
JM		 4457#endif
4458#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 4459 TEST_c_c (casinh, 0x1p-63L, 0x0.ffffffffffffffffp0L, 2.588578361325995866221775673638805081337e-10L, 1.570796326376055842114524927965556247908L),
4460 TEST_c_c (casinh, 0x1p-63L, -0x0.ffffffffffffffffp0L, 2.588578361325995866221775673638805081337e-10L, -1.570796326376055842114524927965556247908L),
4461 TEST_c_c (casinh, -0x1p-63L, 0x0.ffffffffffffffffp0L, -2.588578361325995866221775673638805081337e-10L, 1.570796326376055842114524927965556247908L),
4462 TEST_c_c (casinh, -0x1p-63L, -0x0.ffffffffffffffffp0L, -2.588578361325995866221775673638805081337e-10L, -1.570796326376055842114524927965556247908L),
4463 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, 0x1p-63L, 8.813735870195430251942769895627079569937e-1L, 7.666467083416870407402049869781566856442e-20L),
4464 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, 0x1p-63L, -8.813735870195430251942769895627079569937e-1L, 7.666467083416870407402049869781566856442e-20L),
4465 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, -0x1p-63L, 8.813735870195430251942769895627079569937e-1L, -7.666467083416870407402049869781566856442e-20L),
4466 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, -0x1p-63L, -8.813735870195430251942769895627079569937e-1L, -7.666467083416870407402049869781566856442e-20L),
ccc8cadf 4467# if LDBL_MIN_EXP <= -16381
08198877
JM		 4468 TEST_c_c (casinh, 0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 2.472906068161537187835415298076415423459e-4923L, 1.570796326465624365239962068302568888898L),
4469 TEST_c_c (casinh, 0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 2.472906068161537187835415298076415423459e-4923L, -1.570796326465624365239962068302568888898L),
4470 TEST_c_c (casinh, -0x1.fp-16385L, 0x0.ffffffffffffffffp0L, -2.472906068161537187835415298076415423459e-4923L, 1.570796326465624365239962068302568888898L),
4471 TEST_c_c (casinh, -0x1.fp-16385L, -0x0.ffffffffffffffffp0L, -2.472906068161537187835415298076415423459e-4923L, -1.570796326465624365239962068302568888898L),
4472 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 8.813735870195430251942769895627079569917e-1L, 5.757683115456107044287327268904964422212e-4933L, UNDERFLOW_EXCEPTION),
4473 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, 0x1.fp-16385L, -8.813735870195430251942769895627079569917e-1L, 5.757683115456107044287327268904964422212e-4933L, UNDERFLOW_EXCEPTION),
4474 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 8.813735870195430251942769895627079569917e-1L, -5.757683115456107044287327268904964422212e-4933L, UNDERFLOW_EXCEPTION),
4475 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, -0x1.fp-16385L, -8.813735870195430251942769895627079569917e-1L, -5.757683115456107044287327268904964422212e-4933L, UNDERFLOW_EXCEPTION),
ccc8cadf 4476# endif
08198877
JM		 4477 TEST_c_c (casinh, 0.0L, 0x0.ffffffffffffffffp0L, 0.0L, 1.570796326465624365239962068302568888898L),
4478 TEST_c_c (casinh, 0.0L, -0x0.ffffffffffffffffp0L, 0.0L, -1.570796326465624365239962068302568888898L),
4479 TEST_c_c (casinh, -0.0L, 0x0.ffffffffffffffffp0L, -0.0L, 1.570796326465624365239962068302568888898L),
4480 TEST_c_c (casinh, -0.0L, -0x0.ffffffffffffffffp0L, -0.0L, -1.570796326465624365239962068302568888898L),
4481 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, 0.0L, 8.813735870195430251942769895627079569917e-1L, 0.0L),
4482 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, 0.0L, -8.813735870195430251942769895627079569917e-1L, 0.0L),
4483 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, -0.0L, 8.813735870195430251942769895627079569917e-1L, -0.0L),
4484 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, -0.0L, -8.813735870195430251942769895627079569917e-1L, -0.0L),
4485#endif
4486 TEST_c_c (casinh, 0x1p-63L, 0.5L, 1.251928832280966098829878787499365228659e-19L, 5.235987755982988730771072305465838140283e-1L),
4487 TEST_c_c (casinh, 0x1p-63L, -0.5L, 1.251928832280966098829878787499365228659e-19L, -5.235987755982988730771072305465838140283e-1L),
4488 TEST_c_c (casinh, -0x1p-63L, 0.5L, -1.251928832280966098829878787499365228659e-19L, 5.235987755982988730771072305465838140283e-1L),
4489 TEST_c_c (casinh, -0x1p-63L, -0.5L, -1.251928832280966098829878787499365228659e-19L, -5.235987755982988730771072305465838140283e-1L),
4490 TEST_c_c (casinh, 0.5L, 0x1p-63L, 4.812118250596034474977589134243684231373e-1L, 9.697399036122160144833087173623140436413e-20L),
4491 TEST_c_c (casinh, -0.5L, 0x1p-63L, -4.812118250596034474977589134243684231373e-1L, 9.697399036122160144833087173623140436413e-20L),
4492 TEST_c_c (casinh, 0.5L, -0x1p-63L, 4.812118250596034474977589134243684231373e-1L, -9.697399036122160144833087173623140436413e-20L),
4493 TEST_c_c (casinh, -0.5L, -0x1p-63L, -4.812118250596034474977589134243684231373e-1L, -9.697399036122160144833087173623140436413e-20L),
ccc8cadf 4494#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 4495 TEST_c_c (casinh, 0x1.fp-16385L, 0.5L, 9.402257155670418112159334875199821342890e-4933L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION),
4496 TEST_c_c (casinh, 0x1.fp-16385L, -0.5L, 9.402257155670418112159334875199821342890e-4933L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION),
4497 TEST_c_c (casinh, -0x1.fp-16385L, 0.5L, -9.402257155670418112159334875199821342890e-4933L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION),
4498 TEST_c_c (casinh, -0x1.fp-16385L, -0.5L, -9.402257155670418112159334875199821342890e-4933L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION),
4499 TEST_c_c (casinh, 0.5L, 0x1.fp-16385L, 4.812118250596034474977589134243684231352e-1L, 7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
4500 TEST_c_c (casinh, -0.5L, 0x1.fp-16385L, -4.812118250596034474977589134243684231352e-1L, 7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
4501 TEST_c_c (casinh, 0.5L, -0x1.fp-16385L, 4.812118250596034474977589134243684231352e-1L, -7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
4502 TEST_c_c (casinh, -0.5L, -0x1.fp-16385L, -4.812118250596034474977589134243684231352e-1L, -7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
4503#endif
4504 TEST_c_c (casinh, 0x1p-63L, 0x1p-63L, 1.084202172485504434007452800869941711430e-19L, 1.084202172485504434007452800869941711422e-19L),
4505 TEST_c_c (casinh, 0x1p-63L, -0x1p-63L, 1.084202172485504434007452800869941711430e-19L, -1.084202172485504434007452800869941711422e-19L),
4506 TEST_c_c (casinh, -0x1p-63L, 0x1p-63L, -1.084202172485504434007452800869941711430e-19L, 1.084202172485504434007452800869941711422e-19L),
4507 TEST_c_c (casinh, -0x1p-63L, -0x1p-63L, -1.084202172485504434007452800869941711430e-19L, -1.084202172485504434007452800869941711422e-19L),
ccc8cadf 4508#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 4509 TEST_c_c (casinh, 0x1.fp-16385L, 0x1p-63L, 8.142593549724601460479922838826119584465e-4933L, 1.084202172485504434007452800869941711428e-19L, UNDERFLOW_EXCEPTION),
4510 TEST_c_c (casinh, 0x1.fp-16385L, -0x1p-63L, 8.142593549724601460479922838826119584465e-4933L, -1.084202172485504434007452800869941711428e-19L, UNDERFLOW_EXCEPTION),
4511 TEST_c_c (casinh, -0x1.fp-16385L, 0x1p-63L, -8.142593549724601460479922838826119584465e-4933L, 1.084202172485504434007452800869941711428e-19L, UNDERFLOW_EXCEPTION),
4512 TEST_c_c (casinh, -0x1.fp-16385L, -0x1p-63L, -8.142593549724601460479922838826119584465e-4933L, -1.084202172485504434007452800869941711428e-19L, UNDERFLOW_EXCEPTION),
4513 TEST_c_c (casinh, 0x1p-63L, 0x1.fp-16385L, 1.084202172485504434007452800869941711424e-19L, 8.142593549724601460479922838826119584369e-4933L, UNDERFLOW_EXCEPTION),
4514 TEST_c_c (casinh, -0x1p-63L, 0x1.fp-16385L, -1.084202172485504434007452800869941711424e-19L, 8.142593549724601460479922838826119584369e-4933L, UNDERFLOW_EXCEPTION),
4515 TEST_c_c (casinh, 0x1p-63L, -0x1.fp-16385L, 1.084202172485504434007452800869941711424e-19L, -8.142593549724601460479922838826119584369e-4933L, UNDERFLOW_EXCEPTION),
4516 TEST_c_c (casinh, -0x1p-63L, -0x1.fp-16385L, -1.084202172485504434007452800869941711424e-19L, -8.142593549724601460479922838826119584369e-4933L, UNDERFLOW_EXCEPTION),
4517#endif
4518 TEST_c_c (casinh, 0.0L, 0x1p-63L, 0.0L, 1.084202172485504434007452800869941711428e-19L),
4519 TEST_c_c (casinh, 0.0L, -0x1p-63L, 0.0L, -1.084202172485504434007452800869941711428e-19L),
4520 TEST_c_c (casinh, -0.0L, 0x1p-63L, -0.0L, 1.084202172485504434007452800869941711428e-19L),
4521 TEST_c_c (casinh, -0.0L, -0x1p-63L, -0.0L, -1.084202172485504434007452800869941711428e-19L),
4522 TEST_c_c (casinh, 0x1p-63L, 0.0L, 1.084202172485504434007452800869941711424e-19L, 0.0L),
4523 TEST_c_c (casinh, -0x1p-63L, 0.0L, -1.084202172485504434007452800869941711424e-19L, 0.0L),
4524 TEST_c_c (casinh, 0x1p-63L, -0.0L, 1.084202172485504434007452800869941711424e-19L, -0.0L),
4525 TEST_c_c (casinh, -0x1p-63L, -0.0L, -1.084202172485504434007452800869941711424e-19L, -0.0L),
ccc8cadf 4526#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 4527 TEST_c_c (casinh, 0x1.fp-16385L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4528 TEST_c_c (casinh, 0x1.fp-16385L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4529 TEST_c_c (casinh, -0x1.fp-16385L, 0x1.fp-16385L, -8.142593549724601460479922838826119584417e-4933L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4530 TEST_c_c (casinh, -0x1.fp-16385L, -0x1.fp-16385L, -8.142593549724601460479922838826119584417e-4933L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
ccc8cadf
JM		 4531#endif
4532#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 4533 TEST_c_c (casinh, 0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 1.234330349600789959989661887846005659983e-16L, 1.570796326794896419512475791677915736035L),
4534 TEST_c_c (casinh, 0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 1.234330349600789959989661887846005659983e-16L, -1.570796326794896419512475791677915736035L),
4535 TEST_c_c (casinh, -0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, -1.234330349600789959989661887846005659983e-16L, 1.570796326794896419512475791677915736035L),
4536 TEST_c_c (casinh, -0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, -1.234330349600789959989661887846005659983e-16L, -1.570796326794896419512475791677915736035L),
4537 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 8.813735870195430252326093249797835932642e-1L, 1.743152798421049375791483240187377443526e-32L),
4538 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, -8.813735870195430252326093249797835932642e-1L, 1.743152798421049375791483240187377443526e-32L),
4539 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 8.813735870195430252326093249797835932642e-1L, -1.743152798421049375791483240187377443526e-32L),
4540 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, -8.813735870195430252326093249797835932642e-1L, -1.743152798421049375791483240187377443526e-32L),
4541 TEST_c_c (casinh, 0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 3.432186888910770473784103112009399360940e-293L, 1.570796326794896462222075823262245502760L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4542 TEST_c_c (casinh, 0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 3.432186888910770473784103112009399360940e-293L, -1.570796326794896462222075823262245502760L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4543 TEST_c_c (casinh, -0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, -3.432186888910770473784103112009399360940e-293L, 1.570796326794896462222075823262245502760L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4544 TEST_c_c (casinh, -0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, -3.432186888910770473784103112009399360940e-293L, -1.570796326794896462222075823262245502760L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4545 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 8.813735870195430252326093249797835932642e-1L, 3.810492908885321743133304375216641110205e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4546 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, -8.813735870195430252326093249797835932642e-1L, 3.810492908885321743133304375216641110205e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4547 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 8.813735870195430252326093249797835932642e-1L, -3.810492908885321743133304375216641110205e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4548 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, -8.813735870195430252326093249797835932642e-1L, -3.810492908885321743133304375216641110205e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4549 TEST_c_c (casinh, 0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 1.570796326794896462222075823262245502760L),
4550 TEST_c_c (casinh, 0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, -1.570796326794896462222075823262245502760L),
4551 TEST_c_c (casinh, -0.0L, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 1.570796326794896462222075823262245502760L),
4552 TEST_c_c (casinh, -0.0L, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, -1.570796326794896462222075823262245502760L),
4553 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 8.813735870195430252326093249797835932642e-1L, 0.0L),
4554 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, -8.813735870195430252326093249797835932642e-1L, 0.0L),
4555 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 8.813735870195430252326093249797835932642e-1L, -0.0L),
4556 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, -8.813735870195430252326093249797835932642e-1L, -0.0L),
4557#endif
4558 TEST_c_c (casinh, 0x1p-105L, 0.5L, 2.846556599890768890940941645338546615370e-32L, 5.235987755982988730771072305465838140329e-1L),
4559 TEST_c_c (casinh, 0x1p-105L, -0.5L, 2.846556599890768890940941645338546615370e-32L, -5.235987755982988730771072305465838140329e-1L),
4560 TEST_c_c (casinh, -0x1p-105L, 0.5L, -2.846556599890768890940941645338546615370e-32L, 5.235987755982988730771072305465838140329e-1L),
4561 TEST_c_c (casinh, -0x1p-105L, -0.5L, -2.846556599890768890940941645338546615370e-32L, -5.235987755982988730771072305465838140329e-1L),
4562 TEST_c_c (casinh, 0.5L, 0x1p-105L, 4.812118250596034474977589134243684231352e-1L, 2.204933261082751447436996198490110245167e-32L),
4563 TEST_c_c (casinh, -0.5L, 0x1p-105L, -4.812118250596034474977589134243684231352e-1L, 2.204933261082751447436996198490110245167e-32L),
4564 TEST_c_c (casinh, 0.5L, -0x1p-105L, 4.812118250596034474977589134243684231352e-1L, -2.204933261082751447436996198490110245167e-32L),
4565 TEST_c_c (casinh, -0.5L, -0x1p-105L, -4.812118250596034474977589134243684231352e-1L, -2.204933261082751447436996198490110245167e-32L),
4566 TEST_c_c (casinh, 0x1p-105L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 2.465190328815661891911651766508706967729e-32L),
4567 TEST_c_c (casinh, 0x1p-105L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -2.465190328815661891911651766508706967729e-32L),
4568 TEST_c_c (casinh, -0x1p-105L, 0x1p-105L, -2.465190328815661891911651766508706967729e-32L, 2.465190328815661891911651766508706967729e-32L),
4569 TEST_c_c (casinh, -0x1p-105L, -0x1p-105L, -2.465190328815661891911651766508706967729e-32L, -2.465190328815661891911651766508706967729e-32L),
ccc8cadf 4570#ifndef TEST_FLOAT
08198877
JM		 4571 TEST_c_c (casinh, 0x1.fp-1025L, 0x1p-105L, 5.388850751072128349671657362289416093031e-309L, 2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_DOUBLE),
4572 TEST_c_c (casinh, 0x1.fp-1025L, -0x1p-105L, 5.388850751072128349671657362289416093031e-309L, -2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_DOUBLE),
4573 TEST_c_c (casinh, -0x1.fp-1025L, 0x1p-105L, -5.388850751072128349671657362289416093031e-309L, 2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_DOUBLE),
4574 TEST_c_c (casinh, -0x1.fp-1025L, -0x1p-105L, -5.388850751072128349671657362289416093031e-309L, -2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_DOUBLE),
4575 /* Bug 15319: underflow exception may be missing. */
4576 TEST_c_c (casinh, 0x1p-105L, 0x1.fp-1025L, 2.465190328815661891911651766508706967729e-32L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4577 TEST_c_c (casinh, -0x1p-105L, 0x1.fp-1025L, -2.465190328815661891911651766508706967729e-32L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4578 TEST_c_c (casinh, 0x1p-105L, -0x1.fp-1025L, 2.465190328815661891911651766508706967729e-32L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4579 TEST_c_c (casinh, -0x1p-105L, -0x1.fp-1025L, -2.465190328815661891911651766508706967729e-32L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4580#endif
4581 TEST_c_c (casinh, 0.0L, 0x1p-105L, 0.0L, 2.465190328815661891911651766508706967729e-32L),
4582 TEST_c_c (casinh, 0.0L, -0x1p-105L, 0.0L, -2.465190328815661891911651766508706967729e-32L),
4583 TEST_c_c (casinh, -0.0L, 0x1p-105L, -0.0L, 2.465190328815661891911651766508706967729e-32L),
4584 TEST_c_c (casinh, -0.0L, -0x1p-105L, -0.0L, -2.465190328815661891911651766508706967729e-32L),
4585 TEST_c_c (casinh, 0x1p-105L, 0.0L, 2.465190328815661891911651766508706967729e-32L, 0.0L),
4586 TEST_c_c (casinh, -0x1p-105L, 0.0L, -2.465190328815661891911651766508706967729e-32L, 0.0L),
4587 TEST_c_c (casinh, 0x1p-105L, -0.0L, 2.465190328815661891911651766508706967729e-32L, -0.0L),
4588 TEST_c_c (casinh, -0x1p-105L, -0.0L, -2.465190328815661891911651766508706967729e-32L, -0.0L),
ccc8cadf 4589#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 4590 TEST_c_c (casinh, 0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.091004200533850618345330909857103457781e-17L, 1.570796326794896601578502908312986698624L),
4591 TEST_c_c (casinh, 0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.091004200533850618345330909857103457781e-17L, -1.570796326794896601578502908312986698624L),
4592 TEST_c_c (casinh, -0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, -1.091004200533850618345330909857103457781e-17L, 1.570796326794896601578502908312986698624L),
4593 TEST_c_c (casinh, -0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, -1.091004200533850618345330909857103457781e-17L, -1.570796326794896601578502908312986698624L),
4594 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 8.813735870195430252326093249797922409363e-1L, 1.361838123766444824837096281396380300349e-34L),
4595 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, -8.813735870195430252326093249797922409363e-1L, 1.361838123766444824837096281396380300349e-34L),
4596 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 8.813735870195430252326093249797922409363e-1L, -1.361838123766444824837096281396380300349e-34L),
4597 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, -8.813735870195430252326093249797922409363e-1L, -1.361838123766444824837096281396380300349e-34L),
4598 TEST_c_c (casinh, 0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 5.867357004219059108790368268900490184505e-4916L, 1.570796326794896605353533883825294686803L),
4599 TEST_c_c (casinh, 0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 5.867357004219059108790368268900490184505e-4916L, -1.570796326794896605353533883825294686803L),
4600 TEST_c_c (casinh, -0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, -5.867357004219059108790368268900490184505e-4916L, 1.570796326794896605353533883825294686803L),
4601 TEST_c_c (casinh, -0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, -5.867357004219059108790368268900490184505e-4916L, -1.570796326794896605353533883825294686803L),
4602 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 8.813735870195430252326093249797922409363e-1L, 5.757683115456107044131264955348449231681e-4933L, UNDERFLOW_EXCEPTION),
4603 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, -8.813735870195430252326093249797922409363e-1L, 5.757683115456107044131264955348449231681e-4933L, UNDERFLOW_EXCEPTION),
4604 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 8.813735870195430252326093249797922409363e-1L, -5.757683115456107044131264955348449231681e-4933L, UNDERFLOW_EXCEPTION),
4605 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, -8.813735870195430252326093249797922409363e-1L, -5.757683115456107044131264955348449231681e-4933L, UNDERFLOW_EXCEPTION),
4606 TEST_c_c (casinh, 0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 1.570796326794896605353533883825294686803L),
4607 TEST_c_c (casinh, 0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, -1.570796326794896605353533883825294686803L),
4608 TEST_c_c (casinh, -0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 1.570796326794896605353533883825294686803L),
4609 TEST_c_c (casinh, -0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, -1.570796326794896605353533883825294686803L),
4610 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 8.813735870195430252326093249797922409363e-1L, 0.0L),
4611 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, -8.813735870195430252326093249797922409363e-1L, 0.0L),
4612 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 8.813735870195430252326093249797922409363e-1L, -0.0L),
4613 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, -8.813735870195430252326093249797922409363e-1L, -0.0L),
4614#endif
4615 TEST_c_c (casinh, 0x1p-112L, 0.5L, 2.223872343664663196047610660420739543258e-34L, 5.235987755982988730771072305465838140329e-1L),
4616 TEST_c_c (casinh, 0x1p-112L, -0.5L, 2.223872343664663196047610660420739543258e-34L, -5.235987755982988730771072305465838140329e-1L),
4617 TEST_c_c (casinh, -0x1p-112L, 0.5L, -2.223872343664663196047610660420739543258e-34L, 5.235987755982988730771072305465838140329e-1L),
4618 TEST_c_c (casinh, -0x1p-112L, -0.5L, -2.223872343664663196047610660420739543258e-34L, -5.235987755982988730771072305465838140329e-1L),
4619 TEST_c_c (casinh, 0.5L, 0x1p-112L, 4.812118250596034474977589134243684231352e-1L, 1.722604110220899568310153280070398629037e-34L),
4620 TEST_c_c (casinh, -0.5L, 0x1p-112L, -4.812118250596034474977589134243684231352e-1L, 1.722604110220899568310153280070398629037e-34L),
4621 TEST_c_c (casinh, 0.5L, -0x1p-112L, 4.812118250596034474977589134243684231352e-1L, -1.722604110220899568310153280070398629037e-34L),
4622 TEST_c_c (casinh, -0.5L, -0x1p-112L, -4.812118250596034474977589134243684231352e-1L, -1.722604110220899568310153280070398629037e-34L),
4623 TEST_c_c (casinh, 0x1p-112L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.925929944387235853055977942584927318538e-34L),
4624 TEST_c_c (casinh, 0x1p-112L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.925929944387235853055977942584927318538e-34L),
4625 TEST_c_c (casinh, -0x1p-112L, 0x1p-112L, -1.925929944387235853055977942584927318538e-34L, 1.925929944387235853055977942584927318538e-34L),
4626 TEST_c_c (casinh, -0x1p-112L, -0x1p-112L, -1.925929944387235853055977942584927318538e-34L, -1.925929944387235853055977942584927318538e-34L),
ccc8cadf 4627#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 4628 TEST_c_c (casinh, 0x1.fp-16385L, 0x1p-112L, 8.142593549724601460479922838826119584417e-4933L, 1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4629 TEST_c_c (casinh, 0x1.fp-16385L, -0x1p-112L, 8.142593549724601460479922838826119584417e-4933L, -1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4630 TEST_c_c (casinh, -0x1.fp-16385L, 0x1p-112L, -8.142593549724601460479922838826119584417e-4933L, 1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4631 TEST_c_c (casinh, -0x1.fp-16385L, -0x1p-112L, -8.142593549724601460479922838826119584417e-4933L, -1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4632 TEST_c_c (casinh, 0x1p-112L, 0x1.fp-16385L, 1.925929944387235853055977942584927318538e-34L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4633 TEST_c_c (casinh, -0x1p-112L, 0x1.fp-16385L, -1.925929944387235853055977942584927318538e-34L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4634 TEST_c_c (casinh, 0x1p-112L, -0x1.fp-16385L, 1.925929944387235853055977942584927318538e-34L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4635 TEST_c_c (casinh, -0x1p-112L, -0x1.fp-16385L, -1.925929944387235853055977942584927318538e-34L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4636#endif
4637 TEST_c_c (casinh, 0.0L, 0x1p-112L, 0.0L, 1.925929944387235853055977942584927318538e-34L),
4638 TEST_c_c (casinh, 0.0L, -0x1p-112L, 0.0L, -1.925929944387235853055977942584927318538e-34L),
4639 TEST_c_c (casinh, -0.0L, 0x1p-112L, -0.0L, 1.925929944387235853055977942584927318538e-34L),
4640 TEST_c_c (casinh, -0.0L, -0x1p-112L, -0.0L, -1.925929944387235853055977942584927318538e-34L),
4641 TEST_c_c (casinh, 0x1p-112L, 0.0L, 1.925929944387235853055977942584927318538e-34L, 0.0L),
4642 TEST_c_c (casinh, -0x1p-112L, 0.0L, -1.925929944387235853055977942584927318538e-34L, 0.0L),
4643 TEST_c_c (casinh, 0x1p-112L, -0.0L, 1.925929944387235853055977942584927318538e-34L, -0.0L),
4644 TEST_c_c (casinh, -0x1p-112L, -0.0L, -1.925929944387235853055977942584927318538e-34L, -0.0L),
4645
4646 TEST_c_c (casinh, 0.75L, 1.25L, 1.03171853444778027336364058631006594L, 0.911738290968487636358489564316731207L),
4647 TEST_c_c (casinh, -2, -3, -1.9686379257930962917886650952454982L, -0.96465850440760279204541105949953237L),
4648 END_DATA (casinh)
4649 };
8847214f
UD		 4650
4651static void
08198877 4652casinh_test (void)
8847214f 4653{
aaca11d8 4654 errno = 0;
08198877 4655 FUNC(casinh) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD		 4656 if (errno == ENOSYS)
4657 /* Function not implemented. */
4658 return;
4659
08198877
JM		 4660 START (casinh);
4661 RUN_TEST_LOOP_c_c (casinh, casinh_test_data, );
4662 END (casinh, complex);
4663}
4664
8847214f 4665
08198877
JM		 4666static const struct test_c_c_data catan_test_data[] =
4667 {
4668 START_DATA (catan),
4669 TEST_c_c (catan, 0, 0, 0, 0),
4670 TEST_c_c (catan, minus_zero, 0, minus_zero, 0),
4671 TEST_c_c (catan, 0, minus_zero, 0, minus_zero),
4672 TEST_c_c (catan, minus_zero, minus_zero, minus_zero, minus_zero),
4673
4674 TEST_c_c (catan, 1.0L, plus_zero, M_PI_4l, plus_zero),
4675 TEST_c_c (catan, 1.0L, minus_zero, M_PI_4l, minus_zero),
4676 TEST_c_c (catan, -1.0L, plus_zero, -M_PI_4l, plus_zero),
4677 TEST_c_c (catan, -1.0L, minus_zero, -M_PI_4l, minus_zero),
4678 TEST_c_c (catan, plus_zero, 1.0L, plus_zero, plus_infty, DIVIDE_BY_ZERO_EXCEPTION),
4679 TEST_c_c (catan, minus_zero, 1.0L, minus_zero, plus_infty, DIVIDE_BY_ZERO_EXCEPTION),
4680 TEST_c_c (catan, plus_zero, -1.0L, plus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
4681 TEST_c_c (catan, minus_zero, -1.0L, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
4682
4683 TEST_c_c (catan, plus_infty, plus_infty, M_PI_2l, 0),
4684 TEST_c_c (catan, plus_infty, minus_infty, M_PI_2l, minus_zero),
4685 TEST_c_c (catan, minus_infty, plus_infty, -M_PI_2l, 0),
4686 TEST_c_c (catan, minus_infty, minus_infty, -M_PI_2l, minus_zero),
4687
4688
4689 TEST_c_c (catan, plus_infty, -10.0, M_PI_2l, minus_zero),
4690 TEST_c_c (catan, minus_infty, -10.0, -M_PI_2l, minus_zero),
4691 TEST_c_c (catan, plus_infty, minus_zero, M_PI_2l, minus_zero),
4692 TEST_c_c (catan, minus_infty, minus_zero, -M_PI_2l, minus_zero),
4693 TEST_c_c (catan, plus_infty, 0.0, M_PI_2l, 0),
4694 TEST_c_c (catan, minus_infty, 0.0, -M_PI_2l, 0),
4695 TEST_c_c (catan, plus_infty, 0.1L, M_PI_2l, 0),
4696 TEST_c_c (catan, minus_infty, 0.1L, -M_PI_2l, 0),
4697
4698 TEST_c_c (catan, 0.0, minus_infty, M_PI_2l, minus_zero),
4699 TEST_c_c (catan, minus_zero, minus_infty, -M_PI_2l, minus_zero),
4700 TEST_c_c (catan, 100.0, minus_infty, M_PI_2l, minus_zero),
4701 TEST_c_c (catan, -100.0, minus_infty, -M_PI_2l, minus_zero),
4702
4703 TEST_c_c (catan, 0.0, plus_infty, M_PI_2l, 0),
4704 TEST_c_c (catan, minus_zero, plus_infty, -M_PI_2l, 0),
4705 TEST_c_c (catan, 0.5, plus_infty, M_PI_2l, 0),
4706 TEST_c_c (catan, -0.5, plus_infty, -M_PI_2l, 0),
4707
4708 TEST_c_c (catan, qnan_value, 0.0, qnan_value, 0),
4709 TEST_c_c (catan, qnan_value, minus_zero, qnan_value, minus_zero),
4710
4711 TEST_c_c (catan, qnan_value, plus_infty, qnan_value, 0),
4712 TEST_c_c (catan, qnan_value, minus_infty, qnan_value, minus_zero),
4713
4714 TEST_c_c (catan, 0.0, qnan_value, qnan_value, qnan_value),
4715 TEST_c_c (catan, minus_zero, qnan_value, qnan_value, qnan_value),
4716
4717 TEST_c_c (catan, plus_infty, qnan_value, M_PI_2l, 0, IGNORE_ZERO_INF_SIGN),
4718 TEST_c_c (catan, minus_infty, qnan_value, -M_PI_2l, 0, IGNORE_ZERO_INF_SIGN),
4719
4720 TEST_c_c (catan, qnan_value, 10.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4721 TEST_c_c (catan, qnan_value, -10.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4722
4723 TEST_c_c (catan, 0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4724 TEST_c_c (catan, -0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4725
4726 TEST_c_c (catan, qnan_value, qnan_value, qnan_value, qnan_value),
4727
4728 TEST_c_c (catan, 0x1p50L, 0.0L, 1.570796326794895731052901991514519103193L, 0.0L),
4729 TEST_c_c (catan, 0x1p50L, -0.0L, 1.570796326794895731052901991514519103193L, -0.0L),
4730 TEST_c_c (catan, -0x1p50L, 0.0L, -1.570796326794895731052901991514519103193L, 0.0L),
4731 TEST_c_c (catan, -0x1p50L, -0.0L, -1.570796326794895731052901991514519103193L, -0.0L),
4732 TEST_c_c (catan, 0.0L, 0x1p50L, 1.570796326794896619231321691639751442099L, 8.881784197001252323389053344728897997441e-16L),
4733 TEST_c_c (catan, -0.0L, 0x1p50L, -1.570796326794896619231321691639751442099L, 8.881784197001252323389053344728897997441e-16L),
4734 TEST_c_c (catan, 0.0L, -0x1p50L, 1.570796326794896619231321691639751442099L, -8.881784197001252323389053344728897997441e-16L),
4735 TEST_c_c (catan, -0.0L, -0x1p50L, -1.570796326794896619231321691639751442099L, -8.881784197001252323389053344728897997441e-16L),
2f38fbfe 4736#ifndef TEST_FLOAT
08198877
JM		 4737 TEST_c_c (catan, 0x1p500L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4738 TEST_c_c (catan, 0x1p500L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4739 TEST_c_c (catan, -0x1p500L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4740 TEST_c_c (catan, -0x1p500L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4741 TEST_c_c (catan, 0.0L, 0x1p500L, 1.570796326794896619231321691639751442099L, 3.054936363499604682051979393213617699789e-151L),
4742 TEST_c_c (catan, -0.0L, 0x1p500L, -1.570796326794896619231321691639751442099L, 3.054936363499604682051979393213617699789e-151L),
4743 TEST_c_c (catan, 0.0L, -0x1p500L, 1.570796326794896619231321691639751442099L, -3.054936363499604682051979393213617699789e-151L),
4744 TEST_c_c (catan, -0.0L, -0x1p500L, -1.570796326794896619231321691639751442099L, -3.054936363499604682051979393213617699789e-151L),
2f38fbfe
JM		 4745#endif
4746#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 4747 TEST_c_c (catan, 0x1p5000L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4748 TEST_c_c (catan, 0x1p5000L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4749 TEST_c_c (catan, -0x1p5000L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4750 TEST_c_c (catan, -0x1p5000L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4751 TEST_c_c (catan, 0.0L, 0x1p5000L, 1.570796326794896619231321691639751442099L, 7.079811261048172892385615158694057552948e-1506L),
4752 TEST_c_c (catan, -0.0L, 0x1p5000L, -1.570796326794896619231321691639751442099L, 7.079811261048172892385615158694057552948e-1506L),
4753 TEST_c_c (catan, 0.0L, -0x1p5000L, 1.570796326794896619231321691639751442099L, -7.079811261048172892385615158694057552948e-1506L),
4754 TEST_c_c (catan, -0.0L, -0x1p5000L, -1.570796326794896619231321691639751442099L, -7.079811261048172892385615158694057552948e-1506L),
4755#endif
4756 TEST_c_c (catan, 0x1p63L, 0.5L, 1.570796326794896619122901474391200998698L, 5.877471754111437539843682686111228389007e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4757 TEST_c_c (catan, 0x1p63L, -0.5L, 1.570796326794896619122901474391200998698L, -5.877471754111437539843682686111228389007e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4758 TEST_c_c (catan, -0x1p63L, 0.5L, -1.570796326794896619122901474391200998698L, 5.877471754111437539843682686111228389007e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4759 TEST_c_c (catan, -0x1p63L, -0.5L, -1.570796326794896619122901474391200998698L, -5.877471754111437539843682686111228389007e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4760 TEST_c_c (catan, 0.5L, 0x1p63L, 1.570796326794896619231321691639751442093L, 1.084202172485504434007452800869941711427e-19L),
4761 TEST_c_c (catan, -0.5L, 0x1p63L, -1.570796326794896619231321691639751442093L, 1.084202172485504434007452800869941711427e-19L),
4762 TEST_c_c (catan, 0.5L, -0x1p63L, 1.570796326794896619231321691639751442093L, -1.084202172485504434007452800869941711427e-19L),
4763 TEST_c_c (catan, -0.5L, -0x1p63L, -1.570796326794896619231321691639751442093L, -1.084202172485504434007452800869941711427e-19L),
9457fd95 4764#ifndef TEST_FLOAT
08198877
JM		 4765 TEST_c_c (catan, 0x1p511L, 0.5L, 1.570796326794896619231321691639751442099L, 1.112536929253600691545116358666202032110e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4766 TEST_c_c (catan, 0x1p511L, -0.5L, 1.570796326794896619231321691639751442099L, -1.112536929253600691545116358666202032110e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4767 TEST_c_c (catan, -0x1p511L, 0.5L, -1.570796326794896619231321691639751442099L, 1.112536929253600691545116358666202032110e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4768 TEST_c_c (catan, -0x1p511L, -0.5L, -1.570796326794896619231321691639751442099L, -1.112536929253600691545116358666202032110e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4769 TEST_c_c (catan, 0.5L, 0x1p511L, 1.570796326794896619231321691639751442099L, 1.491668146240041348658193063092586767475e-154L),
4770 TEST_c_c (catan, -0.5L, 0x1p511L, -1.570796326794896619231321691639751442099L, 1.491668146240041348658193063092586767475e-154L),
4771 TEST_c_c (catan, 0.5L, -0x1p511L, 1.570796326794896619231321691639751442099L, -1.491668146240041348658193063092586767475e-154L),
4772 TEST_c_c (catan, -0.5L, -0x1p511L, -1.570796326794896619231321691639751442099L, -1.491668146240041348658193063092586767475e-154L),
9457fd95
JM		 4773#endif
4774#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 4775 TEST_c_c (catan, 0x1p8191L, 0.5L, 1.570796326794896619231321691639751442099L, 1.681051571556046753131338908660876301299e-4932L, UNDERFLOW_EXCEPTION),
4776 TEST_c_c (catan, 0x1p8191L, -0.5L, 1.570796326794896619231321691639751442099L, -1.681051571556046753131338908660876301299e-4932L, UNDERFLOW_EXCEPTION),
4777 TEST_c_c (catan, -0x1p8191L, 0.5L, -1.570796326794896619231321691639751442099L, 1.681051571556046753131338908660876301299e-4932L, UNDERFLOW_EXCEPTION),
4778 TEST_c_c (catan, -0x1p8191L, -0.5L, -1.570796326794896619231321691639751442099L, -1.681051571556046753131338908660876301299e-4932L, UNDERFLOW_EXCEPTION),
4779 TEST_c_c (catan, 0.5L, 0x1p8191L, 1.570796326794896619231321691639751442099L, 1.833603867554847165621412392048483165956e-2466L),
4780 TEST_c_c (catan, -0.5L, 0x1p8191L, -1.570796326794896619231321691639751442099L, 1.833603867554847165621412392048483165956e-2466L),
4781 TEST_c_c (catan, 0.5L, -0x1p8191L, 1.570796326794896619231321691639751442099L, -1.833603867554847165621412392048483165956e-2466L),
4782 TEST_c_c (catan, -0.5L, -0x1p8191L, -1.570796326794896619231321691639751442099L, -1.833603867554847165621412392048483165956e-2466L),
4783#endif
4784 TEST_c_c (catan, 0x1p100L, 0.0L, 1.570796326794896619231321691638962581193L, 0.0L),
4785 TEST_c_c (catan, 0x1p100L, -0.0L, 1.570796326794896619231321691638962581193L, -0.0L),
4786 TEST_c_c (catan, -0x1p100L, 0.0L, -1.570796326794896619231321691638962581193L, 0.0L),
4787 TEST_c_c (catan, -0x1p100L, -0.0L, -1.570796326794896619231321691638962581193L, -0.0L),
4788 TEST_c_c (catan, 0.0L, 0x1p100L, 1.570796326794896619231321691639751442099L, 7.888609052210118054117285652827862296732e-31L),
4789 TEST_c_c (catan, -0.0L, 0x1p100L, -1.570796326794896619231321691639751442099L, 7.888609052210118054117285652827862296732e-31L),
4790 TEST_c_c (catan, 0.0L, -0x1p100L, 1.570796326794896619231321691639751442099L, -7.888609052210118054117285652827862296732e-31L),
4791 TEST_c_c (catan, -0.0L, -0x1p100L, -1.570796326794896619231321691639751442099L, -7.888609052210118054117285652827862296732e-31L),
4792 TEST_c_c (catan, 0x1.fp127L, 0.0L, 1.570796326794896619231321691639751442096L, 0.0L),
4793 TEST_c_c (catan, 0x1.fp127L, -0.0L, 1.570796326794896619231321691639751442096L, -0.0L),
4794 TEST_c_c (catan, -0x1.fp127L, 0.0L, -1.570796326794896619231321691639751442096L, 0.0L),
4795 TEST_c_c (catan, -0x1.fp127L, -0.0L, -1.570796326794896619231321691639751442096L, -0.0L),
4796 TEST_c_c (catan, 0.0L, 0x1.fp127L, 1.570796326794896619231321691639751442099L, 3.033533808573645181854803967025150136306e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4797 TEST_c_c (catan, -0.0L, 0x1.fp127L, -1.570796326794896619231321691639751442099L, 3.033533808573645181854803967025150136306e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4798 TEST_c_c (catan, 0.0L, -0x1.fp127L, 1.570796326794896619231321691639751442099L, -3.033533808573645181854803967025150136306e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4799 TEST_c_c (catan, -0.0L, -0x1.fp127L, -1.570796326794896619231321691639751442099L, -3.033533808573645181854803967025150136306e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4800 TEST_c_c (catan, 0x1.fp127L, 0x1.fp127L, 1.570796326794896619231321691639751442097L, 1.516766904286822590927401983512575068153e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4801 TEST_c_c (catan, 0x1.fp127L, -0x1.fp127L, 1.570796326794896619231321691639751442097L, -1.516766904286822590927401983512575068153e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4802 TEST_c_c (catan, -0x1.fp127L, 0x1.fp127L, -1.570796326794896619231321691639751442097L, 1.516766904286822590927401983512575068153e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4803 TEST_c_c (catan, -0x1.fp127L, -0x1.fp127L, -1.570796326794896619231321691639751442097L, -1.516766904286822590927401983512575068153e-39L, UNDERFLOW_EXCEPTION_FLOAT),
5b4217d7 4804#ifndef TEST_FLOAT
08198877
JM		 4805 TEST_c_c (catan, 0x1p900L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4806 TEST_c_c (catan, 0x1p900L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4807 TEST_c_c (catan, -0x1p900L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4808 TEST_c_c (catan, -0x1p900L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4809 TEST_c_c (catan, 0.0L, 0x1p900L, 1.570796326794896619231321691639751442099L, 1.183052186166774710972751597518026531652e-271L),
4810 TEST_c_c (catan, -0.0L, 0x1p900L, -1.570796326794896619231321691639751442099L, 1.183052186166774710972751597518026531652e-271L),
4811 TEST_c_c (catan, 0.0L, -0x1p900L, 1.570796326794896619231321691639751442099L, -1.183052186166774710972751597518026531652e-271L),
4812 TEST_c_c (catan, -0.0L, -0x1p900L, -1.570796326794896619231321691639751442099L, -1.183052186166774710972751597518026531652e-271L),
4813 TEST_c_c (catan, 0x1.fp1023L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4814 TEST_c_c (catan, 0x1.fp1023L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4815 TEST_c_c (catan, -0x1.fp1023L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4816 TEST_c_c (catan, -0x1.fp1023L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4817 TEST_c_c (catan, 0.0L, 0x1.fp1023L, 1.570796326794896619231321691639751442099L, 5.742126086470197117652213464083623391533e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4818 TEST_c_c (catan, -0.0L, 0x1.fp1023L, -1.570796326794896619231321691639751442099L, 5.742126086470197117652213464083623391533e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4819 TEST_c_c (catan, 0.0L, -0x1.fp1023L, 1.570796326794896619231321691639751442099L, -5.742126086470197117652213464083623391533e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4820 TEST_c_c (catan, -0.0L, -0x1.fp1023L, -1.570796326794896619231321691639751442099L, -5.742126086470197117652213464083623391533e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4821 TEST_c_c (catan, 0x1.fp1023L, 0x1.fp1023L, 1.570796326794896619231321691639751442099L, 2.871063043235098558826106732041811695767e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4822 TEST_c_c (catan, 0x1.fp1023L, -0x1.fp1023L, 1.570796326794896619231321691639751442099L, -2.871063043235098558826106732041811695767e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4823 TEST_c_c (catan, -0x1.fp1023L, 0x1.fp1023L, -1.570796326794896619231321691639751442099L, 2.871063043235098558826106732041811695767e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4824 TEST_c_c (catan, -0x1.fp1023L, -0x1.fp1023L, -1.570796326794896619231321691639751442099L, -2.871063043235098558826106732041811695767e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
5b4217d7
JM		 4825#endif
4826#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 4827 TEST_c_c (catan, 0x1p10000L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4828 TEST_c_c (catan, 0x1p10000L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4829 TEST_c_c (catan, -0x1p10000L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4830 TEST_c_c (catan, -0x1p10000L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4831 TEST_c_c (catan, 0.0L, 0x1p10000L, 1.570796326794896619231321691639751442099L, 5.012372749206452009297555933742977749322e-3011L),
4832 TEST_c_c (catan, -0.0L, 0x1p10000L, -1.570796326794896619231321691639751442099L, 5.012372749206452009297555933742977749322e-3011L),
4833 TEST_c_c (catan, 0.0L, -0x1p10000L, 1.570796326794896619231321691639751442099L, -5.012372749206452009297555933742977749322e-3011L),
4834 TEST_c_c (catan, -0.0L, -0x1p10000L, -1.570796326794896619231321691639751442099L, -5.012372749206452009297555933742977749322e-3011L),
4835 TEST_c_c (catan, 0x1.fp16383L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4836 TEST_c_c (catan, 0x1.fp16383L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4837 TEST_c_c (catan, -0x1.fp16383L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4838 TEST_c_c (catan, -0x1.fp16383L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4839 TEST_c_c (catan, 0.0L, 0x1.fp16383L, 1.570796326794896619231321691639751442099L, 8.676395208031209048419813722120651877672e-4933L, UNDERFLOW_EXCEPTION),
4840 TEST_c_c (catan, -0.0L, 0x1.fp16383L, -1.570796326794896619231321691639751442099L, 8.676395208031209048419813722120651877672e-4933L, UNDERFLOW_EXCEPTION),
4841 TEST_c_c (catan, 0.0L, -0x1.fp16383L, 1.570796326794896619231321691639751442099L, -8.676395208031209048419813722120651877672e-4933L, UNDERFLOW_EXCEPTION),
4842 TEST_c_c (catan, -0.0L, -0x1.fp16383L, -1.570796326794896619231321691639751442099L, -8.676395208031209048419813722120651877672e-4933L, UNDERFLOW_EXCEPTION),
4843 TEST_c_c (catan, 0x1.fp16383L, 0x1.fp16383L, 1.570796326794896619231321691639751442099L, 4.338197604015604524209906861060325938836e-4933L, UNDERFLOW_EXCEPTION),
4844 TEST_c_c (catan, 0x1.fp16383L, -0x1.fp16383L, 1.570796326794896619231321691639751442099L, -4.338197604015604524209906861060325938836e-4933L, UNDERFLOW_EXCEPTION),
4845 TEST_c_c (catan, -0x1.fp16383L, 0x1.fp16383L, -1.570796326794896619231321691639751442099L, 4.338197604015604524209906861060325938836e-4933L, UNDERFLOW_EXCEPTION),
4846 TEST_c_c (catan, -0x1.fp16383L, -0x1.fp16383L, -1.570796326794896619231321691639751442099L, -4.338197604015604524209906861060325938836e-4933L, UNDERFLOW_EXCEPTION),
4847#endif
4848 TEST_c_c (catan, 0x1p-13L, 1.0L, 7.854286809755354140031716771044626356262e-1L, 4.852030264850939738801379894163661227127L),
4849 TEST_c_c (catan, 0x1p-13L, -1.0L, 7.854286809755354140031716771044626356262e-1L, -4.852030264850939738801379894163661227127L),
4850 TEST_c_c (catan, -0x1p-13L, 1.0L, -7.854286809755354140031716771044626356262e-1L, 4.852030264850939738801379894163661227127L),
4851 TEST_c_c (catan, -0x1p-13L, -1.0L, -7.854286809755354140031716771044626356262e-1L, -4.852030264850939738801379894163661227127L),
4852 TEST_c_c (catan, 1.0L, 0x1p-13L, 7.853981671227386080775748393881580082970e-1L, 6.103515609841754902688560615027452023669e-5L),
4853 TEST_c_c (catan, -1.0L, 0x1p-13L, -7.853981671227386080775748393881580082970e-1L, 6.103515609841754902688560615027452023669e-5L),
4854 TEST_c_c (catan, 1.0L, -0x1p-13L, 7.853981671227386080775748393881580082970e-1L, -6.103515609841754902688560615027452023669e-5L),
4855 TEST_c_c (catan, -1.0L, -0x1p-13L, -7.853981671227386080775748393881580082970e-1L, -6.103515609841754902688560615027452023669e-5L),
4856 TEST_c_c (catan, 0x1p-27L, 1.0L, 7.853981652600934588466178684534110069553e-1L, 9.704060527839234335310696652368086117807L),
4857 TEST_c_c (catan, 0x1p-27L, -1.0L, 7.853981652600934588466178684534110069553e-1L, -9.704060527839234335310696652368086117807L),
4858 TEST_c_c (catan, -0x1p-27L, 1.0L, -7.853981652600934588466178684534110069553e-1L, 9.704060527839234335310696652368086117807L),
4859 TEST_c_c (catan, -0x1p-27L, -1.0L, -7.853981652600934588466178684534110069553e-1L, -9.704060527839234335310696652368086117807L),
4860 TEST_c_c (catan, 1.0L, 0x1p-27L, 7.853981633974483234934486536343324763447e-1L, 3.725290298461914028034141143623846306386e-9L),
4861 TEST_c_c (catan, -1.0L, 0x1p-27L, -7.853981633974483234934486536343324763447e-1L, 3.725290298461914028034141143623846306386e-9L),
4862 TEST_c_c (catan, 1.0L, -0x1p-27L, 7.853981633974483234934486536343324763447e-1L, -3.725290298461914028034141143623846306386e-9L),
4863 TEST_c_c (catan, -1.0L, -0x1p-27L, -7.853981633974483234934486536343324763447e-1L, -3.725290298461914028034141143623846306386e-9L),
4864 TEST_c_c (catan, 0x1p-33L, 1.0L, 7.853981634265521400723945494331241018449e-1L, 1.178350206951907026009379309773625595762e1L),
4865 TEST_c_c (catan, 0x1p-33L, -1.0L, 7.853981634265521400723945494331241018449e-1L, -1.178350206951907026009379309773625595762e1L),
4866 TEST_c_c (catan, -0x1p-33L, 1.0L, -7.853981634265521400723945494331241018449e-1L, 1.178350206951907026009379309773625595762e1L),
4867 TEST_c_c (catan, -0x1p-33L, -1.0L, -7.853981634265521400723945494331241018449e-1L, -1.178350206951907026009379309773625595762e1L),
4868 TEST_c_c (catan, 1.0L, 0x1p-33L, 7.853981633974483096190489776088929224056e-1L, 5.820766091346740722643102318246316469910e-11L),
4869 TEST_c_c (catan, -1.0L, 0x1p-33L, -7.853981633974483096190489776088929224056e-1L, 5.820766091346740722643102318246316469910e-11L),
4870 TEST_c_c (catan, 1.0L, -0x1p-33L, 7.853981633974483096190489776088929224056e-1L, -5.820766091346740722643102318246316469910e-11L),
4871 TEST_c_c (catan, -1.0L, -0x1p-33L, -7.853981633974483096190489776088929224056e-1L, -5.820766091346740722643102318246316469910e-11L),
4872 TEST_c_c (catan, 0x1p-54L, 1.0L, 7.853981633974483234934486536343324763447e-1L, 1.906154746539849600897388334009985581467e1L),
4873 TEST_c_c (catan, 0x1p-54L, -1.0L, 7.853981633974483234934486536343324763447e-1L, -1.906154746539849600897388334009985581467e1L),
4874 TEST_c_c (catan, -0x1p-54L, 1.0L, -7.853981633974483234934486536343324763447e-1L, 1.906154746539849600897388334009985581467e1L),
4875 TEST_c_c (catan, -0x1p-54L, -1.0L, -7.853981633974483234934486536343324763447e-1L, -1.906154746539849600897388334009985581467e1L),
4876 TEST_c_c (catan, 1.0L, 0x1p-54L, 7.853981633974483096156608458198764914213e-1L, 2.775557561562891351059079170227049355775e-17L),
4877 TEST_c_c (catan, -1.0L, 0x1p-54L, -7.853981633974483096156608458198764914213e-1L, 2.775557561562891351059079170227049355775e-17L),
4878 TEST_c_c (catan, 1.0L, -0x1p-54L, 7.853981633974483096156608458198764914213e-1L, -2.775557561562891351059079170227049355775e-17L),
4879 TEST_c_c (catan, -1.0L, -0x1p-54L, -7.853981633974483096156608458198764914213e-1L, -2.775557561562891351059079170227049355775e-17L),
4880 TEST_c_c (catan, 0x1p-57L, 1.0L, 7.853981633974483113503843217966828154612e-1L, 2.010126823623841397309973152228712047720e1L),
4881 TEST_c_c (catan, 0x1p-57L, -1.0L, 7.853981633974483113503843217966828154612e-1L, -2.010126823623841397309973152228712047720e1L),
4882 TEST_c_c (catan, -0x1p-57L, 1.0L, -7.853981633974483113503843217966828154612e-1L, 2.010126823623841397309973152228712047720e1L),
4883 TEST_c_c (catan, -0x1p-57L, -1.0L, -7.853981633974483113503843217966828154612e-1L, -2.010126823623841397309973152228712047720e1L),
4884 TEST_c_c (catan, 1.0L, 0x1p-57L, 7.853981633974483096156608458198757330864e-1L, 3.469446951953614188823848962783813448721e-18L),
4885 TEST_c_c (catan, -1.0L, 0x1p-57L, -7.853981633974483096156608458198757330864e-1L, 3.469446951953614188823848962783813448721e-18L),
4886 TEST_c_c (catan, 1.0L, -0x1p-57L, 7.853981633974483096156608458198757330864e-1L, -3.469446951953614188823848962783813448721e-18L),
4887 TEST_c_c (catan, -1.0L, -0x1p-57L, -7.853981633974483096156608458198757330864e-1L, -3.469446951953614188823848962783813448721e-18L),
4888 TEST_c_c (catan, 0x1p-13L, 0x1.000002p0L, 7.859169620684960844300240092596908675974e-1L, 4.852030056234795712498957387213592193975L),
4889 TEST_c_c (catan, 0x1p-13L, -0x1.000002p0L, 7.859169620684960844300240092596908675974e-1L, -4.852030056234795712498957387213592193975L),
4890 TEST_c_c (catan, -0x1p-13L, 0x1.000002p0L, -7.859169620684960844300240092596908675974e-1L, 4.852030056234795712498957387213592193975L),
4891 TEST_c_c (catan, -0x1p-13L, -0x1.000002p0L, -7.859169620684960844300240092596908675974e-1L, -4.852030056234795712498957387213592193975L),
4892 TEST_c_c (catan, 0x1.000002p0L, 0x1p-13L, 7.853982267273793866654490522673596014524e-1L, 6.103514882246036852433556327261700380577e-5L),
4893 TEST_c_c (catan, -0x1.000002p0L, 0x1p-13L, -7.853982267273793866654490522673596014524e-1L, 6.103514882246036852433556327261700380577e-5L),
4894 TEST_c_c (catan, 0x1.000002p0L, -0x1p-13L, 7.853982267273793866654490522673596014524e-1L, -6.103514882246036852433556327261700380577e-5L),
4895 TEST_c_c (catan, -0x1.000002p0L, -0x1p-13L, -7.853982267273793866654490522673596014524e-1L, -6.103514882246036852433556327261700380577e-5L),
4896 TEST_c_c (catan, 0x1p-13L, 0x0.ffffffp0L, 7.851845403708474595909269086711426246675e-1L, 4.852030190345140708455871037447717761868L),
4897 TEST_c_c (catan, 0x1p-13L, -0x0.ffffffp0L, 7.851845403708474595909269086711426246675e-1L, -4.852030190345140708455871037447717761868L),
4898 TEST_c_c (catan, -0x1p-13L, 0x0.ffffffp0L, -7.851845403708474595909269086711426246675e-1L, 4.852030190345140708455871037447717761868L),
4899 TEST_c_c (catan, -0x1p-13L, -0x0.ffffffp0L, -7.851845403708474595909269086711426246675e-1L, -4.852030190345140708455871037447717761868L),
4900 TEST_c_c (catan, 0x0.ffffffp0L, 0x1p-13L, 7.853981373204155542484315721351697277336e-1L, 6.103515973639646453881721999956617260502e-5L),
4901 TEST_c_c (catan, -0x0.ffffffp0L, 0x1p-13L, -7.853981373204155542484315721351697277336e-1L, 6.103515973639646453881721999956617260502e-5L),
4902 TEST_c_c (catan, 0x0.ffffffp0L, -0x1p-13L, 7.853981373204155542484315721351697277336e-1L, -6.103515973639646453881721999956617260502e-5L),
4903 TEST_c_c (catan, -0x0.ffffffp0L, -0x1p-13L, -7.853981373204155542484315721351697277336e-1L, -6.103515973639646453881721999956617260502e-5L),
caf84319 4904#ifndef TEST_FLOAT
08198877
JM		 4905 TEST_c_c (catan, 0x1p-27L, 0x1.0000000000001p0L, 7.853981801612546526942695000283242525531e-1L, 9.704060527839234168777242958594699810015L),
4906 TEST_c_c (catan, 0x1p-27L, -0x1.0000000000001p0L, 7.853981801612546526942695000283242525531e-1L, -9.704060527839234168777242958594699810015L),
4907 TEST_c_c (catan, -0x1p-27L, 0x1.0000000000001p0L, -7.853981801612546526942695000283242525531e-1L, 9.704060527839234168777242958594699810015L),
4908 TEST_c_c (catan, -0x1p-27L, -0x1.0000000000001p0L, -7.853981801612546526942695000283242525531e-1L, -9.704060527839234168777242958594699810015L),
4909 TEST_c_c (catan, 0x1.0000000000001p0L, 0x1p-27L, 7.853981633974484345157511161499711112683e-1L, 3.725290298461913200853528590596263270474e-9L),
4910 TEST_c_c (catan, -0x1.0000000000001p0L, 0x1p-27L, -7.853981633974484345157511161499711112683e-1L, 3.725290298461913200853528590596263270474e-9L),
4911 TEST_c_c (catan, 0x1.0000000000001p0L, -0x1p-27L, 7.853981633974484345157511161499711112683e-1L, -3.725290298461913200853528590596263270474e-9L),
4912 TEST_c_c (catan, -0x1.0000000000001p0L, -0x1p-27L, -7.853981633974484345157511161499711112683e-1L, -3.725290298461913200853528590596263270474e-9L),
4913 TEST_c_c (catan, 0x1p-27L, 0x0.fffffffffffff8p0L, 7.853981578095128619227903983047292781021e-1L, 9.704060527839234252043969805481351363824L),
4914 TEST_c_c (catan, 0x1p-27L, -0x0.fffffffffffff8p0L, 7.853981578095128619227903983047292781021e-1L, -9.704060527839234252043969805481351363824L),
4915 TEST_c_c (catan, -0x1p-27L, 0x0.fffffffffffff8p0L, -7.853981578095128619227903983047292781021e-1L, 9.704060527839234252043969805481351363824L),
4916 TEST_c_c (catan, -0x1p-27L, -0x0.fffffffffffff8p0L, -7.853981578095128619227903983047292781021e-1L, -9.704060527839234252043969805481351363824L),
4917 TEST_c_c (catan, 0x0.fffffffffffff8p0L, 0x1p-27L, 7.853981633974482679822974223765039144191e-1L, 3.725290298461914441624447420137706700965e-9L),
4918 TEST_c_c (catan, -0x0.fffffffffffff8p0L, 0x1p-27L, -7.853981633974482679822974223765039144191e-1L, 3.725290298461914441624447420137706700965e-9L),
4919 TEST_c_c (catan, 0x0.fffffffffffff8p0L, -0x1p-27L, 7.853981633974482679822974223765039144191e-1L, -3.725290298461914441624447420137706700965e-9L),
4920 TEST_c_c (catan, -0x0.fffffffffffff8p0L, -0x1p-27L, -7.853981633974482679822974223765039144191e-1L, -3.725290298461914441624447420137706700965e-9L),
caf84319
JM		 4921#endif
4922#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 4923 TEST_c_c (catan, 0x1p-33L, 0x1.0000000000000002p0L, 7.853981638922134273801338071094141188767e-1L, 1.178350206951907025990405771755129268176e1L),
4924 TEST_c_c (catan, 0x1p-33L, -0x1.0000000000000002p0L, 7.853981638922134273801338071094141188767e-1L, -1.178350206951907025990405771755129268176e1L),
4925 TEST_c_c (catan, -0x1p-33L, 0x1.0000000000000002p0L, -7.853981638922134273801338071094141188767e-1L, 1.178350206951907025990405771755129268176e1L),
4926 TEST_c_c (catan, -0x1p-33L, -0x1.0000000000000002p0L, -7.853981638922134273801338071094141188767e-1L, -1.178350206951907025990405771755129268176e1L),
4927 TEST_c_c (catan, 0x1.0000000000000002p0L, 0x1p-33L, 7.853981633974483096732590862331681441026e-1L, 5.820766091346740722012013594069507025615e-11L),
4928 TEST_c_c (catan, -0x1.0000000000000002p0L, 0x1p-33L, -7.853981633974483096732590862331681441026e-1L, 5.820766091346740722012013594069507025615e-11L),
4929 TEST_c_c (catan, 0x1.0000000000000002p0L, -0x1p-33L, 7.853981633974483096732590862331681441026e-1L, -5.820766091346740722012013594069507025615e-11L),
4930 TEST_c_c (catan, -0x1.0000000000000002p0L, -0x1p-33L, -7.853981633974483096732590862331681441026e-1L, -5.820766091346740722012013594069507025615e-11L),
4931 TEST_c_c (catan, 0x1p-33L, 0x0.ffffffffffffffffp0L, 7.853981631937214964185249205444919953948e-1L, 1.178350206951907026002603046195591193050e1L),
4932 TEST_c_c (catan, 0x1p-33L, -0x0.ffffffffffffffffp0L, 7.853981631937214964185249205444919953948e-1L, -1.178350206951907026002603046195591193050e1L),
4933 TEST_c_c (catan, -0x1p-33L, 0x0.ffffffffffffffffp0L, -7.853981631937214964185249205444919953948e-1L, 1.178350206951907026002603046195591193050e1L),
4934 TEST_c_c (catan, -0x1p-33L, -0x0.ffffffffffffffffp0L, -7.853981631937214964185249205444919953948e-1L, -1.178350206951907026002603046195591193050e1L),
4935 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, 0x1p-33L, 7.853981633974483095919439232967553115548e-1L, 5.820766091346740722958646680334721192083e-11L),
4936 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, 0x1p-33L, -7.853981633974483095919439232967553115548e-1L, 5.820766091346740722958646680334721192083e-11L),
4937 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, -0x1p-33L, 7.853981633974483095919439232967553115548e-1L, -5.820766091346740722958646680334721192083e-11L),
4938 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, -0x1p-33L, -7.853981633974483095919439232967553115548e-1L, -5.820766091346740722958646680334721192083e-11L),
caf84319
JM		 4939#endif
4940#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 4941 TEST_c_c (catan, 0x1p-54L, 0x1.000000000000000000000000008p0L, 7.853981633974485455380535786656405610710e-1L, 1.906154746539849600897388334009981267384e1L),
4942 TEST_c_c (catan, 0x1p-54L, -0x1.000000000000000000000000008p0L, 7.853981633974485455380535786656405610710e-1L, -1.906154746539849600897388334009981267384e1L),
4943 TEST_c_c (catan, -0x1p-54L, 0x1.000000000000000000000000008p0L, -7.853981633974485455380535786656405610710e-1L, 1.906154746539849600897388334009981267384e1L),
4944 TEST_c_c (catan, -0x1p-54L, -0x1.000000000000000000000000008p0L, -7.853981633974485455380535786656405610710e-1L, -1.906154746539849600897388334009981267384e1L),
4945 TEST_c_c (catan, 0x1.000000000000000000000000008p0L, 0x1p-54L, 7.853981633974483096156608458198888173729e-1L, 2.775557561562891351059079170226980932999e-17L),
4946 TEST_c_c (catan, -0x1.000000000000000000000000008p0L, 0x1p-54L, -7.853981633974483096156608458198888173729e-1L, 2.775557561562891351059079170226980932999e-17L),
4947 TEST_c_c (catan, 0x1.000000000000000000000000008p0L, -0x1p-54L, 7.853981633974483096156608458198888173729e-1L, -2.775557561562891351059079170226980932999e-17L),
4948 TEST_c_c (catan, -0x1.000000000000000000000000008p0L, -0x1p-54L, -7.853981633974483096156608458198888173729e-1L, -2.775557561562891351059079170226980932999e-17L),
4949 TEST_c_c (catan, 0x1p-54L, 0x0.ffffffffffffffffffffffffffcp0L, 7.853981633974482124711461911186784339815e-1L, 1.906154746539849600897388334009984040723e1L),
4950 TEST_c_c (catan, 0x1p-54L, -0x0.ffffffffffffffffffffffffffcp0L, 7.853981633974482124711461911186784339815e-1L, -1.906154746539849600897388334009984040723e1L),
4951 TEST_c_c (catan, -0x1p-54L, 0x0.ffffffffffffffffffffffffffcp0L, -7.853981633974482124711461911186784339815e-1L, 1.906154746539849600897388334009984040723e1L),
4952 TEST_c_c (catan, -0x1p-54L, -0x0.ffffffffffffffffffffffffffcp0L, -7.853981633974482124711461911186784339815e-1L, -1.906154746539849600897388334009984040723e1L),
4953 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-54L, 7.853981633974483096156608458198703284454e-1L, 2.775557561562891351059079170227083567164e-17L),
4954 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-54L, -7.853981633974483096156608458198703284454e-1L, 2.775557561562891351059079170227083567164e-17L),
4955 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-54L, 7.853981633974483096156608458198703284454e-1L, -2.775557561562891351059079170227083567164e-17L),
4956 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-54L, -7.853981633974483096156608458198703284454e-1L, -2.775557561562891351059079170227083567164e-17L),
caf84319
JM		 4957#endif
4958#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 4959 TEST_c_c (catan, 0x1p-57L, 0x1.0000000000000000000000000001p0L, 7.853981633974483252281721296111395707566e-1L, 2.010126823623841397309973152228712033275e1L),
4960 TEST_c_c (catan, 0x1p-57L, -0x1.0000000000000000000000000001p0L, 7.853981633974483252281721296111395707566e-1L, -2.010126823623841397309973152228712033275e1L),
4961 TEST_c_c (catan, -0x1p-57L, 0x1.0000000000000000000000000001p0L, -7.853981633974483252281721296111395707566e-1L, 2.010126823623841397309973152228712033275e1L),
4962 TEST_c_c (catan, -0x1p-57L, -0x1.0000000000000000000000000001p0L, -7.853981633974483252281721296111395707566e-1L, -2.010126823623841397309973152228712033275e1L),
4963 TEST_c_c (catan, 0x1.0000000000000000000000000001p0L, 0x1p-57L, 7.853981633974483096156608458198758293829e-1L, 3.469446951953614188823848962783812780530e-18L),
4964 TEST_c_c (catan, -0x1.0000000000000000000000000001p0L, 0x1p-57L, -7.853981633974483096156608458198758293829e-1L, 3.469446951953614188823848962783812780530e-18L),
4965 TEST_c_c (catan, 0x1.0000000000000000000000000001p0L, -0x1p-57L, 7.853981633974483096156608458198758293829e-1L, -3.469446951953614188823848962783812780530e-18L),
4966 TEST_c_c (catan, -0x1.0000000000000000000000000001p0L, -0x1p-57L, -7.853981633974483096156608458198758293829e-1L, -3.469446951953614188823848962783812780530e-18L),
4967 TEST_c_c (catan, 0x1p-57L, 0x0.ffffffffffffffffffffffffffff8p0L, 7.853981633974483044114904178894544378135e-1L, 2.010126823623841397309973152228712040498e1L),
4968 TEST_c_c (catan, 0x1p-57L, -0x0.ffffffffffffffffffffffffffff8p0L, 7.853981633974483044114904178894544378135e-1L, -2.010126823623841397309973152228712040498e1L),
4969 TEST_c_c (catan, -0x1p-57L, 0x0.ffffffffffffffffffffffffffff8p0L, -7.853981633974483044114904178894544378135e-1L, 2.010126823623841397309973152228712040498e1L),
4970 TEST_c_c (catan, -0x1p-57L, -0x0.ffffffffffffffffffffffffffff8p0L, -7.853981633974483044114904178894544378135e-1L, -2.010126823623841397309973152228712040498e1L),
4971 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-57L, 7.853981633974483096156608458198756849381e-1L, 3.469446951953614188823848962783813782817e-18L),
4972 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-57L, -7.853981633974483096156608458198756849381e-1L, 3.469446951953614188823848962783813782817e-18L),
4973 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-57L, 7.853981633974483096156608458198756849381e-1L, -3.469446951953614188823848962783813782817e-18L),
4974 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-57L, -7.853981633974483096156608458198756849381e-1L, -3.469446951953614188823848962783813782817e-18L),
4975#endif
4976 TEST_c_c (catan, 1.0L, 0x1p-64L, 7.853981633974483096156608458198757210500e-1L, 2.710505431213761085018632002174854278563e-20L),
4977 TEST_c_c (catan, 1.0L, -0x1p-64L, 7.853981633974483096156608458198757210500e-1L, -2.710505431213761085018632002174854278563e-20L),
4978 TEST_c_c (catan, -1.0L, 0x1p-64L, -7.853981633974483096156608458198757210500e-1L, 2.710505431213761085018632002174854278563e-20L),
4979 TEST_c_c (catan, -1.0L, -0x1p-64L, -7.853981633974483096156608458198757210500e-1L, -2.710505431213761085018632002174854278563e-20L),
4980 TEST_c_c (catan, 0x1p-64L, 1.0L, 7.853981633974483096292133729759445264744e-1L, 2.252728336819822255606004394739073846245e1L),
4981 TEST_c_c (catan, -0x1p-64L, 1.0L, -7.853981633974483096292133729759445264744e-1L, 2.252728336819822255606004394739073846245e1L),
4982 TEST_c_c (catan, 0x1p-64L, -1.0L, 7.853981633974483096292133729759445264744e-1L, -2.252728336819822255606004394739073846245e1L),
4983 TEST_c_c (catan, -0x1p-64L, -1.0L, -7.853981633974483096292133729759445264744e-1L, -2.252728336819822255606004394739073846245e1L),
4984 TEST_c_c (catan, 1.0L, 0x1.3p-73L, 7.853981633974483096156608458198757210493e-1L, 6.286572655403010329022706059731717687100e-23L),
4985 TEST_c_c (catan, 1.0L, -0x1.3p-73L, 7.853981633974483096156608458198757210493e-1L, -6.286572655403010329022706059731717687100e-23L),
4986 TEST_c_c (catan, -1.0L, 0x1.3p-73L, -7.853981633974483096156608458198757210493e-1L, 6.286572655403010329022706059731717687100e-23L),
4987 TEST_c_c (catan, -1.0L, -0x1.3p-73L, -7.853981633974483096156608458198757210493e-1L, -6.286572655403010329022706059731717687100e-23L),
4988 TEST_c_c (catan, 0x1.3p-73L, 1.0L, 7.853981633974483096156922786831527361009e-1L, 2.556052055225464683726753902092495938633e1L),
4989 TEST_c_c (catan, -0x1.3p-73L, 1.0L, -7.853981633974483096156922786831527361009e-1L, 2.556052055225464683726753902092495938633e1L),
4990 TEST_c_c (catan, 0x1.3p-73L, -1.0L, 7.853981633974483096156922786831527361009e-1L, -2.556052055225464683726753902092495938633e1L),
4991 TEST_c_c (catan, -0x1.3p-73L, -1.0L, -7.853981633974483096156922786831527361009e-1L, -2.556052055225464683726753902092495938633e1L),
4992 TEST_c_c (catan, 1.0L, 0x1p-124L, 7.853981633974483096156608458198757210493e-1L, 2.350988701644575015937473074444491355637e-38L),
4993 TEST_c_c (catan, 1.0L, -0x1p-124L, 7.853981633974483096156608458198757210493e-1L, -2.350988701644575015937473074444491355637e-38L),
4994 TEST_c_c (catan, -1.0L, 0x1p-124L, -7.853981633974483096156608458198757210493e-1L, 2.350988701644575015937473074444491355637e-38L),
4995 TEST_c_c (catan, -1.0L, -0x1p-124L, -7.853981633974483096156608458198757210493e-1L, -2.350988701644575015937473074444491355637e-38L),
4996 TEST_c_c (catan, 0x1p-124L, 1.0L, 7.853981633974483096156608458198757210610e-1L, 4.332169878499658183857700759113603550472e1L),
4997 TEST_c_c (catan, -0x1p-124L, 1.0L, -7.853981633974483096156608458198757210610e-1L, 4.332169878499658183857700759113603550472e1L),
4998 TEST_c_c (catan, 0x1p-124L, -1.0L, 7.853981633974483096156608458198757210610e-1L, -4.332169878499658183857700759113603550472e1L),
4999 TEST_c_c (catan, -0x1p-124L, -1.0L, -7.853981633974483096156608458198757210610e-1L, -4.332169878499658183857700759113603550472e1L),
5000 TEST_c_c (catan, 0x1.000002p0L, 0x1p-126L, 7.853982230020895322927482174768220815493e-1L, 5.877471053462247139383742414506671233336e-39L, UNDERFLOW_EXCEPTION_FLOAT),
5001 TEST_c_c (catan, 0x1.000002p0L, -0x1p-126L, 7.853982230020895322927482174768220815493e-1L, -5.877471053462247139383742414506671233336e-39L, UNDERFLOW_EXCEPTION_FLOAT),
5002 TEST_c_c (catan, -0x1.000002p0L, 0x1p-126L, -7.853982230020895322927482174768220815493e-1L, 5.877471053462247139383742414506671233336e-39L, UNDERFLOW_EXCEPTION_FLOAT),
5003 TEST_c_c (catan, -0x1.000002p0L, -0x1p-126L, -7.853982230020895322927482174768220815493e-1L, -5.877471053462247139383742414506671233336e-39L, UNDERFLOW_EXCEPTION_FLOAT),
5004 TEST_c_c (catan, 0x1p-126L, 0x1.000002p0L, 1.570796326794896619231321691639702138295L, 8.317766196521665212523713550410777685446L),
5005 TEST_c_c (catan, -0x1p-126L, 0x1.000002p0L, -1.570796326794896619231321691639702138295L, 8.317766196521665212523713550410777685446L),
5006 TEST_c_c (catan, 0x1p-126L, -0x1.000002p0L, 1.570796326794896619231321691639702138295L, -8.317766196521665212523713550410777685446L),
5007 TEST_c_c (catan, -0x1p-126L, -0x1.000002p0L, -1.570796326794896619231321691639702138295L, -8.317766196521665212523713550410777685446L),
5008 TEST_c_c (catan, 0x0.ffffffp0L, 0x1p-126L, 7.853981335951250337419109991749089175724e-1L, 5.877472104436064061535099214664320916184e-39L, UNDERFLOW_EXCEPTION_FLOAT),
5009 TEST_c_c (catan, 0x0.ffffffp0L, -0x1p-126L, 7.853981335951250337419109991749089175724e-1L, -5.877472104436064061535099214664320916184e-39L, UNDERFLOW_EXCEPTION_FLOAT),
5010 TEST_c_c (catan, -0x0.ffffffp0L, 0x1p-126L, -7.853981335951250337419109991749089175724e-1L, 5.877472104436064061535099214664320916184e-39L, UNDERFLOW_EXCEPTION_FLOAT),
5011 TEST_c_c (catan, -0x0.ffffffp0L, -0x1p-126L, -7.853981335951250337419109991749089175724e-1L, -5.877472104436064061535099214664320916184e-39L, UNDERFLOW_EXCEPTION_FLOAT),
5012 TEST_c_c (catan, 0x1p-126L, 0x0.ffffffp0L, 9.860761609136244031334147100512154160097e-32L, 8.664339742098154951823135931565866792454L),
5013 TEST_c_c (catan, -0x1p-126L, 0x0.ffffffp0L, -9.860761609136244031334147100512154160097e-32L, 8.664339742098154951823135931565866792454L),
5014 TEST_c_c (catan, 0x1p-126L, -0x0.ffffffp0L, 9.860761609136244031334147100512154160097e-32L, -8.664339742098154951823135931565866792454L),
5015 TEST_c_c (catan, -0x1p-126L, -0x0.ffffffp0L, -9.860761609136244031334147100512154160097e-32L, -8.664339742098154951823135931565866792454L),
10de07f5 5016#ifndef TEST_FLOAT
08198877
JM		 5017 TEST_c_c (catan, 1.0L, 0x1p-512L, 7.853981633974483096156608458198757210493e-1L, 3.729170365600103371645482657731466918688e-155L),
5018 TEST_c_c (catan, 1.0L, -0x1p-512L, 7.853981633974483096156608458198757210493e-1L, -3.729170365600103371645482657731466918688e-155L),
5019 TEST_c_c (catan, -1.0L, 0x1p-512L, -7.853981633974483096156608458198757210493e-1L, 3.729170365600103371645482657731466918688e-155L),
5020 TEST_c_c (catan, -1.0L, -0x1p-512L, -7.853981633974483096156608458198757210493e-1L, -3.729170365600103371645482657731466918688e-155L),
5021 TEST_c_c (catan, 0x1p-512L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 1.777922518136259718655200391540222897114e2L),
5022 TEST_c_c (catan, -0x1p-512L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 1.777922518136259718655200391540222897114e2L),
5023 TEST_c_c (catan, 0x1p-512L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -1.777922518136259718655200391540222897114e2L),
5024 TEST_c_c (catan, -0x1p-512L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -1.777922518136259718655200391540222897114e2L),
5025 TEST_c_c (catan, 1.0L, 0x1.3p-536L, 7.853981633974483096156608458198757210493e-1L, 2.639526015013529511588222179446290115084e-162L),
5026 TEST_c_c (catan, 1.0L, -0x1.3p-536L, 7.853981633974483096156608458198757210493e-1L, -2.639526015013529511588222179446290115084e-162L),
5027 TEST_c_c (catan, -1.0L, 0x1.3p-536L, -7.853981633974483096156608458198757210493e-1L, 2.639526015013529511588222179446290115084e-162L),
5028 TEST_c_c (catan, -1.0L, -0x1.3p-536L, -7.853981633974483096156608458198757210493e-1L, -2.639526015013529511588222179446290115084e-162L),
5029 TEST_c_c (catan, 0x1.3p-536L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 1.860240928518819859673567751384928348958e2L),
5030 TEST_c_c (catan, -0x1.3p-536L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 1.860240928518819859673567751384928348958e2L),
5031 TEST_c_c (catan, 0x1.3p-536L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -1.860240928518819859673567751384928348958e2L),
5032 TEST_c_c (catan, -0x1.3p-536L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -1.860240928518819859673567751384928348958e2L),
5033 TEST_c_c (catan, 1.0L, 0x1p-1020L, 7.853981633974483096156608458198757210493e-1L, 4.450147717014402766180465434664808128438e-308L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5034 TEST_c_c (catan, 1.0L, -0x1p-1020L, 7.853981633974483096156608458198757210493e-1L, -4.450147717014402766180465434664808128438e-308L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5035 TEST_c_c (catan, -1.0L, 0x1p-1020L, -7.853981633974483096156608458198757210493e-1L, 4.450147717014402766180465434664808128438e-308L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5036 TEST_c_c (catan, -1.0L, -0x1p-1020L, -7.853981633974483096156608458198757210493e-1L, -4.450147717014402766180465434664808128438e-308L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5037 TEST_c_c (catan, 0x1p-1020L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 3.538516356758520804574969980043991380025e2L),
5038 TEST_c_c (catan, -0x1p-1020L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 3.538516356758520804574969980043991380025e2L),
5039 TEST_c_c (catan, 0x1p-1020L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -3.538516356758520804574969980043991380025e2L),
5040 TEST_c_c (catan, -0x1p-1020L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -3.538516356758520804574969980043991380025e2L),
5041 TEST_c_c (catan, 0x1.0000000000001p0L, 0x1p-1022L, 7.853981633974484206379633083355174374608e-1L, 1.112536929253600444512293438042957369978e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5042 TEST_c_c (catan, 0x1.0000000000001p0L, -0x1p-1022L, 7.853981633974484206379633083355174374608e-1L, -1.112536929253600444512293438042957369978e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5043 TEST_c_c (catan, -0x1.0000000000001p0L, 0x1p-1022L, -7.853981633974484206379633083355174374608e-1L, 1.112536929253600444512293438042957369978e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5044 TEST_c_c (catan, -0x1.0000000000001p0L, -0x1p-1022L, -7.853981633974484206379633083355174374608e-1L, -1.112536929253600444512293438042957369978e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5045 TEST_c_c (catan, 0x1p-1022L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 1.836840028483855075506780244989950299369e1L),
5046 TEST_c_c (catan, -0x1p-1022L, 0x1.0000000000001p0L, -1.570796326794896619231321691639751442099L, 1.836840028483855075506780244989950299369e1L),
5047 TEST_c_c (catan, 0x1p-1022L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -1.836840028483855075506780244989950299369e1L),
5048 TEST_c_c (catan, -0x1p-1022L, -0x1.0000000000001p0L, -1.570796326794896619231321691639751442099L, -1.836840028483855075506780244989950299369e1L),
5049 TEST_c_c (catan, 0x0.fffffffffffff8p0L, 0x1p-1022L, 7.853981633974482541045096145620456183798e-1L, 1.112536929253600815061527818977844932790e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5050 TEST_c_c (catan, 0x0.fffffffffffff8p0L, -0x1p-1022L, 7.853981633974482541045096145620456183798e-1L, -1.112536929253600815061527818977844932790e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5051 TEST_c_c (catan, -0x0.fffffffffffff8p0L, 0x1p-1022L, -7.853981633974482541045096145620456183798e-1L, 1.112536929253600815061527818977844932790e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5052 TEST_c_c (catan, -0x0.fffffffffffff8p0L, -0x1p-1022L, -7.853981633974482541045096145620456183798e-1L, -1.112536929253600815061527818977844932790e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5053 TEST_c_c (catan, 0x1p-1022L, 0x0.fffffffffffff8p0L, 1.002084180004486444624900488355118689113e-292L, 1.871497387511852332650969166374185305708e1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5054 TEST_c_c (catan, -0x1p-1022L, 0x0.fffffffffffff8p0L, -1.002084180004486444624900488355118689113e-292L, 1.871497387511852332650969166374185305708e1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5055 TEST_c_c (catan, 0x1p-1022L, -0x0.fffffffffffff8p0L, 1.002084180004486444624900488355118689113e-292L, -1.871497387511852332650969166374185305708e1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5056 TEST_c_c (catan, -0x1p-1022L, -0x0.fffffffffffff8p0L, -1.002084180004486444624900488355118689113e-292L, -1.871497387511852332650969166374185305708e1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
10de07f5
JM		 5057#endif
5058#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 5059 TEST_c_c (catan, 0x1.0000000000000002p0L, 0x1p-1022L, 7.853981633974483096698709544441509427467e-1L, 1.112536929253600691424494863099491450042e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5060 TEST_c_c (catan, 0x1.0000000000000002p0L, -0x1p-1022L, 7.853981633974483096698709544441509427467e-1L, -1.112536929253600691424494863099491450042e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5061 TEST_c_c (catan, -0x1.0000000000000002p0L, 0x1p-1022L, -7.853981633974483096698709544441509427467e-1L, 1.112536929253600691424494863099491450042e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5062 TEST_c_c (catan, -0x1.0000000000000002p0L, -0x1p-1022L, -7.853981633974483096698709544441509427467e-1L, -1.112536929253600691424494863099491450042e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5063 TEST_c_c (catan, 0x1p-1022L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 2.218070977791824990137853294097378778927e1L),
5064 TEST_c_c (catan, -0x1p-1022L, 0x1.0000000000000002p0L, -1.570796326794896619231321691639751442099L, 2.218070977791824990137853294097378778927e1L),
5065 TEST_c_c (catan, 0x1p-1022L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -2.218070977791824990137853294097378778927e1L),
5066 TEST_c_c (catan, -0x1p-1022L, -0x1.0000000000000002p0L, -1.570796326794896619231321691639751442099L, -2.218070977791824990137853294097378778927e1L),
5067 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, 0x1p-1022L, 7.853981633974483095885557915077381101984e-1L, 1.112536929253600691605427106449557323148e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5068 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, -0x1p-1022L, 7.853981633974483095885557915077381101984e-1L, -1.112536929253600691605427106449557323148e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5069 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, 0x1p-1022L, -7.853981633974483095885557915077381101984e-1L, 1.112536929253600691605427106449557323148e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5070 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, -0x1p-1022L, -7.853981633974483095885557915077381101984e-1L, -1.112536929253600691605427106449557323148e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5071 TEST_c_c (catan, 0x1p-1022L, 0x0.ffffffffffffffffp0L, 2.052268400649188124723641491045245971623e-289L, 2.252728336819822255604649142023466965703e1L),
5072 TEST_c_c (catan, -0x1p-1022L, 0x0.ffffffffffffffffp0L, -2.052268400649188124723641491045245971623e-289L, 2.252728336819822255604649142023466965703e1L),
5073 TEST_c_c (catan, 0x1p-1022L, -0x0.ffffffffffffffffp0L, 2.052268400649188124723641491045245971623e-289L, -2.252728336819822255604649142023466965703e1L),
5074 TEST_c_c (catan, -0x1p-1022L, -0x0.ffffffffffffffffp0L, -2.052268400649188124723641491045245971623e-289L, -2.252728336819822255604649142023466965703e1L),
10de07f5
JM		 5075#endif
5076#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 5077 TEST_c_c (catan, 0x1.000000000000000000000000008p0L, 0x1p-1022L, 7.853981633974483096156608458198880470009e-1L, 1.112536929253600691545116358666174605957e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5078 TEST_c_c (catan, 0x1.000000000000000000000000008p0L, -0x1p-1022L, 7.853981633974483096156608458198880470009e-1L, -1.112536929253600691545116358666174605957e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5079 TEST_c_c (catan, -0x1.000000000000000000000000008p0L, 0x1p-1022L, -7.853981633974483096156608458198880470009e-1L, 1.112536929253600691545116358666174605957e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5080 TEST_c_c (catan, -0x1.000000000000000000000000008p0L, -0x1p-1022L, -7.853981633974483096156608458198880470009e-1L, -1.112536929253600691545116358666174605957e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5081 TEST_c_c (catan, 0x1p-1022L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 3.673680056967710139911330243728336427098e1L),
5082 TEST_c_c (catan, -0x1p-1022L, 0x1.000000000000000000000000008p0L, -1.570796326794896619231321691639751442099L, 3.673680056967710139911330243728336427098e1L),
5083 TEST_c_c (catan, 0x1p-1022L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -3.673680056967710139911330243728336427098e1L),
5084 TEST_c_c (catan, -0x1p-1022L, -0x1.000000000000000000000000008p0L, -1.570796326794896619231321691639751442099L, -3.673680056967710139911330243728336427098e1L),
5085 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-1022L, 7.853981633974483096156608458198695580735e-1L, 1.112536929253600691545116358666215745186e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5086 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-1022L, 7.853981633974483096156608458198695580735e-1L, -1.112536929253600691545116358666215745186e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5087 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-1022L, -7.853981633974483096156608458198695580735e-1L, 1.112536929253600691545116358666215745186e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5088 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-1022L, -7.853981633974483096156608458198695580735e-1L, -1.112536929253600691545116358666215745186e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5089 TEST_c_c (catan, 0x1p-1022L, 0x0.ffffffffffffffffffffffffffcp0L, 9.025971879324147880346310405868788320726e-277L, 3.708337415995707405382191849801244331055e1L),
5090 TEST_c_c (catan, -0x1p-1022L, 0x0.ffffffffffffffffffffffffffcp0L, -9.025971879324147880346310405868788320726e-277L, 3.708337415995707405382191849801244331055e1L),
5091 TEST_c_c (catan, 0x1p-1022L, -0x0.ffffffffffffffffffffffffffcp0L, 9.025971879324147880346310405868788320726e-277L, -3.708337415995707405382191849801244331055e1L),
5092 TEST_c_c (catan, -0x1p-1022L, -0x0.ffffffffffffffffffffffffffcp0L, -9.025971879324147880346310405868788320726e-277L, -3.708337415995707405382191849801244331055e1L),
10de07f5
JM		 5093#endif
5094#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5095 TEST_c_c (catan, 1.0L, 0x1p-8192L, 7.853981633974483096156608458198757210493e-1L, 4.584009668887117914053530980121207914891e-2467L),
5096 TEST_c_c (catan, 1.0L, -0x1p-8192L, 7.853981633974483096156608458198757210493e-1L, -4.584009668887117914053530980121207914891e-2467L),
5097 TEST_c_c (catan, -1.0L, 0x1p-8192L, -7.853981633974483096156608458198757210493e-1L, 4.584009668887117914053530980121207914891e-2467L),
5098 TEST_c_c (catan, -1.0L, -0x1p-8192L, -7.853981633974483096156608458198757210493e-1L, -4.584009668887117914053530980121207914891e-2467L),
5099 TEST_c_c (catan, 0x1p-8192L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 2.839477425163815960027691385553420311121e3L),
5100 TEST_c_c (catan, -0x1p-8192L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 2.839477425163815960027691385553420311121e3L),
5101 TEST_c_c (catan, 0x1p-8192L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -2.839477425163815960027691385553420311121e3L),
5102 TEST_c_c (catan, -0x1p-8192L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -2.839477425163815960027691385553420311121e3L),
5103 TEST_c_c (catan, 1.0L, 0x1.3p-8221L, 7.853981633974483096156608458198757210493e-1L, 1.013933025636421986471594877335044443409e-2475L),
5104 TEST_c_c (catan, 1.0L, -0x1.3p-8221L, 7.853981633974483096156608458198757210493e-1L, -1.013933025636421986471594877335044443409e-2475L),
5105 TEST_c_c (catan, -1.0L, 0x1.3p-8221L, -7.853981633974483096156608458198757210493e-1L, 1.013933025636421986471594877335044443409e-2475L),
5106 TEST_c_c (catan, -1.0L, -0x1.3p-8221L, -7.853981633974483096156608458198757210493e-1L, -1.013933025636421986471594877335044443409e-2475L),
5107 TEST_c_c (catan, 0x1.3p-8221L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 2.849442134153471837403071201841536297726e3L),
5108 TEST_c_c (catan, -0x1.3p-8221L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 2.849442134153471837403071201841536297726e3L),
5109 TEST_c_c (catan, 0x1.3p-8221L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -2.849442134153471837403071201841536297726e3L),
5110 TEST_c_c (catan, -0x1.3p-8221L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -2.849442134153471837403071201841536297726e3L),
5111 TEST_c_c (catan, 1.0L, 0x1.3p-8246L, 7.853981633974483096156608458198757210493e-1L, 3.021755890954798419688924781486524472858e-2483L),
5112 TEST_c_c (catan, 1.0L, -0x1.3p-8246L, 7.853981633974483096156608458198757210493e-1L, -3.021755890954798419688924781486524472858e-2483L),
5113 TEST_c_c (catan, -1.0L, 0x1.3p-8246L, -7.853981633974483096156608458198757210493e-1L, 3.021755890954798419688924781486524472858e-2483L),
5114 TEST_c_c (catan, -1.0L, -0x1.3p-8246L, -7.853981633974483096156608458198757210493e-1L, -3.021755890954798419688924781486524472858e-2483L),
5115 TEST_c_c (catan, 0x1.3p-8246L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 2.858106473910471153770786603359763504827e3L),
5116 TEST_c_c (catan, -0x1.3p-8246L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 2.858106473910471153770786603359763504827e3L),
5117 TEST_c_c (catan, 0x1.3p-8246L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -2.858106473910471153770786603359763504827e3L),
5118 TEST_c_c (catan, -0x1.3p-8246L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -2.858106473910471153770786603359763504827e3L),
5119 TEST_c_c (catan, 1.0L, 0x1p-16380L, 7.853981633974483096156608458198757210493e-1L, 6.724206286224187012525355634643505205196e-4932L),
5120 TEST_c_c (catan, 1.0L, -0x1p-16380L, 7.853981633974483096156608458198757210493e-1L, -6.724206286224187012525355634643505205196e-4932L),
5121 TEST_c_c (catan, -1.0L, 0x1p-16380L, -7.853981633974483096156608458198757210493e-1L, 6.724206286224187012525355634643505205196e-4932L),
5122 TEST_c_c (catan, -1.0L, -0x1p-16380L, -7.853981633974483096156608458198757210493e-1L, -6.724206286224187012525355634643505205196e-4932L),
5123 TEST_c_c (catan, 0x1p-16380L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 5.677221982376232056781839690803195180822e3L),
5124 TEST_c_c (catan, -0x1p-16380L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 5.677221982376232056781839690803195180822e3L),
5125 TEST_c_c (catan, 0x1p-16380L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -5.677221982376232056781839690803195180822e3L),
5126 TEST_c_c (catan, -0x1p-16380L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -5.677221982376232056781839690803195180822e3L),
5127 TEST_c_c (catan, 0x1.0000000000000002p0L, 0x1p-16382L, 7.853981633974483096698709544441509427467e-1L, 1.681051571556046752949078932066752571182e-4932L, UNDERFLOW_EXCEPTION),
5128 TEST_c_c (catan, 0x1.0000000000000002p0L, -0x1p-16382L, 7.853981633974483096698709544441509427467e-1L, -1.681051571556046752949078932066752571182e-4932L, UNDERFLOW_EXCEPTION),
5129 TEST_c_c (catan, -0x1.0000000000000002p0L, 0x1p-16382L, -7.853981633974483096698709544441509427467e-1L, 1.681051571556046752949078932066752571182e-4932L, UNDERFLOW_EXCEPTION),
5130 TEST_c_c (catan, -0x1.0000000000000002p0L, -0x1p-16382L, -7.853981633974483096698709544441509427467e-1L, -1.681051571556046752949078932066752571182e-4932L, UNDERFLOW_EXCEPTION),
5131 TEST_c_c (catan, 0x1p-16382L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 2.218070977791824990137853294097378778927e1L),
5132 TEST_c_c (catan, -0x1p-16382L, 0x1.0000000000000002p0L, -1.570796326794896619231321691639751442099L, 2.218070977791824990137853294097378778927e1L),
5133 TEST_c_c (catan, 0x1p-16382L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -2.218070977791824990137853294097378778927e1L),
5134 TEST_c_c (catan, -0x1p-16382L, -0x1.0000000000000002p0L, -1.570796326794896619231321691639751442099L, -2.218070977791824990137853294097378778927e1L),
5135 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, 0x1p-16382L, 7.853981633974483095885557915077381101984e-1L, 1.681051571556046753222468896957938166365e-4932L, UNDERFLOW_EXCEPTION),
5136 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, -0x1p-16382L, 7.853981633974483095885557915077381101984e-1L, -1.681051571556046753222468896957938166365e-4932L, UNDERFLOW_EXCEPTION),
5137 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, 0x1p-16382L, -7.853981633974483095885557915077381101984e-1L, 1.681051571556046753222468896957938166365e-4932L, UNDERFLOW_EXCEPTION),
5138 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, -0x1p-16382L, -7.853981633974483095885557915077381101984e-1L, -1.681051571556046753222468896957938166365e-4932L, UNDERFLOW_EXCEPTION),
5139 TEST_c_c (catan, 0x1p-16382L, 0x0.ffffffffffffffffp0L, 3.100992811520163369065387859792822623745e-4913L, 2.252728336819822255604649142023466965703e1L),
5140 TEST_c_c (catan, -0x1p-16382L, 0x0.ffffffffffffffffp0L, -3.100992811520163369065387859792822623745e-4913L, 2.252728336819822255604649142023466965703e1L),
5141 TEST_c_c (catan, 0x1p-16382L, -0x0.ffffffffffffffffp0L, 3.100992811520163369065387859792822623745e-4913L, -2.252728336819822255604649142023466965703e1L),
5142 TEST_c_c (catan, -0x1p-16382L, -0x0.ffffffffffffffffp0L, -3.100992811520163369065387859792822623745e-4913L, -2.252728336819822255604649142023466965703e1L),
10de07f5 5143# if LDBL_MANT_DIG >= 113
08198877
JM		 5144 TEST_c_c (catan, 0x1.0000000000000000000000000001p0L, 0x1p-16382L, 7.853981633974483096156608458198758173458e-1L, 1.681051571556046753131338908660875977540e-4932L, UNDERFLOW_EXCEPTION),
5145 TEST_c_c (catan, 0x1.0000000000000000000000000001p0L, -0x1p-16382L, 7.853981633974483096156608458198758173458e-1L, -1.681051571556046753131338908660875977540e-4932L, UNDERFLOW_EXCEPTION),
5146 TEST_c_c (catan, -0x1.0000000000000000000000000001p0L, 0x1p-16382L, -7.853981633974483096156608458198758173458e-1L, 1.681051571556046753131338908660875977540e-4932L, UNDERFLOW_EXCEPTION),
5147 TEST_c_c (catan, -0x1.0000000000000000000000000001p0L, -0x1p-16382L, -7.853981633974483096156608458198758173458e-1L, -1.681051571556046753131338908660875977540e-4932L, UNDERFLOW_EXCEPTION),
5148 TEST_c_c (catan, 0x1p-16382L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 3.916281570163690998207361486238697614441e1L),
5149 TEST_c_c (catan, -0x1p-16382L, 0x1.0000000000000000000000000001p0L, -1.570796326794896619231321691639751442099L, 3.916281570163690998207361486238697614441e1L),
5150 TEST_c_c (catan, 0x1p-16382L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -3.916281570163690998207361486238697614441e1L),
5151 TEST_c_c (catan, -0x1p-16382L, -0x1.0000000000000000000000000001p0L, -1.570796326794896619231321691639751442099L, -3.916281570163690998207361486238697614441e1L),
5152 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-16382L, 7.853981633974483096156608458198756729010e-1L, 1.681051571556046753131338908660876463178e-4932L, UNDERFLOW_EXCEPTION),
5153 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-16382L, 7.853981633974483096156608458198756729010e-1L, -1.681051571556046753131338908660876463178e-4932L, UNDERFLOW_EXCEPTION),
5154 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-16382L, -7.853981633974483096156608458198756729010e-1L, 1.681051571556046753131338908660876463178e-4932L, UNDERFLOW_EXCEPTION),
5155 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-16382L, -7.853981633974483096156608458198756729010e-1L, -1.681051571556046753131338908660876463178e-4932L, UNDERFLOW_EXCEPTION),
5156 TEST_c_c (catan, 0x1p-16382L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.745703758805099310527547423749501866998e-4898L, 3.950938929191688263678223092311606435623e1L),
5157 TEST_c_c (catan, -0x1p-16382L, 0x0.ffffffffffffffffffffffffffff8p0L, -1.745703758805099310527547423749501866998e-4898L, 3.950938929191688263678223092311606435623e1L),
5158 TEST_c_c (catan, 0x1p-16382L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.745703758805099310527547423749501866998e-4898L, -3.950938929191688263678223092311606435623e1L),
5159 TEST_c_c (catan, -0x1p-16382L, -0x0.ffffffffffffffffffffffffffff8p0L, -1.745703758805099310527547423749501866998e-4898L, -3.950938929191688263678223092311606435623e1L),
10de07f5 5160# endif
caf84319 5161#endif
2f38fbfe 5162
08198877
JM		 5163 TEST_c_c (catan, 0.75L, 1.25L, 1.10714871779409050301706546017853704L, 0.549306144334054845697622618461262852L),
5164 TEST_c_c (catan, -2, -3, -1.4099210495965755225306193844604208L, -0.22907268296853876629588180294200276L),
5165 END_DATA (catan)
5166 };
8847214f
UD		 5167
5168static void
08198877 5169catan_test (void)
8847214f 5170{
aaca11d8 5171 errno = 0;
08198877 5172 FUNC(catan) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD		 5173 if (errno == ENOSYS)
5174 /* Function not implemented. */
5175 return;
5176
08198877
JM		 5177 START (catan);
5178 RUN_TEST_LOOP_c_c (catan, catan_test_data, );
5179 END (catan, complex);
5180}
8847214f 5181
08198877
JM		 5182static const struct test_c_c_data catanh_test_data[] =
5183 {
5184 START_DATA (catanh),
5185 TEST_c_c (catanh, 0, 0, 0.0, 0.0),
5186 TEST_c_c (catanh, minus_zero, 0, minus_zero, 0.0),
5187 TEST_c_c (catanh, 0, minus_zero, 0.0, minus_zero),
5188 TEST_c_c (catanh, minus_zero, minus_zero, minus_zero, minus_zero),
5189
5190 TEST_c_c (catanh, 1.0L, plus_zero, plus_infty, plus_zero, DIVIDE_BY_ZERO_EXCEPTION),
5191 TEST_c_c (catanh, 1.0L, minus_zero, plus_infty, minus_zero, DIVIDE_BY_ZERO_EXCEPTION),
5192 TEST_c_c (catanh, -1.0L, plus_zero, minus_infty, plus_zero, DIVIDE_BY_ZERO_EXCEPTION),
5193 TEST_c_c (catanh, -1.0L, minus_zero, minus_infty, minus_zero, DIVIDE_BY_ZERO_EXCEPTION),
5194 TEST_c_c (catanh, plus_zero, 1.0L, plus_zero, M_PI_4l),
5195 TEST_c_c (catanh, minus_zero, 1.0L, minus_zero, M_PI_4l),
5196 TEST_c_c (catanh, plus_zero, -1.0L, plus_zero, -M_PI_4l),
5197 TEST_c_c (catanh, minus_zero, -1.0L, minus_zero, -M_PI_4l),
5198
5199 TEST_c_c (catanh, plus_infty, plus_infty, 0.0, M_PI_2l),
5200 TEST_c_c (catanh, plus_infty, minus_infty, 0.0, -M_PI_2l),
5201 TEST_c_c (catanh, minus_infty, plus_infty, minus_zero, M_PI_2l),
5202 TEST_c_c (catanh, minus_infty, minus_infty, minus_zero, -M_PI_2l),
5203
5204 TEST_c_c (catanh, -10.0, plus_infty, minus_zero, M_PI_2l),
5205 TEST_c_c (catanh, -10.0, minus_infty, minus_zero, -M_PI_2l),
5206 TEST_c_c (catanh, minus_zero, plus_infty, minus_zero, M_PI_2l),
5207 TEST_c_c (catanh, minus_zero, minus_infty, minus_zero, -M_PI_2l),
5208 TEST_c_c (catanh, 0, plus_infty, 0.0, M_PI_2l),
5209 TEST_c_c (catanh, 0, minus_infty, 0.0, -M_PI_2l),
5210 TEST_c_c (catanh, 0.1L, plus_infty, 0.0, M_PI_2l),
5211 TEST_c_c (catanh, 0.1L, minus_infty, 0.0, -M_PI_2l),
5212
5213 TEST_c_c (catanh, minus_infty, 0, minus_zero, M_PI_2l),
5214 TEST_c_c (catanh, minus_infty, minus_zero, minus_zero, -M_PI_2l),
5215 TEST_c_c (catanh, minus_infty, 100, minus_zero, M_PI_2l),
5216 TEST_c_c (catanh, minus_infty, -100, minus_zero, -M_PI_2l),
5217
5218 TEST_c_c (catanh, plus_infty, 0, 0.0, M_PI_2l),
5219 TEST_c_c (catanh, plus_infty, minus_zero, 0.0, -M_PI_2l),
5220 TEST_c_c (catanh, plus_infty, 0.5, 0.0, M_PI_2l),
5221 TEST_c_c (catanh, plus_infty, -0.5, 0.0, -M_PI_2l),
5222
5223 TEST_c_c (catanh, 0, qnan_value, 0.0, qnan_value),
5224 TEST_c_c (catanh, minus_zero, qnan_value, minus_zero, qnan_value),
5225
5226 TEST_c_c (catanh, plus_infty, qnan_value, 0.0, qnan_value),
5227 TEST_c_c (catanh, minus_infty, qnan_value, minus_zero, qnan_value),
5228
5229 TEST_c_c (catanh, qnan_value, 0, qnan_value, qnan_value),
5230 TEST_c_c (catanh, qnan_value, minus_zero, qnan_value, qnan_value),
5231
5232 TEST_c_c (catanh, qnan_value, plus_infty, 0.0, M_PI_2l, IGNORE_ZERO_INF_SIGN),
5233 TEST_c_c (catanh, qnan_value, minus_infty, 0.0, -M_PI_2l, IGNORE_ZERO_INF_SIGN),
5234
5235 TEST_c_c (catanh, 10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5236 TEST_c_c (catanh, -10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5237
5238 TEST_c_c (catanh, qnan_value, 0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5239 TEST_c_c (catanh, qnan_value, -0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5240
5241 TEST_c_c (catanh, qnan_value, qnan_value, qnan_value, qnan_value),
5242
5243 TEST_c_c (catanh, 0x1p50L, 0.0L, 8.881784197001252323389053344728897997441e-16L, 1.570796326794896619231321691639751442099L),
5244 TEST_c_c (catanh, 0x1p50L, -0.0L, 8.881784197001252323389053344728897997441e-16L, -1.570796326794896619231321691639751442099L),
5245 TEST_c_c (catanh, -0x1p50L, 0.0L, -8.881784197001252323389053344728897997441e-16L, 1.570796326794896619231321691639751442099L),
5246 TEST_c_c (catanh, -0x1p50L, -0.0L, -8.881784197001252323389053344728897997441e-16L, -1.570796326794896619231321691639751442099L),
5247 TEST_c_c (catanh, 0.0L, 0x1p50L, 0.0L, 1.570796326794895731052901991514519103193L),
5248 TEST_c_c (catanh, -0.0L, 0x1p50L, -0.0L, 1.570796326794895731052901991514519103193L),
5249 TEST_c_c (catanh, 0.0L, -0x1p50L, 0.0L, -1.570796326794895731052901991514519103193L),
5250 TEST_c_c (catanh, -0.0L, -0x1p50L, -0.0L, -1.570796326794895731052901991514519103193L),
2f38fbfe 5251#ifndef TEST_FLOAT
08198877
JM		 5252 TEST_c_c (catanh, 0x1p500L, 0.0L, 3.054936363499604682051979393213617699789e-151L, 1.570796326794896619231321691639751442099L),
5253 TEST_c_c (catanh, 0x1p500L, -0.0L, 3.054936363499604682051979393213617699789e-151L, -1.570796326794896619231321691639751442099L),
5254 TEST_c_c (catanh, -0x1p500L, 0.0L, -3.054936363499604682051979393213617699789e-151L, 1.570796326794896619231321691639751442099L),
5255 TEST_c_c (catanh, -0x1p500L, -0.0L, -3.054936363499604682051979393213617699789e-151L, -1.570796326794896619231321691639751442099L),
5256 TEST_c_c (catanh, 0.0L, 0x1p500L, 0.0L, 1.570796326794896619231321691639751442099L),
5257 TEST_c_c (catanh, -0.0L, 0x1p500L, -0.0L, 1.570796326794896619231321691639751442099L),
5258 TEST_c_c (catanh, 0.0L, -0x1p500L, 0.0L, -1.570796326794896619231321691639751442099L),
5259 TEST_c_c (catanh, -0.0L, -0x1p500L, -0.0L, -1.570796326794896619231321691639751442099L),
2f38fbfe
JM		 5260#endif
5261#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5262 TEST_c_c (catanh, 0x1p5000L, 0.0L, 7.079811261048172892385615158694057552948e-1506L, 1.570796326794896619231321691639751442099L),
5263 TEST_c_c (catanh, 0x1p5000L, -0.0L, 7.079811261048172892385615158694057552948e-1506L, -1.570796326794896619231321691639751442099L),
5264 TEST_c_c (catanh, -0x1p5000L, 0.0L, -7.079811261048172892385615158694057552948e-1506L, 1.570796326794896619231321691639751442099L),
5265 TEST_c_c (catanh, -0x1p5000L, -0.0L, -7.079811261048172892385615158694057552948e-1506L, -1.570796326794896619231321691639751442099L),
5266 TEST_c_c (catanh, 0.0L, 0x1p5000L, 0.0L, 1.570796326794896619231321691639751442099L),
5267 TEST_c_c (catanh, -0.0L, 0x1p5000L, -0.0L, 1.570796326794896619231321691639751442099L),
5268 TEST_c_c (catanh, 0.0L, -0x1p5000L, 0.0L, -1.570796326794896619231321691639751442099L),
5269 TEST_c_c (catanh, -0.0L, -0x1p5000L, -0.0L, -1.570796326794896619231321691639751442099L),
5270#endif
5271 TEST_c_c (catanh, 0x1p63L, 0.5L, 1.084202172485504434007452800869941711427e-19L, 1.570796326794896619231321691639751442093L),
5272 TEST_c_c (catanh, 0x1p63L, -0.5L, 1.084202172485504434007452800869941711427e-19L, -1.570796326794896619231321691639751442093L),
5273 TEST_c_c (catanh, -0x1p63L, 0.5L, -1.084202172485504434007452800869941711427e-19L, 1.570796326794896619231321691639751442093L),
5274 TEST_c_c (catanh, -0x1p63L, -0.5L, -1.084202172485504434007452800869941711427e-19L, -1.570796326794896619231321691639751442093L),
5275 TEST_c_c (catanh, 0.5L, 0x1p63L, 5.877471754111437539843682686111228389007e-39L, 1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
5276 TEST_c_c (catanh, -0.5L, 0x1p63L, -5.877471754111437539843682686111228389007e-39L, 1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
5277 TEST_c_c (catanh, 0.5L, -0x1p63L, 5.877471754111437539843682686111228389007e-39L, -1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
5278 TEST_c_c (catanh, -0.5L, -0x1p63L, -5.877471754111437539843682686111228389007e-39L, -1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
9457fd95 5279#ifndef TEST_FLOAT
08198877
JM		 5280 TEST_c_c (catanh, 0x1p511L, 0.5L, 1.491668146240041348658193063092586767475e-154L, 1.570796326794896619231321691639751442099L),
5281 TEST_c_c (catanh, 0x1p511L, -0.5L, 1.491668146240041348658193063092586767475e-154L, -1.570796326794896619231321691639751442099L),
5282 TEST_c_c (catanh, -0x1p511L, 0.5L, -1.491668146240041348658193063092586767475e-154L, 1.570796326794896619231321691639751442099L),
5283 TEST_c_c (catanh, -0x1p511L, -0.5L, -1.491668146240041348658193063092586767475e-154L, -1.570796326794896619231321691639751442099L),
5284 TEST_c_c (catanh, 0.5L, 0x1p511L, 1.112536929253600691545116358666202032110e-308L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5285 TEST_c_c (catanh, -0.5L, 0x1p511L, -1.112536929253600691545116358666202032110e-308L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5286 TEST_c_c (catanh, 0.5L, -0x1p511L, 1.112536929253600691545116358666202032110e-308L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5287 TEST_c_c (catanh, -0.5L, -0x1p511L, -1.112536929253600691545116358666202032110e-308L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
9457fd95
JM		 5288#endif
5289#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5290 TEST_c_c (catanh, 0x1p8191L, 0.5L, 1.833603867554847165621412392048483165956e-2466L, 1.570796326794896619231321691639751442099L),
5291 TEST_c_c (catanh, 0x1p8191L, -0.5L, 1.833603867554847165621412392048483165956e-2466L, -1.570796326794896619231321691639751442099L),
5292 TEST_c_c (catanh, -0x1p8191L, 0.5L, -1.833603867554847165621412392048483165956e-2466L, 1.570796326794896619231321691639751442099L),
5293 TEST_c_c (catanh, -0x1p8191L, -0.5L, -1.833603867554847165621412392048483165956e-2466L, -1.570796326794896619231321691639751442099L),
5294 TEST_c_c (catanh, 0.5L, 0x1p8191L, 1.681051571556046753131338908660876301299e-4932L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5295 TEST_c_c (catanh, -0.5L, 0x1p8191L, -1.681051571556046753131338908660876301299e-4932L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5296 TEST_c_c (catanh, 0.5L, -0x1p8191L, 1.681051571556046753131338908660876301299e-4932L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5297 TEST_c_c (catanh, -0.5L, -0x1p8191L, -1.681051571556046753131338908660876301299e-4932L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5298#endif
5299 TEST_c_c (catanh, 0x1p100L, 0.0L, 7.888609052210118054117285652827862296732e-31L, 1.570796326794896619231321691639751442099L),
5300 TEST_c_c (catanh, 0x1p100L, -0.0L, 7.888609052210118054117285652827862296732e-31L, -1.570796326794896619231321691639751442099L),
5301 TEST_c_c (catanh, -0x1p100L, 0.0L, -7.888609052210118054117285652827862296732e-31L, 1.570796326794896619231321691639751442099L),
5302 TEST_c_c (catanh, -0x1p100L, -0.0L, -7.888609052210118054117285652827862296732e-31L, -1.570796326794896619231321691639751442099L),
5303 TEST_c_c (catanh, 0.0L, 0x1p100L, 0.0L, 1.570796326794896619231321691638962581193L),
5304 TEST_c_c (catanh, -0.0L, 0x1p100L, -0.0L, 1.570796326794896619231321691638962581193L),
5305 TEST_c_c (catanh, 0.0L, -0x1p100L, 0.0L, -1.570796326794896619231321691638962581193L),
5306 TEST_c_c (catanh, -0.0L, -0x1p100L, -0.0L, -1.570796326794896619231321691638962581193L),
5307 TEST_c_c (catanh, 0x1.fp127L, 0.0L, 3.033533808573645181854803967025150136306e-39L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_FLOAT),
5308 TEST_c_c (catanh, 0x1.fp127L, -0.0L, 3.033533808573645181854803967025150136306e-39L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_FLOAT),
5309 TEST_c_c (catanh, -0x1.fp127L, 0.0L, -3.033533808573645181854803967025150136306e-39L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_FLOAT),
5310 TEST_c_c (catanh, -0x1.fp127L, -0.0L, -3.033533808573645181854803967025150136306e-39L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_FLOAT),
5311 TEST_c_c (catanh, 0.0L, 0x1.fp127L, 0.0L, 1.570796326794896619231321691639751442096L),
5312 TEST_c_c (catanh, -0.0L, 0x1.fp127L, -0.0L, 1.570796326794896619231321691639751442096L),
5313 TEST_c_c (catanh, 0.0L, -0x1.fp127L, 0.0L, -1.570796326794896619231321691639751442096L),
5314 TEST_c_c (catanh, -0.0L, -0x1.fp127L, -0.0L, -1.570796326794896619231321691639751442096L),
5315 TEST_c_c (catanh, 0x1.fp127L, 0x1.fp127L, 1.516766904286822590927401983512575068153e-39L, 1.570796326794896619231321691639751442097L, UNDERFLOW_EXCEPTION_FLOAT),
5316 TEST_c_c (catanh, 0x1.fp127L, -0x1.fp127L, 1.516766904286822590927401983512575068153e-39L, -1.570796326794896619231321691639751442097L, UNDERFLOW_EXCEPTION_FLOAT),
5317 TEST_c_c (catanh, -0x1.fp127L, 0x1.fp127L, -1.516766904286822590927401983512575068153e-39L, 1.570796326794896619231321691639751442097L, UNDERFLOW_EXCEPTION_FLOAT),
5318 TEST_c_c (catanh, -0x1.fp127L, -0x1.fp127L, -1.516766904286822590927401983512575068153e-39L, -1.570796326794896619231321691639751442097L, UNDERFLOW_EXCEPTION_FLOAT),
5b4217d7 5319#ifndef TEST_FLOAT
08198877
JM		 5320 TEST_c_c (catanh, 0x1p900L, 0.0L, 1.183052186166774710972751597518026531652e-271L, 1.570796326794896619231321691639751442099L),
5321 TEST_c_c (catanh, 0x1p900L, -0.0L, 1.183052186166774710972751597518026531652e-271L, -1.570796326794896619231321691639751442099L),
5322 TEST_c_c (catanh, -0x1p900L, 0.0L, -1.183052186166774710972751597518026531652e-271L, 1.570796326794896619231321691639751442099L),
5323 TEST_c_c (catanh, -0x1p900L, -0.0L, -1.183052186166774710972751597518026531652e-271L, -1.570796326794896619231321691639751442099L),
5324 TEST_c_c (catanh, 0.0L, 0x1p900L, 0.0L, 1.570796326794896619231321691639751442099L),
5325 TEST_c_c (catanh, -0.0L, 0x1p900L, -0.0L, 1.570796326794896619231321691639751442099L),
5326 TEST_c_c (catanh, 0.0L, -0x1p900L, 0.0L, -1.570796326794896619231321691639751442099L),
5327 TEST_c_c (catanh, -0.0L, -0x1p900L, -0.0L, -1.570796326794896619231321691639751442099L),
5328 TEST_c_c (catanh, 0x1.fp1023L, 0.0L, 5.742126086470197117652213464083623391533e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5329 TEST_c_c (catanh, 0x1.fp1023L, -0.0L, 5.742126086470197117652213464083623391533e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5330 TEST_c_c (catanh, -0x1.fp1023L, 0.0L, -5.742126086470197117652213464083623391533e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5331 TEST_c_c (catanh, -0x1.fp1023L, -0.0L, -5.742126086470197117652213464083623391533e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5332 TEST_c_c (catanh, 0.0L, 0x1.fp1023L, 0.0L, 1.570796326794896619231321691639751442099L),
5333 TEST_c_c (catanh, -0.0L, 0x1.fp1023L, -0.0L, 1.570796326794896619231321691639751442099L),
5334 TEST_c_c (catanh, 0.0L, -0x1.fp1023L, 0.0L, -1.570796326794896619231321691639751442099L),
5335 TEST_c_c (catanh, -0.0L, -0x1.fp1023L, -0.0L, -1.570796326794896619231321691639751442099L),
5336 TEST_c_c (catanh, 0x1.fp1023L, 0x1.fp1023L, 2.871063043235098558826106732041811695767e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5337 TEST_c_c (catanh, 0x1.fp1023L, -0x1.fp1023L, 2.871063043235098558826106732041811695767e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5338 TEST_c_c (catanh, -0x1.fp1023L, 0x1.fp1023L, -2.871063043235098558826106732041811695767e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5339 TEST_c_c (catanh, -0x1.fp1023L, -0x1.fp1023L, -2.871063043235098558826106732041811695767e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5b4217d7
JM		 5340#endif
5341#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5342 TEST_c_c (catanh, 0x1p10000L, 0.0L, 5.012372749206452009297555933742977749322e-3011L, 1.570796326794896619231321691639751442099L),
5343 TEST_c_c (catanh, 0x1p10000L, -0.0L, 5.012372749206452009297555933742977749322e-3011L, -1.570796326794896619231321691639751442099L),
5344 TEST_c_c (catanh, -0x1p10000L, 0.0L, -5.012372749206452009297555933742977749322e-3011L, 1.570796326794896619231321691639751442099L),
5345 TEST_c_c (catanh, -0x1p10000L, -0.0L, -5.012372749206452009297555933742977749322e-3011L, -1.570796326794896619231321691639751442099L),
5346 TEST_c_c (catanh, 0.0L, 0x1p10000L, 0.0L, 1.570796326794896619231321691639751442099L),
5347 TEST_c_c (catanh, -0.0L, 0x1p10000L, -0.0L, 1.570796326794896619231321691639751442099L),
5348 TEST_c_c (catanh, 0.0L, -0x1p10000L, 0.0L, -1.570796326794896619231321691639751442099L),
5349 TEST_c_c (catanh, -0.0L, -0x1p10000L, -0.0L, -1.570796326794896619231321691639751442099L),
5350 TEST_c_c (catanh, 0x1.fp16383L, 0.0L, 8.676395208031209048419813722120651877672e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5351 TEST_c_c (catanh, 0x1.fp16383L, -0.0L, 8.676395208031209048419813722120651877672e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5352 TEST_c_c (catanh, -0x1.fp16383L, 0.0L, -8.676395208031209048419813722120651877672e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5353 TEST_c_c (catanh, -0x1.fp16383L, -0.0L, -8.676395208031209048419813722120651877672e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5354 TEST_c_c (catanh, 0.0L, 0x1.fp16383L, 0.0L, 1.570796326794896619231321691639751442099L),
5355 TEST_c_c (catanh, -0.0L, 0x1.fp16383L, -0.0L, 1.570796326794896619231321691639751442099L),
5356 TEST_c_c (catanh, 0.0L, -0x1.fp16383L, 0.0L, -1.570796326794896619231321691639751442099L),
5357 TEST_c_c (catanh, -0.0L, -0x1.fp16383L, -0.0L, -1.570796326794896619231321691639751442099L),
5358 TEST_c_c (catanh, 0x1.fp16383L, 0x1.fp16383L, 4.338197604015604524209906861060325938836e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5359 TEST_c_c (catanh, 0x1.fp16383L, -0x1.fp16383L, 4.338197604015604524209906861060325938836e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5360 TEST_c_c (catanh, -0x1.fp16383L, 0x1.fp16383L, -4.338197604015604524209906861060325938836e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5361 TEST_c_c (catanh, -0x1.fp16383L, -0x1.fp16383L, -4.338197604015604524209906861060325938836e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5362#endif
5363 TEST_c_c (catanh, 0x1p-13L, 1.0L, 6.103515609841754902688560615027452023669e-5L, 7.853981671227386080775748393881580082970e-1L),
5364 TEST_c_c (catanh, 0x1p-13L, -1.0L, 6.103515609841754902688560615027452023669e-5L, -7.853981671227386080775748393881580082970e-1L),
5365 TEST_c_c (catanh, -0x1p-13L, 1.0L, -6.103515609841754902688560615027452023669e-5L, 7.853981671227386080775748393881580082970e-1L),
5366 TEST_c_c (catanh, -0x1p-13L, -1.0L, -6.103515609841754902688560615027452023669e-5L, -7.853981671227386080775748393881580082970e-1L),
5367 TEST_c_c (catanh, 1.0L, 0x1p-13L, 4.852030264850939738801379894163661227127L, 7.854286809755354140031716771044626356262e-1L),
5368 TEST_c_c (catanh, -1.0L, 0x1p-13L, -4.852030264850939738801379894163661227127L, 7.854286809755354140031716771044626356262e-1L),
5369 TEST_c_c (catanh, 1.0L, -0x1p-13L, 4.852030264850939738801379894163661227127L, -7.854286809755354140031716771044626356262e-1L),
5370 TEST_c_c (catanh, -1.0L, -0x1p-13L, -4.852030264850939738801379894163661227127L, -7.854286809755354140031716771044626356262e-1L),
5371 TEST_c_c (catanh, 0x1p-27L, 1.0L, 3.725290298461914028034141143623846306386e-9L, 7.853981633974483234934486536343324763447e-1L),
5372 TEST_c_c (catanh, 0x1p-27L, -1.0L, 3.725290298461914028034141143623846306386e-9L, -7.853981633974483234934486536343324763447e-1L),
5373 TEST_c_c (catanh, -0x1p-27L, 1.0L, -3.725290298461914028034141143623846306386e-9L, 7.853981633974483234934486536343324763447e-1L),
5374 TEST_c_c (catanh, -0x1p-27L, -1.0L, -3.725290298461914028034141143623846306386e-9L, -7.853981633974483234934486536343324763447e-1L),
5375 TEST_c_c (catanh, 1.0L, 0x1p-27L, 9.704060527839234335310696652368086117807L, 7.853981652600934588466178684534110069553e-1L),
5376 TEST_c_c (catanh, -1.0L, 0x1p-27L, -9.704060527839234335310696652368086117807L, 7.853981652600934588466178684534110069553e-1L),
5377 TEST_c_c (catanh, 1.0L, -0x1p-27L, 9.704060527839234335310696652368086117807L, -7.853981652600934588466178684534110069553e-1L),
5378 TEST_c_c (catanh, -1.0L, -0x1p-27L, -9.704060527839234335310696652368086117807L, -7.853981652600934588466178684534110069553e-1L),
5379 TEST_c_c (catanh, 0x1p-33L, 1.0L, 5.820766091346740722643102318246316469910e-11L, 7.853981633974483096190489776088929224056e-1L),
5380 TEST_c_c (catanh, 0x1p-33L, -1.0L, 5.820766091346740722643102318246316469910e-11L, -7.853981633974483096190489776088929224056e-1L),
5381 TEST_c_c (catanh, -0x1p-33L, 1.0L, -5.820766091346740722643102318246316469910e-11L, 7.853981633974483096190489776088929224056e-1L),
5382 TEST_c_c (catanh, -0x1p-33L, -1.0L, -5.820766091346740722643102318246316469910e-11L, -7.853981633974483096190489776088929224056e-1L),
5383 TEST_c_c (catanh, 1.0L, 0x1p-33L, 1.178350206951907026009379309773625595762e1L, 7.853981634265521400723945494331241018449e-1L),
5384 TEST_c_c (catanh, -1.0L, 0x1p-33L, -1.178350206951907026009379309773625595762e1L, 7.853981634265521400723945494331241018449e-1L),
5385 TEST_c_c (catanh, 1.0L, -0x1p-33L, 1.178350206951907026009379309773625595762e1L, -7.853981634265521400723945494331241018449e-1L),
5386 TEST_c_c (catanh, -1.0L, -0x1p-33L, -1.178350206951907026009379309773625595762e1L, -7.853981634265521400723945494331241018449e-1L),
5387 TEST_c_c (catanh, 0x1p-54L, 1.0L, 2.775557561562891351059079170227049355775e-17L, 7.853981633974483096156608458198764914213e-1L),
5388 TEST_c_c (catanh, 0x1p-54L, -1.0L, 2.775557561562891351059079170227049355775e-17L, -7.853981633974483096156608458198764914213e-1L),
5389 TEST_c_c (catanh, -0x1p-54L, 1.0L, -2.775557561562891351059079170227049355775e-17L, 7.853981633974483096156608458198764914213e-1L),
5390 TEST_c_c (catanh, -0x1p-54L, -1.0L, -2.775557561562891351059079170227049355775e-17L, -7.853981633974483096156608458198764914213e-1L),
5391 TEST_c_c (catanh, 1.0L, 0x1p-54L, 1.906154746539849600897388334009985581467e1L, 7.853981633974483234934486536343324763447e-1L),
5392 TEST_c_c (catanh, -1.0L, 0x1p-54L, -1.906154746539849600897388334009985581467e1L, 7.853981633974483234934486536343324763447e-1L),
5393 TEST_c_c (catanh, 1.0L, -0x1p-54L, 1.906154746539849600897388334009985581467e1L, -7.853981633974483234934486536343324763447e-1L),
5394 TEST_c_c (catanh, -1.0L, -0x1p-54L, -1.906154746539849600897388334009985581467e1L, -7.853981633974483234934486536343324763447e-1L),
5395 TEST_c_c (catanh, 0x1p-57L, 1.0L, 3.469446951953614188823848962783813448721e-18L, 7.853981633974483096156608458198757330864e-1L),
5396 TEST_c_c (catanh, 0x1p-57L, -1.0L, 3.469446951953614188823848962783813448721e-18L, -7.853981633974483096156608458198757330864e-1L),
5397 TEST_c_c (catanh, -0x1p-57L, 1.0L, -3.469446951953614188823848962783813448721e-18L, 7.853981633974483096156608458198757330864e-1L),
5398 TEST_c_c (catanh, -0x1p-57L, -1.0L, -3.469446951953614188823848962783813448721e-18L, -7.853981633974483096156608458198757330864e-1L),
5399 TEST_c_c (catanh, 1.0L, 0x1p-57L, 2.010126823623841397309973152228712047720e1L, 7.853981633974483113503843217966828154612e-1L),
5400 TEST_c_c (catanh, -1.0L, 0x1p-57L, -2.010126823623841397309973152228712047720e1L, 7.853981633974483113503843217966828154612e-1L),
5401 TEST_c_c (catanh, 1.0L, -0x1p-57L, 2.010126823623841397309973152228712047720e1L, -7.853981633974483113503843217966828154612e-1L),
5402 TEST_c_c (catanh, -1.0L, -0x1p-57L, -2.010126823623841397309973152228712047720e1L, -7.853981633974483113503843217966828154612e-1L),
5403 TEST_c_c (catanh, 0x1p-13L, 0x1.000002p0L, 6.103514882246036852433556327261700380577e-5L, 7.853982267273793866654490522673596014524e-1L),
5404 TEST_c_c (catanh, 0x1p-13L, -0x1.000002p0L, 6.103514882246036852433556327261700380577e-5L, -7.853982267273793866654490522673596014524e-1L),
5405 TEST_c_c (catanh, -0x1p-13L, 0x1.000002p0L, -6.103514882246036852433556327261700380577e-5L, 7.853982267273793866654490522673596014524e-1L),
5406 TEST_c_c (catanh, -0x1p-13L, -0x1.000002p0L, -6.103514882246036852433556327261700380577e-5L, -7.853982267273793866654490522673596014524e-1L),
5407 TEST_c_c (catanh, 0x1.000002p0L, 0x1p-13L, 4.852030056234795712498957387213592193975L, 7.859169620684960844300240092596908675974e-1L),
5408 TEST_c_c (catanh, -0x1.000002p0L, 0x1p-13L, -4.852030056234795712498957387213592193975L, 7.859169620684960844300240092596908675974e-1L),
5409 TEST_c_c (catanh, 0x1.000002p0L, -0x1p-13L, 4.852030056234795712498957387213592193975L, -7.859169620684960844300240092596908675974e-1L),
5410 TEST_c_c (catanh, -0x1.000002p0L, -0x1p-13L, -4.852030056234795712498957387213592193975L, -7.859169620684960844300240092596908675974e-1L),
5411 TEST_c_c (catanh, 0x1p-13L, 0x0.ffffffp0L, 6.103515973639646453881721999956617260502e-5L, 7.853981373204155542484315721351697277336e-1L),
5412 TEST_c_c (catanh, 0x1p-13L, -0x0.ffffffp0L, 6.103515973639646453881721999956617260502e-5L, -7.853981373204155542484315721351697277336e-1L),
5413 TEST_c_c (catanh, -0x1p-13L, 0x0.ffffffp0L, -6.103515973639646453881721999956617260502e-5L, 7.853981373204155542484315721351697277336e-1L),
5414 TEST_c_c (catanh, -0x1p-13L, -0x0.ffffffp0L, -6.103515973639646453881721999956617260502e-5L, -7.853981373204155542484315721351697277336e-1L),
5415 TEST_c_c (catanh, 0x0.ffffffp0L, 0x1p-13L, 4.852030190345140708455871037447717761868L, 7.851845403708474595909269086711426246675e-1L),
5416 TEST_c_c (catanh, -0x0.ffffffp0L, 0x1p-13L, -4.852030190345140708455871037447717761868L, 7.851845403708474595909269086711426246675e-1L),
5417 TEST_c_c (catanh, 0x0.ffffffp0L, -0x1p-13L, 4.852030190345140708455871037447717761868L, -7.851845403708474595909269086711426246675e-1L),
5418 TEST_c_c (catanh, -0x0.ffffffp0L, -0x1p-13L, -4.852030190345140708455871037447717761868L, -7.851845403708474595909269086711426246675e-1L),
caf84319 5419#ifndef TEST_FLOAT
08198877
JM		 5420 TEST_c_c (catanh, 0x1p-27L, 0x1.0000000000001p0L, 3.725290298461913200853528590596263270474e-9L, 7.853981633974484345157511161499711112683e-1L),
5421 TEST_c_c (catanh, 0x1p-27L, -0x1.0000000000001p0L, 3.725290298461913200853528590596263270474e-9L, -7.853981633974484345157511161499711112683e-1L),
5422 TEST_c_c (catanh, -0x1p-27L, 0x1.0000000000001p0L, -3.725290298461913200853528590596263270474e-9L, 7.853981633974484345157511161499711112683e-1L),
5423 TEST_c_c (catanh, -0x1p-27L, -0x1.0000000000001p0L, -3.725290298461913200853528590596263270474e-9L, -7.853981633974484345157511161499711112683e-1L),
5424 TEST_c_c (catanh, 0x1.0000000000001p0L, 0x1p-27L, 9.704060527839234168777242958594699810015L, 7.853981801612546526942695000283242525531e-1L),
5425 TEST_c_c (catanh, -0x1.0000000000001p0L, 0x1p-27L, -9.704060527839234168777242958594699810015L, 7.853981801612546526942695000283242525531e-1L),
5426 TEST_c_c (catanh, 0x1.0000000000001p0L, -0x1p-27L, 9.704060527839234168777242958594699810015L, -7.853981801612546526942695000283242525531e-1L),
5427 TEST_c_c (catanh, -0x1.0000000000001p0L, -0x1p-27L, -9.704060527839234168777242958594699810015L, -7.853981801612546526942695000283242525531e-1L),
5428 TEST_c_c (catanh, 0x1p-27L, 0x0.fffffffffffff8p0L, 3.725290298461914441624447420137706700965e-9L, 7.853981633974482679822974223765039144191e-1L),
5429 TEST_c_c (catanh, 0x1p-27L, -0x0.fffffffffffff8p0L, 3.725290298461914441624447420137706700965e-9L, -7.853981633974482679822974223765039144191e-1L),
5430 TEST_c_c (catanh, -0x1p-27L, 0x0.fffffffffffff8p0L, -3.725290298461914441624447420137706700965e-9L, 7.853981633974482679822974223765039144191e-1L),
5431 TEST_c_c (catanh, -0x1p-27L, -0x0.fffffffffffff8p0L, -3.725290298461914441624447420137706700965e-9L, -7.853981633974482679822974223765039144191e-1L),
5432 TEST_c_c (catanh, 0x0.fffffffffffff8p0L, 0x1p-27L, 9.704060527839234252043969805481351363824L, 7.853981578095128619227903983047292781021e-1L),
5433 TEST_c_c (catanh, -0x0.fffffffffffff8p0L, 0x1p-27L, -9.704060527839234252043969805481351363824L, 7.853981578095128619227903983047292781021e-1L),
5434 TEST_c_c (catanh, 0x0.fffffffffffff8p0L, -0x1p-27L, 9.704060527839234252043969805481351363824L, -7.853981578095128619227903983047292781021e-1L),
5435 TEST_c_c (catanh, -0x0.fffffffffffff8p0L, -0x1p-27L, -9.704060527839234252043969805481351363824L, -7.853981578095128619227903983047292781021e-1L),
caf84319
JM		 5436#endif
5437#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 5438 TEST_c_c (catanh, 0x1p-33L, 0x1.0000000000000002p0L, 5.820766091346740722012013594069507025615e-11L, 7.853981633974483096732590862331681441026e-1L),
5439 TEST_c_c (catanh, 0x1p-33L, -0x1.0000000000000002p0L, 5.820766091346740722012013594069507025615e-11L, -7.853981633974483096732590862331681441026e-1L),
5440 TEST_c_c (catanh, -0x1p-33L, 0x1.0000000000000002p0L, -5.820766091346740722012013594069507025615e-11L, 7.853981633974483096732590862331681441026e-1L),
5441 TEST_c_c (catanh, -0x1p-33L, -0x1.0000000000000002p0L, -5.820766091346740722012013594069507025615e-11L, -7.853981633974483096732590862331681441026e-1L),
5442 TEST_c_c (catanh, 0x1.0000000000000002p0L, 0x1p-33L, 1.178350206951907025990405771755129268176e1L, 7.853981638922134273801338071094141188767e-1L),
5443 TEST_c_c (catanh, -0x1.0000000000000002p0L, 0x1p-33L, -1.178350206951907025990405771755129268176e1L, 7.853981638922134273801338071094141188767e-1L),
5444 TEST_c_c (catanh, 0x1.0000000000000002p0L, -0x1p-33L, 1.178350206951907025990405771755129268176e1L, -7.853981638922134273801338071094141188767e-1L),
5445 TEST_c_c (catanh, -0x1.0000000000000002p0L, -0x1p-33L, -1.178350206951907025990405771755129268176e1L, -7.853981638922134273801338071094141188767e-1L),
5446 TEST_c_c (catanh, 0x1p-33L, 0x0.ffffffffffffffffp0L, 5.820766091346740722958646680334721192083e-11L, 7.853981633974483095919439232967553115548e-1L),
5447 TEST_c_c (catanh, 0x1p-33L, -0x0.ffffffffffffffffp0L, 5.820766091346740722958646680334721192083e-11L, -7.853981633974483095919439232967553115548e-1L),
5448 TEST_c_c (catanh, -0x1p-33L, 0x0.ffffffffffffffffp0L, -5.820766091346740722958646680334721192083e-11L, 7.853981633974483095919439232967553115548e-1L),
5449 TEST_c_c (catanh, -0x1p-33L, -0x0.ffffffffffffffffp0L, -5.820766091346740722958646680334721192083e-11L, -7.853981633974483095919439232967553115548e-1L),
5450 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, 0x1p-33L, 1.178350206951907026002603046195591193050e1L, 7.853981631937214964185249205444919953948e-1L),
5451 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, 0x1p-33L, -1.178350206951907026002603046195591193050e1L, 7.853981631937214964185249205444919953948e-1L),
5452 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, -0x1p-33L, 1.178350206951907026002603046195591193050e1L, -7.853981631937214964185249205444919953948e-1L),
5453 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, -0x1p-33L, -1.178350206951907026002603046195591193050e1L, -7.853981631937214964185249205444919953948e-1L),
caf84319
JM		 5454#endif
5455#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 5456 TEST_c_c (catanh, 0x1p-54L, 0x1.000000000000000000000000008p0L, 2.775557561562891351059079170226980932999e-17L, 7.853981633974483096156608458198888173729e-1L),
5457 TEST_c_c (catanh, 0x1p-54L, -0x1.000000000000000000000000008p0L, 2.775557561562891351059079170226980932999e-17L, -7.853981633974483096156608458198888173729e-1L),
5458 TEST_c_c (catanh, -0x1p-54L, 0x1.000000000000000000000000008p0L, -2.775557561562891351059079170226980932999e-17L, 7.853981633974483096156608458198888173729e-1L),
5459 TEST_c_c (catanh, -0x1p-54L, -0x1.000000000000000000000000008p0L, -2.775557561562891351059079170226980932999e-17L, -7.853981633974483096156608458198888173729e-1L),
5460 TEST_c_c (catanh, 0x1.000000000000000000000000008p0L, 0x1p-54L, 1.906154746539849600897388334009981267384e1L, 7.853981633974485455380535786656405610710e-1L),
5461 TEST_c_c (catanh, -0x1.000000000000000000000000008p0L, 0x1p-54L, -1.906154746539849600897388334009981267384e1L, 7.853981633974485455380535786656405610710e-1L),
5462 TEST_c_c (catanh, 0x1.000000000000000000000000008p0L, -0x1p-54L, 1.906154746539849600897388334009981267384e1L, -7.853981633974485455380535786656405610710e-1L),
5463 TEST_c_c (catanh, -0x1.000000000000000000000000008p0L, -0x1p-54L, -1.906154746539849600897388334009981267384e1L, -7.853981633974485455380535786656405610710e-1L),
5464 TEST_c_c (catanh, 0x1p-54L, 0x0.ffffffffffffffffffffffffffcp0L, 2.775557561562891351059079170227083567164e-17L, 7.853981633974483096156608458198703284454e-1L),
5465 TEST_c_c (catanh, 0x1p-54L, -0x0.ffffffffffffffffffffffffffcp0L, 2.775557561562891351059079170227083567164e-17L, -7.853981633974483096156608458198703284454e-1L),
5466 TEST_c_c (catanh, -0x1p-54L, 0x0.ffffffffffffffffffffffffffcp0L, -2.775557561562891351059079170227083567164e-17L, 7.853981633974483096156608458198703284454e-1L),
5467 TEST_c_c (catanh, -0x1p-54L, -0x0.ffffffffffffffffffffffffffcp0L, -2.775557561562891351059079170227083567164e-17L, -7.853981633974483096156608458198703284454e-1L),
5468 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-54L, 1.906154746539849600897388334009984040723e1L, 7.853981633974482124711461911186784339815e-1L),
5469 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-54L, -1.906154746539849600897388334009984040723e1L, 7.853981633974482124711461911186784339815e-1L),
5470 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-54L, 1.906154746539849600897388334009984040723e1L, -7.853981633974482124711461911186784339815e-1L),
5471 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-54L, -1.906154746539849600897388334009984040723e1L, -7.853981633974482124711461911186784339815e-1L),
caf84319
JM		 5472#endif
5473#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 5474 TEST_c_c (catanh, 0x1p-57L, 0x1.0000000000000000000000000001p0L, 3.469446951953614188823848962783812780530e-18L, 7.853981633974483096156608458198758293829e-1L),
5475 TEST_c_c (catanh, 0x1p-57L, -0x1.0000000000000000000000000001p0L, 3.469446951953614188823848962783812780530e-18L, -7.853981633974483096156608458198758293829e-1L),
5476 TEST_c_c (catanh, -0x1p-57L, 0x1.0000000000000000000000000001p0L, -3.469446951953614188823848962783812780530e-18L, 7.853981633974483096156608458198758293829e-1L),
5477 TEST_c_c (catanh, -0x1p-57L, -0x1.0000000000000000000000000001p0L, -3.469446951953614188823848962783812780530e-18L, -7.853981633974483096156608458198758293829e-1L),
5478 TEST_c_c (catanh, 0x1.0000000000000000000000000001p0L, 0x1p-57L, 2.010126823623841397309973152228712033275e1L, 7.853981633974483252281721296111395707566e-1L),
5479 TEST_c_c (catanh, -0x1.0000000000000000000000000001p0L, 0x1p-57L, -2.010126823623841397309973152228712033275e1L, 7.853981633974483252281721296111395707566e-1L),
5480 TEST_c_c (catanh, 0x1.0000000000000000000000000001p0L, -0x1p-57L, 2.010126823623841397309973152228712033275e1L, -7.853981633974483252281721296111395707566e-1L),
5481 TEST_c_c (catanh, -0x1.0000000000000000000000000001p0L, -0x1p-57L, -2.010126823623841397309973152228712033275e1L, -7.853981633974483252281721296111395707566e-1L),
5482 TEST_c_c (catanh, 0x1p-57L, 0x0.ffffffffffffffffffffffffffff8p0L, 3.469446951953614188823848962783813782817e-18L, 7.853981633974483096156608458198756849381e-1L),
5483 TEST_c_c (catanh, 0x1p-57L, -0x0.ffffffffffffffffffffffffffff8p0L, 3.469446951953614188823848962783813782817e-18L, -7.853981633974483096156608458198756849381e-1L),
5484 TEST_c_c (catanh, -0x1p-57L, 0x0.ffffffffffffffffffffffffffff8p0L, -3.469446951953614188823848962783813782817e-18L, 7.853981633974483096156608458198756849381e-1L),
5485 TEST_c_c (catanh, -0x1p-57L, -0x0.ffffffffffffffffffffffffffff8p0L, -3.469446951953614188823848962783813782817e-18L, -7.853981633974483096156608458198756849381e-1L),
5486 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-57L, 2.010126823623841397309973152228712040498e1L, 7.853981633974483044114904178894544378135e-1L),
5487 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-57L, -2.010126823623841397309973152228712040498e1L, 7.853981633974483044114904178894544378135e-1L),
5488 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-57L, 2.010126823623841397309973152228712040498e1L, -7.853981633974483044114904178894544378135e-1L),
5489 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-57L, -2.010126823623841397309973152228712040498e1L, -7.853981633974483044114904178894544378135e-1L),
5490#endif
5491 TEST_c_c (catanh, 1.0L, 0x1p-64L, 2.252728336819822255606004394739073846245e1L, 7.853981633974483096292133729759445264744e-1L),
5492 TEST_c_c (catanh, 1.0L, -0x1p-64L, 2.252728336819822255606004394739073846245e1L, -7.853981633974483096292133729759445264744e-1L),
5493 TEST_c_c (catanh, -1.0L, 0x1p-64L, -2.252728336819822255606004394739073846245e1L, 7.853981633974483096292133729759445264744e-1L),
5494 TEST_c_c (catanh, -1.0L, -0x1p-64L, -2.252728336819822255606004394739073846245e1L, -7.853981633974483096292133729759445264744e-1L),
5495 TEST_c_c (catanh, 0x1p-64L, 1.0L, 2.710505431213761085018632002174854278563e-20L, 7.853981633974483096156608458198757210500e-1L),
5496 TEST_c_c (catanh, -0x1p-64L, 1.0L, -2.710505431213761085018632002174854278563e-20L, 7.853981633974483096156608458198757210500e-1L),
5497 TEST_c_c (catanh, 0x1p-64L, -1.0L, 2.710505431213761085018632002174854278563e-20L, -7.853981633974483096156608458198757210500e-1L),
5498 TEST_c_c (catanh, -0x1p-64L, -1.0L, -2.710505431213761085018632002174854278563e-20L, -7.853981633974483096156608458198757210500e-1L),
5499 TEST_c_c (catanh, 1.0L, 0x1.3p-73L, 2.556052055225464683726753902092495938633e1L, 7.853981633974483096156922786831527361009e-1L),
5500 TEST_c_c (catanh, 1.0L, -0x1.3p-73L, 2.556052055225464683726753902092495938633e1L, -7.853981633974483096156922786831527361009e-1L),
5501 TEST_c_c (catanh, -1.0L, 0x1.3p-73L, -2.556052055225464683726753902092495938633e1L, 7.853981633974483096156922786831527361009e-1L),
5502 TEST_c_c (catanh, -1.0L, -0x1.3p-73L, -2.556052055225464683726753902092495938633e1L, -7.853981633974483096156922786831527361009e-1L),
5503 TEST_c_c (catanh, 0x1.3p-73L, 1.0L, 6.286572655403010329022706059731717687100e-23L, 7.853981633974483096156608458198757210493e-1L),
5504 TEST_c_c (catanh, -0x1.3p-73L, 1.0L, -6.286572655403010329022706059731717687100e-23L, 7.853981633974483096156608458198757210493e-1L),
5505 TEST_c_c (catanh, 0x1.3p-73L, -1.0L, 6.286572655403010329022706059731717687100e-23L, -7.853981633974483096156608458198757210493e-1L),
5506 TEST_c_c (catanh, -0x1.3p-73L, -1.0L, -6.286572655403010329022706059731717687100e-23L, -7.853981633974483096156608458198757210493e-1L),
5507 TEST_c_c (catanh, 1.0L, 0x1p-124L, 4.332169878499658183857700759113603550472e1L, 7.853981633974483096156608458198757210610e-1L),
5508 TEST_c_c (catanh, 1.0L, -0x1p-124L, 4.332169878499658183857700759113603550472e1L, -7.853981633974483096156608458198757210610e-1L),
5509 TEST_c_c (catanh, -1.0L, 0x1p-124L, -4.332169878499658183857700759113603550472e1L, 7.853981633974483096156608458198757210610e-1L),
5510 TEST_c_c (catanh, -1.0L, -0x1p-124L, -4.332169878499658183857700759113603550472e1L, -7.853981633974483096156608458198757210610e-1L),
5511 TEST_c_c (catanh, 0x1p-124L, 1.0L, 2.350988701644575015937473074444491355637e-38L, 7.853981633974483096156608458198757210493e-1L),
5512 TEST_c_c (catanh, -0x1p-124L, 1.0L, -2.350988701644575015937473074444491355637e-38L, 7.853981633974483096156608458198757210493e-1L),
5513 TEST_c_c (catanh, 0x1p-124L, -1.0L, 2.350988701644575015937473074444491355637e-38L, -7.853981633974483096156608458198757210493e-1L),
5514 TEST_c_c (catanh, -0x1p-124L, -1.0L, -2.350988701644575015937473074444491355637e-38L, -7.853981633974483096156608458198757210493e-1L),
5515 TEST_c_c (catanh, 0x1.000002p0L, 0x1p-126L, 8.317766196521665212523713550410777685446L, 1.570796326794896619231321691639702138295L),
5516 TEST_c_c (catanh, 0x1.000002p0L, -0x1p-126L, 8.317766196521665212523713550410777685446L, -1.570796326794896619231321691639702138295L),
5517 TEST_c_c (catanh, -0x1.000002p0L, 0x1p-126L, -8.317766196521665212523713550410777685446L, 1.570796326794896619231321691639702138295L),
5518 TEST_c_c (catanh, -0x1.000002p0L, -0x1p-126L, -8.317766196521665212523713550410777685446L, -1.570796326794896619231321691639702138295L),
5519 TEST_c_c (catanh, 0x1p-126L, 0x1.000002p0L, 5.877471053462247139383742414506671233336e-39L, 7.853982230020895322927482174768220815493e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5520 TEST_c_c (catanh, -0x1p-126L, 0x1.000002p0L, -5.877471053462247139383742414506671233336e-39L, 7.853982230020895322927482174768220815493e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5521 TEST_c_c (catanh, 0x1p-126L, -0x1.000002p0L, 5.877471053462247139383742414506671233336e-39L, -7.853982230020895322927482174768220815493e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5522 TEST_c_c (catanh, -0x1p-126L, -0x1.000002p0L, -5.877471053462247139383742414506671233336e-39L, -7.853982230020895322927482174768220815493e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5523 TEST_c_c (catanh, 0x0.ffffffp0L, 0x1p-126L, 8.664339742098154951823135931565866792454L, 9.860761609136244031334147100512154160097e-32L),
5524 TEST_c_c (catanh, 0x0.ffffffp0L, -0x1p-126L, 8.664339742098154951823135931565866792454L, -9.860761609136244031334147100512154160097e-32L),
5525 TEST_c_c (catanh, -0x0.ffffffp0L, 0x1p-126L, -8.664339742098154951823135931565866792454L, 9.860761609136244031334147100512154160097e-32L),
5526 TEST_c_c (catanh, -0x0.ffffffp0L, -0x1p-126L, -8.664339742098154951823135931565866792454L, -9.860761609136244031334147100512154160097e-32L),
5527 TEST_c_c (catanh, 0x1p-126L, 0x0.ffffffp0L, 5.877472104436064061535099214664320916184e-39L, 7.853981335951250337419109991749089175724e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5528 TEST_c_c (catanh, -0x1p-126L, 0x0.ffffffp0L, -5.877472104436064061535099214664320916184e-39L, 7.853981335951250337419109991749089175724e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5529 TEST_c_c (catanh, 0x1p-126L, -0x0.ffffffp0L, 5.877472104436064061535099214664320916184e-39L, -7.853981335951250337419109991749089175724e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5530 TEST_c_c (catanh, -0x1p-126L, -0x0.ffffffp0L, -5.877472104436064061535099214664320916184e-39L, -7.853981335951250337419109991749089175724e-1L, UNDERFLOW_EXCEPTION_FLOAT),
10de07f5 5531#ifndef TEST_FLOAT
08198877
JM		 5532 TEST_c_c (catanh, 1.0L, 0x1p-512L, 1.777922518136259718655200391540222897114e2L, 7.853981633974483096156608458198757210493e-1L),
5533 TEST_c_c (catanh, 1.0L, -0x1p-512L, 1.777922518136259718655200391540222897114e2L, -7.853981633974483096156608458198757210493e-1L),
5534 TEST_c_c (catanh, -1.0L, 0x1p-512L, -1.777922518136259718655200391540222897114e2L, 7.853981633974483096156608458198757210493e-1L),
5535 TEST_c_c (catanh, -1.0L, -0x1p-512L, -1.777922518136259718655200391540222897114e2L, -7.853981633974483096156608458198757210493e-1L),
5536 TEST_c_c (catanh, 0x1p-512L, 1.0L, 3.729170365600103371645482657731466918688e-155L, 7.853981633974483096156608458198757210493e-1L),
5537 TEST_c_c (catanh, -0x1p-512L, 1.0L, -3.729170365600103371645482657731466918688e-155L, 7.853981633974483096156608458198757210493e-1L),
5538 TEST_c_c (catanh, 0x1p-512L, -1.0L, 3.729170365600103371645482657731466918688e-155L, -7.853981633974483096156608458198757210493e-1L),
5539 TEST_c_c (catanh, -0x1p-512L, -1.0L, -3.729170365600103371645482657731466918688e-155L, -7.853981633974483096156608458198757210493e-1L),
5540 TEST_c_c (catanh, 1.0L, 0x1.3p-536L, 1.860240928518819859673567751384928348958e2L, 7.853981633974483096156608458198757210493e-1L),
5541 TEST_c_c (catanh, 1.0L, -0x1.3p-536L, 1.860240928518819859673567751384928348958e2L, -7.853981633974483096156608458198757210493e-1L),
5542 TEST_c_c (catanh, -1.0L, 0x1.3p-536L, -1.860240928518819859673567751384928348958e2L, 7.853981633974483096156608458198757210493e-1L),
5543 TEST_c_c (catanh, -1.0L, -0x1.3p-536L, -1.860240928518819859673567751384928348958e2L, -7.853981633974483096156608458198757210493e-1L),
5544 TEST_c_c (catanh, 0x1.3p-536L, 1.0L, 2.639526015013529511588222179446290115084e-162L, 7.853981633974483096156608458198757210493e-1L),
5545 TEST_c_c (catanh, -0x1.3p-536L, 1.0L, -2.639526015013529511588222179446290115084e-162L, 7.853981633974483096156608458198757210493e-1L),
5546 TEST_c_c (catanh, 0x1.3p-536L, -1.0L, 2.639526015013529511588222179446290115084e-162L, -7.853981633974483096156608458198757210493e-1L),
5547 TEST_c_c (catanh, -0x1.3p-536L, -1.0L, -2.639526015013529511588222179446290115084e-162L, -7.853981633974483096156608458198757210493e-1L),
5548 TEST_c_c (catanh, 1.0L, 0x1p-1020L, 3.538516356758520804574969980043991380025e2L, 7.853981633974483096156608458198757210493e-1L),
5549 TEST_c_c (catanh, 1.0L, -0x1p-1020L, 3.538516356758520804574969980043991380025e2L, -7.853981633974483096156608458198757210493e-1L),
5550 TEST_c_c (catanh, -1.0L, 0x1p-1020L, -3.538516356758520804574969980043991380025e2L, 7.853981633974483096156608458198757210493e-1L),
5551 TEST_c_c (catanh, -1.0L, -0x1p-1020L, -3.538516356758520804574969980043991380025e2L, -7.853981633974483096156608458198757210493e-1L),
5552 TEST_c_c (catanh, 0x1p-1020L, 1.0L, 4.450147717014402766180465434664808128438e-308L, 7.853981633974483096156608458198757210493e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5553 TEST_c_c (catanh, -0x1p-1020L, 1.0L, -4.450147717014402766180465434664808128438e-308L, 7.853981633974483096156608458198757210493e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5554 TEST_c_c (catanh, 0x1p-1020L, -1.0L, 4.450147717014402766180465434664808128438e-308L, -7.853981633974483096156608458198757210493e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5555 TEST_c_c (catanh, -0x1p-1020L, -1.0L, -4.450147717014402766180465434664808128438e-308L, -7.853981633974483096156608458198757210493e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5556 TEST_c_c (catanh, 0x1.0000000000001p0L, 0x1p-1022L, 1.836840028483855075506780244989950299369e1L, 1.570796326794896619231321691639751442099L),
5557 TEST_c_c (catanh, 0x1.0000000000001p0L, -0x1p-1022L, 1.836840028483855075506780244989950299369e1L, -1.570796326794896619231321691639751442099L),
5558 TEST_c_c (catanh, -0x1.0000000000001p0L, 0x1p-1022L, -1.836840028483855075506780244989950299369e1L, 1.570796326794896619231321691639751442099L),
5559 TEST_c_c (catanh, -0x1.0000000000001p0L, -0x1p-1022L, -1.836840028483855075506780244989950299369e1L, -1.570796326794896619231321691639751442099L),
5560 TEST_c_c (catanh, 0x1p-1022L, 0x1.0000000000001p0L, 1.112536929253600444512293438042957369978e-308L, 7.853981633974484206379633083355174374608e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5561 TEST_c_c (catanh, -0x1p-1022L, 0x1.0000000000001p0L, -1.112536929253600444512293438042957369978e-308L, 7.853981633974484206379633083355174374608e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5562 TEST_c_c (catanh, 0x1p-1022L, -0x1.0000000000001p0L, 1.112536929253600444512293438042957369978e-308L, -7.853981633974484206379633083355174374608e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5563 TEST_c_c (catanh, -0x1p-1022L, -0x1.0000000000001p0L, -1.112536929253600444512293438042957369978e-308L, -7.853981633974484206379633083355174374608e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5564 TEST_c_c (catanh, 0x0.fffffffffffff8p0L, 0x1p-1022L, 1.871497387511852332650969166374185305708e1L, 1.002084180004486444624900488355118689113e-292L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5565 TEST_c_c (catanh, 0x0.fffffffffffff8p0L, -0x1p-1022L, 1.871497387511852332650969166374185305708e1L, -1.002084180004486444624900488355118689113e-292L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5566 TEST_c_c (catanh, -0x0.fffffffffffff8p0L, 0x1p-1022L, -1.871497387511852332650969166374185305708e1L, 1.002084180004486444624900488355118689113e-292L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5567 TEST_c_c (catanh, -0x0.fffffffffffff8p0L, -0x1p-1022L, -1.871497387511852332650969166374185305708e1L, -1.002084180004486444624900488355118689113e-292L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5568 TEST_c_c (catanh, 0x1p-1022L, 0x0.fffffffffffff8p0L, 1.112536929253600815061527818977844932790e-308L, 7.853981633974482541045096145620456183798e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5569 TEST_c_c (catanh, -0x1p-1022L, 0x0.fffffffffffff8p0L, -1.112536929253600815061527818977844932790e-308L, 7.853981633974482541045096145620456183798e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5570 TEST_c_c (catanh, 0x1p-1022L, -0x0.fffffffffffff8p0L, 1.112536929253600815061527818977844932790e-308L, -7.853981633974482541045096145620456183798e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5571 TEST_c_c (catanh, -0x1p-1022L, -0x0.fffffffffffff8p0L, -1.112536929253600815061527818977844932790e-308L, -7.853981633974482541045096145620456183798e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
10de07f5
JM		 5572#endif
5573#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 5574 TEST_c_c (catanh, 0x1.0000000000000002p0L, 0x1p-1022L, 2.218070977791824990137853294097378778927e1L, 1.570796326794896619231321691639751442099L),
5575 TEST_c_c (catanh, 0x1.0000000000000002p0L, -0x1p-1022L, 2.218070977791824990137853294097378778927e1L, -1.570796326794896619231321691639751442099L),
5576 TEST_c_c (catanh, -0x1.0000000000000002p0L, 0x1p-1022L, -2.218070977791824990137853294097378778927e1L, 1.570796326794896619231321691639751442099L),
5577 TEST_c_c (catanh, -0x1.0000000000000002p0L, -0x1p-1022L, -2.218070977791824990137853294097378778927e1L, -1.570796326794896619231321691639751442099L),
5578 TEST_c_c (catanh, 0x1p-1022L, 0x1.0000000000000002p0L, 1.112536929253600691424494863099491450042e-308L, 7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5579 TEST_c_c (catanh, -0x1p-1022L, 0x1.0000000000000002p0L, -1.112536929253600691424494863099491450042e-308L, 7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5580 TEST_c_c (catanh, 0x1p-1022L, -0x1.0000000000000002p0L, 1.112536929253600691424494863099491450042e-308L, -7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5581 TEST_c_c (catanh, -0x1p-1022L, -0x1.0000000000000002p0L, -1.112536929253600691424494863099491450042e-308L, -7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5582 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, 0x1p-1022L, 2.252728336819822255604649142023466965703e1L, 2.052268400649188124723641491045245971623e-289L),
5583 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, -0x1p-1022L, 2.252728336819822255604649142023466965703e1L, -2.052268400649188124723641491045245971623e-289L),
5584 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, 0x1p-1022L, -2.252728336819822255604649142023466965703e1L, 2.052268400649188124723641491045245971623e-289L),
5585 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, -0x1p-1022L, -2.252728336819822255604649142023466965703e1L, -2.052268400649188124723641491045245971623e-289L),
5586 TEST_c_c (catanh, 0x1p-1022L, 0x0.ffffffffffffffffp0L, 1.112536929253600691605427106449557323148e-308L, 7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5587 TEST_c_c (catanh, -0x1p-1022L, 0x0.ffffffffffffffffp0L, -1.112536929253600691605427106449557323148e-308L, 7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5588 TEST_c_c (catanh, 0x1p-1022L, -0x0.ffffffffffffffffp0L, 1.112536929253600691605427106449557323148e-308L, -7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5589 TEST_c_c (catanh, -0x1p-1022L, -0x0.ffffffffffffffffp0L, -1.112536929253600691605427106449557323148e-308L, -7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
10de07f5
JM		 5590#endif
5591#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 5592 TEST_c_c (catanh, 0x1.000000000000000000000000008p0L, 0x1p-1022L, 3.673680056967710139911330243728336427098e1L, 1.570796326794896619231321691639751442099L),
5593 TEST_c_c (catanh, 0x1.000000000000000000000000008p0L, -0x1p-1022L, 3.673680056967710139911330243728336427098e1L, -1.570796326794896619231321691639751442099L),
5594 TEST_c_c (catanh, -0x1.000000000000000000000000008p0L, 0x1p-1022L, -3.673680056967710139911330243728336427098e1L, 1.570796326794896619231321691639751442099L),
5595 TEST_c_c (catanh, -0x1.000000000000000000000000008p0L, -0x1p-1022L, -3.673680056967710139911330243728336427098e1L, -1.570796326794896619231321691639751442099L),
5596 TEST_c_c (catanh, 0x1p-1022L, 0x1.000000000000000000000000008p0L, 1.112536929253600691545116358666174605957e-308L, 7.853981633974483096156608458198880470009e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5597 TEST_c_c (catanh, -0x1p-1022L, 0x1.000000000000000000000000008p0L, -1.112536929253600691545116358666174605957e-308L, 7.853981633974483096156608458198880470009e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5598 TEST_c_c (catanh, 0x1p-1022L, -0x1.000000000000000000000000008p0L, 1.112536929253600691545116358666174605957e-308L, -7.853981633974483096156608458198880470009e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5599 TEST_c_c (catanh, -0x1p-1022L, -0x1.000000000000000000000000008p0L, -1.112536929253600691545116358666174605957e-308L, -7.853981633974483096156608458198880470009e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5600 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-1022L, 3.708337415995707405382191849801244331055e1L, 9.025971879324147880346310405868788320726e-277L),
5601 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-1022L, 3.708337415995707405382191849801244331055e1L, -9.025971879324147880346310405868788320726e-277L),
5602 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-1022L, -3.708337415995707405382191849801244331055e1L, 9.025971879324147880346310405868788320726e-277L),
5603 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-1022L, -3.708337415995707405382191849801244331055e1L, -9.025971879324147880346310405868788320726e-277L),
5604 TEST_c_c (catanh, 0x1p-1022L, 0x0.ffffffffffffffffffffffffffcp0L, 1.112536929253600691545116358666215745186e-308L, 7.853981633974483096156608458198695580735e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5605 TEST_c_c (catanh, -0x1p-1022L, 0x0.ffffffffffffffffffffffffffcp0L, -1.112536929253600691545116358666215745186e-308L, 7.853981633974483096156608458198695580735e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5606 TEST_c_c (catanh, 0x1p-1022L, -0x0.ffffffffffffffffffffffffffcp0L, 1.112536929253600691545116358666215745186e-308L, -7.853981633974483096156608458198695580735e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5607 TEST_c_c (catanh, -0x1p-1022L, -0x0.ffffffffffffffffffffffffffcp0L, -1.112536929253600691545116358666215745186e-308L, -7.853981633974483096156608458198695580735e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
10de07f5
JM		 5608#endif
5609#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5610 TEST_c_c (catanh, 1.0L, 0x1p-8192L, 2.839477425163815960027691385553420311121e3L, 7.853981633974483096156608458198757210493e-1L),
5611 TEST_c_c (catanh, 1.0L, -0x1p-8192L, 2.839477425163815960027691385553420311121e3L, -7.853981633974483096156608458198757210493e-1L),
5612 TEST_c_c (catanh, -1.0L, 0x1p-8192L, -2.839477425163815960027691385553420311121e3L, 7.853981633974483096156608458198757210493e-1L),
5613 TEST_c_c (catanh, -1.0L, -0x1p-8192L, -2.839477425163815960027691385553420311121e3L, -7.853981633974483096156608458198757210493e-1L),
5614 TEST_c_c (catanh, 0x1p-8192L, 1.0L, 4.584009668887117914053530980121207914891e-2467L, 7.853981633974483096156608458198757210493e-1L),
5615 TEST_c_c (catanh, -0x1p-8192L, 1.0L, -4.584009668887117914053530980121207914891e-2467L, 7.853981633974483096156608458198757210493e-1L),
5616 TEST_c_c (catanh, 0x1p-8192L, -1.0L, 4.584009668887117914053530980121207914891e-2467L, -7.853981633974483096156608458198757210493e-1L),
5617 TEST_c_c (catanh, -0x1p-8192L, -1.0L, -4.584009668887117914053530980121207914891e-2467L, -7.853981633974483096156608458198757210493e-1L),
5618 TEST_c_c (catanh, 1.0L, 0x1.3p-8221L, 2.849442134153471837403071201841536297726e3L, 7.853981633974483096156608458198757210493e-1L),
5619 TEST_c_c (catanh, 1.0L, -0x1.3p-8221L, 2.849442134153471837403071201841536297726e3L, -7.853981633974483096156608458198757210493e-1L),
5620 TEST_c_c (catanh, -1.0L, 0x1.3p-8221L, -2.849442134153471837403071201841536297726e3L, 7.853981633974483096156608458198757210493e-1L),
5621 TEST_c_c (catanh, -1.0L, -0x1.3p-8221L, -2.849442134153471837403071201841536297726e3L, -7.853981633974483096156608458198757210493e-1L),
5622 TEST_c_c (catanh, 0x1.3p-8221L, 1.0L, 1.013933025636421986471594877335044443409e-2475L, 7.853981633974483096156608458198757210493e-1L),
5623 TEST_c_c (catanh, -0x1.3p-8221L, 1.0L, -1.013933025636421986471594877335044443409e-2475L, 7.853981633974483096156608458198757210493e-1L),
5624 TEST_c_c (catanh, 0x1.3p-8221L, -1.0L, 1.013933025636421986471594877335044443409e-2475L, -7.853981633974483096156608458198757210493e-1L),
5625 TEST_c_c (catanh, -0x1.3p-8221L, -1.0L, -1.013933025636421986471594877335044443409e-2475L, -7.853981633974483096156608458198757210493e-1L),
5626 TEST_c_c (catanh, 1.0L, 0x1.3p-8246L, 2.858106473910471153770786603359763504827e3L, 7.853981633974483096156608458198757210493e-1L),
5627 TEST_c_c (catanh, 1.0L, -0x1.3p-8246L, 2.858106473910471153770786603359763504827e3L, -7.853981633974483096156608458198757210493e-1L),
5628 TEST_c_c (catanh, -1.0L, 0x1.3p-8246L, -2.858106473910471153770786603359763504827e3L, 7.853981633974483096156608458198757210493e-1L),
5629 TEST_c_c (catanh, -1.0L, -0x1.3p-8246L, -2.858106473910471153770786603359763504827e3L, -7.853981633974483096156608458198757210493e-1L),
5630 TEST_c_c (catanh, 0x1.3p-8246L, 1.0L, 3.021755890954798419688924781486524472858e-2483L, 7.853981633974483096156608458198757210493e-1L),
5631 TEST_c_c (catanh, -0x1.3p-8246L, 1.0L, -3.021755890954798419688924781486524472858e-2483L, 7.853981633974483096156608458198757210493e-1L),
5632 TEST_c_c (catanh, 0x1.3p-8246L, -1.0L, 3.021755890954798419688924781486524472858e-2483L, -7.853981633974483096156608458198757210493e-1L),
5633 TEST_c_c (catanh, -0x1.3p-8246L, -1.0L, -3.021755890954798419688924781486524472858e-2483L, -7.853981633974483096156608458198757210493e-1L),
5634 TEST_c_c (catanh, 1.0L, 0x1p-16380L, 5.677221982376232056781839690803195180822e3L, 7.853981633974483096156608458198757210493e-1L),
5635 TEST_c_c (catanh, 1.0L, -0x1p-16380L, 5.677221982376232056781839690803195180822e3L, -7.853981633974483096156608458198757210493e-1L),
5636 TEST_c_c (catanh, -1.0L, 0x1p-16380L, -5.677221982376232056781839690803195180822e3L, 7.853981633974483096156608458198757210493e-1L),
5637 TEST_c_c (catanh, -1.0L, -0x1p-16380L, -5.677221982376232056781839690803195180822e3L, -7.853981633974483096156608458198757210493e-1L),
5638 TEST_c_c (catanh, 0x1p-16380L, 1.0L, 6.724206286224187012525355634643505205196e-4932L, 7.853981633974483096156608458198757210493e-1L),
5639 TEST_c_c (catanh, -0x1p-16380L, 1.0L, -6.724206286224187012525355634643505205196e-4932L, 7.853981633974483096156608458198757210493e-1L),
5640 TEST_c_c (catanh, 0x1p-16380L, -1.0L, 6.724206286224187012525355634643505205196e-4932L, -7.853981633974483096156608458198757210493e-1L),
5641 TEST_c_c (catanh, -0x1p-16380L, -1.0L, -6.724206286224187012525355634643505205196e-4932L, -7.853981633974483096156608458198757210493e-1L),
5642 TEST_c_c (catanh, 0x1.0000000000000002p0L, 0x1p-16382L, 2.218070977791824990137853294097378778927e1L, 1.570796326794896619231321691639751442099L),
5643 TEST_c_c (catanh, 0x1.0000000000000002p0L, -0x1p-16382L, 2.218070977791824990137853294097378778927e1L, -1.570796326794896619231321691639751442099L),
5644 TEST_c_c (catanh, -0x1.0000000000000002p0L, 0x1p-16382L, -2.218070977791824990137853294097378778927e1L, 1.570796326794896619231321691639751442099L),
5645 TEST_c_c (catanh, -0x1.0000000000000002p0L, -0x1p-16382L, -2.218070977791824990137853294097378778927e1L, -1.570796326794896619231321691639751442099L),
5646 TEST_c_c (catanh, 0x1p-16382L, 0x1.0000000000000002p0L, 1.681051571556046752949078932066752571182e-4932L, 7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION),
5647 TEST_c_c (catanh, -0x1p-16382L, 0x1.0000000000000002p0L, -1.681051571556046752949078932066752571182e-4932L, 7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION),
5648 TEST_c_c (catanh, 0x1p-16382L, -0x1.0000000000000002p0L, 1.681051571556046752949078932066752571182e-4932L, -7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION),
5649 TEST_c_c (catanh, -0x1p-16382L, -0x1.0000000000000002p0L, -1.681051571556046752949078932066752571182e-4932L, -7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION),
5650 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, 0x1p-16382L, 2.252728336819822255604649142023466965703e1L, 3.100992811520163369065387859792822623745e-4913L),
5651 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, -0x1p-16382L, 2.252728336819822255604649142023466965703e1L, -3.100992811520163369065387859792822623745e-4913L),
5652 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, 0x1p-16382L, -2.252728336819822255604649142023466965703e1L, 3.100992811520163369065387859792822623745e-4913L),
5653 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, -0x1p-16382L, -2.252728336819822255604649142023466965703e1L, -3.100992811520163369065387859792822623745e-4913L),
5654 TEST_c_c (catanh, 0x1p-16382L, 0x0.ffffffffffffffffp0L, 1.681051571556046753222468896957938166365e-4932L, 7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION),
5655 TEST_c_c (catanh, -0x1p-16382L, 0x0.ffffffffffffffffp0L, -1.681051571556046753222468896957938166365e-4932L, 7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION),
5656 TEST_c_c (catanh, 0x1p-16382L, -0x0.ffffffffffffffffp0L, 1.681051571556046753222468896957938166365e-4932L, -7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION),
5657 TEST_c_c (catanh, -0x1p-16382L, -0x0.ffffffffffffffffp0L, -1.681051571556046753222468896957938166365e-4932L, -7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION),
10de07f5 5658# if LDBL_MANT_DIG >= 113
08198877
JM		 5659 TEST_c_c (catanh, 0x1.0000000000000000000000000001p0L, 0x1p-16382L, 3.916281570163690998207361486238697614441e1L, 1.570796326794896619231321691639751442099L),
5660 TEST_c_c (catanh, 0x1.0000000000000000000000000001p0L, -0x1p-16382L, 3.916281570163690998207361486238697614441e1L, -1.570796326794896619231321691639751442099L),
5661 TEST_c_c (catanh, -0x1.0000000000000000000000000001p0L, 0x1p-16382L, -3.916281570163690998207361486238697614441e1L, 1.570796326794896619231321691639751442099L),
5662 TEST_c_c (catanh, -0x1.0000000000000000000000000001p0L, -0x1p-16382L, -3.916281570163690998207361486238697614441e1L, -1.570796326794896619231321691639751442099L),
5663 TEST_c_c (catanh, 0x1p-16382L, 0x1.0000000000000000000000000001p0L, 1.681051571556046753131338908660875977540e-4932L, 7.853981633974483096156608458198758173458e-1L, UNDERFLOW_EXCEPTION),
5664 TEST_c_c (catanh, -0x1p-16382L, 0x1.0000000000000000000000000001p0L, -1.681051571556046753131338908660875977540e-4932L, 7.853981633974483096156608458198758173458e-1L, UNDERFLOW_EXCEPTION),
5665 TEST_c_c (catanh, 0x1p-16382L, -0x1.0000000000000000000000000001p0L, 1.681051571556046753131338908660875977540e-4932L, -7.853981633974483096156608458198758173458e-1L, UNDERFLOW_EXCEPTION),
5666 TEST_c_c (catanh, -0x1p-16382L, -0x1.0000000000000000000000000001p0L, -1.681051571556046753131338908660875977540e-4932L, -7.853981633974483096156608458198758173458e-1L, UNDERFLOW_EXCEPTION),
5667 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-16382L, 3.950938929191688263678223092311606435623e1L, 1.745703758805099310527547423749501866998e-4898L),
5668 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-16382L, 3.950938929191688263678223092311606435623e1L, -1.745703758805099310527547423749501866998e-4898L),
5669 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-16382L, -3.950938929191688263678223092311606435623e1L, 1.745703758805099310527547423749501866998e-4898L),
5670 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-16382L, -3.950938929191688263678223092311606435623e1L, -1.745703758805099310527547423749501866998e-4898L),
5671 TEST_c_c (catanh, 0x1p-16382L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.681051571556046753131338908660876463178e-4932L, 7.853981633974483096156608458198756729010e-1L, UNDERFLOW_EXCEPTION),
5672 TEST_c_c (catanh, -0x1p-16382L, 0x0.ffffffffffffffffffffffffffff8p0L, -1.681051571556046753131338908660876463178e-4932L, 7.853981633974483096156608458198756729010e-1L, UNDERFLOW_EXCEPTION),
5673 TEST_c_c (catanh, 0x1p-16382L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.681051571556046753131338908660876463178e-4932L, -7.853981633974483096156608458198756729010e-1L, UNDERFLOW_EXCEPTION),
5674 TEST_c_c (catanh, -0x1p-16382L, -0x0.ffffffffffffffffffffffffffff8p0L, -1.681051571556046753131338908660876463178e-4932L, -7.853981633974483096156608458198756729010e-1L, UNDERFLOW_EXCEPTION),
10de07f5 5675# endif
caf84319 5676#endif
2f38fbfe 5677
08198877
JM		 5678 TEST_c_c (catanh, 0.75L, 1.25L, 0.261492138795671927078652057366532140L, 0.996825126463918666098902241310446708L),
5679 TEST_c_c (catanh, -2, -3, -0.14694666622552975204743278515471595L, -1.3389725222944935611241935759091443L),
5680 END_DATA (catanh)
5681 };
8847214f 5682
08198877
JM		 5683static void
5684catanh_test (void)
5685{
5686 errno = 0;
5687 FUNC(catanh) (BUILD_COMPLEX (0.7L, 1.2L));
5688 if (errno == ENOSYS)
5689 /* Function not implemented. */
5690 return;
5691
5692 START (catanh);
5693 RUN_TEST_LOOP_c_c (catanh, catanh_test_data, );
6815fabc 5694 END (catanh, complex);
8847214f
UD		 5695}
5696
74c57478
JM		 5697static const struct test_f_f_data cbrt_test_data[] =
5698 {
5699 START_DATA (cbrt),
5700 TEST_f_f (cbrt, 0.0, 0.0),
5701 TEST_f_f (cbrt, minus_zero, minus_zero),
5702
5703 TEST_f_f (cbrt, plus_infty, plus_infty),
5704 TEST_f_f (cbrt, minus_infty, minus_infty),
5705 TEST_f_f (cbrt, qnan_value, qnan_value),
5706
5707 TEST_f_f (cbrt, -0.001L, -0.1L),
5708 TEST_f_f (cbrt, 8, 2),
5709 TEST_f_f (cbrt, -27.0, -3.0),
5710 TEST_f_f (cbrt, 0.9921875L, 0.997389022060725270579075195353955217L),
5711 TEST_f_f (cbrt, 0.75L, 0.908560296416069829445605878163630251L),
5712 END_DATA (cbrt)
5713 };
5714
8847214f
UD		 5715static void
5716cbrt_test (void)
5717{
42be70d4
UD		 5718 errno = 0;
5719 FUNC(cbrt) (8);
5720 if (errno == ENOSYS)
5721 /* Function not implemented. */
5722 return;
5723
8847214f 5724 START (cbrt);
74c57478 5725 RUN_TEST_LOOP_f_f (cbrt, cbrt_test_data, );
8847214f
UD		 5726 END (cbrt);
5727}
5728
2550dfe9 5729
08198877
JM		 5730static const struct test_c_c_data ccos_test_data[] =
5731 {
5732 START_DATA (ccos),
5733 TEST_c_c (ccos, 0.0, 0.0, 1.0, minus_zero),
5734 TEST_c_c (ccos, minus_zero, 0.0, 1.0, 0.0),
5735 TEST_c_c (ccos, 0.0, minus_zero, 1.0, 0.0),
5736 TEST_c_c (ccos, minus_zero, minus_zero, 1.0, minus_zero),
8847214f 5737
08198877
JM		 5738 TEST_c_c (ccos, plus_infty, 0.0, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5739 TEST_c_c (ccos, plus_infty, minus_zero, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5740 TEST_c_c (ccos, minus_infty, 0.0, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5741 TEST_c_c (ccos, minus_infty, minus_zero, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 5742
08198877
JM		 5743 TEST_c_c (ccos, 0.0, plus_infty, plus_infty, minus_zero),
5744 TEST_c_c (ccos, 0.0, minus_infty, plus_infty, 0.0),
5745 TEST_c_c (ccos, minus_zero, plus_infty, plus_infty, 0.0),
5746 TEST_c_c (ccos, minus_zero, minus_infty, plus_infty, minus_zero),
8847214f 5747
08198877
JM		 5748 TEST_c_c (ccos, plus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5749 TEST_c_c (ccos, minus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5750 TEST_c_c (ccos, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5751 TEST_c_c (ccos, minus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8847214f 5752
08198877
JM		 5753 TEST_c_c (ccos, 4.625, plus_infty, minus_infty, plus_infty),
5754 TEST_c_c (ccos, 4.625, minus_infty, minus_infty, minus_infty),
5755 TEST_c_c (ccos, -4.625, plus_infty, minus_infty, minus_infty),
5756 TEST_c_c (ccos, -4.625, minus_infty, minus_infty, plus_infty),
8847214f 5757
08198877
JM		 5758 TEST_c_c (ccos, plus_infty, 6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
5759 TEST_c_c (ccos, plus_infty, -6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
5760 TEST_c_c (ccos, minus_infty, 6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
5761 TEST_c_c (ccos, minus_infty, -6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 5762
08198877
JM		 5763 TEST_c_c (ccos, qnan_value, 0.0, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5764 TEST_c_c (ccos, qnan_value, minus_zero, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 5765
08198877
JM		 5766 TEST_c_c (ccos, qnan_value, plus_infty, plus_infty, qnan_value),
5767 TEST_c_c (ccos, qnan_value, minus_infty, plus_infty, qnan_value),
8847214f 5768
08198877
JM		 5769 TEST_c_c (ccos, qnan_value, 9.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5770 TEST_c_c (ccos, qnan_value, -9.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5771
08198877
JM		 5772 TEST_c_c (ccos, 0.0, qnan_value, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5773 TEST_c_c (ccos, minus_zero, qnan_value, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 5774
08198877
JM		 5775 TEST_c_c (ccos, 10.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5776 TEST_c_c (ccos, -10.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5777
08198877
JM		 5778 TEST_c_c (ccos, plus_infty, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5779 TEST_c_c (ccos, minus_infty, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5780
08198877 5781 TEST_c_c (ccos, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 5782
08198877
JM		 5783 TEST_c_c (ccos, 0.75L, 1.25L, 1.38173873063425888530729933139078645L, -1.09193013555397466170919531722024128L),
5784 TEST_c_c (ccos, -2, -3, -4.18962569096880723013255501961597373L, -9.10922789375533659797919726277886212L),
8847214f 5785
08198877
JM		 5786 TEST_c_c (ccos, 0.75, 89.5, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
5787 TEST_c_c (ccos, 0.75, -89.5, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
5788 TEST_c_c (ccos, -0.75, 89.5, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
5789 TEST_c_c (ccos, -0.75, -89.5, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
e0b16cc2
JM		 5790
5791#ifndef TEST_FLOAT
08198877
JM		 5792 TEST_c_c (ccos, 0.75, 710.5, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
5793 TEST_c_c (ccos, 0.75, -710.5, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
5794 TEST_c_c (ccos, -0.75, 710.5, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
5795 TEST_c_c (ccos, -0.75, -710.5, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
e0b16cc2
JM		 5796#endif
5797
5798#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5799 TEST_c_c (ccos, 0.75, 11357.25, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
5800 TEST_c_c (ccos, 0.75, -11357.25, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
5801 TEST_c_c (ccos, -0.75, 11357.25, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
5802 TEST_c_c (ccos, -0.75, -11357.25, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
e0b16cc2
JM		 5803#endif
5804
5805#ifdef TEST_FLOAT
08198877 5806 TEST_c_c (ccos, 0x1p-149, 180, plus_infty, -1.043535896672617552965983803453927655332e33L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 5807#endif
5808
5809#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 5810 TEST_c_c (ccos, 0x1p-1074, 1440, plus_infty, -5.981479269486130556466515778180916082415e301L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 5811#endif
5812
5813#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 5814 TEST_c_c (ccos, 0x1p-16434L, 22730, plus_infty, -1.217853148905605987081057582351152052687e4924L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 5815#endif
5816
08198877
JM		 5817 TEST_c_c (ccos, min_subnorm_value * 0x1p120, 0x1p-120, 1.0, -min_subnorm_value, UNDERFLOW_EXCEPTION),
5818 TEST_c_c (ccos, 0x1p-120, min_subnorm_value * 0x1p120, 1.0, -min_subnorm_value, UNDERFLOW_EXCEPTION),
5819 END_DATA (ccos)
5820 };
8847214f
UD		 5821
5822static void
08198877 5823ccos_test (void)
8847214f 5824{
aaca11d8 5825 errno = 0;
08198877 5826 FUNC(ccos) (BUILD_COMPLEX (0, 0));
aaca11d8
UD		 5827 if (errno == ENOSYS)
5828 /* Function not implemented. */
5829 return;
8847214f 5830
08198877
JM		 5831 START (ccos);
5832 RUN_TEST_LOOP_c_c (ccos, ccos_test_data, );
5833 END (ccos, complex);
5834}
8847214f 5835
8847214f 5836
08198877
JM		 5837static const struct test_c_c_data ccosh_test_data[] =
5838 {
5839 START_DATA (ccosh),
5840 TEST_c_c (ccosh, 0.0, 0.0, 1.0, 0.0),
5841 TEST_c_c (ccosh, minus_zero, 0.0, 1.0, minus_zero),
5842 TEST_c_c (ccosh, 0.0, minus_zero, 1.0, minus_zero),
5843 TEST_c_c (ccosh, minus_zero, minus_zero, 1.0, 0.0),
5844
5845 TEST_c_c (ccosh, 0.0, plus_infty, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5846 TEST_c_c (ccosh, minus_zero, plus_infty, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5847 TEST_c_c (ccosh, 0.0, minus_infty, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5848 TEST_c_c (ccosh, minus_zero, minus_infty, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 5849
08198877
JM		 5850 TEST_c_c (ccosh, plus_infty, 0.0, plus_infty, 0.0),
5851 TEST_c_c (ccosh, minus_infty, 0.0, plus_infty, minus_zero),
5852 TEST_c_c (ccosh, plus_infty, minus_zero, plus_infty, minus_zero),
5853 TEST_c_c (ccosh, minus_infty, minus_zero, plus_infty, 0.0),
8847214f 5854
08198877
JM		 5855 TEST_c_c (ccosh, plus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5856 TEST_c_c (ccosh, minus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5857 TEST_c_c (ccosh, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5858 TEST_c_c (ccosh, minus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8847214f 5859
08198877
JM		 5860 TEST_c_c (ccosh, plus_infty, 4.625, minus_infty, minus_infty),
5861 TEST_c_c (ccosh, minus_infty, 4.625, minus_infty, plus_infty),
5862 TEST_c_c (ccosh, plus_infty, -4.625, minus_infty, plus_infty),
5863 TEST_c_c (ccosh, minus_infty, -4.625, minus_infty, minus_infty),
8847214f 5864
08198877
JM		 5865 TEST_c_c (ccosh, 6.75, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5866 TEST_c_c (ccosh, -6.75, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5867 TEST_c_c (ccosh, 6.75, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5868 TEST_c_c (ccosh, -6.75, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 5869
08198877
JM		 5870 TEST_c_c (ccosh, 0.0, qnan_value, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5871 TEST_c_c (ccosh, minus_zero, qnan_value, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 5872
08198877
JM		 5873 TEST_c_c (ccosh, plus_infty, qnan_value, plus_infty, qnan_value),
5874 TEST_c_c (ccosh, minus_infty, qnan_value, plus_infty, qnan_value),
8847214f 5875
08198877
JM		 5876 TEST_c_c (ccosh, 9.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5877 TEST_c_c (ccosh, -9.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5878
08198877
JM		 5879 TEST_c_c (ccosh, qnan_value, 0.0, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5880 TEST_c_c (ccosh, qnan_value, minus_zero, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 5881
08198877
JM		 5882 TEST_c_c (ccosh, qnan_value, 10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5883 TEST_c_c (ccosh, qnan_value, -10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5884
08198877
JM		 5885 TEST_c_c (ccosh, qnan_value, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5886 TEST_c_c (ccosh, qnan_value, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5887
08198877 5888 TEST_c_c (ccosh, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 5889
08198877 5890 TEST_c_c (ccosh, 0.75L, 1.25L, 0.408242591877968807788852146397499084L, 0.780365930845853240391326216300863152L),
8847214f 5891
08198877 5892 TEST_c_c (ccosh, -2, -3, -3.72454550491532256547397070325597253L, 0.511822569987384608834463849801875634L),
8847214f 5893
08198877
JM		 5894 TEST_c_c (ccosh, 89.5, 0.75, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
5895 TEST_c_c (ccosh, -89.5, 0.75, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
5896 TEST_c_c (ccosh, 89.5, -0.75, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
5897 TEST_c_c (ccosh, -89.5, -0.75, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
e0b16cc2
JM		 5898
5899#ifndef TEST_FLOAT
08198877
JM		 5900 TEST_c_c (ccosh, 710.5, 0.75, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
5901 TEST_c_c (ccosh, -710.5, 0.75, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
5902 TEST_c_c (ccosh, 710.5, -0.75, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
5903 TEST_c_c (ccosh, -710.5, -0.75, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
e0b16cc2
JM		 5904#endif
5905
5906#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5907 TEST_c_c (ccosh, 11357.25, 0.75, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
5908 TEST_c_c (ccosh, -11357.25, 0.75, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
5909 TEST_c_c (ccosh, 11357.25, -0.75, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
5910 TEST_c_c (ccosh, -11357.25, -0.75, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
e0b16cc2
JM		 5911#endif
5912
5913#ifdef TEST_FLOAT
08198877 5914 TEST_c_c (ccosh, 180, 0x1p-149, plus_infty, 1.043535896672617552965983803453927655332e33L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 5915#endif
5916
5917#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 5918 TEST_c_c (ccosh, 1440, 0x1p-1074, plus_infty, 5.981479269486130556466515778180916082415e301L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 5919#endif
5920
5921#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 5922 TEST_c_c (ccosh, 22730, 0x1p-16434L, plus_infty, 1.217853148905605987081057582351152052687e4924L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 5923#endif
5924
08198877
JM		 5925 TEST_c_c (ccosh, min_subnorm_value * 0x1p120, 0x1p-120, 1.0, min_subnorm_value, UNDERFLOW_EXCEPTION),
5926 TEST_c_c (ccosh, 0x1p-120, min_subnorm_value * 0x1p120, 1.0, min_subnorm_value, UNDERFLOW_EXCEPTION),
5927 END_DATA (ccosh)
5928 };
5929
5930static void
5931ccosh_test (void)
5932{
5933 errno = 0;
5934 FUNC(ccosh) (BUILD_COMPLEX (0.7L, 1.2L));
5935 if (errno == ENOSYS)
5936 /* Function not implemented. */
5937 return;
f0302940 5938
08198877
JM		 5939 START (ccosh);
5940 RUN_TEST_LOOP_c_c (ccosh, ccosh_test_data, );
6815fabc 5941 END (ccosh, complex);
8847214f
UD		 5942}
5943
5944
74c57478
JM		 5945static const struct test_f_f_data ceil_test_data[] =
5946 {
5947 START_DATA (ceil),
5948 TEST_f_f (ceil, 0.0, 0.0),
5949 TEST_f_f (ceil, minus_zero, minus_zero),
5950 TEST_f_f (ceil, plus_infty, plus_infty),
5951 TEST_f_f (ceil, minus_infty, minus_infty),
5952 TEST_f_f (ceil, qnan_value, qnan_value),
5953
5954 TEST_f_f (ceil, M_PIl, 4.0),
5955 TEST_f_f (ceil, -M_PIl, -3.0),
5956 TEST_f_f (ceil, 0.1, 1.0),
5957 TEST_f_f (ceil, 0.25, 1.0),
5958 TEST_f_f (ceil, 0.625, 1.0),
5959 TEST_f_f (ceil, -0.1, minus_zero),
5960 TEST_f_f (ceil, -0.25, minus_zero),
5961 TEST_f_f (ceil, -0.625, minus_zero),
8847214f 5962
f964490f 5963#ifdef TEST_LDOUBLE
74c57478
JM		 5964 /* The result can only be represented in long double. */
5965 TEST_f_f (ceil, 4503599627370495.5L, 4503599627370496.0L),
5966 TEST_f_f (ceil, 4503599627370496.25L, 4503599627370497.0L),
5967 TEST_f_f (ceil, 4503599627370496.5L, 4503599627370497.0L),
5968 TEST_f_f (ceil, 4503599627370496.75L, 4503599627370497.0L),
5969 TEST_f_f (ceil, 4503599627370497.5L, 4503599627370498.0L),
5970
5971 TEST_f_f (ceil, -4503599627370495.5L, -4503599627370495.0L),
5972 TEST_f_f (ceil, -4503599627370496.25L, -4503599627370496.0L),
5973 TEST_f_f (ceil, -4503599627370496.5L, -4503599627370496.0L),
5974 TEST_f_f (ceil, -4503599627370496.75L, -4503599627370496.0L),
5975 TEST_f_f (ceil, -4503599627370497.5L, -4503599627370497.0L),
f964490f 5976
5c68d401 5977# if LDBL_MANT_DIG > 100
74c57478
JM		 5978 TEST_f_f (ceil, 4503599627370494.5000000000001L, 4503599627370495.0L),
5979 TEST_f_f (ceil, 4503599627370495.5000000000001L, 4503599627370496.0L),
5980 TEST_f_f (ceil, 4503599627370496.5000000000001L, 4503599627370497.0L),
5981 TEST_f_f (ceil, -4503599627370494.5000000000001L, -4503599627370494.0L),
5982 TEST_f_f (ceil, -4503599627370495.5000000000001L, -4503599627370495.0L),
5983 TEST_f_f (ceil, -4503599627370496.5000000000001L, -4503599627370496.0L),
5c68d401
RM		 5984# endif
5985
74c57478
JM		 5986 TEST_f_f (ceil, 9007199254740991.5L, 9007199254740992.0L),
5987 TEST_f_f (ceil, 9007199254740992.25L, 9007199254740993.0L),
5988 TEST_f_f (ceil, 9007199254740992.5L, 9007199254740993.0L),
5989 TEST_f_f (ceil, 9007199254740992.75L, 9007199254740993.0L),
5990 TEST_f_f (ceil, 9007199254740993.5L, 9007199254740994.0L),
f964490f 5991
74c57478
JM		 5992 TEST_f_f (ceil, -9007199254740991.5L, -9007199254740991.0L),
5993 TEST_f_f (ceil, -9007199254740992.25L, -9007199254740992.0L),
5994 TEST_f_f (ceil, -9007199254740992.5L, -9007199254740992.0L),
5995 TEST_f_f (ceil, -9007199254740992.75L, -9007199254740992.0L),
5996 TEST_f_f (ceil, -9007199254740993.5L, -9007199254740993.0L),
f964490f 5997
5c68d401 5998# if LDBL_MANT_DIG > 100
74c57478
JM		 5999 TEST_f_f (ceil, 9007199254740991.0000000000001L, 9007199254740992.0L),
6000 TEST_f_f (ceil, 9007199254740992.0000000000001L, 9007199254740993.0L),
6001 TEST_f_f (ceil, 9007199254740993.0000000000001L, 9007199254740994.0L),
6002 TEST_f_f (ceil, 9007199254740991.5000000000001L, 9007199254740992.0L),
6003 TEST_f_f (ceil, 9007199254740992.5000000000001L, 9007199254740993.0L),
6004 TEST_f_f (ceil, 9007199254740993.5000000000001L, 9007199254740994.0L),
6005
6006 TEST_f_f (ceil, -9007199254740991.0000000000001L, -9007199254740991.0L),
6007 TEST_f_f (ceil, -9007199254740992.0000000000001L, -9007199254740992.0L),
6008 TEST_f_f (ceil, -9007199254740993.0000000000001L, -9007199254740993.0L),
6009 TEST_f_f (ceil, -9007199254740991.5000000000001L, -9007199254740991.0L),
6010 TEST_f_f (ceil, -9007199254740992.5000000000001L, -9007199254740992.0L),
6011 TEST_f_f (ceil, -9007199254740993.5000000000001L, -9007199254740993.0L),
5c68d401
RM		 6012# endif
6013
74c57478
JM		 6014 TEST_f_f (ceil, 72057594037927935.5L, 72057594037927936.0L),
6015 TEST_f_f (ceil, 72057594037927936.25L, 72057594037927937.0L),
6016 TEST_f_f (ceil, 72057594037927936.5L, 72057594037927937.0L),
6017 TEST_f_f (ceil, 72057594037927936.75L, 72057594037927937.0L),
6018 TEST_f_f (ceil, 72057594037927937.5L, 72057594037927938.0L),
6019
6020 TEST_f_f (ceil, -72057594037927935.5L, -72057594037927935.0L),
6021 TEST_f_f (ceil, -72057594037927936.25L, -72057594037927936.0L),
6022 TEST_f_f (ceil, -72057594037927936.5L, -72057594037927936.0L),
6023 TEST_f_f (ceil, -72057594037927936.75L, -72057594037927936.0L),
6024 TEST_f_f (ceil, -72057594037927937.5L, -72057594037927937.0L),
6025
6026 TEST_f_f (ceil, 10141204801825835211973625643007.5L, 10141204801825835211973625643008.0L),
6027 TEST_f_f (ceil, 10141204801825835211973625643008.25L, 10141204801825835211973625643009.0L),
6028 TEST_f_f (ceil, 10141204801825835211973625643008.5L, 10141204801825835211973625643009.0L),
6029 TEST_f_f (ceil, 10141204801825835211973625643008.75L, 10141204801825835211973625643009.0L),
6030 TEST_f_f (ceil, 10141204801825835211973625643009.5L, 10141204801825835211973625643010.0L),
6031#endif
6032 END_DATA (ceil)
6033 };
f964490f 6034
74c57478
JM		 6035static void
6036ceil_test (void)
6037{
6038 START (ceil);
6039 RUN_TEST_LOOP_f_f (ceil, ceil_test_data, );
8847214f
UD		 6040 END (ceil);
6041}
6042
6043
08198877
JM		 6044static const struct test_c_c_data cexp_test_data[] =
6045 {
6046 START_DATA (cexp),
6047 TEST_c_c (cexp, plus_zero, plus_zero, 1, 0.0),
6048 TEST_c_c (cexp, minus_zero, plus_zero, 1, 0.0),
6049 TEST_c_c (cexp, plus_zero, minus_zero, 1, minus_zero),
6050 TEST_c_c (cexp, minus_zero, minus_zero, 1, minus_zero),
8847214f 6051
08198877
JM		 6052 TEST_c_c (cexp, plus_infty, plus_zero, plus_infty, 0.0),
6053 TEST_c_c (cexp, plus_infty, minus_zero, plus_infty, minus_zero),
8847214f 6054
08198877
JM		 6055 TEST_c_c (cexp, minus_infty, plus_zero, 0.0, 0.0),
6056 TEST_c_c (cexp, minus_infty, minus_zero, 0.0, minus_zero),
8847214f 6057
08198877
JM		 6058 TEST_c_c (cexp, 0.0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
6059 TEST_c_c (cexp, minus_zero, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 6060
08198877
JM		 6061 TEST_c_c (cexp, 0.0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
6062 TEST_c_c (cexp, minus_zero, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 6063
08198877
JM		 6064 TEST_c_c (cexp, 100.0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
6065 TEST_c_c (cexp, -100.0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 6066
08198877
JM		 6067 TEST_c_c (cexp, 100.0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
6068 TEST_c_c (cexp, -100.0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 6069
08198877
JM		 6070 TEST_c_c (cexp, minus_infty, 2.0, minus_zero, 0.0),
6071 TEST_c_c (cexp, minus_infty, 4.0, minus_zero, minus_zero),
6072 TEST_c_c (cexp, plus_infty, 2.0, minus_infty, plus_infty),
6073 TEST_c_c (cexp, plus_infty, 4.0, minus_infty, minus_infty),
8847214f 6074
08198877
JM		 6075 TEST_c_c (cexp, plus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
6076 TEST_c_c (cexp, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 6077
08198877
JM		 6078 TEST_c_c (cexp, minus_infty, plus_infty, 0.0, 0.0, IGNORE_ZERO_INF_SIGN),
6079 TEST_c_c (cexp, minus_infty, minus_infty, 0.0, minus_zero, IGNORE_ZERO_INF_SIGN),
8847214f 6080
08198877 6081 TEST_c_c (cexp, minus_infty, qnan_value, 0, 0, IGNORE_ZERO_INF_SIGN),
8847214f 6082
08198877 6083 TEST_c_c (cexp, plus_infty, qnan_value, plus_infty, qnan_value),
8847214f 6084
08198877
JM		 6085 TEST_c_c (cexp, qnan_value, 0.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6086 TEST_c_c (cexp, qnan_value, 1.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6087
08198877
JM		 6088 TEST_c_c (cexp, qnan_value, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6089 TEST_c_c (cexp, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6090 TEST_c_c (cexp, 1, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6091 TEST_c_c (cexp, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 6092
08198877
JM		 6093 TEST_c_c (cexp, 0.75L, 1.25L, 0.667537446429131586942201977015932112L, 2.00900045494094876258347228145863909L),
6094 TEST_c_c (cexp, -2.0, -3.0, -0.13398091492954261346140525546115575L, -0.019098516261135196432576240858800925L),
8847214f 6095
08198877
JM		 6096 TEST_c_c (cexp, 0, 0x1p65, 0.99888622066058013610642172179340364209972L, -0.047183876212354673805106149805700013943218L),
6097 TEST_c_c (cexp, 0, -0x1p65, 0.99888622066058013610642172179340364209972L, 0.047183876212354673805106149805700013943218L),
6098 TEST_c_c (cexp, 50, 0x1p127, 4.053997150228616856622417636046265337193e21L, 3.232070315463388524466674772633810238819e21L),
1a4ac776
JM		 6099
6100#ifndef TEST_FLOAT
08198877
JM		 6101 TEST_c_c (cexp, 0, 1e22, 0.5232147853951389454975944733847094921409L, -0.8522008497671888017727058937530293682618L),
6102 TEST_c_c (cexp, 0, 0x1p1023, -0.826369834614147994500785680811743734805L, 0.5631277798508840134529434079444683477104L),
6103 TEST_c_c (cexp, 500, 0x1p1023, -1.159886268932754433233243794561351783426e217L, 7.904017694554466595359379965081774849708e216L),
1a4ac776
JM		 6104#endif
6105
6106#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6107 TEST_c_c (cexp, 0, 0x1p16383L, 0.9210843909921906206874509522505756251609L, 0.3893629985894208126948115852610595405563L),
6108 TEST_c_c (cexp, -10000, 0x1p16383L, 1.045876464564882298442774542991176546722e-4343L, 4.421154026488516836023811173959413420548e-4344L),
1a4ac776
JM		 6109#endif
6110
08198877
JM		 6111 TEST_c_c (cexp, 88.75, 0.75, 2.558360358486542817001900410314204322891e38L, 2.383359453227311447654736314679677655100e38L),
6112 TEST_c_c (cexp, -95, 0.75, 4.039714446238306526889476684000081624047e-42L, 3.763383677300535390271646960780570275931e-42L, UNDERFLOW_EXCEPTION_FLOAT),
7c69cd14
JM		 6113
6114#ifndef TEST_FLOAT
08198877
JM		 6115 TEST_c_c (cexp, 709.8125, 0.75, 1.355121963080879535248452862759108365762e308L, 1.262426823598609432507811340856186873507e308L),
6116 TEST_c_c (cexp, -720, 0.75, 1.486960657116368433685753325516638551722e-313L, 1.385247284245720590980701226843815229385e-313L, UNDERFLOW_EXCEPTION_DOUBLE),
7c69cd14
JM		 6117#endif
6118
6119#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6120 TEST_c_c (cexp, 11356.5625, 0.75, 9.052188470850960144814815984311663764287e4931L, 8.432986734191301036267148978260970230200e4931L),
6121 TEST_c_c (cexp, -11370, 0.75, 8.631121063182211587489310508568170739592e-4939L, 8.040721827809267291427062346918413482824e-4939L, UNDERFLOW_EXCEPTION),
7c69cd14
JM		 6122#endif
6123
6124#ifdef TEST_FLOAT
08198877 6125 TEST_c_c (cexp, 180, 0x1p-149, plus_infty, 2.087071793345235105931967606907855310664e33L, OVERFLOW_EXCEPTION),
7c69cd14
JM		 6126#endif
6127
6128#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 6129 TEST_c_c (cexp, 1440, 0x1p-1074, plus_infty, 1.196295853897226111293303155636183216483e302L, OVERFLOW_EXCEPTION),
7c69cd14
JM		 6130#endif
6131
6132#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 6133 TEST_c_c (cexp, 22730, 0x1p-16434L, plus_infty, 2.435706297811211974162115164702304105374e4924L, OVERFLOW_EXCEPTION),
7c69cd14
JM		 6134#endif
6135
08198877
JM		 6136 TEST_c_c (cexp, 1e6, 0, plus_infty, 0, OVERFLOW_EXCEPTION),
6137 TEST_c_c (cexp, 1e6, min_value, plus_infty, plus_infty, OVERFLOW_EXCEPTION),
6138 TEST_c_c (cexp, 1e6, -min_value, plus_infty, minus_infty, OVERFLOW_EXCEPTION),
7c69cd14 6139
08198877
JM		 6140 TEST_c_c (cexp, min_value, min_subnorm_value, 1.0, min_subnorm_value, UNDERFLOW_EXCEPTION),
6141 TEST_c_c (cexp, min_value, -min_subnorm_value, 1.0, -min_subnorm_value, UNDERFLOW_EXCEPTION),
6142 END_DATA (cexp)
6143 };
6144
6145static void
6146cexp_test (void)
6147{
6148 errno = 0;
6149 FUNC(cexp) (BUILD_COMPLEX (0, 0));
6150 if (errno == ENOSYS)
6151 /* Function not implemented. */
6152 return;
05e166c8 6153
08198877
JM		 6154 START (cexp);
6155 RUN_TEST_LOOP_c_c (cexp, cexp_test_data, );
6815fabc 6156 END (cexp, complex);
8847214f
UD		 6157}
6158
2550dfe9 6159
6a1992e2
JM		 6160static const struct test_c_f_data cimag_test_data[] =
6161 {
6162 START_DATA (cimag);
6163 TEST_c_f (cimag, 1.0, 0.0, 0.0),
6164 TEST_c_f (cimag, 1.0, minus_zero, minus_zero),
6165 TEST_c_f (cimag, 1.0, qnan_value, qnan_value),
6166 TEST_c_f (cimag, qnan_value, qnan_value, qnan_value),
6167 TEST_c_f (cimag, 1.0, plus_infty, plus_infty),
6168 TEST_c_f (cimag, 1.0, minus_infty, minus_infty),
6169 TEST_c_f (cimag, 2.0, 3.0, 3.0),
6170 END_DATA (cimag);
6171 };
6172
0cdc8e6f
UD		 6173static void
6174cimag_test (void)
6175{
6176 START (cimag);
6a1992e2 6177 RUN_TEST_LOOP_c_f (cimag, cimag_test_data, );
0cdc8e6f
UD		 6178 END (cimag);
6179}
6180
08198877
JM		 6181static const struct test_c_c_data clog_test_data[] =
6182 {
6183 START_DATA (clog),
6184 TEST_c_c (clog, minus_zero, 0, minus_infty, M_PIl, DIVIDE_BY_ZERO_EXCEPTION),
6185 TEST_c_c (clog, minus_zero, minus_zero, minus_infty, -M_PIl, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 6186
08198877
JM		 6187 TEST_c_c (clog, 0, 0, minus_infty, 0.0, DIVIDE_BY_ZERO_EXCEPTION),
6188 TEST_c_c (clog, 0, minus_zero, minus_infty, minus_zero, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 6189
08198877
JM		 6190 TEST_c_c (clog, minus_infty, plus_infty, plus_infty, M_PI_34l),
6191 TEST_c_c (clog, minus_infty, minus_infty, plus_infty, -M_PI_34l),
8847214f 6192
08198877
JM		 6193 TEST_c_c (clog, plus_infty, plus_infty, plus_infty, M_PI_4l),
6194 TEST_c_c (clog, plus_infty, minus_infty, plus_infty, -M_PI_4l),
8847214f 6195
08198877
JM		 6196 TEST_c_c (clog, 0, plus_infty, plus_infty, M_PI_2l),
6197 TEST_c_c (clog, 3, plus_infty, plus_infty, M_PI_2l),
6198 TEST_c_c (clog, minus_zero, plus_infty, plus_infty, M_PI_2l),
6199 TEST_c_c (clog, -3, plus_infty, plus_infty, M_PI_2l),
6200 TEST_c_c (clog, 0, minus_infty, plus_infty, -M_PI_2l),
6201 TEST_c_c (clog, 3, minus_infty, plus_infty, -M_PI_2l),
6202 TEST_c_c (clog, minus_zero, minus_infty, plus_infty, -M_PI_2l),
6203 TEST_c_c (clog, -3, minus_infty, plus_infty, -M_PI_2l),
8847214f 6204
08198877
JM		 6205 TEST_c_c (clog, minus_infty, 0, plus_infty, M_PIl),
6206 TEST_c_c (clog, minus_infty, 1, plus_infty, M_PIl),
6207 TEST_c_c (clog, minus_infty, minus_zero, plus_infty, -M_PIl),
6208 TEST_c_c (clog, minus_infty, -1, plus_infty, -M_PIl),
8847214f 6209
08198877
JM		 6210 TEST_c_c (clog, plus_infty, 0, plus_infty, 0.0),
6211 TEST_c_c (clog, plus_infty, 1, plus_infty, 0.0),
6212 TEST_c_c (clog, plus_infty, minus_zero, plus_infty, minus_zero),
6213 TEST_c_c (clog, plus_infty, -1, plus_infty, minus_zero),
8847214f 6214
08198877
JM		 6215 TEST_c_c (clog, plus_infty, qnan_value, plus_infty, qnan_value),
6216 TEST_c_c (clog, minus_infty, qnan_value, plus_infty, qnan_value),
8847214f 6217
08198877
JM		 6218 TEST_c_c (clog, qnan_value, plus_infty, plus_infty, qnan_value),
6219 TEST_c_c (clog, qnan_value, minus_infty, plus_infty, qnan_value),
8847214f 6220
08198877
JM		 6221 TEST_c_c (clog, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6222 TEST_c_c (clog, 3, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6223 TEST_c_c (clog, minus_zero, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6224 TEST_c_c (clog, -3, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6225
08198877
JM		 6226 TEST_c_c (clog, qnan_value, 0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6227 TEST_c_c (clog, qnan_value, 5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6228 TEST_c_c (clog, qnan_value, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6229 TEST_c_c (clog, qnan_value, -5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6230
08198877 6231 TEST_c_c (clog, qnan_value, qnan_value, qnan_value, qnan_value),
2550dfe9 6232
08198877
JM		 6233 TEST_c_c (clog, 0.75L, 1.25L, 0.376885901188190075998919126749298416L, 1.03037682652431246378774332703115153L),
6234 TEST_c_c (clog, -2, -3, 1.2824746787307683680267437207826593L, -2.1587989303424641704769327722648368L),
8847214f 6235
08198877
JM		 6236 TEST_c_c (clog, 0x1.fffffep+127L, 0x1.fffffep+127L, 89.06941264234832570836679262104313101776L, M_PI_4l),
6237 TEST_c_c (clog, 0x1.fffffep+127L, 1.0L, 88.72283905206835305365817656031404273372L, 2.938736052218037251011746307725933020145e-39L, UNDERFLOW_EXCEPTION_FLOAT),
6238 TEST_c_c (clog, 0x1p-149L, 0x1p-149L, -102.9323563131518784484589700365392203592L, M_PI_4l),
6239 TEST_c_c (clog, 0x1p-147L, 0x1p-147L, -101.5460619520319878296245057936228672231L, M_PI_4l),
1897ad44
JM		 6240
6241#ifndef TEST_FLOAT
08198877
JM		 6242 TEST_c_c (clog, 0x1.fffffffffffffp+1023L, 0x1.fffffffffffffp+1023L, 710.1292864836639693869320059713862337880L, M_PI_4l),
6243 TEST_c_c (clog, 0x1.fffffffffffffp+1023L, 0x1p+1023L, 709.8942846690411016323109979483151967689L, 0.4636476090008061606231772164674799632783L),
6244 TEST_c_c (clog, 0x1p-1074L, 0x1p-1074L, -744.0934983311012896593986823853525458290L, M_PI_4l),
6245 TEST_c_c (clog, 0x1p-1073L, 0x1p-1073L, -743.4003511505413443499814502638943692610L, M_PI_4l),
1897ad44
JM		 6246#endif
6247
6248#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6249 TEST_c_c (clog, 0x1.fp+16383L, 0x1.fp+16383L, 11356.83823118610934184548269774874545400L, M_PI_4l),
6250 TEST_c_c (clog, 0x1.fp+16383L, 0x1p+16383L, 11356.60974243783798653123798337822335902L, 0.4764674194737066993385333770295162295856L),
6251 TEST_c_c (clog, 0x1p-16440L, 0x1p-16441L, -11395.22807662984378194141292922726786191L, 0.4636476090008061162142562314612144020285L),
1897ad44
JM		 6252#endif
6253
08198877
JM		 6254 TEST_c_c (clog, 0x1p-149L, 0x1.fp+127L, 88.69109041335841930424871526389807508374L, M_PI_2l),
6255 TEST_c_c (clog, -0x1p-149L, 0x1.fp+127L, 88.69109041335841930424871526389807508374L, M_PI_2l),
6256 TEST_c_c (clog, 0x1p-149L, -0x1.fp+127L, 88.69109041335841930424871526389807508374L, -M_PI_2l),
6257 TEST_c_c (clog, -0x1p-149L, -0x1.fp+127L, 88.69109041335841930424871526389807508374L, -M_PI_2l),
6258 TEST_c_c (clog, -0x1.fp+127L, 0x1p-149L, 88.69109041335841930424871526389807508374L, M_PIl),
6259 TEST_c_c (clog, -0x1.fp+127L, -0x1p-149L, 88.69109041335841930424871526389807508374L, -M_PIl),
638a572e 6260#ifdef TEST_FLOAT
08198877
JM		 6261 TEST_c_c (clog, 0x1.fp+127L, 0x1p-149L, 88.69109041335841930424871526389807508374L, plus_zero, UNDERFLOW_EXCEPTION),
6262 TEST_c_c (clog, 0x1.fp+127L, -0x1p-149L, 88.69109041335841930424871526389807508374L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM		 6263#endif
6264
6265#ifndef TEST_FLOAT
08198877
JM		 6266 TEST_c_c (clog, 0x1p-1074L, 0x1.fp+1023L, 709.7509641950694165420886960904242800794L, M_PI_2l),
6267 TEST_c_c (clog, -0x1p-1074L, 0x1.fp+1023L, 709.7509641950694165420886960904242800794L, M_PI_2l),
6268 TEST_c_c (clog, 0x1p-1074L, -0x1.fp+1023L, 709.7509641950694165420886960904242800794L, -M_PI_2l),
6269 TEST_c_c (clog, -0x1p-1074L, -0x1.fp+1023L, 709.7509641950694165420886960904242800794L, -M_PI_2l),
6270 TEST_c_c (clog, -0x1.fp+1023L, 0x1p-1074L, 709.7509641950694165420886960904242800794L, M_PIl),
6271 TEST_c_c (clog, -0x1.fp+1023L, -0x1p-1074L, 709.7509641950694165420886960904242800794L, -M_PIl),
638a572e
JM		 6272#endif
6273#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877
JM		 6274 TEST_c_c (clog, 0x1.fp+1023L, 0x1p-1074L, 709.7509641950694165420886960904242800794L, plus_zero, UNDERFLOW_EXCEPTION),
6275 TEST_c_c (clog, 0x1.fp+1023L, -0x1p-1074L, 709.7509641950694165420886960904242800794L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM		 6276#endif
6277
6278#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6279 TEST_c_c (clog, 0x1p-16445L, 0x1.fp+16383L, 11356.49165759582936919077408168801636572L, M_PI_2l),
6280 TEST_c_c (clog, -0x1p-16445L, 0x1.fp+16383L, 11356.49165759582936919077408168801636572L, M_PI_2l),
6281 TEST_c_c (clog, 0x1p-16445L, -0x1.fp+16383L, 11356.49165759582936919077408168801636572L, -M_PI_2l),
6282 TEST_c_c (clog, -0x1p-16445L, -0x1.fp+16383L, 11356.49165759582936919077408168801636572L, -M_PI_2l),
6283 TEST_c_c (clog, -0x1.fp+16383L, 0x1p-16445L, 11356.49165759582936919077408168801636572L, M_PIl),
6284 TEST_c_c (clog, -0x1.fp+16383L, -0x1p-16445L, 11356.49165759582936919077408168801636572L, -M_PIl),
6285 TEST_c_c (clog, 0x1.fp+16383L, 0x1p-16445L, 11356.49165759582936919077408168801636572L, plus_zero, UNDERFLOW_EXCEPTION),
6286 TEST_c_c (clog, 0x1.fp+16383L, -0x1p-16445L, 11356.49165759582936919077408168801636572L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e 6287# if LDBL_MANT_DIG >= 113
08198877
JM		 6288 TEST_c_c (clog, 0x1p-16494L, 0x1.fp+16383L, 11356.49165759582936919077408168801636572L, M_PI_2l),
6289 TEST_c_c (clog, -0x1p-16494L, 0x1.fp+16383L, 11356.49165759582936919077408168801636572L, M_PI_2l),
6290 TEST_c_c (clog, 0x1p-16494L, -0x1.fp+16383L, 11356.49165759582936919077408168801636572L, -M_PI_2l),
6291 TEST_c_c (clog, -0x1p-16494L, -0x1.fp+16383L, 11356.49165759582936919077408168801636572L, -M_PI_2l),
6292 TEST_c_c (clog, -0x1.fp+16383L, 0x1p-16494L, 11356.49165759582936919077408168801636572L, M_PIl),
6293 TEST_c_c (clog, -0x1.fp+16383L, -0x1p-16494L, 11356.49165759582936919077408168801636572L, -M_PIl),
6294 TEST_c_c (clog, 0x1.fp+16383L, 0x1p-16494L, 11356.49165759582936919077408168801636572L, plus_zero, UNDERFLOW_EXCEPTION),
6295 TEST_c_c (clog, 0x1.fp+16383L, -0x1p-16494L, 11356.49165759582936919077408168801636572L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM		 6296# endif
6297#endif
6298
08198877
JM		 6299 TEST_c_c (clog, 1.0L, 0x1.234566p-10L, 6.172834701221959432440126967147726538097e-7L, 1.111110564353742042376451655136933182201e-3L),
6300 TEST_c_c (clog, -1.0L, 0x1.234566p-20L, 5.886877547844618300918562490463748605537e-13L, 3.141591568520436206990380699322226378452L),
6301 TEST_c_c (clog, 0x1.234566p-30L, 1.0L, 5.614163921211322622623353961365728040115e-19L, 1.570796325735258575254858696548386439740L),
6302 TEST_c_c (clog, -0x1.234566p-40L, -1.0L, 5.354083939753840089583620652120903838944e-25L, -1.570796326795931422008642456283782656359L),
6303 TEST_c_c (clog, 0x1.234566p-50L, 1.0L, 5.106052341226425256332038420428899201070e-31L, 1.570796326794895608681734464330528755366L),
6304 TEST_c_c (clog, 0x1.234566p-60L, 1.0L, 4.869510976053643471080816669875627875933e-37L, 1.570796326794896618244456860363082279319L),
6305 TEST_c_c (clog, 0x1p-62L, 1.0L, 2.350988701644575015937473074444491355582e-38L, 1.570796326794896619014481257142650555297L),
6306 TEST_c_c (clog, 0x1p-63L, 1.0L, 5.877471754111437539843682686111228389059e-39L, 1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
6307 TEST_c_c (clog, 0x1p-64L, 1.0L, 1.469367938527859384960920671527807097271e-39L, 1.570796326794896619177111583015476220398L, UNDERFLOW_EXCEPTION_FLOAT),
da865e95 6308#ifndef TEST_FLOAT
08198877
JM		 6309 TEST_c_c (clog, 0x1p-510L, 1.0L, 4.450147717014402766180465434664808128438e-308L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
6310 TEST_c_c (clog, 0x1p-511L, 1.0L, 1.112536929253600691545116358666202032110e-308L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
6311 TEST_c_c (clog, 0x1p-512L, 1.0L, 2.781342323134001728862790896665505080274e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
da865e95
JM		 6312#endif
6313#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6314 TEST_c_c (clog, 0x1p-8190L, 1.0L, 6.724206286224187012525355634643505205196e-4932L, 1.570796326794896619231321691639751442099L),
6315 TEST_c_c (clog, 0x1p-8191L, 1.0L, 1.681051571556046753131338908660876301299e-4932L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
6316 TEST_c_c (clog, 0x1p-8192L, 1.0L, 4.202628928890116882828347271652190753248e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
da865e95
JM		 6317#endif
6318
08198877
JM		 6319 TEST_c_c (clog, 0x1.000566p0L, 0x1.234p-10L, 8.298731898331237038231468223024422855654e-5L, 1.110938609507128729312743251313024793990e-3L),
6320 TEST_c_c (clog, 0x1.000566p0L, 0x1.234p-100L, 8.237022655933121125560939513260027133767e-5L, 8.974094312218060110948251664314290484113e-31L),
d0419dbf 6321#ifndef TEST_FLOAT
08198877
JM		 6322 TEST_c_c (clog, -0x1.0000000123456p0L, 0x1.2345678p-30L, 2.649094282537168795982991778475646793277e-10L, 3.141592652530155111500161671113150737892L),
6323 TEST_c_c (clog, -0x1.0000000123456p0L, 0x1.2345678p-1000L, 2.649094276923003995420209214900915462737e-10L, 3.141592653589793238462643383279502884197L),
d0419dbf
JM		 6324#endif
6325#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 6326 TEST_c_c (clog, 0x1.00000000000000123456789abcp0L, 0x1.23456789p-60L, 9.868649107778739757272772275265050767867e-19L, 9.868649106423871142816660980898339912137e-19L),
6327 TEST_c_c (clog, 0x1.00000000000000123456789abcp0L, 0x1.23456789p-1000L, 9.868649107778739752403260515979017248596e-19L, 1.061846605795612822522063052130030717368e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d0419dbf
JM		 6328#endif
6329
08198877 6330 TEST_c_c (clog, 0x0.ffffffp0L, 0x0.ffffffp-100L, -5.960464655174753498633255797994360530379e-8L, 7.888609052210118054117285652827862296732e-31L),
d032e0d2 6331#ifndef TEST_FLOAT
08198877 6332 TEST_c_c (clog, 0x0.fffffffffffff8p0L, 0x0.fffffffffffff8p-1000L, -1.110223024625156602053389888482372171810e-16L, 9.332636185032188789900895447238171696171e-302L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d032e0d2
JM		 6333#endif
6334#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 6335 TEST_c_c (clog, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp-15000L, -5.421010862427522170184200798202494495630e-20L, 3.548665303440282824232502561095699343814e-4516L),
6336#endif
6337
6338 TEST_c_c (clog, 0x1a6p-10L, 0x3a5p-10L, -1.4305135209763571252847059962654228661815e-06L, 1.1460277178115757370775644871674016684074L),
6339 TEST_c_c (clog, 0xf2p-10L, 0x3e3p-10L, 6.1988446308070710970664736815277450078106e-06L, 1.3322126499153926210226335249558203898460L),
6340 TEST_c_c (clog, 0x4d4ep-15L, 0x6605p-15L, -1.6298145321400412054744424587143483169412e-08L, 0.9223574537155056772124552172295398141249L),
6341 TEST_c_c (clog, 0x2818p-15L, 0x798fp-15L, 1.5366822245016167178749091974664853785194e-08L, 1.2522014929038946066987318471922169174157L),
6342 TEST_c_c (clog, 0x9b57bp-20L, 0xcb7b4p-20L, -3.9563019528687610863490232935890272740908e-11L, 0.9187593477446338910857133065497364950682L),
6343 TEST_c_c (clog, 0x2731p-20L, 0xfffd0p-20L, 4.4110493034041283943115971658295280288115e-11L, 1.5612279663766352262688735061954290528838L),
6344 TEST_c_c (clog, 0x2ede88p-23L, 0x771c3fp-23L, -4.4764192352906350039050902870893173560494e-13L, 1.1959106857549200806818600493552847793381L),
6345 TEST_c_c (clog, 0x11682p-23L, 0x7ffed1p-23L, 1.1723955140027907954461000991619077811832e-12L, 1.5622968405332756349813737986164832897108L),
6346 TEST_c_c (clog, 0xa1f2c1p-24L, 0xc643aep-24L, -1.0480505352462576151523512837107080269981e-13L, 0.8858771987699967480545613322309315260313L),
6347 TEST_c_c (clog, 0x659feap-24L, 0xeaf6f9p-24L, 3.7303493627403868207597214252239749960738e-14L, 1.1625816408046866464773042283673653469061L),
d032e0d2 6348#ifndef TEST_FLOAT
08198877
JM		 6349 TEST_c_c (clog, 0x4447d7175p-35L, 0x6c445e00ap-35L, -1.4823076576950255933915367361099865652625e-20L, 1.0081311552703893116404606212158840190615L),
6350 TEST_c_c (clog, 0x2dd46725bp-35L, 0x7783a1284p-35L, 4.4469229730850767799109418892826021157328e-20L, 1.2046235979300843056806465045930070146351L),
6351 TEST_c_c (clog, 0x164c74eea876p-45L, 0x16f393482f77p-45L, -3.0292258760486853327810377824479932031744e-26L, 0.7998237934177411746093524982030330293980L),
6352 TEST_c_c (clog, 0xfe961079616p-45L, 0x1bc37e09e6d1p-45L, 5.3718272201930019901317065495843842735179e-26L, 1.0503831592447830576186444373011142397404L),
6353 TEST_c_c (clog, 0xa4722f19346cp-51L, 0x7f9631c5e7f07p-51L, -6.2122796286154679676173624516405339768606e-30L, 1.4904138780720095276446375492434049214172L),
6354 TEST_c_c (clog, 0x10673dd0f2481p-51L, 0x7ef1d17cefbd2p-51L, 3.2047474274603604594851472963586149973093e-29L, 1.4422922682185099608731642353544207976604L),
6355 TEST_c_c (clog, 0x8ecbf810c4ae6p-52L, 0xd479468b09a37p-52L, -9.7375017988218644730510244778042114638107e-30L, 0.9790637929494922564724108399524154766631L),
6356 TEST_c_c (clog, 0x5b06b680ea2ccp-52L, 0xef452b965da9fp-52L, 8.3076914081087805757422664530653247447136e-30L, 1.2072712126771536614482822173033535043206L),
6357 TEST_c_c (clog, 0x659b70ab7971bp-53L, 0x1f5d111e08abecp-53L, -2.5083311595699359750201056724289010648701e-30L, 1.3710185432462268491534742969536240564640L),
6358 TEST_c_c (clog, 0x15cfbd1990d1ffp-53L, 0x176a3973e09a9ap-53L, 1.0168910106364605304135563536838075568606e-30L, 0.8208373755522359859870890246475340086663L),
6359 TEST_c_c (clog, 0x1367a310575591p-54L, 0x3cfcc0a0541f60p-54L, 5.0844550531823026520677817684239496041087e-32L, 1.2627468605458094918919206628466016525397L),
6360 TEST_c_c (clog, 0x55cb6d0c83af5p-55L, 0x7fe33c0c7c4e90p-55L, -5.2000108498455368032511404449795741611813e-32L, 1.5288921536982513453421343495466824420259L),
d032e0d2
JM		 6361#endif
6362#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 6363 TEST_c_c (clog, 0x298c62cb546588a7p-63L, 0x7911b1dfcc4ecdaep-63L, -1.1931267660846218205882675852805793644095e-36L, 1.2402109774337032400594953899784058127412L),
6364 TEST_c_c (clog, 0x4d9c37e2b5cb4533p-63L, 0x65c98be2385a042ep-63L, 6.4064442119814669184296141278612389400075e-37L, 0.9193591364645830864185131402313014890145L),
6365 TEST_c_c (clog, 0x602fd5037c4792efp-64L, 0xed3e2086dcca80b8p-64L, -2.3362950222592964220878638677292132852104e-37L, 1.1856121127236268105413184264288408265852L),
6366 TEST_c_c (clog, 0x6b10b4f3520217b6p-64L, 0xe8893cbb449253a1p-64L, 2.4244570985709679851855191080208817099132e-37L, 1.1393074519572050614551047548718495655972L),
6367 TEST_c_c (clog, 0x81b7efa81fc35ad1p-65L, 0x1ef4b835f1c79d812p-65L, -9.9182335850630508484862145328126979066934e-39L, 1.3146479888794807046338799047003947008804L),
d032e0d2
JM		 6368#endif
6369#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 6370 TEST_c_c (clog, 0x3f96469050f650869c2p-75L, 0x6f16b2c9c8b05988335p-75L, -1.0509738482436128031927971874674370984602e-45L, 1.0509191467640012308402149909370784281448L),
6371 TEST_c_c (clog, 0x3157fc1d73233e580c8p-75L, 0x761b52ccd435d7c7f5fp-75L, 1.3487497719126364307640897239165442763573e-43L, 1.1750493008528425228929764149024375035382L),
6372 TEST_c_c (clog, 0x155f8afc4c48685bf63610p-85L, 0x17d0cf2652cdbeb1294e19p-85L, -4.7775669192897997174762089350332738583822e-50L, 0.8393953487996880419413728440067635213372L),
6373 TEST_c_c (clog, 0x13836d58a13448d750b4b9p-85L, 0x195ca7bc3ab4f9161edbe6p-85L, 2.8398125044729578740243199963484494962411e-50L, 0.9149964976334130461795060758257083099706L),
6374 TEST_c_c (clog, 0x1df515eb171a808b9e400266p-95L, 0x7c71eb0cd4688dfe98581c77p-95L, -3.5048022044913950094635368750889659723004e-57L, 1.3345633256521815205858155673950177421079L),
6375 TEST_c_c (clog, 0xe33f66c9542ca25cc43c867p-95L, 0x7f35a68ebd3704a43c465864p-95L, 4.1101771307217268747345114262406964584250e-56L, 1.4596065864518742494094402406719567059585L),
6376 TEST_c_c (clog, 0x6771f22c64ed551b857c128b4cp-105L, 0x1f570e7a13cc3cf2f44fd793ea1p-105L, -1.4281333889622737316199756373421183559948e-62L, 1.3673546561165378090903506783353927980633L),
6377 TEST_c_c (clog, 0x15d8ab6ed05ca514086ac3a1e84p-105L, 0x1761e480aa094c0b10b34b09ce9p-105L, 1.0027319539522347477331743836657426754857e-62L, 0.8193464073721167323313606647411269414759L),
6378 TEST_c_c (clog, 0x187190c1a334497bdbde5a95f48p-106L, 0x3b25f08062d0a095c4cfbbc338dp-106L, -1.7471844652198029695350765775994001163767e-63L, 1.1789110097072986038243729592318526094314L),
6379 TEST_c_c (clog, 0x6241ef0da53f539f02fad67dabp-106L, 0x3fb46641182f7efd9caa769dac0p-106L, 4.3299788920664682288477984749202524623248e-63L, 1.4746938237585656250866370987773473745867L),
d032e0d2
JM		 6380#endif
6381#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 6382 TEST_c_c (clog, 0x3e1d0a105ac4ebeacd9c6952d34cp-112L, 0xf859b3d1b06d005dcbb5516d5479p-112L, -1.1683999374665377365054966073875064467108e-66L, 1.3257197596350832748781065387304444940172L),
6383 TEST_c_c (clog, 0x47017a2e36807acb1e5214b209dep-112L, 0xf5f4a550c9d75e3bb1839d865f0dp-112L, 1.5077923002544367932999503838191154621839e-65L, 1.2897445708311412721399861948957141824914L),
6384 TEST_c_c (clog, 0x148f818cb7a9258fca942ade2a0cap-113L, 0x18854a34780b8333ec53310ad7001p-113L, -7.1865869169568789348552370692485515571497e-67L, 0.8730167479365994646287897223471819363668L),
6385 TEST_c_c (clog, 0xfd95243681c055c2632286921092p-113L, 0x1bccabcd29ca2152860ec29e34ef7p-113L, 6.6255694866654064502633121109394710807528e-66L, 1.0526409614996288387567810726095850312049L),
6386 TEST_c_c (clog, 0xdb85c467ee2aadd5f425fe0f4b8dp-114L, 0x3e83162a0f95f1dcbf97dddf410eap-114L, 4.6017338806965821566734340588575402712716e-67L, 1.3547418904611758959096647942223384691728L),
6387 TEST_c_c (clog, 0x1415bcaf2105940d49a636e98ae59p-115L, 0x7e6a150adfcd1b0921d44b31f40f4p-115L, 2.5993421227864195179698176012564317527271e-67L, 1.4132318089683022770487383611430906982461L),
6388#endif
6389 END_DATA (clog)
6390 };
8847214f
UD		 6391
6392static void
08198877 6393clog_test (void)
8847214f 6394{
aaca11d8 6395 errno = 0;
08198877 6396 FUNC(clog) (BUILD_COMPLEX (-2, -3));
aaca11d8
UD		 6397 if (errno == ENOSYS)
6398 /* Function not implemented. */
6399 return;
6400
08198877
JM		 6401 START (clog);
6402 RUN_TEST_LOOP_c_c (clog, clog_test_data, );
6403 END (clog, complex);
6404}
6405
8847214f 6406
08198877
JM		 6407static const struct test_c_c_data clog10_test_data[] =
6408 {
6409 START_DATA (clog10),
6410 TEST_c_c (clog10, minus_zero, 0, minus_infty, M_PIl, DIVIDE_BY_ZERO_EXCEPTION),
6411 TEST_c_c (clog10, minus_zero, minus_zero, minus_infty, -M_PIl, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 6412
08198877
JM		 6413 TEST_c_c (clog10, 0, 0, minus_infty, 0.0, DIVIDE_BY_ZERO_EXCEPTION),
6414 TEST_c_c (clog10, 0, minus_zero, minus_infty, minus_zero, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 6415
08198877 6416 TEST_c_c (clog10, minus_infty, plus_infty, plus_infty, M_PI_34_LOG10El),
8847214f 6417
08198877
JM		 6418 TEST_c_c (clog10, plus_infty, plus_infty, plus_infty, M_PI4_LOG10El),
6419 TEST_c_c (clog10, plus_infty, minus_infty, plus_infty, -M_PI4_LOG10El),
8847214f 6420
08198877
JM		 6421 TEST_c_c (clog10, 0, plus_infty, plus_infty, M_PI2_LOG10El),
6422 TEST_c_c (clog10, 3, plus_infty, plus_infty, M_PI2_LOG10El),
6423 TEST_c_c (clog10, minus_zero, plus_infty, plus_infty, M_PI2_LOG10El),
6424 TEST_c_c (clog10, -3, plus_infty, plus_infty, M_PI2_LOG10El),
6425 TEST_c_c (clog10, 0, minus_infty, plus_infty, -M_PI2_LOG10El),
6426 TEST_c_c (clog10, 3, minus_infty, plus_infty, -M_PI2_LOG10El),
6427 TEST_c_c (clog10, minus_zero, minus_infty, plus_infty, -M_PI2_LOG10El),
6428 TEST_c_c (clog10, -3, minus_infty, plus_infty, -M_PI2_LOG10El),
8847214f 6429
08198877
JM		 6430 TEST_c_c (clog10, minus_infty, 0, plus_infty, M_PI_LOG10El),
6431 TEST_c_c (clog10, minus_infty, 1, plus_infty, M_PI_LOG10El),
6432 TEST_c_c (clog10, minus_infty, minus_zero, plus_infty, -M_PI_LOG10El),
6433 TEST_c_c (clog10, minus_infty, -1, plus_infty, -M_PI_LOG10El),
8847214f 6434
08198877
JM		 6435 TEST_c_c (clog10, plus_infty, 0, plus_infty, 0.0),
6436 TEST_c_c (clog10, plus_infty, 1, plus_infty, 0.0),
6437 TEST_c_c (clog10, plus_infty, minus_zero, plus_infty, minus_zero),
6438 TEST_c_c (clog10, plus_infty, -1, plus_infty, minus_zero),
8847214f 6439
08198877
JM		 6440 TEST_c_c (clog10, plus_infty, qnan_value, plus_infty, qnan_value),
6441 TEST_c_c (clog10, minus_infty, qnan_value, plus_infty, qnan_value),
8847214f 6442
08198877
JM		 6443 TEST_c_c (clog10, qnan_value, plus_infty, plus_infty, qnan_value),
6444 TEST_c_c (clog10, qnan_value, minus_infty, plus_infty, qnan_value),
8847214f 6445
08198877
JM		 6446 TEST_c_c (clog10, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6447 TEST_c_c (clog10, 3, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6448 TEST_c_c (clog10, minus_zero, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6449 TEST_c_c (clog10, -3, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6450
08198877
JM		 6451 TEST_c_c (clog10, qnan_value, 0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6452 TEST_c_c (clog10, qnan_value, 5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6453 TEST_c_c (clog10, qnan_value, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6454 TEST_c_c (clog10, qnan_value, -5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6455
08198877 6456 TEST_c_c (clog10, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 6457
08198877
JM		 6458 TEST_c_c (clog10, 0.75L, 1.25L, 0.163679467193165171449476605077428975L, 0.447486970040493067069984724340855636L),
6459 TEST_c_c (clog10, -2, -3, 0.556971676153418384603252578971164214L, -0.937554462986374708541507952140189646L),
8847214f 6460
08198877
JM		 6461 TEST_c_c (clog10, 0x1.fffffep+127L, 0x1.fffffep+127L, 38.68235441693561449174780668781319348761L, M_PI4_LOG10El),
6462 TEST_c_c (clog10, 0x1.fffffep+127L, 1.0L, 38.53183941910362389414093724045094697423L, 1.276276851248440096917018665609900318458e-39L, UNDERFLOW_EXCEPTION_FLOAT),
6463 TEST_c_c (clog10, 0x1p-149L, 0x1p-149L, -44.70295435610120748924022586658721447508L, M_PI4_LOG10El),
6464 TEST_c_c (clog10, 0x1p-147L, 0x1p-147L, -44.10089436477324509881274807713822842154L, M_PI4_LOG10El),
1897ad44
JM		 6465
6466#ifndef TEST_FLOAT
08198877
JM		 6467 TEST_c_c (clog10, 0x1.fffffffffffffp+1023L, 0x1.fffffffffffffp+1023L, 308.4052305577487344482591243175787477115L, M_PI4_LOG10El),
6468 TEST_c_c (clog10, 0x1.fffffffffffffp+1023L, 0x1p+1023L, 308.3031705664207720674749211936626341569L, 0.2013595981366865903254995612594728746470L),
6469 TEST_c_c (clog10, 0x1p-1074L, 0x1p-1074L, -323.1557003452838130619487034867432642357L, M_PI4_LOG10El),
6470 TEST_c_c (clog10, 0x1p-1073L, 0x1p-1073L, -322.8546703496198318667349645920187712089L, M_PI4_LOG10El),
1897ad44
JM		 6471#endif
6472
6473#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6474 TEST_c_c (clog10, 0x1.fp+16383L, 0x1.fp+16383L, 4932.212175672014259683102930239951947672L, M_PI4_LOG10El),
6475 TEST_c_c (clog10, 0x1.fp+16383L, 0x1p+16383L, 4932.112944269463028900262609694408579449L, 0.2069271710841128115912940666587802677383L),
6476 TEST_c_c (clog10, 0x1p-16440L, 0x1p-16441L, -4948.884673709346821106688037612752099609L, 0.2013595981366865710389502301937289472543L),
1897ad44
JM		 6477#endif
6478
08198877
JM		 6479 TEST_c_c (clog10, 0x1p-149L, 0x1.fp+127L, 38.51805116050395969095658815123105801479L, 0.6821881769209206737428918127156778851051L),
6480 TEST_c_c (clog10, -0x1p-149L, 0x1.fp+127L, 38.51805116050395969095658815123105801479L, 0.6821881769209206737428918127156778851051L),
6481 TEST_c_c (clog10, 0x1p-149L, -0x1.fp+127L, 38.51805116050395969095658815123105801479L, -0.6821881769209206737428918127156778851051L),
6482 TEST_c_c (clog10, -0x1p-149L, -0x1.fp+127L, 38.51805116050395969095658815123105801479L, -0.6821881769209206737428918127156778851051L),
6483 TEST_c_c (clog10, -0x1.fp+127L, 0x1p-149L, 38.51805116050395969095658815123105801479L, 1.364376353841841347485783625431355770210L),
6484 TEST_c_c (clog10, -0x1.fp+127L, -0x1p-149L, 38.51805116050395969095658815123105801479L, -1.364376353841841347485783625431355770210L),
638a572e 6485#ifdef TEST_FLOAT
08198877
JM		 6486 TEST_c_c (clog10, 0x1.fp+127L, 0x1p-149L, 38.51805116050395969095658815123105801479L, plus_zero, UNDERFLOW_EXCEPTION),
6487 TEST_c_c (clog10, 0x1.fp+127L, -0x1p-149L, 38.51805116050395969095658815123105801479L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM		 6488#endif
6489
6490#ifndef TEST_FLOAT
08198877
JM		 6491 TEST_c_c (clog10, 0x1p-1074L, 0x1.fp+1023L, 308.2409272754311106024666378243768099991L, 0.6821881769209206737428918127156778851051L),
6492 TEST_c_c (clog10, -0x1p-1074L, 0x1.fp+1023L, 308.2409272754311106024666378243768099991L, 0.6821881769209206737428918127156778851051L),
6493 TEST_c_c (clog10, 0x1p-1074L, -0x1.fp+1023L, 308.2409272754311106024666378243768099991L, -0.6821881769209206737428918127156778851051L),
6494 TEST_c_c (clog10, -0x1p-1074L, -0x1.fp+1023L, 308.2409272754311106024666378243768099991L, -0.6821881769209206737428918127156778851051L),
6495 TEST_c_c (clog10, -0x1.fp+1023L, 0x1p-1074L, 308.2409272754311106024666378243768099991L, 1.364376353841841347485783625431355770210L),
6496 TEST_c_c (clog10, -0x1.fp+1023L, -0x1p-1074L, 308.2409272754311106024666378243768099991L, -1.364376353841841347485783625431355770210L),
638a572e
JM		 6497#endif
6498#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877
JM		 6499 TEST_c_c (clog10, 0x1.fp+1023L, 0x1p-1074L, 308.2409272754311106024666378243768099991L, plus_zero, UNDERFLOW_EXCEPTION),
6500 TEST_c_c (clog10, 0x1.fp+1023L, -0x1p-1074L, 308.2409272754311106024666378243768099991L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM		 6501#endif
6502
6503#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6504 TEST_c_c (clog10, 0x1p-16445L, 0x1.fp+16383L, 4932.061660674182269085496060792589701158L, 0.6821881769209206737428918127156778851051L),
6505 TEST_c_c (clog10, -0x1p-16445L, 0x1.fp+16383L, 4932.061660674182269085496060792589701158L, 0.6821881769209206737428918127156778851051L),
6506 TEST_c_c (clog10, 0x1p-16445L, -0x1.fp+16383L, 4932.061660674182269085496060792589701158L, -0.6821881769209206737428918127156778851051L),
6507 TEST_c_c (clog10, -0x1p-16445L, -0x1.fp+16383L, 4932.061660674182269085496060792589701158L, -0.6821881769209206737428918127156778851051L),
6508 TEST_c_c (clog10, -0x1.fp+16383L, 0x1p-16445L, 4932.061660674182269085496060792589701158L, 1.364376353841841347485783625431355770210L),
6509 TEST_c_c (clog10, -0x1.fp+16383L, -0x1p-16445L, 4932.061660674182269085496060792589701158L, -1.364376353841841347485783625431355770210L),
6510 TEST_c_c (clog10, 0x1.fp+16383L, 0x1p-16445L, 4932.061660674182269085496060792589701158L, plus_zero, UNDERFLOW_EXCEPTION),
6511 TEST_c_c (clog10, 0x1.fp+16383L, -0x1p-16445L, 4932.061660674182269085496060792589701158L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e 6512# if LDBL_MANT_DIG >= 113
08198877
JM		 6513 TEST_c_c (clog10, 0x1p-16494L, 0x1.fp+16383L, 4932.061660674182269085496060792589701158L, 0.6821881769209206737428918127156778851051L),
6514 TEST_c_c (clog10, -0x1p-16494L, 0x1.fp+16383L, 4932.061660674182269085496060792589701158L, 0.6821881769209206737428918127156778851051L),
6515 TEST_c_c (clog10, 0x1p-16494L, -0x1.fp+16383L, 4932.061660674182269085496060792589701158L, -0.6821881769209206737428918127156778851051L),
6516 TEST_c_c (clog10, -0x1p-16494L, -0x1.fp+16383L, 4932.061660674182269085496060792589701158L, -0.6821881769209206737428918127156778851051L),
6517 TEST_c_c (clog10, -0x1.fp+16383L, 0x1p-16494L, 4932.061660674182269085496060792589701158L, 1.364376353841841347485783625431355770210L),
6518 TEST_c_c (clog10, -0x1.fp+16383L, -0x1p-16494L, 4932.061660674182269085496060792589701158L, -1.364376353841841347485783625431355770210L),
6519 TEST_c_c (clog10, 0x1.fp+16383L, 0x1p-16494L, 4932.061660674182269085496060792589701158L, plus_zero, UNDERFLOW_EXCEPTION),
6520 TEST_c_c (clog10, 0x1.fp+16383L, -0x1p-16494L, 4932.061660674182269085496060792589701158L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM		 6521# endif
6522#endif
6523
08198877
JM		 6524 TEST_c_c (clog10, 1.0L, 0x1.234566p-10L, 2.680828048441605163181684680300513080769e-7L, 4.825491868832381486767558728169977751564e-4L),
6525 TEST_c_c (clog10, -1.0L, 0x1.234566p-20L, 2.556638434669064077889576526006849923281e-13L, 1.364375882602207106407956770293808181427L),
6526 TEST_c_c (clog10, 0x1.234566p-30L, 1.0L, 2.438200411482400072282924063740535840474e-19L, 6.821881764607257184291586401763604544928e-1L),
6527 TEST_c_c (clog10, -0x1.234566p-40L, -1.0L, 2.325249110681915353442924915876654139373e-25L, -6.821881769213700828789403802671540158935e-1L),
6528 TEST_c_c (clog10, 0x1.234566p-50L, 1.0L, 2.217530356103816369479108963807448194409e-31L, 6.821881769209202348667823902864283966959e-1L),
6529 TEST_c_c (clog10, 0x1.234566p-60L, 1.0L, 2.114801746467415208319767917450504756866e-37L, 6.821881769209206733143018621078368211515e-1L),
6530 TEST_c_c (clog10, 0x1p-61L, 1.0L, 4.084085680564517578238994467153626207224e-38L, 6.821881769209206735545466044044889962925e-1L),
6531 TEST_c_c (clog10, 0x1p-62L, 1.0L, 1.021021420141129394559748616788406551878e-38L, 6.821881769209206736487192085600834406988e-1L, UNDERFLOW_EXCEPTION_FLOAT),
6532 TEST_c_c (clog10, 0x1p-63L, 1.0L, 2.552553550352823486399371541971016379740e-39L, 6.821881769209206736958055106378806629019e-1L, UNDERFLOW_EXCEPTION_FLOAT),
da865e95 6533#ifndef TEST_FLOAT
08198877
JM		 6534 TEST_c_c (clog10, 0x1p-509L, 1.0L, 7.730698388614835910296270976605350994446e-308L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
6535 TEST_c_c (clog10, 0x1p-510L, 1.0L, 1.932674597153708977574067744151337748612e-308L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
6536 TEST_c_c (clog10, 0x1p-511L, 1.0L, 4.831686492884272443935169360378344371529e-309L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
da865e95
JM		 6537#endif
6538#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6539 TEST_c_c (clog10, 0x1p-8189L, 1.0L, 1.168114274114528946314738738025008370069e-4931L, 6.821881769209206737428918127156778851051e-1L),
6540 TEST_c_c (clog10, 0x1p-8190L, 1.0L, 2.920285685286322365786846845062520925172e-4932L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION),
6541 TEST_c_c (clog10, 0x1p-8191L, 1.0L, 7.300714213215805914467117112656302312931e-4933L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION),
da865e95
JM		 6542#endif
6543
08198877
JM		 6544 TEST_c_c (clog10, 0x1.000566p0L, 0x1.234p-10L, 3.604093470239754109961125085078190708674e-5L, 4.824745078422174667425851670822596859720e-4L),
6545 TEST_c_c (clog10, 0x1.000566p0L, 0x1.234p-100L, 3.577293486783822178310971763308187385546e-5L, 3.897399639875661463735636919790792140598e-31L),
d0419dbf 6546#ifndef TEST_FLOAT
08198877
JM		 6547 TEST_c_c (clog10, -0x1.0000000123456p0L, 0x1.2345678p-30L, 1.150487028947346337782682105935961875822e-10L, 1.364376353381646356131680448946397884147L),
6548 TEST_c_c (clog10, -0x1.0000000123456p0L, 0x1.2345678p-1000L, 1.150487026509145544402795327729455391948e-10L, 1.364376353841841347485783625431355770210L),
d0419dbf
JM		 6549#endif
6550#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 6551 TEST_c_c (clog10, 0x1.00000000000000123456789abcp0L, 0x1.23456789p-60L, 4.285899851347756188767674032946882584784e-19L, 4.285899850759344225805480528847018395861e-19L),
6552 TEST_c_c (clog10, 0x1.00000000000000123456789abcp0L, 0x1.23456789p-1000L, 4.285899851347756186652871946325962330640e-19L, 4.611541215247321502041995872887317363241e-302L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d0419dbf
JM		 6553#endif
6554
08198877 6555 TEST_c_c (clog10, 0x0.ffffffp0L, 0x0.ffffffp-100L, -2.588596909321764128428416045209904492216e-8L, 3.425979381266895667295625489912064603415e-31L),
d032e0d2 6556#ifndef TEST_FLOAT
08198877 6557 TEST_c_c (clog10, 0x0.fffffffffffff8p0L, 0x0.fffffffffffff8p-1000L, -4.821637332766435821255375046554377090472e-17L, 4.053112396770095089737411317782466262176e-302L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d032e0d2
JM		 6558#endif
6559#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 6560 TEST_c_c (clog10, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp-15000L, -2.354315103889861110220423157644627849164e-20L, 1.541165759405643564697852372112893034397e-4516L),
6561#endif
6562
6563 TEST_c_c (clog10, 0x1a6p-10L, 0x3a5p-10L, -6.2126412844802358329771948751248003038444e-07L, 0.4977135139537443711784513409096950995985L),
6564 TEST_c_c (clog10, 0xf2p-10L, 0x3e3p-10L, 2.6921240173351112953324592659528481616879e-06L, 0.5785726025799636431142862788413361783862L),
6565 TEST_c_c (clog10, 0x4d4ep-15L, 0x6605p-15L, -7.0781945783414996953799915941870192015212e-09L, 0.4005747524909781155537088181659175147564L),
6566 TEST_c_c (clog10, 0x2818p-15L, 0x798fp-15L, 6.6737261053986614395049481326819059203910e-09L, 0.5438241985991753781478398141908629586460L),
6567 TEST_c_c (clog10, 0x9b57bp-20L, 0xcb7b4p-20L, -1.7182001068739620267773842120965071561416e-11L, 0.3990121149225253562859800593935899629087L),
6568 TEST_c_c (clog10, 0x2731p-20L, 0xfffd0p-20L, 1.9156943718715958194239364991329064049438e-11L, 0.6780326907904082601285090019969008967595L),
6569 TEST_c_c (clog10, 0x2ede88p-23L, 0x771c3fp-23L, -1.9440841725722970687903291200493082253766e-13L, 0.5193774116724956222518530053006822210323L),
6570 TEST_c_c (clog10, 0x11682p-23L, 0x7ffed1p-23L, 5.0916490233953865181284669870035717560498e-13L, 0.6784968969384861816694467029319146542069L),
6571 TEST_c_c (clog10, 0xa1f2c1p-24L, 0xc643aep-24L, -4.5516256421319921959681423447271490869664e-14L, 0.3847315790697197749315054516562206543710L),
6572 TEST_c_c (clog10, 0x659feap-24L, 0xeaf6f9p-24L, 1.6200701438094619117335617123525612051457e-14L, 0.5049027913635038013499728086604870749732L),
d032e0d2 6573#ifndef TEST_FLOAT
08198877
JM		 6574 TEST_c_c (clog10, 0x4447d7175p-35L, 0x6c445e00ap-35L, -6.4375803621988389731799033530075237868110e-21L, 0.4378257977686804492768642780897650927167L),
6575 TEST_c_c (clog10, 0x2dd46725bp-35L, 0x7783a1284p-35L, 1.9312741086596516918394613098872836703188e-20L, 0.5231613813514771042838490538484014771862L),
6576 TEST_c_c (clog10, 0x164c74eea876p-45L, 0x16f393482f77p-45L, -1.3155760824064879362415202279780039150764e-26L, 0.3473590599762514228227328130640352044313L),
6577 TEST_c_c (clog10, 0xfe961079616p-45L, 0x1bc37e09e6d1p-45L, 2.3329549194675052736016290082882121135546e-26L, 0.4561756099441139182878993697611751382976L),
6578 TEST_c_c (clog10, 0xa4722f19346cp-51L, 0x7f9631c5e7f07p-51L, -2.6979587627476803379953050733225113494503e-30L, 0.6472785229986997177606324374555347813105L),
6579 TEST_c_c (clog10, 0x10673dd0f2481p-51L, 0x7ef1d17cefbd2p-51L, 1.3918041236396763648388478552321724382899e-29L, 0.6263795733790237053262025311642907438291L),
6580 TEST_c_c (clog10, 0x8ecbf810c4ae6p-52L, 0xd479468b09a37p-52L, -4.2289432987513243393180377141513840878196e-30L, 0.4252020027092323591068799049905597805296L),
6581 TEST_c_c (clog10, 0x5b06b680ea2ccp-52L, 0xef452b965da9fp-52L, 3.6079845358966994996207055940336690133424e-30L, 0.5243112258263349992771652393178033846555L),
6582 TEST_c_c (clog10, 0x659b70ab7971bp-53L, 0x1f5d111e08abecp-53L, -1.0893543813872082317104059174982092534059e-30L, 0.5954257879188711495921161433751775633232L),
6583 TEST_c_c (clog10, 0x15cfbd1990d1ffp-53L, 0x176a3973e09a9ap-53L, 4.4163015461643576961232672330852798804976e-31L, 0.3564851427422832755956993418877523303529L),
6584 TEST_c_c (clog10, 0x1367a310575591p-54L, 0x3cfcc0a0541f60p-54L, 2.2081507730821788480616336165447731164865e-32L, 0.5484039935757001196548030312819898864760L),
6585 TEST_c_c (clog10, 0x55cb6d0c83af5p-55L, 0x7fe33c0c7c4e90p-55L, -2.2583360179249556400630343805573865814771e-32L, 0.6639894257763289307423302343317622430835L),
d032e0d2
JM		 6586#endif
6587#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 6588 TEST_c_c (clog10, 0x298c62cb546588a7p-63L, 0x7911b1dfcc4ecdaep-63L, -5.1816837072162316773907242302011632570857e-37L, 0.5386167838952956925896424154370364458140L),
6589 TEST_c_c (clog10, 0x4d9c37e2b5cb4533p-63L, 0x65c98be2385a042ep-63L, 2.7822833698845776001753149807484078521508e-37L, 0.3992725998539071066769046272515417679815L),
6590 TEST_c_c (clog10, 0x602fd5037c4792efp-64L, 0xed3e2086dcca80b8p-64L, -1.0146400362652473358437501879334790111898e-37L, 0.5149047982335273098246594109614460842099L),
6591 TEST_c_c (clog10, 0x6b10b4f3520217b6p-64L, 0xe8893cbb449253a1p-64L, 1.0529283395205396881397407610630442563938e-37L, 0.4947949395762683446121140513971996916447L),
6592 TEST_c_c (clog10, 0x81b7efa81fc35ad1p-65L, 0x1ef4b835f1c79d812p-65L, -4.3074341162203896332989394770760901408798e-39L, 0.5709443672155660428417571212549720987784L),
d032e0d2
JM		 6593#endif
6594#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 6595 TEST_c_c (clog10, 0x3f96469050f650869c2p-75L, 0x6f16b2c9c8b05988335p-75L, -4.5643214291682663316715446865040356750881e-46L, 0.4564083863660793840592614609053162690362L),
6596 TEST_c_c (clog10, 0x3157fc1d73233e580c8p-75L, 0x761b52ccd435d7c7f5fp-75L, 5.8575458340992751256451490143468457830297e-44L, 0.5103174273246635294300470585396890237265L),
6597 TEST_c_c (clog10, 0x155f8afc4c48685bf63610p-85L, 0x17d0cf2652cdbeb1294e19p-85L, -2.0748709499710785084693619097712106753591e-50L, 0.3645447681189598740620098186365764884771L),
6598 TEST_c_c (clog10, 0x13836d58a13448d750b4b9p-85L, 0x195ca7bc3ab4f9161edbe6p-85L, 1.2333149003324592532859843519619084433953e-50L, 0.3973779298829931059309198145608711073016L),
6599 TEST_c_c (clog10, 0x1df515eb171a808b9e400266p-95L, 0x7c71eb0cd4688dfe98581c77p-95L, -1.5221162575729652613635150540947625639689e-57L, 0.5795934880811949230121092882659698986043L),
6600 TEST_c_c (clog10, 0xe33f66c9542ca25cc43c867p-95L, 0x7f35a68ebd3704a43c465864p-95L, 1.7850272475173865337808494725293124613817e-56L, 0.6338990862456906754888183278564382516852L),
6601 TEST_c_c (clog10, 0x6771f22c64ed551b857c128b4cp-105L, 0x1f570e7a13cc3cf2f44fd793ea1p-105L, -6.2023045024810589256360494043570293518879e-63L, 0.5938345819561308555003145899438513900776L),
6602 TEST_c_c (clog10, 0x15d8ab6ed05ca514086ac3a1e84p-105L, 0x1761e480aa094c0b10b34b09ce9p-105L, 4.3548095442952115860848857519953610343042e-63L, 0.3558376234889641500775150477035448866763L),
6603 TEST_c_c (clog10, 0x187190c1a334497bdbde5a95f48p-106L, 0x3b25f08062d0a095c4cfbbc338dp-106L, -7.5879257211204444302994221436282805900756e-64L, 0.5119945461708707332160859198685423099187L),
6604 TEST_c_c (clog10, 0x6241ef0da53f539f02fad67dabp-106L, 0x3fb46641182f7efd9caa769dac0p-106L, 1.8804859395820231849002915747252695375405e-63L, 0.6404513901551516189871978418046651877394L),
d032e0d2
JM		 6605#endif
6606#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 6607 TEST_c_c (clog10, 0x3e1d0a105ac4ebeacd9c6952d34cp-112L, 0xf859b3d1b06d005dcbb5516d5479p-112L, -5.0742964549782184008668435276046798273476e-67L, 0.5757527761596220360985719127090110408283L),
6608 TEST_c_c (clog10, 0x47017a2e36807acb1e5214b209dep-112L, 0xf5f4a550c9d75e3bb1839d865f0dp-112L, 6.5482587585671294601662599808612773010057e-66L, 0.5601289501766423782280643144987875760229L),
6609 TEST_c_c (clog10, 0x148f818cb7a9258fca942ade2a0cap-113L, 0x18854a34780b8333ec53310ad7001p-113L, -3.1210950417524756037077807411854181477733e-67L, 0.3791463562379872585396164879981280044658L),
6610 TEST_c_c (clog10, 0xfd95243681c055c2632286921092p-113L, 0x1bccabcd29ca2152860ec29e34ef7p-113L, 2.8774482675253468630312378575186855052697e-66L, 0.4571561610046221605554903008571429975493L),
6611 TEST_c_c (clog10, 0xdb85c467ee2aadd5f425fe0f4b8dp-114L, 0x3e83162a0f95f1dcbf97dddf410eap-114L, 1.9985076315737626043096596036300177494613e-67L, 0.5883569274304683249184005177865521205198L),
6612 TEST_c_c (clog10, 0x1415bcaf2105940d49a636e98ae59p-115L, 0x7e6a150adfcd1b0921d44b31f40f4p-115L, 1.1288799405048268615023706955013387413519e-67L, 0.6137587762850841972073301550420510507903L),
6613#endif
6614 END_DATA (clog10)
6615 };
d032e0d2 6616
08198877
JM		 6617static void
6618clog10_test (void)
6619{
6620 errno = 0;
6621 FUNC(clog10) (BUILD_COMPLEX (0.7L, 1.2L));
6622 if (errno == ENOSYS)
6623 /* Function not implemented. */
6624 return;
6625
6626 START (clog10);
6627 RUN_TEST_LOOP_c_c (clog10, clog10_test_data, );
6815fabc 6628 END (clog10, complex);
8847214f
UD		 6629}
6630
2550dfe9 6631
08198877
JM		 6632static const struct test_c_c_data conj_test_data[] =
6633 {
6634 START_DATA (conj),
6635 TEST_c_c (conj, 0.0, 0.0, 0.0, minus_zero),
6636 TEST_c_c (conj, 0.0, minus_zero, 0.0, 0.0),
6637 TEST_c_c (conj, qnan_value, qnan_value, qnan_value, qnan_value),
6638 TEST_c_c (conj, plus_infty, minus_infty, plus_infty, plus_infty),
6639 TEST_c_c (conj, plus_infty, plus_infty, plus_infty, minus_infty),
6640 TEST_c_c (conj, 1.0, 2.0, 1.0, -2.0),
6641 TEST_c_c (conj, 3.0, -4.0, 3.0, 4.0),
6642 END_DATA (conj)
6643 };
6644
0cdc8e6f
UD		 6645static void
6646conj_test (void)
6647{
6648 START (conj);
08198877 6649 RUN_TEST_LOOP_c_c (conj, conj_test_data, );
0cdc8e6f
UD		 6650 END (conj, complex);
6651}
6652
6653
601a3a5f
JM		 6654static const struct test_ff_f_data copysign_test_data[] =
6655 {
6656 START_DATA (copysign),
6657 TEST_ff_f (copysign, 0, 4, 0),
6658 TEST_ff_f (copysign, 0, -4, minus_zero),
6659 TEST_ff_f (copysign, minus_zero, 4, 0),
6660 TEST_ff_f (copysign, minus_zero, -4, minus_zero),
6661
6662 TEST_ff_f (copysign, plus_infty, 0, plus_infty),
6663 TEST_ff_f (copysign, plus_infty, minus_zero, minus_infty),
6664 TEST_ff_f (copysign, minus_infty, 0, plus_infty),
6665 TEST_ff_f (copysign, minus_infty, minus_zero, minus_infty),
6666
6667 TEST_ff_f (copysign, 0, plus_infty, 0),
6668 TEST_ff_f (copysign, 0, minus_zero, minus_zero),
6669 TEST_ff_f (copysign, minus_zero, plus_infty, 0),
6670 TEST_ff_f (copysign, minus_zero, minus_zero, minus_zero),
6671
6672 /* XXX More correctly we would have to check the sign of the NaN. */
6673 TEST_ff_f (copysign, qnan_value, 0, qnan_value),
6674 TEST_ff_f (copysign, qnan_value, minus_zero, qnan_value),
6675 TEST_ff_f (copysign, -qnan_value, 0, qnan_value),
6676 TEST_ff_f (copysign, -qnan_value, minus_zero, qnan_value),
6677 END_DATA (copysign)
6678 };
6679
8847214f
UD		 6680static void
6681copysign_test (void)
6682{
6683 START (copysign);
601a3a5f 6684 RUN_TEST_LOOP_ff_f (copysign, copysign_test_data, );
8847214f
UD		 6685 END (copysign);
6686}
6687
2550dfe9 6688
74c57478
JM		 6689static const struct test_f_f_data cos_test_data[] =
6690 {
6691 START_DATA (cos),
6692 TEST_f_f (cos, 0, 1),
6693 TEST_f_f (cos, minus_zero, 1),
6694 TEST_f_f (cos, plus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
6695 TEST_f_f (cos, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
6696 TEST_f_f (cos, qnan_value, qnan_value, ERRNO_UNCHANGED),
6697
6698 TEST_f_f (cos, M_PI_6l * 2.0, 0.5),
6699 TEST_f_f (cos, M_PI_6l * 4.0, -0.5),
6700
6701 /* The value of M_PI_2l is never exactly PI/2, and therefore the
6702 answer is never exactly zero. The answer is equal to the error
6703 in rounding PI/2 for the type used. Thus the answer is unique
6704 to each type. */
aba5e333 6705#ifdef TEST_FLOAT
74c57478
JM		 6706 /* 32-bit float. */
6707 TEST_f_f (cos, M_PI_2l, -0x1.777a5cp-25L),
aba5e333
CD		 6708#endif
6709#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MANT_DIG == 53)
74c57478
JM		 6710 /* 64-bit double or 64-bit long double. */
6711 TEST_f_f (cos, M_PI_2l, 0x1.1a62633145c07p-54L),
aba5e333
CD		 6712#endif
6713#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 64
74c57478
JM		 6714 /* 96-bit long double. */
6715 TEST_f_f (cos, M_PI_2l, -0xe.ce675d1fc8f8cbbp-69L),
aba5e333
CD		 6716#endif
6717#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 106
74c57478
JM		 6718 /* 128-bit IBM long double. */
6719 TEST_f_f (cos, M_PI_2l, 0x1.c1cd129024e088a67cc74020bcp-107L),
aba5e333
CD		 6720#endif
6721#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 113
74c57478
JM		 6722 /* 128-bit long double. */
6723 TEST_f_f (cos, M_PI_2l, 0x1.cd129024e088a67cc74020bbea64p-115L),
aba5e333 6724#endif
8847214f 6725
74c57478 6726 TEST_f_f (cos, 0.75L, 0.731688868873820886311838753000084544L),
8847214f 6727
74c57478
JM		 6728 TEST_f_f (cos, 0x1p65, 0.99888622066058013610642172179340364209972L),
6729 TEST_f_f (cos, -0x1p65, 0.99888622066058013610642172179340364209972L),
8c0247db 6730
d32e4346 6731#ifdef TEST_DOUBLE
74c57478 6732 TEST_f_f (cos, 0.80190127184058835, 0.69534156199418473),
8848d99d
JM		 6733#endif
6734
74c57478 6735 TEST_f_f (cos, 0x1.442f74p+15, 2.4407839902314016628485779006274989801517e-06L),
7a845b2c 6736
8848d99d 6737#ifndef TEST_FLOAT
74c57478
JM		 6738 TEST_f_f (cos, 1e22, 0.5232147853951389454975944733847094921409L),
6739 TEST_f_f (cos, 0x1p1023, -0.826369834614147994500785680811743734805L),
8848d99d
JM		 6740#endif
6741
6742#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478 6743 TEST_f_f (cos, 0x1p16383L, 0.9210843909921906206874509522505756251609L),
d32e4346
RM		 6744#endif
6745
74c57478
JM		 6746 TEST_f_f (cos, 0x1p+120, -9.25879022854837867303861764107414946730833e-01L),
6747 TEST_f_f (cos, 0x1p+127, 7.81914638714960072263910298466369236613162e-01L),
6748 TEST_f_f (cos, 0x1.fffff8p+127, 9.98819362551949040703862043664101081064641e-01L),
6749 TEST_f_f (cos, 0x1.fffffep+127, 8.53021039830304158051791467692161107353094e-01L),
6750 TEST_f_f (cos, 0x1p+50, 8.68095904660550604334592502063501320395739e-01L),
6751 TEST_f_f (cos, 0x1p+28, -1.65568979490578758865468278195361551113358e-01L),
6752 END_DATA (cos)
6753 };
6754
6755static void
6756cos_test (void)
6757{
6758 errno = 0;
6759 FUNC(cos) (0);
6760 if (errno == ENOSYS)
6761 /* Function not implemented. */
6762 return;
4ffffbd2 6763
74c57478
JM		 6764 START (cos);
6765 RUN_TEST_LOOP_f_f (cos, cos_test_data, );
8847214f
UD		 6766 END (cos);
6767}
6768
2550dfe9 6769
74c57478
JM		 6770static const struct test_f_f_data cos_tonearest_test_data[] =
6771 {
6772 START_DATA (cos_tonearest),
6773 TEST_f_f (cos, 1, 0.5403023058681397174009366074429766037323L),
6774 TEST_f_f (cos, 2, -0.4161468365471423869975682295007621897660L),
6775 TEST_f_f (cos, 3, -0.9899924966004454572715727947312613023937L),
6776 TEST_f_f (cos, 4, -0.6536436208636119146391681830977503814241L),
6777 TEST_f_f (cos, 5, 0.2836621854632262644666391715135573083344L),
6778 TEST_f_f (cos, 6, 0.9601702866503660205456522979229244054519L),
6779 TEST_f_f (cos, 7, 0.7539022543433046381411975217191820122183L),
6780 TEST_f_f (cos, 8, -0.1455000338086135258688413818311946826093L),
6781 TEST_f_f (cos, 9, -0.9111302618846769883682947111811653112463L),
6782 TEST_f_f (cos, 10, -0.8390715290764524522588639478240648345199L),
6783 END_DATA (cos_tonearest)
6784 };
6785
804360ed
JM		 6786static void
6787cos_test_tonearest (void)
6788{
804360ed
JM		 6789 errno = 0;
6790 FUNC(cos) (0);
6791 if (errno == ENOSYS)
6792 /* Function not implemented. */
6793 return;
6794
6795 START (cos_tonearest);
74c57478 6796 RUN_TEST_LOOP_f_f (cos, cos_tonearest_test_data, FE_TONEAREST);
804360ed
JM		 6797 END (cos_tonearest);
6798}
6799
6800
74c57478
JM		 6801static const struct test_f_f_data cos_towardzero_test_data[] =
6802 {
6803 START_DATA (cos_towardzero),
6804 TEST_f_f (cos, 1, 0.5403023058681397174009366074429766037323L),
6805 TEST_f_f (cos, 2, -0.4161468365471423869975682295007621897660L),
6806 TEST_f_f (cos, 3, -0.9899924966004454572715727947312613023937L),
6807 TEST_f_f (cos, 4, -0.6536436208636119146391681830977503814241L),
6808 TEST_f_f (cos, 5, 0.2836621854632262644666391715135573083344L),
6809 TEST_f_f (cos, 6, 0.9601702866503660205456522979229244054519L),
6810 TEST_f_f (cos, 7, 0.7539022543433046381411975217191820122183L),
6811 TEST_f_f (cos, 8, -0.1455000338086135258688413818311946826093L),
6812 TEST_f_f (cos, 9, -0.9111302618846769883682947111811653112463L),
6813 TEST_f_f (cos, 10, -0.8390715290764524522588639478240648345199L),
6814 END_DATA (cos_towardzero)
6815 };
6816
804360ed
JM		 6817static void
6818cos_test_towardzero (void)
6819{
804360ed
JM		 6820 errno = 0;
6821 FUNC(cos) (0);
6822 if (errno == ENOSYS)
6823 /* Function not implemented. */
6824 return;
6825
6826 START (cos_towardzero);
74c57478 6827 RUN_TEST_LOOP_f_f (cos, cos_towardzero_test_data, FE_TOWARDZERO);
804360ed
JM		 6828 END (cos_towardzero);
6829}
6830
6831
74c57478
JM		 6832static const struct test_f_f_data cos_downward_test_data[] =
6833 {
6834 START_DATA (cos_downward),
6835 TEST_f_f (cos, 1, 0.5403023058681397174009366074429766037323L),
6836 TEST_f_f (cos, 2, -0.4161468365471423869975682295007621897660L),
6837 TEST_f_f (cos, 3, -0.9899924966004454572715727947312613023937L),
6838 TEST_f_f (cos, 4, -0.6536436208636119146391681830977503814241L),
6839 TEST_f_f (cos, 5, 0.2836621854632262644666391715135573083344L),
6840 TEST_f_f (cos, 6, 0.9601702866503660205456522979229244054519L),
6841 TEST_f_f (cos, 7, 0.7539022543433046381411975217191820122183L),
6842 TEST_f_f (cos, 8, -0.1455000338086135258688413818311946826093L),
6843 TEST_f_f (cos, 9, -0.9111302618846769883682947111811653112463L),
6844 TEST_f_f (cos, 10, -0.8390715290764524522588639478240648345199L),
6845 END_DATA (cos_downward)
6846 };
6847
804360ed
JM		 6848static void
6849cos_test_downward (void)
6850{
804360ed
JM		 6851 errno = 0;
6852 FUNC(cos) (0);
6853 if (errno == ENOSYS)
6854 /* Function not implemented. */
6855 return;
6856
6857 START (cos_downward);
74c57478
JM		 6858 RUN_TEST_LOOP_f_f (cos, cos_downward_test_data, FE_DOWNWARD);
6859 END (cos_downward);
6860}
804360ed 6861
804360ed 6862
74c57478
JM		 6863static const struct test_f_f_data cos_upward_test_data[] =
6864 {
6865 START_DATA (cos_upward),
6866 TEST_f_f (cos, 1, 0.5403023058681397174009366074429766037323L),
6867 TEST_f_f (cos, 2, -0.4161468365471423869975682295007621897660L),
6868 TEST_f_f (cos, 3, -0.9899924966004454572715727947312613023937L),
6869 TEST_f_f (cos, 4, -0.6536436208636119146391681830977503814241L),
6870 TEST_f_f (cos, 5, 0.2836621854632262644666391715135573083344L),
6871 TEST_f_f (cos, 6, 0.9601702866503660205456522979229244054519L),
6872 TEST_f_f (cos, 7, 0.7539022543433046381411975217191820122183L),
6873 TEST_f_f (cos, 8, -0.1455000338086135258688413818311946826093L),
6874 TEST_f_f (cos, 9, -0.9111302618846769883682947111811653112463L),
6875 TEST_f_f (cos, 10, -0.8390715290764524522588639478240648345199L),
6876 END_DATA (cos_upward)
6877 };
804360ed
JM		 6878
6879static void
6880cos_test_upward (void)
6881{
804360ed
JM		 6882 errno = 0;
6883 FUNC(cos) (0);
6884 if (errno == ENOSYS)
6885 /* Function not implemented. */
6886 return;
6887
6888 START (cos_upward);
74c57478
JM		 6889 RUN_TEST_LOOP_f_f (cos, cos_upward_test_data, FE_UPWARD);
6890 END (cos_upward);
6891}
804360ed 6892
804360ed 6893
74c57478
JM		 6894static const struct test_f_f_data cosh_test_data[] =
6895 {
6896 START_DATA (cosh),
6897 TEST_f_f (cosh, 0, 1),
6898 TEST_f_f (cosh, minus_zero, 1),
804360ed 6899
74c57478
JM		 6900#ifndef TEST_INLINE
6901 TEST_f_f (cosh, plus_infty, plus_infty),
6902 TEST_f_f (cosh, minus_infty, plus_infty),
6903#endif
6904 TEST_f_f (cosh, qnan_value, qnan_value),
804360ed 6905
74c57478 6906 TEST_f_f (cosh, 0.75L, 1.29468328467684468784170818539018176L),
804360ed 6907
74c57478
JM		 6908#ifndef TEST_FLOAT
6909 TEST_f_f (cosh, 709.8893558127259666434838436543941497802734375L, 9.9999998999995070652573675944761818416035e+307L),
6910 TEST_f_f (cosh, -709.8893558127259666434838436543941497802734375L, 9.9999998999995070652573675944761818416035e+307L),
6911#endif
6912 END_DATA (cosh)
6913 };
804360ed 6914
8847214f
UD		 6915static void
6916cosh_test (void)
6917{
aaca11d8 6918 errno = 0;
3c6cad26 6919 FUNC(cosh) (0.7L);
aaca11d8
UD		 6920 if (errno == ENOSYS)
6921 /* Function not implemented. */
6922 return;
6923
8847214f 6924 START (cosh);
74c57478 6925 RUN_TEST_LOOP_f_f (cosh, cosh_test_data, );
8847214f
UD		 6926 END (cosh);
6927}
6928
6929
74c57478
JM		 6930static const struct test_f_f_data cosh_tonearest_test_data[] =
6931 {
6932 START_DATA (cosh_tonearest),
6933 TEST_f_f (cosh, 22, 1792456423.065795780980053377632656584997L),
6934 TEST_f_f (cosh, 23, 4872401723.124451300068625740569997090344L),
6935 TEST_f_f (cosh, 24, 13244561064.92173614708845674912733665919L),
6936 END_DATA (cosh_tonearest)
6937 };
6938
ca811b22
JM		 6939static void
6940cosh_test_tonearest (void)
6941{
ca811b22
JM		 6942 errno = 0;
6943 FUNC(cosh) (0);
6944 if (errno == ENOSYS)
6945 /* Function not implemented. */
6946 return;
6947
6948 START (cosh_tonearest);
74c57478 6949 RUN_TEST_LOOP_f_f (cosh, cosh_tonearest_test_data, FE_TONEAREST);
ca811b22
JM		 6950 END (cosh_tonearest);
6951}
6952
6953
74c57478
JM		 6954static const struct test_f_f_data cosh_towardzero_test_data[] =
6955 {
6956 START_DATA (cosh_towardzero),
6957 TEST_f_f (cosh, 22, 1792456423.065795780980053377632656584997L),
6958 TEST_f_f (cosh, 23, 4872401723.124451300068625740569997090344L),
6959 TEST_f_f (cosh, 24, 13244561064.92173614708845674912733665919L),
6960 END_DATA (cosh_towardzero)
6961 };
6962
ca811b22
JM		 6963static void
6964cosh_test_towardzero (void)
6965{
ca811b22
JM		 6966 errno = 0;
6967 FUNC(cosh) (0);
6968 if (errno == ENOSYS)
6969 /* Function not implemented. */
6970 return;
6971
6972 START (cosh_towardzero);
74c57478 6973 RUN_TEST_LOOP_f_f (cosh, cosh_towardzero_test_data, FE_TOWARDZERO);
ca811b22
JM		 6974 END (cosh_towardzero);
6975}
6976
6977
74c57478
JM		 6978static const struct test_f_f_data cosh_downward_test_data[] =
6979 {
6980 START_DATA (cosh_downward),
6981 TEST_f_f (cosh, 22, 1792456423.065795780980053377632656584997L),
6982 TEST_f_f (cosh, 23, 4872401723.124451300068625740569997090344L),
6983 TEST_f_f (cosh, 24, 13244561064.92173614708845674912733665919L),
6984 END_DATA (cosh_downward)
6985 };
6986
ca811b22
JM		 6987static void
6988cosh_test_downward (void)
6989{
ca811b22
JM		 6990 errno = 0;
6991 FUNC(cosh) (0);
6992 if (errno == ENOSYS)
6993 /* Function not implemented. */
6994 return;
6995
6996 START (cosh_downward);
74c57478 6997 RUN_TEST_LOOP_f_f (cosh, cosh_downward_test_data, FE_DOWNWARD);
ca811b22
JM		 6998 END (cosh_downward);
6999}
7000
7001
74c57478
JM		 7002static const struct test_f_f_data cosh_upward_test_data[] =
7003 {
7004 START_DATA (cosh_upward),
7005 TEST_f_f (cosh, 22, 1792456423.065795780980053377632656584997L),
7006 TEST_f_f (cosh, 23, 4872401723.124451300068625740569997090344L),
7007 TEST_f_f (cosh, 24, 13244561064.92173614708845674912733665919L),
7008 END_DATA (cosh_upward)
7009 };
7010
ca811b22
JM		 7011static void
7012cosh_test_upward (void)
7013{
ca811b22
JM		 7014 errno = 0;
7015 FUNC(cosh) (0);
7016 if (errno == ENOSYS)
7017 /* Function not implemented. */
7018 return;
7019
7020 START (cosh_upward);
74c57478 7021 RUN_TEST_LOOP_f_f (cosh, cosh_upward_test_data, FE_UPWARD);
ca811b22
JM		 7022 END (cosh_upward);
7023}
7024
7025
8847214f
UD		 7026static void
7027cpow_test (void)
7028{
aaca11d8
UD		 7029 errno = 0;
7030 FUNC(cpow) (BUILD_COMPLEX (1, 0), BUILD_COMPLEX (0, 0));
7031 if (errno == ENOSYS)
7032 /* Function not implemented. */
7033 return;
7034
8847214f
UD		 7035 START (cpow);
7036
7037 TEST_cc_c (cpow, 1, 0, 0, 0, 1.0, 0.0);
7038 TEST_cc_c (cpow, 2, 0, 10, 0, 1024.0, 0.0);
7039
7040 TEST_cc_c (cpow, M_El, 0, 0, 2 * M_PIl, 1.0, 0.0);
7041 TEST_cc_c (cpow, 2, 3, 4, 0, -119.0, -120.0);
7042
67e971f1 7043 TEST_cc_c (cpow, qnan_value, qnan_value, qnan_value, qnan_value, qnan_value, qnan_value);
15daa639 7044
96d10bdf
AJ		 7045 TEST_cc_c (cpow, 0.75L, 1.25L, 0.75L, 1.25L, 0.117506293914473555420279832210420483L, 0.346552747708338676483025352060418001L);
7046 TEST_cc_c (cpow, 0.75L, 1.25L, 1.0L, 1.0L, 0.0846958290317209430433805274189191353L, 0.513285749182902449043287190519090481L);
2550dfe9 7047 TEST_cc_c (cpow, 0.75L, 1.25L, 1.0L, 0.0L, 0.75L, 1.25L);
96d10bdf 7048 TEST_cc_c (cpow, 0.75L, 1.25L, 0.0L, 1.0L, 0.331825439177608832276067945276730566L, 0.131338600281188544930936345230903032L);
2550dfe9 7049
6815fabc 7050 END (cpow, complex);
8847214f
UD		 7051}
7052
2550dfe9 7053
08198877
JM		 7054static const struct test_c_c_data cproj_test_data[] =
7055 {
7056 START_DATA (cproj),
7057 TEST_c_c (cproj, 0.0, 0.0, 0.0, 0.0),
7058 TEST_c_c (cproj, minus_zero, minus_zero, minus_zero, minus_zero),
7059 TEST_c_c (cproj, 0.0, minus_zero, 0.0, minus_zero),
7060 TEST_c_c (cproj, minus_zero, 0.0, minus_zero, 0.0),
7061
7062 TEST_c_c (cproj, qnan_value, qnan_value, qnan_value, qnan_value),
7063
7064 TEST_c_c (cproj, plus_infty, plus_infty, plus_infty, 0.0),
7065 TEST_c_c (cproj, plus_infty, minus_infty, plus_infty, minus_zero),
7066 TEST_c_c (cproj, minus_infty, plus_infty, plus_infty, 0.0),
7067 TEST_c_c (cproj, minus_infty, minus_infty, plus_infty, minus_zero),
7068
7069 TEST_c_c (cproj, 1.0, 0.0, 1.0, 0.0),
7070 TEST_c_c (cproj, 2.0, 3.0, 2.0, 3.0),
7071 END_DATA (cproj)
7072 };
7073
8847214f
UD		 7074static void
7075cproj_test (void)
7076{
7077 START (cproj);
08198877 7078 RUN_TEST_LOOP_c_c (cproj, cproj_test_data, );
6815fabc 7079 END (cproj, complex);
8847214f
UD		 7080}
7081
2550dfe9 7082
6a1992e2
JM		 7083static const struct test_c_f_data creal_test_data[] =
7084 {
7085 START_DATA (creal);
7086 TEST_c_f (creal, 0.0, 1.0, 0.0),
7087 TEST_c_f (creal, minus_zero, 1.0, minus_zero),
7088 TEST_c_f (creal, qnan_value, 1.0, qnan_value),
7089 TEST_c_f (creal, qnan_value, qnan_value, qnan_value),
7090 TEST_c_f (creal, plus_infty, 1.0, plus_infty),
7091 TEST_c_f (creal, minus_infty, 1.0, minus_infty),
7092 TEST_c_f (creal, 2.0, 3.0, 2.0),
7093 END_DATA (creal);
7094 };
7095
0cdc8e6f
UD		 7096static void
7097creal_test (void)
7098{
7099 START (creal);
6a1992e2 7100 RUN_TEST_LOOP_c_f (creal, creal_test_data, );
0cdc8e6f
UD		 7101 END (creal);
7102}
8847214f 7103
08198877
JM		 7104static const struct test_c_c_data csin_test_data[] =
7105 {
7106 START_DATA (csin),
7107 TEST_c_c (csin, 0.0, 0.0, 0.0, 0.0),
7108 TEST_c_c (csin, minus_zero, 0.0, minus_zero, 0.0),
7109 TEST_c_c (csin, 0.0, minus_zero, 0, minus_zero),
7110 TEST_c_c (csin, minus_zero, minus_zero, minus_zero, minus_zero),
8847214f 7111
08198877
JM		 7112 TEST_c_c (csin, 0.0, plus_infty, 0.0, plus_infty),
7113 TEST_c_c (csin, minus_zero, plus_infty, minus_zero, plus_infty),
7114 TEST_c_c (csin, 0.0, minus_infty, 0.0, minus_infty),
7115 TEST_c_c (csin, minus_zero, minus_infty, minus_zero, minus_infty),
8847214f 7116
08198877
JM		 7117 TEST_c_c (csin, plus_infty, 0.0, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7118 TEST_c_c (csin, minus_infty, 0.0, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7119 TEST_c_c (csin, plus_infty, minus_zero, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7120 TEST_c_c (csin, minus_infty, minus_zero, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 7121
08198877
JM		 7122 TEST_c_c (csin, plus_infty, plus_infty, qnan_value, plus_infty, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7123 TEST_c_c (csin, minus_infty, plus_infty, qnan_value, plus_infty, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7124 TEST_c_c (csin, plus_infty, minus_infty, qnan_value, plus_infty, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7125 TEST_c_c (csin, minus_infty, minus_infty, qnan_value, plus_infty, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 7126
08198877
JM		 7127 TEST_c_c (csin, plus_infty, 6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
7128 TEST_c_c (csin, plus_infty, -6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
7129 TEST_c_c (csin, minus_infty, 6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
7130 TEST_c_c (csin, minus_infty, -6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 7131
08198877
JM		 7132 TEST_c_c (csin, 4.625, plus_infty, minus_infty, minus_infty),
7133 TEST_c_c (csin, 4.625, minus_infty, minus_infty, plus_infty),
7134 TEST_c_c (csin, -4.625, plus_infty, plus_infty, minus_infty),
7135 TEST_c_c (csin, -4.625, minus_infty, plus_infty, plus_infty),
8847214f 7136
08198877
JM		 7137 TEST_c_c (csin, qnan_value, 0.0, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
7138 TEST_c_c (csin, qnan_value, minus_zero, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 7139
08198877
JM		 7140 TEST_c_c (csin, qnan_value, plus_infty, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
7141 TEST_c_c (csin, qnan_value, minus_infty, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
8847214f 7142
08198877
JM		 7143 TEST_c_c (csin, qnan_value, 9.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7144 TEST_c_c (csin, qnan_value, -9.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7145
08198877
JM		 7146 TEST_c_c (csin, 0.0, qnan_value, 0.0, qnan_value),
7147 TEST_c_c (csin, minus_zero, qnan_value, minus_zero, qnan_value),
8847214f 7148
08198877
JM		 7149 TEST_c_c (csin, 10.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7150 TEST_c_c (csin, qnan_value, -10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7151
08198877
JM		 7152 TEST_c_c (csin, plus_infty, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7153 TEST_c_c (csin, minus_infty, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7154
08198877 7155 TEST_c_c (csin, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 7156
08198877
JM		 7157 TEST_c_c (csin, 0.75L, 1.25L, 1.28722291002649188575873510790565441L, 1.17210635989270256101081285116138863L),
7158 TEST_c_c (csin, -2, -3, -9.15449914691142957346729954460983256L, 4.16890695996656435075481305885375484L),
8847214f 7159
08198877
JM		 7160 TEST_c_c (csin, 0.75, 89.5, 2.522786001038096774676288412995370563339e38L, 2.708024460708609732016532185663087200560e38L),
7161 TEST_c_c (csin, 0.75, -89.5, 2.522786001038096774676288412995370563339e38L, -2.708024460708609732016532185663087200560e38L),
7162 TEST_c_c (csin, -0.75, 89.5, -2.522786001038096774676288412995370563339e38L, 2.708024460708609732016532185663087200560e38L),
7163 TEST_c_c (csin, -0.75, -89.5, -2.522786001038096774676288412995370563339e38L, -2.708024460708609732016532185663087200560e38L),
e0b16cc2
JM		 7164
7165#ifndef TEST_FLOAT
08198877
JM		 7166 TEST_c_c (csin, 0.75, 710.5, 1.255317763348154410745082950806112487736e308L, 1.347490911916428129246890157395342279438e308L),
7167 TEST_c_c (csin, 0.75, -710.5, 1.255317763348154410745082950806112487736e308L, -1.347490911916428129246890157395342279438e308L),
7168 TEST_c_c (csin, -0.75, 710.5, -1.255317763348154410745082950806112487736e308L, 1.347490911916428129246890157395342279438e308L),
7169 TEST_c_c (csin, -0.75, -710.5, -1.255317763348154410745082950806112487736e308L, -1.347490911916428129246890157395342279438e308L),
e0b16cc2
JM		 7170#endif
7171
7172#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 7173 TEST_c_c (csin, 0.75, 11357.25, 8.385498349388321535962327491346664141020e4931L, 9.001213196851067077465606717616495588201e4931L),
7174 TEST_c_c (csin, 0.75, -11357.25, 8.385498349388321535962327491346664141020e4931L, -9.001213196851067077465606717616495588201e4931L),
7175 TEST_c_c (csin, -0.75, 11357.25, -8.385498349388321535962327491346664141020e4931L, 9.001213196851067077465606717616495588201e4931L),
7176 TEST_c_c (csin, -0.75, -11357.25, -8.385498349388321535962327491346664141020e4931L, -9.001213196851067077465606717616495588201e4931L),
e0b16cc2
JM		 7177#endif
7178
7179#ifdef TEST_FLOAT
08198877 7180 TEST_c_c (csin, 0x1p-149, 180, 1.043535896672617552965983803453927655332e33L, plus_infty, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 7181#endif
7182
7183#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 7184 TEST_c_c (csin, 0x1p-1074, 1440, 5.981479269486130556466515778180916082415e301L, plus_infty, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 7185#endif
7186
7187#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 7188 TEST_c_c (csin, 0x1p-16434L, 22730, 1.217853148905605987081057582351152052687e4924L, plus_infty, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 7189#endif
7190
08198877
JM		 7191 TEST_c_c (csin, min_subnorm_value, min_value, min_subnorm_value, min_value, UNDERFLOW_EXCEPTION),
7192 TEST_c_c (csin, min_value, min_subnorm_value, min_value, min_subnorm_value, UNDERFLOW_EXCEPTION),
7193 END_DATA (csin)
7194 };
8847214f
UD		 7195
7196static void
08198877 7197csin_test (void)
8847214f 7198{
aaca11d8 7199 errno = 0;
08198877 7200 FUNC(csin) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD		 7201 if (errno == ENOSYS)
7202 /* Function not implemented. */
7203 return;
8847214f 7204
08198877
JM		 7205 START (csin);
7206 RUN_TEST_LOOP_c_c (csin, csin_test_data, );
7207 END (csin, complex);
7208}
7209
8847214f 7210
08198877
JM		 7211static const struct test_c_c_data csinh_test_data[] =
7212 {
7213 START_DATA (csinh),
7214 TEST_c_c (csinh, 0.0, 0.0, 0.0, 0.0),
7215 TEST_c_c (csinh, minus_zero, 0.0, minus_zero, 0.0),
7216 TEST_c_c (csinh, 0.0, minus_zero, 0.0, minus_zero),
7217 TEST_c_c (csinh, minus_zero, minus_zero, minus_zero, minus_zero),
8847214f 7218
08198877
JM		 7219 TEST_c_c (csinh, 0.0, plus_infty, 0.0, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7220 TEST_c_c (csinh, minus_zero, plus_infty, 0.0, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7221 TEST_c_c (csinh, 0.0, minus_infty, 0.0, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7222 TEST_c_c (csinh, minus_zero, minus_infty, 0.0, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 7223
08198877
JM		 7224 TEST_c_c (csinh, plus_infty, 0.0, plus_infty, 0.0),
7225 TEST_c_c (csinh, minus_infty, 0.0, minus_infty, 0.0),
7226 TEST_c_c (csinh, plus_infty, minus_zero, plus_infty, minus_zero),
7227 TEST_c_c (csinh, minus_infty, minus_zero, minus_infty, minus_zero),
8847214f 7228
08198877
JM		 7229 TEST_c_c (csinh, plus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7230 TEST_c_c (csinh, minus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7231 TEST_c_c (csinh, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7232 TEST_c_c (csinh, minus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 7233
08198877
JM		 7234 TEST_c_c (csinh, plus_infty, 4.625, minus_infty, minus_infty),
7235 TEST_c_c (csinh, minus_infty, 4.625, plus_infty, minus_infty),
7236 TEST_c_c (csinh, plus_infty, -4.625, minus_infty, plus_infty),
7237 TEST_c_c (csinh, minus_infty, -4.625, plus_infty, plus_infty),
8847214f 7238
08198877
JM		 7239 TEST_c_c (csinh, 6.75, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7240 TEST_c_c (csinh, -6.75, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7241 TEST_c_c (csinh, 6.75, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7242 TEST_c_c (csinh, -6.75, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 7243
08198877
JM		 7244 TEST_c_c (csinh, 0.0, qnan_value, 0.0, qnan_value, IGNORE_ZERO_INF_SIGN),
7245 TEST_c_c (csinh, minus_zero, qnan_value, 0.0, qnan_value, IGNORE_ZERO_INF_SIGN),
8847214f 7246
08198877
JM		 7247 TEST_c_c (csinh, plus_infty, qnan_value, plus_infty, qnan_value, IGNORE_ZERO_INF_SIGN),
7248 TEST_c_c (csinh, minus_infty, qnan_value, plus_infty, qnan_value, IGNORE_ZERO_INF_SIGN),
8847214f 7249
08198877
JM		 7250 TEST_c_c (csinh, 9.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7251 TEST_c_c (csinh, -9.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7252
08198877
JM		 7253 TEST_c_c (csinh, qnan_value, 0.0, qnan_value, 0.0),
7254 TEST_c_c (csinh, qnan_value, minus_zero, qnan_value, minus_zero),
8847214f 7255
08198877
JM		 7256 TEST_c_c (csinh, qnan_value, 10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7257 TEST_c_c (csinh, qnan_value, -10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7258
08198877
JM		 7259 TEST_c_c (csinh, qnan_value, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7260 TEST_c_c (csinh, qnan_value, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7261
08198877 7262 TEST_c_c (csinh, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 7263
08198877
JM		 7264 TEST_c_c (csinh, 0.75L, 1.25L, 0.259294854551162779153349830618433028L, 1.22863452409509552219214606515777594L),
7265 TEST_c_c (csinh, -2, -3, 3.59056458998577995201256544779481679L, -0.530921086248519805267040090660676560L),
8847214f 7266
08198877
JM		 7267 TEST_c_c (csinh, 89.5, 0.75, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
7268 TEST_c_c (csinh, -89.5, 0.75, -2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
7269 TEST_c_c (csinh, 89.5, -0.75, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
7270 TEST_c_c (csinh, -89.5, -0.75, -2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
e0b16cc2
JM		 7271
7272#ifndef TEST_FLOAT
08198877
JM		 7273 TEST_c_c (csinh, 710.5, 0.75, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
7274 TEST_c_c (csinh, -710.5, 0.75, -1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
7275 TEST_c_c (csinh, 710.5, -0.75, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
7276 TEST_c_c (csinh, -710.5, -0.75, -1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
e0b16cc2
JM		 7277#endif
7278
7279#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 7280 TEST_c_c (csinh, 11357.25, 0.75, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
7281 TEST_c_c (csinh, -11357.25, 0.75, -9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
7282 TEST_c_c (csinh, 11357.25, -0.75, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
7283 TEST_c_c (csinh, -11357.25, -0.75, -9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
e0b16cc2
JM		 7284#endif
7285
7286#ifdef TEST_FLOAT
08198877 7287 TEST_c_c (csinh, 180, 0x1p-149, plus_infty, 1.043535896672617552965983803453927655332e33L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 7288#endif
7289
7290#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 7291 TEST_c_c (csinh, 1440, 0x1p-1074, plus_infty, 5.981479269486130556466515778180916082415e301L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 7292#endif
7293
7294#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 7295 TEST_c_c (csinh, 22730, 0x1p-16434L, plus_infty, 1.217853148905605987081057582351152052687e4924L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 7296#endif
7297
08198877
JM		 7298 TEST_c_c (csinh, min_subnorm_value, min_value, min_subnorm_value, min_value, UNDERFLOW_EXCEPTION),
7299 TEST_c_c (csinh, min_value, min_subnorm_value, min_value, min_subnorm_value, UNDERFLOW_EXCEPTION),
7300 END_DATA (csinh)
7301 };
2550dfe9 7302
8847214f 7303static void
08198877 7304csinh_test (void)
8847214f 7305{
aaca11d8 7306 errno = 0;
08198877 7307 FUNC(csinh) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD		 7308 if (errno == ENOSYS)
7309 /* Function not implemented. */
7310 return;
7311
08198877
JM		 7312 START (csinh);
7313 RUN_TEST_LOOP_c_c (csinh, csinh_test_data, );
7314 END (csinh, complex);
7315}
8847214f 7316
08198877
JM		 7317
7318static const struct test_c_c_data csqrt_test_data[] =
7319 {
7320 START_DATA (csqrt),
7321 TEST_c_c (csqrt, 0, 0, 0.0, 0.0),
7322 TEST_c_c (csqrt, 0, minus_zero, 0, minus_zero),
7323 TEST_c_c (csqrt, minus_zero, 0, 0.0, 0.0),
7324 TEST_c_c (csqrt, minus_zero, minus_zero, 0.0, minus_zero),
7325
7326 TEST_c_c (csqrt, minus_infty, 0, 0.0, plus_infty),
7327 TEST_c_c (csqrt, minus_infty, 6, 0.0, plus_infty),
7328 TEST_c_c (csqrt, minus_infty, minus_zero, 0.0, minus_infty),
7329 TEST_c_c (csqrt, minus_infty, -6, 0.0, minus_infty),
7330
7331 TEST_c_c (csqrt, plus_infty, 0, plus_infty, 0.0),
7332 TEST_c_c (csqrt, plus_infty, 6, plus_infty, 0.0),
7333 TEST_c_c (csqrt, plus_infty, minus_zero, plus_infty, minus_zero),
7334 TEST_c_c (csqrt, plus_infty, -6, plus_infty, minus_zero),
7335
7336 TEST_c_c (csqrt, 0, plus_infty, plus_infty, plus_infty),
7337 TEST_c_c (csqrt, 4, plus_infty, plus_infty, plus_infty),
7338 TEST_c_c (csqrt, plus_infty, plus_infty, plus_infty, plus_infty),
7339 TEST_c_c (csqrt, minus_zero, plus_infty, plus_infty, plus_infty),
7340 TEST_c_c (csqrt, -4, plus_infty, plus_infty, plus_infty),
7341 TEST_c_c (csqrt, minus_infty, plus_infty, plus_infty, plus_infty),
7342 TEST_c_c (csqrt, 0, minus_infty, plus_infty, minus_infty),
7343 TEST_c_c (csqrt, 4, minus_infty, plus_infty, minus_infty),
7344 TEST_c_c (csqrt, plus_infty, minus_infty, plus_infty, minus_infty),
7345 TEST_c_c (csqrt, minus_zero, minus_infty, plus_infty, minus_infty),
7346 TEST_c_c (csqrt, -4, minus_infty, plus_infty, minus_infty),
7347 TEST_c_c (csqrt, minus_infty, minus_infty, plus_infty, minus_infty),
7348
7349 TEST_c_c (csqrt, minus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
7350
7351 TEST_c_c (csqrt, plus_infty, qnan_value, plus_infty, qnan_value),
7352
7353 TEST_c_c (csqrt, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7354 TEST_c_c (csqrt, 1, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7355 TEST_c_c (csqrt, minus_zero, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7356 TEST_c_c (csqrt, -1, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7357
7358 TEST_c_c (csqrt, qnan_value, 0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7359 TEST_c_c (csqrt, qnan_value, 8, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7360 TEST_c_c (csqrt, qnan_value, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7361 TEST_c_c (csqrt, qnan_value, -8, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7362
7363 TEST_c_c (csqrt, qnan_value, qnan_value, qnan_value, qnan_value),
7364
7365 TEST_c_c (csqrt, 16.0, -30.0, 5.0, -3.0),
7366 TEST_c_c (csqrt, -1, 0, 0.0, 1.0),
7367 TEST_c_c (csqrt, 0, 2, 1.0, 1.0),
7368 TEST_c_c (csqrt, 119, 120, 12.0, 5.0),
7369 TEST_c_c (csqrt, 0.75L, 1.25L, 1.05065169626078392338656675760808326L, 0.594868882070379067881984030639932657L),
7370 TEST_c_c (csqrt, -2, -3, 0.89597747612983812471573375529004348L, -1.6741492280355400404480393008490519L),
7371 TEST_c_c (csqrt, -2, 3, 0.89597747612983812471573375529004348L, 1.6741492280355400404480393008490519L),
7372 /* Principal square root should be returned (i.e., non-negative real
7373 part). */
7374 TEST_c_c (csqrt, 0, -1, M_SQRT1_2l, -M_SQRT1_2l),
7375
7376 TEST_c_c (csqrt, 0x1.fffffep+127L, 0x1.fffffep+127L, 2.026714405498316804978751017492482558075e+19L, 8.394925938143272988211878516208015586281e+18L),
7377 TEST_c_c (csqrt, 0x1.fffffep+127L, 1.0L, 1.844674352395372953599975585936590505260e+19L, 2.710505511993121390769065968615872097053e-20L),
7378 TEST_c_c (csqrt, 0x1p-149L, 0x1p-149L, 4.112805464342778798097003462770175200803e-23L, 1.703579802732953750368659735601389709551e-23L),
7379 TEST_c_c (csqrt, 0x1p-147L, 0x1p-147L, 8.225610928685557596194006925540350401606e-23L, 3.407159605465907500737319471202779419102e-23L),
7380
7381 TEST_c_c (csqrt, plus_zero, 0x1p-149L, 2.646977960169688559588507814623881131411e-23L, 2.646977960169688559588507814623881131411e-23L),
7382 TEST_c_c (csqrt, 0x1p-50L, 0x1p-149L, 2.980232238769531250000000000000000000000e-8L, 2.350988701644575015937473074444491355637e-38L),
cdfe2c5e 7383#ifdef TEST_FLOAT
08198877 7384 TEST_c_c (csqrt, 0x1p+127L, 0x1p-149L, 1.304381782533278221234957180625250836888e19L, plus_zero, UNDERFLOW_EXCEPTION),
cdfe2c5e 7385#endif
08198877
JM		 7386 TEST_c_c (csqrt, 0x1p-149L, 0x1p+127L, 9.223372036854775808000000000000000000000e18L, 9.223372036854775808000000000000000000000e18L),
7387 TEST_c_c (csqrt, 0x1.000002p-126L, 0x1.000002p-126L, 1.191195773697904627170323731331667740087e-19L, 4.934094449071842328766868579214125217132e-20L),
7388 TEST_c_c (csqrt, -0x1.000002p-126L, -0x1.000002p-126L, 4.934094449071842328766868579214125217132e-20L, -1.191195773697904627170323731331667740087e-19L),
cdfe2c5e 7389
e456826d 7390#ifndef TEST_FLOAT
08198877
JM		 7391 TEST_c_c (csqrt, 0x1.fffffffffffffp+1023L, 0x1.fffffffffffffp+1023L, 1.473094556905565378990473658199034571917e+154L, 6.101757441282702188537080005372547713595e+153L),
7392 TEST_c_c (csqrt, 0x1.fffffffffffffp+1023L, 0x1p+1023L, 1.379778091031440685006200821918878702861e+154L, 3.257214233483129514781233066898042490248e+153L),
7393 TEST_c_c (csqrt, 0x1p-1074L, 0x1p-1074L, 2.442109726130830256743814843868934877597e-162L, 1.011554969366634726113090867589031782487e-162L),
7394 TEST_c_c (csqrt, 0x1p-1073L, 0x1p-1073L, 3.453664695497464982856905711457966660085e-162L, 1.430554756764195530630723976279903095110e-162L),
cdfe2c5e 7395
08198877
JM		 7396 TEST_c_c (csqrt, plus_zero, 0x1p-1074L, 1.571727784702628688909515672805082228285e-162L, 1.571727784702628688909515672805082228285e-162L),
7397 TEST_c_c (csqrt, 0x1p-500L, 0x1p-1074L, 5.527147875260444560247265192192255725514e-76L, 4.469444793151709302716387622440056066334e-249L),
cdfe2c5e 7398#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 7399 TEST_c_c (csqrt, 0x1p+1023L, 0x1p-1074L, 9.480751908109176726832526455652159260085e153L, plus_zero, UNDERFLOW_EXCEPTION),
cdfe2c5e 7400#endif
08198877
JM		 7401 TEST_c_c (csqrt, 0x1p-1074L, 0x1p+1023L, 6.703903964971298549787012499102923063740e153L, 6.703903964971298549787012499102923063740e153L),
7402 TEST_c_c (csqrt, 0x1.0000000000001p-1022L, 0x1.0000000000001p-1022L, 1.638872094839911521020410942677082920935e-154L, 6.788430486774966350907249113759995429568e-155L),
7403 TEST_c_c (csqrt, -0x1.0000000000001p-1022L, -0x1.0000000000001p-1022L, 6.788430486774966350907249113759995429568e-155L, -1.638872094839911521020410942677082920935e-154L),
e456826d
JM		 7404#endif
7405
7406#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 7407 TEST_c_c (csqrt, 0x1.fp+16383L, 0x1.fp+16383L, 1.179514222452201722651836720466795901016e+2466L, 4.885707879516577666702435054303191575148e+2465L),
7408 TEST_c_c (csqrt, 0x1.fp+16383L, 0x1p+16383L, 1.106698967236475180613254276996359485630e+2466L, 2.687568007603946993388538156299100955642e+2465L),
7409 TEST_c_c (csqrt, 0x1p-16440L, 0x1p-16441L, 3.514690655930285351254618340783294558136e-2475L, 8.297059146828716918029689466551384219370e-2476L),
cdfe2c5e 7410
08198877
JM		 7411 TEST_c_c (csqrt, plus_zero, 0x1p-16445L, 4.269191686890197837775136325621239761720e-2476L, 4.269191686890197837775136325621239761720e-2476L),
7412 TEST_c_c (csqrt, 0x1p-5000L, 0x1p-16445L, 2.660791472672778409283210520357607795518e-753L, 6.849840675828785164910701384823702064234e-4199L),
7413 TEST_c_c (csqrt, 0x1p+16383L, 0x1p-16445L, 7.712754032630730034273323365543179095045e2465L, plus_zero, UNDERFLOW_EXCEPTION),
7414 TEST_c_c (csqrt, 0x1p-16445L, 0x1p+16383L, 5.453740678097079647314921223668914312241e2465L, 5.453740678097079647314921223668914312241e2465L),
7415 TEST_c_c (csqrt, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-16382L, 2.014551439675644900131815801350165472778e-2466L, 8.344545284118961664300307045791497724440e-2467L),
7416 TEST_c_c (csqrt, -0x1.0000000000000002p-16382L, -0x1.0000000000000002p-16382L, 8.344545284118961664300307045791497724440e-2467L, -2.014551439675644900131815801350165472778e-2466L),
cdfe2c5e
JM		 7417
7418# if LDBL_MANT_DIG >= 113
08198877
JM		 7419 TEST_c_c (csqrt, plus_zero, 0x1p-16494L, 1.799329752913293143453817328207572571442e-2483L, 1.799329752913293143453817328207572571442e-2483L),
7420 TEST_c_c (csqrt, 0x1p-5000L, 0x1p-16494L, 2.660791472672778409283210520357607795518e-753L, 1.216776133331049643422030716668249905907e-4213L),
7421 TEST_c_c (csqrt, 0x1p+16383L, 0x1p-16494L, 7.712754032630730034273323365543179095045e2465L, plus_zero, UNDERFLOW_EXCEPTION),
7422 TEST_c_c (csqrt, 0x1p-16494L, 0x1p+16383L, 5.453740678097079647314921223668914312241e2465L, 5.453740678097079647314921223668914312241e2465L),
7423 TEST_c_c (csqrt, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-16382L, 2.014551439675644900022606748976158925145e-2466L, 8.344545284118961663847948339519226074126e-2467L),
7424 TEST_c_c (csqrt, -0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-16382L, 8.344545284118961663847948339519226074126e-2467L, -2.014551439675644900022606748976158925145e-2466L),
cdfe2c5e 7425# endif
e456826d 7426#endif
08198877
JM		 7427 END_DATA (csqrt)
7428 };
8847214f
UD		 7429
7430static void
08198877 7431csqrt_test (void)
8847214f 7432{
aaca11d8 7433 errno = 0;
08198877 7434 FUNC(csqrt) (BUILD_COMPLEX (-1, 0));
aaca11d8
UD		 7435 if (errno == ENOSYS)
7436 /* Function not implemented. */
7437 return;
7438
08198877
JM		 7439 START (csqrt);
7440 RUN_TEST_LOOP_c_c (csqrt, csqrt_test_data, );
7441 END (csqrt, complex);
7442}
8847214f 7443
08198877
JM		 7444static const struct test_c_c_data ctan_test_data[] =
7445 {
7446 START_DATA (ctan),
7447 TEST_c_c (ctan, 0, 0, 0.0, 0.0),
7448 TEST_c_c (ctan, 0, minus_zero, 0.0, minus_zero),
7449 TEST_c_c (ctan, minus_zero, 0, minus_zero, 0.0),
7450 TEST_c_c (ctan, minus_zero, minus_zero, minus_zero, minus_zero),
8847214f 7451
08198877
JM		 7452 TEST_c_c (ctan, 0, plus_infty, 0.0, 1.0),
7453 TEST_c_c (ctan, 1, plus_infty, 0.0, 1.0),
7454 TEST_c_c (ctan, minus_zero, plus_infty, minus_zero, 1.0),
7455 TEST_c_c (ctan, -1, plus_infty, minus_zero, 1.0),
8847214f 7456
08198877
JM		 7457 TEST_c_c (ctan, 0, minus_infty, 0.0, -1.0),
7458 TEST_c_c (ctan, 1, minus_infty, 0.0, -1.0),
7459 TEST_c_c (ctan, minus_zero, minus_infty, minus_zero, -1.0),
7460 TEST_c_c (ctan, -1, minus_infty, minus_zero, -1.0),
8847214f 7461
08198877
JM		 7462 TEST_c_c (ctan, plus_infty, 0, qnan_value, qnan_value, INVALID_EXCEPTION),
7463 TEST_c_c (ctan, plus_infty, 2, qnan_value, qnan_value, INVALID_EXCEPTION),
7464 TEST_c_c (ctan, minus_infty, 0, qnan_value, qnan_value, INVALID_EXCEPTION),
7465 TEST_c_c (ctan, minus_infty, 2, qnan_value, qnan_value, INVALID_EXCEPTION),
7466 TEST_c_c (ctan, plus_infty, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION),
7467 TEST_c_c (ctan, plus_infty, -2, qnan_value, qnan_value, INVALID_EXCEPTION),
7468 TEST_c_c (ctan, minus_infty, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION),
7469 TEST_c_c (ctan, minus_infty, -2, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 7470
08198877
JM		 7471 TEST_c_c (ctan, qnan_value, plus_infty, 0.0, 1.0, IGNORE_ZERO_INF_SIGN),
7472 TEST_c_c (ctan, qnan_value, minus_infty, 0.0, -1.0, IGNORE_ZERO_INF_SIGN),
8847214f 7473
08198877
JM		 7474 TEST_c_c (ctan, 0, qnan_value, 0.0, qnan_value),
7475 TEST_c_c (ctan, minus_zero, qnan_value, minus_zero, qnan_value),
8847214f 7476
08198877
JM		 7477 TEST_c_c (ctan, 0.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7478 TEST_c_c (ctan, -4.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7479
08198877
JM		 7480 TEST_c_c (ctan, qnan_value, 0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7481 TEST_c_c (ctan, qnan_value, 5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7482 TEST_c_c (ctan, qnan_value, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7483 TEST_c_c (ctan, qnan_value, -0.25, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7484
08198877 7485 TEST_c_c (ctan, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 7486
08198877
JM		 7487 TEST_c_c (ctan, 0.75L, 1.25L, 0.160807785916206426725166058173438663L, 0.975363285031235646193581759755216379L),
7488 TEST_c_c (ctan, -2, -3, 0.376402564150424829275122113032269084e-2L, -1.00323862735360980144635859782192726L),
8847214f 7489
08198877
JM		 7490 TEST_c_c (ctan, 1, 45, 1.490158918874345552942703234806348520895e-39L, 1.000000000000000000000000000000000000001L, UNDERFLOW_EXCEPTION_FLOAT),
7491 TEST_c_c (ctan, 1, 47, 2.729321264492904590777293425576722354636e-41L, 1.0, UNDERFLOW_EXCEPTION_FLOAT),
bcc8d661
JM		 7492
7493#ifndef TEST_FLOAT
08198877
JM		 7494 TEST_c_c (ctan, 1, 355, 8.140551093483276762350406321792653551513e-309L, 1.0, UNDERFLOW_EXCEPTION_DOUBLE),
7495 TEST_c_c (ctan, 1, 365, 1.677892637497921890115075995898773550884e-317L, 1.0, UNDERFLOW_EXCEPTION_DOUBLE),
bcc8d661
JM		 7496#endif
7497
7498#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 7499 TEST_c_c (ctan, 1, 5680, 4.725214596136812019616700920476949798307e-4934L, 1.0, UNDERFLOW_EXCEPTION),
7500 TEST_c_c (ctan, 1, 5690, 9.739393181626937151720816611272607059057e-4943L, 1.0, UNDERFLOW_EXCEPTION),
bcc8d661
JM		 7501#endif
7502
08198877 7503 TEST_c_c (ctan, 0x3.243f6cp-1, 0, -2.287733242885645987394874673945769518150e7L, 0.0),
bcc8d661 7504
08198877 7505 TEST_c_c (ctan, 0x1p127, 1, 0.2446359391192790896381501310437708987204L, 0.9101334047676183761532873794426475906201L),
bcc8d661
JM		 7506
7507#ifndef TEST_FLOAT
08198877 7508 TEST_c_c (ctan, 0x1p1023, 1, -0.2254627924997545057926782581695274244229L, 0.8786063118883068695462540226219865087189L),
bcc8d661
JM		 7509#endif
7510
7511#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 7512 TEST_c_c (ctan, 0x1p16383L, 1, 0.1608598776370396607204448234354670036772L, 0.8133818522051542536316746743877629761488L),
bcc8d661
JM		 7513#endif
7514
08198877
JM		 7515 TEST_c_c (ctan, 50000, 50000, plus_zero, 1.0, UNDERFLOW_EXCEPTION),
7516 TEST_c_c (ctan, 50000, -50000, plus_zero, -1.0, UNDERFLOW_EXCEPTION),
7517 TEST_c_c (ctan, -50000, 50000, minus_zero, 1.0, UNDERFLOW_EXCEPTION),
7518 TEST_c_c (ctan, -50000, -50000, minus_zero, -1.0, UNDERFLOW_EXCEPTION),
7519 END_DATA (ctan)
7520 };
bcc8d661 7521
08198877
JM		 7522static void
7523ctan_test (void)
7524{
7525 errno = 0;
7526 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7527 if (errno == ENOSYS)
7528 /* Function not implemented. */
7529 return;
7530
7531 START (ctan);
7532 RUN_TEST_LOOP_c_c (ctan, ctan_test_data, );
6815fabc 7533 END (ctan, complex);
8847214f
UD		 7534}
7535
7536
08198877
JM		 7537static const struct test_c_c_data ctan_tonearest_test_data[] =
7538 {
7539 START_DATA (ctan_tonearest),
7540 TEST_c_c (ctan, 0x1.921fb6p+0, 0x1p-149, -2.287733242885645987394874673945769518150e7L, 7.334008549954377778731880988481078535821e-31L),
7541
7542#ifndef TEST_FLOAT
7543 TEST_c_c (ctan, 0x1.921fb54442d18p+0, 0x1p-1074, 1.633123935319536975596773704152891653086e16L, 1.317719414943508315995636961402669067843e-291L),
7544#endif
7545
7546#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
7547 TEST_c_c (ctan, 0x1.921fb54442d1846ap+0L, 0x1p-16445L, -3.986797629811710706723242948653362815645e19L, 5.793882568875674066286163141055208625180e-4912L),
7548#endif
7549 END_DATA (ctan_tonearest)
7550 };
7551
ca61cf32
JM		 7552static void
7553ctan_test_tonearest (void)
7554{
ca61cf32
JM		 7555 errno = 0;
7556 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7557 if (errno == ENOSYS)
7558 /* Function not implemented. */
7559 return;
7560
7561 START (ctan_tonearest);
08198877
JM		 7562 RUN_TEST_LOOP_c_c (ctan, ctan_tonearest_test_data, FE_TONEAREST);
7563 END (ctan_tonearest, complex);
7564}
ca61cf32 7565
ca61cf32 7566
08198877
JM		 7567static const struct test_c_c_data ctan_towardzero_test_data[] =
7568 {
7569 START_DATA (ctan_towardzero),
7570 TEST_c_c (ctan, 0x1.921fb6p+0, 0x1p-149, -2.287733242885645987394874673945769518150e7L, 7.334008549954377778731880988481078535821e-31L),
ca61cf32
JM		 7571
7572#ifndef TEST_FLOAT
08198877 7573 TEST_c_c (ctan, 0x1.921fb54442d18p+0, 0x1p-1074, 1.633123935319536975596773704152891653086e16L, 1.317719414943508315995636961402669067843e-291L),
ca61cf32
JM		 7574#endif
7575
7576#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7577 TEST_c_c (ctan, 0x1.921fb54442d1846ap+0L, 0x1p-16445L, -3.986797629811710706723242948653362815645e19L, 5.793882568875674066286163141055208625180e-4912L),
ca61cf32 7578#endif
08198877
JM		 7579 END_DATA (ctan_towardzero)
7580 };
ca61cf32
JM		 7581
7582static void
7583ctan_test_towardzero (void)
7584{
ca61cf32
JM		 7585 errno = 0;
7586 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7587 if (errno == ENOSYS)
7588 /* Function not implemented. */
7589 return;
7590
7591 START (ctan_towardzero);
08198877
JM		 7592 RUN_TEST_LOOP_c_c (ctan, ctan_towardzero_test_data, FE_TOWARDZERO);
7593 END (ctan_towardzero, complex);
7594}
ca61cf32 7595
ca61cf32 7596
08198877
JM		 7597static const struct test_c_c_data ctan_downward_test_data[] =
7598 {
7599 START_DATA (ctan_downward),
7600 TEST_c_c (ctan, 0x1.921fb6p+0, 0x1p-149, -2.287733242885645987394874673945769518150e7L, 7.334008549954377778731880988481078535821e-31L),
ca61cf32
JM		 7601
7602#ifndef TEST_FLOAT
08198877 7603 TEST_c_c (ctan, 0x1.921fb54442d18p+0, 0x1p-1074, 1.633123935319536975596773704152891653086e16L, 1.317719414943508315995636961402669067843e-291L),
ca61cf32
JM		 7604#endif
7605
7606#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7607 TEST_c_c (ctan, 0x1.921fb54442d1846ap+0L, 0x1p-16445L, -3.986797629811710706723242948653362815645e19L, 5.793882568875674066286163141055208625180e-4912L),
ca61cf32 7608#endif
08198877
JM		 7609 END_DATA (ctan_downward)
7610 };
ca61cf32
JM		 7611
7612static void
7613ctan_test_downward (void)
7614{
ca61cf32
JM		 7615 errno = 0;
7616 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7617 if (errno == ENOSYS)
7618 /* Function not implemented. */
7619 return;
7620
7621 START (ctan_downward);
08198877
JM		 7622 RUN_TEST_LOOP_c_c (ctan, ctan_downward_test_data, FE_DOWNWARD);
7623 END (ctan_downward, complex);
7624}
ca61cf32 7625
ca61cf32 7626
08198877
JM		 7627static const struct test_c_c_data ctan_upward_test_data[] =
7628 {
7629 START_DATA (ctan_upward),
7630 TEST_c_c (ctan, 0x1.921fb6p+0, 0x1p-149, -2.287733242885645987394874673945769518150e7L, 7.334008549954377778731880988481078535821e-31L),
ca61cf32
JM		 7631
7632#ifndef TEST_FLOAT
08198877 7633 TEST_c_c (ctan, 0x1.921fb54442d18p+0, 0x1p-1074, 1.633123935319536975596773704152891653086e16L, 1.317719414943508315995636961402669067843e-291L),
ca61cf32
JM		 7634#endif
7635
7636#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7637 TEST_c_c (ctan, 0x1.921fb54442d1846ap+0L, 0x1p-16445L, -3.986797629811710706723242948653362815645e19L, 5.793882568875674066286163141055208625180e-4912L),
ca61cf32 7638#endif
08198877
JM		 7639 END_DATA (ctan_upward)
7640 };
ca61cf32
JM		 7641
7642static void
7643ctan_test_upward (void)
7644{
ca61cf32
JM		 7645 errno = 0;
7646 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7647 if (errno == ENOSYS)
7648 /* Function not implemented. */
7649 return;
7650
7651 START (ctan_upward);
08198877
JM		 7652 RUN_TEST_LOOP_c_c (ctan, ctan_upward_test_data, FE_UPWARD);
7653 END (ctan_upward, complex);
7654}
ca61cf32 7655
ca61cf32 7656
08198877
JM		 7657static const struct test_c_c_data ctanh_test_data[] =
7658 {
7659 START_DATA (ctanh),
7660 TEST_c_c (ctanh, 0, 0, 0.0, 0.0),
7661 TEST_c_c (ctanh, 0, minus_zero, 0.0, minus_zero),
7662 TEST_c_c (ctanh, minus_zero, 0, minus_zero, 0.0),
7663 TEST_c_c (ctanh, minus_zero, minus_zero, minus_zero, minus_zero),
7664
7665 TEST_c_c (ctanh, plus_infty, 0, 1.0, 0.0),
7666 TEST_c_c (ctanh, plus_infty, 1, 1.0, 0.0),
7667 TEST_c_c (ctanh, plus_infty, minus_zero, 1.0, minus_zero),
7668 TEST_c_c (ctanh, plus_infty, -1, 1.0, minus_zero),
7669 TEST_c_c (ctanh, minus_infty, 0, -1.0, 0.0),
7670 TEST_c_c (ctanh, minus_infty, 1, -1.0, 0.0),
7671 TEST_c_c (ctanh, minus_infty, minus_zero, -1.0, minus_zero),
7672 TEST_c_c (ctanh, minus_infty, -1, -1.0, minus_zero),
7673
7674 TEST_c_c (ctanh, 0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7675 TEST_c_c (ctanh, 2, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7676 TEST_c_c (ctanh, 0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7677 TEST_c_c (ctanh, 2, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7678 TEST_c_c (ctanh, minus_zero, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7679 TEST_c_c (ctanh, -2, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7680 TEST_c_c (ctanh, minus_zero, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7681 TEST_c_c (ctanh, -2, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7682
7683 TEST_c_c (ctanh, plus_infty, qnan_value, 1.0, 0.0, IGNORE_ZERO_INF_SIGN),
7684 TEST_c_c (ctanh, minus_infty, qnan_value, -1.0, 0.0, IGNORE_ZERO_INF_SIGN),
7685
7686 TEST_c_c (ctanh, qnan_value, 0, qnan_value, 0.0),
7687 TEST_c_c (ctanh, qnan_value, minus_zero, qnan_value, minus_zero),
7688
7689 TEST_c_c (ctanh, qnan_value, 0.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7690 TEST_c_c (ctanh, qnan_value, -4.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7691
7692 TEST_c_c (ctanh, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7693 TEST_c_c (ctanh, 5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7694 TEST_c_c (ctanh, minus_zero, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7695 TEST_c_c (ctanh, -0.25, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7696
7697 TEST_c_c (ctanh, qnan_value, qnan_value, qnan_value, qnan_value),
7698
7699 TEST_c_c (ctanh, 0, M_PI_4l, 0.0, 1.0),
7700
7701 TEST_c_c (ctanh, 0.75L, 1.25L, 1.37260757053378320258048606571226857L, 0.385795952609750664177596760720790220L),
7702 TEST_c_c (ctanh, -2, -3, -0.965385879022133124278480269394560686L, 0.988437503832249372031403430350121098e-2L),
7703
7704 TEST_c_c (ctanh, 45, 1, 1.000000000000000000000000000000000000001L, 1.490158918874345552942703234806348520895e-39L, UNDERFLOW_EXCEPTION_FLOAT),
7705 TEST_c_c (ctanh, 47, 1, 1.0, 2.729321264492904590777293425576722354636e-41L, UNDERFLOW_EXCEPTION_FLOAT),
ca61cf32
JM		 7706
7707#ifndef TEST_FLOAT
08198877
JM		 7708 TEST_c_c (ctanh, 355, 1, 1.0, 8.140551093483276762350406321792653551513e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
7709 TEST_c_c (ctanh, 365, 1, 1.0, 1.677892637497921890115075995898773550884e-317L, UNDERFLOW_EXCEPTION_DOUBLE),
ca61cf32
JM		 7710#endif
7711
08198877
JM		 7712#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
7713 TEST_c_c (ctanh, 5680, 1, 1.0, 4.725214596136812019616700920476949798307e-4934L, UNDERFLOW_EXCEPTION),
7714 TEST_c_c (ctanh, 5690, 1, 1.0, 9.739393181626937151720816611272607059057e-4943L, UNDERFLOW_EXCEPTION),
ca61cf32 7715#endif
ca61cf32 7716
08198877 7717 TEST_c_c (ctanh, 0, 0x3.243f6cp-1, 0.0, -2.287733242885645987394874673945769518150e7L),
ca61cf32 7718
08198877 7719 TEST_c_c (ctanh, 1, 0x1p127, 0.9101334047676183761532873794426475906201L, 0.2446359391192790896381501310437708987204L),
ca61cf32 7720
08198877
JM		 7721#ifndef TEST_FLOAT
7722 TEST_c_c (ctanh, 1, 0x1p1023, 0.8786063118883068695462540226219865087189L, -0.2254627924997545057926782581695274244229L),
7723#endif
7724
7725#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
7726 TEST_c_c (ctanh, 1, 0x1p16383L, 0.8133818522051542536316746743877629761488L, 0.1608598776370396607204448234354670036772L),
7727#endif
7728
7729 TEST_c_c (ctanh, 50000, 50000, 1.0, plus_zero, UNDERFLOW_EXCEPTION),
7730 TEST_c_c (ctanh, 50000, -50000, 1.0, minus_zero, UNDERFLOW_EXCEPTION),
7731 TEST_c_c (ctanh, -50000, 50000, -1.0, plus_zero, UNDERFLOW_EXCEPTION),
7732 TEST_c_c (ctanh, -50000, -50000, -1.0, minus_zero, UNDERFLOW_EXCEPTION),
7733 END_DATA (ctanh)
7734 };
ca61cf32 7735
8847214f
UD		 7736static void
7737ctanh_test (void)
7738{
aaca11d8
UD		 7739 errno = 0;
7740 FUNC(ctanh) (BUILD_COMPLEX (0, 0));
7741 if (errno == ENOSYS)
7742 /* Function not implemented. */
7743 return;
7744
8847214f 7745 START (ctanh);
08198877
JM		 7746 RUN_TEST_LOOP_c_c (ctanh, ctanh_test_data, );
7747 END (ctanh, complex);
7748}
8847214f 7749
bcc8d661 7750
08198877
JM		 7751static const struct test_c_c_data ctanh_tonearest_test_data[] =
7752 {
7753 START_DATA (ctanh_tonearest),
7754 TEST_c_c (ctanh, 0x1p-149, 0x1.921fb6p+0, 7.334008549954377778731880988481078535821e-31L, -2.287733242885645987394874673945769518150e7L),
bcc8d661
JM		 7755
7756#ifndef TEST_FLOAT
08198877 7757 TEST_c_c (ctanh, 0x1p-1074, 0x1.921fb54442d18p+0, 1.317719414943508315995636961402669067843e-291L, 1.633123935319536975596773704152891653086e16L),
bcc8d661
JM		 7758#endif
7759
08198877
JM		 7760#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
7761 TEST_c_c (ctanh, 0x1p-16445L, 0x1.921fb54442d1846ap+0L, 5.793882568875674066286163141055208625180e-4912L, -3.986797629811710706723242948653362815645e19L),
bcc8d661 7762#endif
08198877
JM		 7763 END_DATA (ctanh_tonearest)
7764 };
2550dfe9 7765
ca61cf32
JM		 7766static void
7767ctanh_test_tonearest (void)
7768{
ca61cf32
JM		 7769 errno = 0;
7770 FUNC(ctanh) (BUILD_COMPLEX (0.7L, 1.2L));
7771 if (errno == ENOSYS)
7772 /* Function not implemented. */
7773 return;
7774
7775 START (ctanh_tonearest);
08198877
JM		 7776 RUN_TEST_LOOP_c_c (ctanh, ctanh_tonearest_test_data, FE_TONEAREST);
7777 END (ctanh_tonearest, complex);
7778}
ca61cf32 7779
ca61cf32 7780
08198877
JM		 7781static const struct test_c_c_data ctanh_towardzero_test_data[] =
7782 {
7783 START_DATA (ctanh_towardzero),
7784 TEST_c_c (ctanh, 0x1p-149, 0x1.921fb6p+0, 7.334008549954377778731880988481078535821e-31L, -2.287733242885645987394874673945769518150e7L),
ca61cf32
JM		 7785
7786#ifndef TEST_FLOAT
08198877 7787 TEST_c_c (ctanh, 0x1p-1074, 0x1.921fb54442d18p+0, 1.317719414943508315995636961402669067843e-291L, 1.633123935319536975596773704152891653086e16L),
ca61cf32
JM		 7788#endif
7789
7790#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7791 TEST_c_c (ctanh, 0x1p-16445L, 0x1.921fb54442d1846ap+0L, 5.793882568875674066286163141055208625180e-4912L, -3.986797629811710706723242948653362815645e19L),
ca61cf32 7792#endif
08198877
JM		 7793 END_DATA (ctanh_towardzero)
7794 };
ca61cf32
JM		 7795
7796static void
7797ctanh_test_towardzero (void)
7798{
ca61cf32
JM		 7799 errno = 0;
7800 FUNC(ctanh) (BUILD_COMPLEX (0.7L, 1.2L));
7801 if (errno == ENOSYS)
7802 /* Function not implemented. */
7803 return;
7804
7805 START (ctanh_towardzero);
08198877
JM		 7806 RUN_TEST_LOOP_c_c (ctanh, ctanh_towardzero_test_data, FE_TOWARDZERO);
7807 END (ctanh_towardzero, complex);
7808}
ca61cf32 7809
ca61cf32 7810
08198877
JM		 7811static const struct test_c_c_data ctanh_downward_test_data[] =
7812 {
7813 START_DATA (ctanh_downward),
7814 TEST_c_c (ctanh, 0x1p-149, 0x1.921fb6p+0, 7.334008549954377778731880988481078535821e-31L, -2.287733242885645987394874673945769518150e7L),
ca61cf32
JM		 7815
7816#ifndef TEST_FLOAT
08198877 7817 TEST_c_c (ctanh, 0x1p-1074, 0x1.921fb54442d18p+0, 1.317719414943508315995636961402669067843e-291L, 1.633123935319536975596773704152891653086e16L),
ca61cf32
JM		 7818#endif
7819
7820#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7821 TEST_c_c (ctanh, 0x1p-16445L, 0x1.921fb54442d1846ap+0L, 5.793882568875674066286163141055208625180e-4912L, -3.986797629811710706723242948653362815645e19L),
ca61cf32 7822#endif
08198877
JM		 7823 END_DATA (ctanh_downward)
7824 };
ca61cf32
JM		 7825
7826static void
7827ctanh_test_downward (void)
7828{
ca61cf32
JM		 7829 errno = 0;
7830 FUNC(ctanh) (BUILD_COMPLEX (0.7L, 1.2L));
7831 if (errno == ENOSYS)
7832 /* Function not implemented. */
7833 return;
7834
7835 START (ctanh_downward);
08198877
JM		 7836 RUN_TEST_LOOP_c_c (ctanh, ctanh_downward_test_data, FE_DOWNWARD);
7837 END (ctanh_downward, complex);
7838}
ca61cf32 7839
ca61cf32 7840
08198877
JM		 7841static const struct test_c_c_data ctanh_upward_test_data[] =
7842 {
7843 START_DATA (ctanh_upward),
7844 TEST_c_c (ctanh, 0x1p-149, 0x1.921fb6p+0, 7.334008549954377778731880988481078535821e-31L, -2.287733242885645987394874673945769518150e7L),
ca61cf32
JM		 7845
7846#ifndef TEST_FLOAT
08198877 7847 TEST_c_c (ctanh, 0x1p-1074, 0x1.921fb54442d18p+0, 1.317719414943508315995636961402669067843e-291L, 1.633123935319536975596773704152891653086e16L),
ca61cf32
JM		 7848#endif
7849
7850#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7851 TEST_c_c (ctanh, 0x1p-16445L, 0x1.921fb54442d1846ap+0L, 5.793882568875674066286163141055208625180e-4912L, -3.986797629811710706723242948653362815645e19L),
ca61cf32 7852#endif
08198877
JM		 7853 END_DATA (ctanh_upward)
7854 };
ca61cf32
JM		 7855
7856static void
7857ctanh_test_upward (void)
7858{
ca61cf32
JM		 7859 errno = 0;
7860 FUNC(ctanh) (BUILD_COMPLEX (0.7L, 1.2L));
7861 if (errno == ENOSYS)
7862 /* Function not implemented. */
7863 return;
7864
7865 START (ctanh_upward);
08198877 7866 RUN_TEST_LOOP_c_c (ctanh, ctanh_upward_test_data, FE_UPWARD);
ca61cf32
JM		 7867 END (ctanh_upward, complex);
7868}
7869
7870
74c57478
JM		 7871static const struct test_f_f_data erf_test_data[] =
7872 {
7873 START_DATA (erf),
7874 TEST_f_f (erf, 0, 0),
7875 TEST_f_f (erf, minus_zero, minus_zero),
7876 TEST_f_f (erf, plus_infty, 1),
7877 TEST_f_f (erf, minus_infty, -1),
7878 TEST_f_f (erf, qnan_value, qnan_value),
7879
7880 TEST_f_f (erf, 0.125L, 0.140316204801333817393029446521623398L),
7881 TEST_f_f (erf, 0.75L, 0.711155633653515131598937834591410777L),
7882 TEST_f_f (erf, 1.25L, 0.922900128256458230136523481197281140L),
7883 TEST_f_f (erf, 2.0L, 0.995322265018952734162069256367252929L),
7884 TEST_f_f (erf, 4.125L, 0.999999994576599200434933994687765914L),
7885 TEST_f_f (erf, 27.0L, 1.0L),
7886 END_DATA (erf)
7887 };
7888
8847214f
UD		 7889static void
7890erf_test (void)
7891{
7892 errno = 0;
7893 FUNC(erf) (0);
7894 if (errno == ENOSYS)
7895 /* Function not implemented. */
7896 return;
7897
7898 START (erf);
74c57478 7899 RUN_TEST_LOOP_f_f (erf, erf_test_data, );
8847214f
UD		 7900 END (erf);
7901}
7902
7903
74c57478
JM		 7904static const struct test_f_f_data erfc_test_data[] =
7905 {
7906 START_DATA (erfc),
7907 TEST_f_f (erfc, plus_infty, 0.0),
7908 TEST_f_f (erfc, minus_infty, 2.0),
7909 TEST_f_f (erfc, 0.0, 1.0),
7910 TEST_f_f (erfc, minus_zero, 1.0),
7911 TEST_f_f (erfc, qnan_value, qnan_value),
7912
7913 TEST_f_f (erfc, 0.125L, 0.859683795198666182606970553478376602L),
7914 TEST_f_f (erfc, 0.75L, 0.288844366346484868401062165408589223L),
7915 TEST_f_f (erfc, 1.25L, 0.0770998717435417698634765188027188596L),
7916 TEST_f_f (erfc, 2.0L, 0.00467773498104726583793074363274707139L),
7917 TEST_f_f (erfc, 0x1.f7303cp+1L, 2.705500297238986897105236321218861842255e-8L),
7918 TEST_f_f (erfc, 4.125L, 0.542340079956506600531223408575531062e-8L),
7919 TEST_f_f (erfc, 0x1.ffa002p+2L, 1.233585992097580296336099501489175967033e-29L),
7920 TEST_f_f (erfc, 0x1.ffffc8p+2L, 1.122671365033056305522366683719541099329e-29L),
2550dfe9 7921#ifdef TEST_LDOUBLE
74c57478 7922 /* The result can only be represented in long double. */
f964490f 7923# if LDBL_MIN_10_EXP < -319
74c57478 7924 TEST_f_f (erfc, 27.0L, 0.523704892378925568501606768284954709e-318L),
f964490f 7925# endif
7b1902cb 7926# if LDBL_MANT_DIG >= 106
74c57478 7927 TEST_f_f (erfc, 0x1.ffff56789abcdef0123456789a8p+2L, 1.123161416304655390092138725253789378459e-29L),
7b1902cb 7928# endif
2550dfe9 7929#endif
74c57478
JM		 7930 END_DATA (erfc)
7931 };
2550dfe9 7932
8847214f 7933static void
74c57478 7934erfc_test (void)
8847214f 7935{
e6d3c4a7 7936 errno = 0;
74c57478 7937 FUNC(erfc) (0);
e6d3c4a7
AJ		 7938 if (errno == ENOSYS)
7939 /* Function not implemented. */
7940 return;
7941
74c57478
JM		 7942 START (erfc);
7943 RUN_TEST_LOOP_f_f (erfc, erfc_test_data, );
7944 END (erfc);
7945}
8847214f 7946
74c57478
JM		 7947
7948static const struct test_f_f_data exp_test_data[] =
7949 {
7950 START_DATA (exp),
7951 TEST_f_f (exp, 0, 1),
7952 TEST_f_f (exp, minus_zero, 1),
8847214f 7953
15daa639 7954#ifndef TEST_INLINE
74c57478
JM		 7955 TEST_f_f (exp, plus_infty, plus_infty),
7956 TEST_f_f (exp, minus_infty, 0),
15daa639 7957#endif
74c57478
JM		 7958 TEST_f_f (exp, qnan_value, qnan_value),
7959 TEST_f_f (exp, 1, M_El),
8847214f 7960
74c57478
JM		 7961 TEST_f_f (exp, 2, M_E2l),
7962 TEST_f_f (exp, 3, M_E3l),
7963 TEST_f_f (exp, 0.75L, 2.11700001661267466854536981983709561L),
7964 TEST_f_f (exp, 50.0L, 5184705528587072464087.45332293348538L),
7965 TEST_f_f (exp, 88.72269439697265625L, 3.40233126623160774937554134772290447915e38L),
e42a38dd 7966#ifndef TEST_FLOAT
74c57478 7967 TEST_f_f (exp, 709.75L, 1.739836873264160557698252711673830393864768e+308L),
e42a38dd 7968#endif
8fb0af98 7969#if defined TEST_LDOUBLE && __LDBL_MAX_EXP__ > 1024
74c57478
JM		 7970 /* The result can only be represented in sane long double. */
7971 TEST_f_f (exp, 1000.0L, 0.197007111401704699388887935224332313e435L),
4c95adde 7972#endif
2550dfe9 7973
41498f4d 7974#if !(defined TEST_LDOUBLE && LDBL_MAX_EXP > 1024)
74c57478
JM		 7975 TEST_f_f (exp, 710, plus_infty, OVERFLOW_EXCEPTION),
7976 TEST_f_f (exp, -1234, plus_zero, UNDERFLOW_EXCEPTION),
41498f4d 7977#endif
74c57478
JM		 7978 TEST_f_f (exp, 1e5, plus_infty, OVERFLOW_EXCEPTION),
7979 TEST_f_f (exp, max_value, plus_infty, OVERFLOW_EXCEPTION),
7980 TEST_f_f (exp, -max_value, 0, UNDERFLOW_EXCEPTION),
7981 END_DATA (exp)
7982 };
7983
7984static void
7985exp_test (void)
7986{
7987 errno = 0;
7988 FUNC(exp) (0);
7989 if (errno == ENOSYS)
7990 /* Function not implemented. */
7991 return;
41bf21a1 7992
74c57478
JM		 7993 START (exp);
7994 RUN_TEST_LOOP_f_f (exp, exp_test_data, );
8847214f
UD		 7995 END (exp);
7996}
7997
7998
74c57478
JM		 7999static const struct test_f_f_data exp_tonearest_test_data[] =
8000 {
8001 START_DATA (exp_tonearest),
8002 TEST_f_f (exp, 1, M_El),
8003 TEST_f_f (exp, 2, M_E2l),
8004 TEST_f_f (exp, 3, M_E3l),
8005 END_DATA (exp_tonearest)
8006 };
8007
28afd92d
JM		 8008static void
8009exp_test_tonearest (void)
8010{
28afd92d
JM		 8011 errno = 0;
8012 FUNC(exp) (0);
8013 if (errno == ENOSYS)
8014 /* Function not implemented. */
8015 return;
8016
8017 START (exp_tonearest);
74c57478 8018 RUN_TEST_LOOP_f_f (exp, exp_tonearest_test_data, FE_TONEAREST);
28afd92d
JM		 8019 END (exp_tonearest);
8020}
8021
8022
74c57478
JM		 8023static const struct test_f_f_data exp_towardzero_test_data[] =
8024 {
8025 START_DATA (exp_towardzero),
8026 TEST_f_f (exp, 1, M_El),
8027 TEST_f_f (exp, 2, M_E2l),
8028 TEST_f_f (exp, 3, M_E3l),
8029 END_DATA (exp_towardzero)
8030 };
8031
28afd92d
JM		 8032static void
8033exp_test_towardzero (void)
8034{
28afd92d
JM		 8035 errno = 0;
8036 FUNC(exp) (0);
8037 if (errno == ENOSYS)
8038 /* Function not implemented. */
8039 return;
8040
8041 START (exp_towardzero);
74c57478 8042 RUN_TEST_LOOP_f_f (exp, exp_towardzero_test_data, FE_TOWARDZERO);
28afd92d
JM		 8043 END (exp_towardzero);
8044}
8045
8046
74c57478
JM		 8047static const struct test_f_f_data exp_downward_test_data[] =
8048 {
8049 START_DATA (exp_downward),
8050 TEST_f_f (exp, 1, M_El),
8051 TEST_f_f (exp, 2, M_E2l),
8052 TEST_f_f (exp, 3, M_E3l),
8053 END_DATA (exp_downward)
8054 };
8055
28afd92d
JM		 8056static void
8057exp_test_downward (void)
8058{
28afd92d
JM		 8059 errno = 0;
8060 FUNC(exp) (0);
8061 if (errno == ENOSYS)
8062 /* Function not implemented. */
8063 return;
8064
8065 START (exp_downward);
74c57478 8066 RUN_TEST_LOOP_f_f (exp, exp_downward_test_data, FE_DOWNWARD);
28afd92d
JM		 8067 END (exp_downward);
8068}
8069
8070
74c57478
JM		 8071static const struct test_f_f_data exp_upward_test_data[] =
8072 {
8073 START_DATA (exp_upward),
8074 TEST_f_f (exp, 1, M_El),
8075 TEST_f_f (exp, 2, M_E2l),
8076 TEST_f_f (exp, 3, M_E3l),
8077 END_DATA (exp_upward)
8078 };
8079
28afd92d
JM		 8080static void
8081exp_test_upward (void)
8082{
28afd92d
JM		 8083 errno = 0;
8084 FUNC(exp) (0);
8085 if (errno == ENOSYS)
8086 /* Function not implemented. */
8087 return;
8088
8089 START (exp_upward);
74c57478 8090 RUN_TEST_LOOP_f_f (exp, exp_upward_test_data, FE_UPWARD);
28afd92d
JM		 8091 END (exp_upward);
8092}
8093
8094
74c57478
JM		 8095static const struct test_f_f_data exp10_test_data[] =
8096 {
8097 START_DATA (exp10),
8098 TEST_f_f (exp10, 0, 1),
8099 TEST_f_f (exp10, minus_zero, 1),
8100
8101 TEST_f_f (exp10, plus_infty, plus_infty),
8102 TEST_f_f (exp10, minus_infty, 0),
8103 TEST_f_f (exp10, qnan_value, qnan_value),
8104 TEST_f_f (exp10, 3, 1000),
8105 TEST_f_f (exp10, -1, 0.1L),
8106 TEST_f_f (exp10, 36, 1.0e36L),
8107 TEST_f_f (exp10, -36, 1.0e-36L),
8108#ifndef TEST_FLOAT
8109 TEST_f_f (exp10, 305, 1.0e305L),
8110 TEST_f_f (exp10, -305, 1.0e-305L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
8111#endif
8112#if defined TEST_LDOUBLE && LDBL_MAX_10_EXP >= 4932
8113 TEST_f_f (exp10, 4932, 1.0e4932L),
8114 TEST_f_f (exp10, -4932, 1.0e-4932L, UNDERFLOW_EXCEPTION),
8115#endif
8116 TEST_f_f (exp10, 1e6, plus_infty, OVERFLOW_EXCEPTION),
8117 TEST_f_f (exp10, -1e6, 0, UNDERFLOW_EXCEPTION),
8118 TEST_f_f (exp10, max_value, plus_infty, OVERFLOW_EXCEPTION),
8119 TEST_f_f (exp10, -max_value, 0, UNDERFLOW_EXCEPTION),
8120 TEST_f_f (exp10, 0.75L, 5.62341325190349080394951039776481231L),
8121 END_DATA (exp10)
8122 };
8123
8847214f
UD		 8124static void
8125exp10_test (void)
8126{
8127 errno = 0;
8128 FUNC(exp10) (0);
8129 if (errno == ENOSYS)
8130 /* Function not implemented. */
8131 return;
8132
8133 START (exp10);
74c57478
JM		 8134 RUN_TEST_LOOP_f_f (exp10, exp10_test_data, );
8135 END (exp10);
8136}
8137
8138
8139static const struct test_f_f_data exp2_test_data[] =
8140 {
8141 START_DATA (exp2),
8142 TEST_f_f (exp2, 0, 1),
8143 TEST_f_f (exp2, minus_zero, 1),
8144 TEST_f_f (exp2, plus_infty, plus_infty),
8145 TEST_f_f (exp2, minus_infty, 0),
8146 TEST_f_f (exp2, qnan_value, qnan_value),
8147
8148 TEST_f_f (exp2, 10, 1024),
8149 TEST_f_f (exp2, -1, 0.5),
8150 TEST_f_f (exp2, 1e6, plus_infty, OVERFLOW_EXCEPTION),
8151 TEST_f_f (exp2, -1e6, 0, UNDERFLOW_EXCEPTION),
8152 TEST_f_f (exp2, max_value, plus_infty, OVERFLOW_EXCEPTION),
8153 TEST_f_f (exp2, -max_value, 0, UNDERFLOW_EXCEPTION),
8154 TEST_f_f (exp2, 0.75L, 1.68179283050742908606225095246642979L),
8847214f 8155
74c57478
JM		 8156 TEST_f_f (exp2, 100.5, 1.792728671193156477399422023278661496394e+30L),
8157 TEST_f_f (exp2, 127, 0x1p127),
8158 TEST_f_f (exp2, -149, 0x1p-149),
8847214f 8159
d8b82cad 8160#ifndef TEST_FLOAT
74c57478
JM		 8161 TEST_f_f (exp2, 1000.25, 1.274245659452564874772384918171765416737e+301L),
8162 TEST_f_f (exp2, 1023, 0x1p1023),
8163 TEST_f_f (exp2, -1074, 0x1p-1074),
9568c0c2 8164#endif
8847214f 8165
74c57478
JM		 8166#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
8167 TEST_f_f (exp2, 16383, 0x1p16383L),
8168 TEST_f_f (exp2, -16400, 0x1p-16400L),
8169#endif
8170 END_DATA (exp2)
8171 };
2550dfe9 8172
8847214f
UD		 8173static void
8174exp2_test (void)
8175{
8176 errno = 0;
8177 FUNC(exp2) (0);
8178 if (errno == ENOSYS)
8179 /* Function not implemented. */
8180 return;
8181
8182 START (exp2);
74c57478
JM		 8183 RUN_TEST_LOOP_f_f (exp2, exp2_test_data, );
8184 END (exp2);
8185}
8847214f 8186
15daa639 8187
74c57478
JM		 8188static const struct test_f_f_data expm1_test_data[] =
8189 {
8190 START_DATA (expm1),
8191 TEST_f_f (expm1, 0, 0),
8192 TEST_f_f (expm1, minus_zero, minus_zero),
8193
8194#ifndef TEST_INLINE
8195 TEST_f_f (expm1, plus_infty, plus_infty),
8196 TEST_f_f (expm1, minus_infty, -1),
8197#endif
8198 TEST_f_f (expm1, qnan_value, qnan_value),
8199
8200 TEST_f_f (expm1, 1, M_El - 1.0),
8201 TEST_f_f (expm1, 0.75L, 1.11700001661267466854536981983709561L),
8847214f 8202
74c57478 8203 TEST_f_f (expm1, 50.0L, 5.1847055285870724640864533229334853848275e+21L),
48e44791
JM		 8204
8205#ifndef TEST_FLOAT
74c57478
JM		 8206 TEST_f_f (expm1, 127.0L, 1.4302079958348104463583671072905261080748e+55L),
8207 TEST_f_f (expm1, 500.0L, 1.4035922178528374107397703328409120821806e+217L),
48e44791
JM		 8208#endif
8209
8210#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM		 8211 TEST_f_f (expm1, 11356.25L, 9.05128237311923300051376115753226014206e+4931L),
8212#endif
8213
8214 TEST_f_f (expm1, -10.0, -0.9999546000702375151484644084844394493898L),
8215 TEST_f_f (expm1, -16.0, -0.9999998874648252807408854862248209398728L),
8216 TEST_f_f (expm1, -17.0, -0.9999999586006228121483334034897228104472L),
8217 TEST_f_f (expm1, -18.0, -0.9999999847700202552873715638633707664826L),
8218 TEST_f_f (expm1, -36.0, -0.9999999999999997680477169756430611687736L),
8219 TEST_f_f (expm1, -37.0, -0.9999999999999999146695237425593420572195L),
8220 TEST_f_f (expm1, -38.0, -0.9999999999999999686086720795197037129104L),
8221 TEST_f_f (expm1, -44.0, -0.9999999999999999999221886775886620348429L),
8222 TEST_f_f (expm1, -45.0, -0.9999999999999999999713748141945060635553L),
8223 TEST_f_f (expm1, -46.0, -0.9999999999999999999894693826424461876212L),
8224 TEST_f_f (expm1, -73.0, -0.9999999999999999999999999999999802074012L),
8225 TEST_f_f (expm1, -74.0, -0.9999999999999999999999999999999927187098L),
8226 TEST_f_f (expm1, -75.0, -0.9999999999999999999999999999999973213630L),
8227 TEST_f_f (expm1, -78.0, -0.9999999999999999999999999999999998666385L),
8228 TEST_f_f (expm1, -79.0, -0.9999999999999999999999999999999999509391L),
8229 TEST_f_f (expm1, -80.0, -0.9999999999999999999999999999999999819515L),
8230 TEST_f_f (expm1, -100.0, -1.0),
8231 TEST_f_f (expm1, -1000.0, -1.0),
8232 TEST_f_f (expm1, -10000.0, -1.0),
8233 TEST_f_f (expm1, -100000.0, -1.0),
8234
8235 TEST_f_f (expm1, 100000.0, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
8236 TEST_f_f (expm1, max_value, plus_infty, OVERFLOW_EXCEPTION),
8237 TEST_f_f (expm1, -max_value, -1),
8238 END_DATA (expm1)
8239 };
2550dfe9 8240
8847214f
UD		 8241static void
8242expm1_test (void)
8243{
e6d3c4a7
AJ		 8244 errno = 0;
8245 FUNC(expm1) (0);
8246 if (errno == ENOSYS)
8247 /* Function not implemented. */
8248 return;
8249
8847214f 8250 START (expm1);
74c57478
JM		 8251 RUN_TEST_LOOP_f_f (expm1, expm1_test_data, );
8252 END (expm1);
8253}
8847214f 8254
495fd99f 8255
74c57478
JM		 8256static const struct test_f_f_data fabs_test_data[] =
8257 {
8258 START_DATA (fabs),
8259 TEST_f_f (fabs, 0, 0),
8260 TEST_f_f (fabs, minus_zero, 0),
bbc5d74d 8261
74c57478
JM		 8262 TEST_f_f (fabs, plus_infty, plus_infty),
8263 TEST_f_f (fabs, minus_infty, plus_infty),
8264 TEST_f_f (fabs, qnan_value, qnan_value),
8847214f 8265
74c57478
JM		 8266 TEST_f_f (fabs, 38.0, 38.0),
8267 TEST_f_f (fabs, -M_El, M_El),
8268 END_DATA (fabs)
8269 };
2550dfe9 8270
8847214f
UD		 8271static void
8272fabs_test (void)
8273{
8274 START (fabs);
74c57478 8275 RUN_TEST_LOOP_f_f (fabs, fabs_test_data, );
8847214f
UD		 8276 END (fabs);
8277}
8278
2550dfe9 8279
601a3a5f
JM		 8280static const struct test_ff_f_data fdim_test_data[] =
8281 {
8282 START_DATA (fdim),
8283 TEST_ff_f (fdim, 0, 0, 0),
8284 TEST_ff_f (fdim, 9, 0, 9),
8285 TEST_ff_f (fdim, 0, 9, 0),
8286 TEST_ff_f (fdim, -9, 0, 0),
8287 TEST_ff_f (fdim, 0, -9, 9),
8288
8289 TEST_ff_f (fdim, plus_infty, 9, plus_infty),
8290 TEST_ff_f (fdim, plus_infty, -9, plus_infty),
8291 TEST_ff_f (fdim, minus_infty, 9, 0),
8292 TEST_ff_f (fdim, minus_infty, -9, 0),
8293 TEST_ff_f (fdim, 9, minus_infty, plus_infty),
8294 TEST_ff_f (fdim, -9, minus_infty, plus_infty),
8295 TEST_ff_f (fdim, 9, plus_infty, 0),
8296 TEST_ff_f (fdim, -9, plus_infty, 0),
8297
8298 TEST_ff_f (fdim, 0, qnan_value, qnan_value),
8299 TEST_ff_f (fdim, 9, qnan_value, qnan_value),
8300 TEST_ff_f (fdim, -9, qnan_value, qnan_value),
8301 TEST_ff_f (fdim, qnan_value, 9, qnan_value),
8302 TEST_ff_f (fdim, qnan_value, -9, qnan_value),
8303 TEST_ff_f (fdim, plus_infty, qnan_value, qnan_value),
8304 TEST_ff_f (fdim, minus_infty, qnan_value, qnan_value),
8305 TEST_ff_f (fdim, qnan_value, plus_infty, qnan_value),
8306 TEST_ff_f (fdim, qnan_value, minus_infty, qnan_value),
8307 TEST_ff_f (fdim, qnan_value, qnan_value, qnan_value),
8308
8309 TEST_ff_f (fdim, plus_infty, plus_infty, 0),
8310 END_DATA (fdim)
8311 };
8312
8847214f
UD		 8313static void
8314fdim_test (void)
8315{
8316 START (fdim);
601a3a5f 8317 RUN_TEST_LOOP_ff_f (fdim, fdim_test_data, );
8847214f
UD		 8318 END (fdim);
8319}
8320
2550dfe9 8321
ef1bb361
JM		 8322static void
8323finite_test (void)
8324{
8325 START (finite);
8326
8327 TEST_f_b (finite, 0, 1);
8328 TEST_f_b (finite, minus_zero, 1);
8329 TEST_f_b (finite, 10, 1);
8330 TEST_f_b (finite, min_subnorm_value, 1);
8331 TEST_f_b (finite, plus_infty, 0);
8332 TEST_f_b (finite, minus_infty, 0);
67e971f1 8333 TEST_f_b (finite, qnan_value, 0);
ef1bb361
JM		 8334
8335 END (finite);
8336}
8337
8338
74c57478
JM		 8339static const struct test_f_f_data floor_test_data[] =
8340 {
8341 START_DATA (floor),
8342 TEST_f_f (floor, 0.0, 0.0),
8343 TEST_f_f (floor, minus_zero, minus_zero),
8344 TEST_f_f (floor, plus_infty, plus_infty),
8345 TEST_f_f (floor, minus_infty, minus_infty),
8346 TEST_f_f (floor, qnan_value, qnan_value),
8347
8348 TEST_f_f (floor, M_PIl, 3.0),
8349 TEST_f_f (floor, -M_PIl, -4.0),
8350
8351 TEST_f_f (floor, 0.1, 0.0),
8352 TEST_f_f (floor, 0.25, 0.0),
8353 TEST_f_f (floor, 0.625, 0.0),
8354 TEST_f_f (floor, -0.1, -1.0),
8355 TEST_f_f (floor, -0.25, -1.0),
8356 TEST_f_f (floor, -0.625, -1.0),
f964490f
RM		 8357
8358#ifdef TEST_LDOUBLE
74c57478
JM		 8359 /* The result can only be represented in long double. */
8360 TEST_f_f (floor, 4503599627370495.5L, 4503599627370495.0L),
8361 TEST_f_f (floor, 4503599627370496.25L, 4503599627370496.0L),
8362 TEST_f_f (floor, 4503599627370496.5L, 4503599627370496.0L),
8363 TEST_f_f (floor, 4503599627370496.75L, 4503599627370496.0L),
8364 TEST_f_f (floor, 4503599627370497.5L, 4503599627370497.0L),
5c68d401 8365# if LDBL_MANT_DIG > 100
74c57478
JM		 8366 TEST_f_f (floor, 4503599627370494.5000000000001L, 4503599627370494.0L),
8367 TEST_f_f (floor, 4503599627370495.5000000000001L, 4503599627370495.0L),
8368 TEST_f_f (floor, 4503599627370496.5000000000001L, 4503599627370496.0L),
5c68d401 8369# endif
f964490f 8370
74c57478
JM		 8371 TEST_f_f (floor, -4503599627370495.5L, -4503599627370496.0L),
8372 TEST_f_f (floor, -4503599627370496.25L, -4503599627370497.0L),
8373 TEST_f_f (floor, -4503599627370496.5L, -4503599627370497.0L),
8374 TEST_f_f (floor, -4503599627370496.75L, -4503599627370497.0L),
8375 TEST_f_f (floor, -4503599627370497.5L, -4503599627370498.0L),
5c68d401 8376# if LDBL_MANT_DIG > 100
74c57478
JM		 8377 TEST_f_f (floor, -4503599627370494.5000000000001L, -4503599627370495.0L),
8378 TEST_f_f (floor, -4503599627370495.5000000000001L, -4503599627370496.0L),
8379 TEST_f_f (floor, -4503599627370496.5000000000001L, -4503599627370497.0L),
5c68d401 8380# endif
f964490f 8381
74c57478
JM		 8382 TEST_f_f (floor, 9007199254740991.5L, 9007199254740991.0L),
8383 TEST_f_f (floor, 9007199254740992.25L, 9007199254740992.0L),
8384 TEST_f_f (floor, 9007199254740992.5L, 9007199254740992.0L),
8385 TEST_f_f (floor, 9007199254740992.75L, 9007199254740992.0L),
8386 TEST_f_f (floor, 9007199254740993.5L, 9007199254740993.0L),
f964490f 8387
5c68d401 8388# if LDBL_MANT_DIG > 100
74c57478
JM		 8389 TEST_f_f (floor, 9007199254740991.0000000000001L, 9007199254740991.0L),
8390 TEST_f_f (floor, 9007199254740992.0000000000001L, 9007199254740992.0L),
8391 TEST_f_f (floor, 9007199254740993.0000000000001L, 9007199254740993.0L),
8392 TEST_f_f (floor, 9007199254740991.5000000000001L, 9007199254740991.0L),
8393 TEST_f_f (floor, 9007199254740992.5000000000001L, 9007199254740992.0L),
8394 TEST_f_f (floor, 9007199254740993.5000000000001L, 9007199254740993.0L),
5c68d401
RM		 8395# endif
8396
74c57478
JM		 8397 TEST_f_f (floor, -9007199254740991.5L, -9007199254740992.0L),
8398 TEST_f_f (floor, -9007199254740992.25L, -9007199254740993.0L),
8399 TEST_f_f (floor, -9007199254740992.5L, -9007199254740993.0L),
8400 TEST_f_f (floor, -9007199254740992.75L, -9007199254740993.0L),
8401 TEST_f_f (floor, -9007199254740993.5L, -9007199254740994.0L),
f964490f 8402
5c68d401 8403# if LDBL_MANT_DIG > 100
74c57478
JM		 8404 TEST_f_f (floor, -9007199254740991.0000000000001L, -9007199254740992.0L),
8405 TEST_f_f (floor, -9007199254740992.0000000000001L, -9007199254740993.0L),
8406 TEST_f_f (floor, -9007199254740993.0000000000001L, -9007199254740994.0L),
8407 TEST_f_f (floor, -9007199254740991.5000000000001L, -9007199254740992.0L),
8408 TEST_f_f (floor, -9007199254740992.5000000000001L, -9007199254740993.0L),
8409 TEST_f_f (floor, -9007199254740993.5000000000001L, -9007199254740994.0L),
5c68d401
RM		 8410# endif
8411
74c57478
JM		 8412 TEST_f_f (floor, 72057594037927935.5L, 72057594037927935.0L),
8413 TEST_f_f (floor, 72057594037927936.25L, 72057594037927936.0L),
8414 TEST_f_f (floor, 72057594037927936.5L, 72057594037927936.0L),
8415 TEST_f_f (floor, 72057594037927936.75L, 72057594037927936.0L),
8416 TEST_f_f (floor, 72057594037927937.5L, 72057594037927937.0L),
f964490f 8417
74c57478
JM		 8418 TEST_f_f (floor, -72057594037927935.5L, -72057594037927936.0L),
8419 TEST_f_f (floor, -72057594037927936.25L, -72057594037927937.0L),
8420 TEST_f_f (floor, -72057594037927936.5L, -72057594037927937.0L),
8421 TEST_f_f (floor, -72057594037927936.75L, -72057594037927937.0L),
8422 TEST_f_f (floor, -72057594037927937.5L, -72057594037927938.0L),
f964490f 8423
74c57478
JM		 8424 TEST_f_f (floor, 10141204801825835211973625643007.5L, 10141204801825835211973625643007.0L),
8425 TEST_f_f (floor, 10141204801825835211973625643008.25L, 10141204801825835211973625643008.0L),
8426 TEST_f_f (floor, 10141204801825835211973625643008.5L, 10141204801825835211973625643008.0L),
8427 TEST_f_f (floor, 10141204801825835211973625643008.75L, 10141204801825835211973625643008.0L),
8428 TEST_f_f (floor, 10141204801825835211973625643009.5L, 10141204801825835211973625643009.0L),
94e02fc4 8429
74c57478
JM		 8430 TEST_f_f (floor, 0xf.ffffffffffffff8p+47L, 0xf.fffffffffffep+47L),
8431 TEST_f_f (floor, -0x8.000000000000004p+48L, -0x8.000000000001p+48L),
f964490f 8432#endif
74c57478
JM		 8433 END_DATA (floor)
8434 };
f964490f 8435
74c57478
JM		 8436static void
8437floor_test (void)
8438{
8439 START (floor);
8440 RUN_TEST_LOOP_f_f (floor, floor_test_data, );
8847214f
UD		 8441 END (floor);
8442}
8443
2550dfe9 8444
4f184d30
JM		 8445static const struct test_fff_f_data fma_test_data[] =
8446 {
8447 START_DATA (fma),
8448 TEST_fff_f (fma, 1.0, 2.0, 3.0, 5.0),
8449 TEST_fff_f (fma, qnan_value, 2.0, 3.0, qnan_value),
8450 TEST_fff_f (fma, 1.0, qnan_value, 3.0, qnan_value),
8451 TEST_fff_f (fma, 1.0, 2.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8452 TEST_fff_f (fma, plus_infty, 0.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8453 TEST_fff_f (fma, minus_infty, 0.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8454 TEST_fff_f (fma, 0.0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8455 TEST_fff_f (fma, 0.0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8456 TEST_fff_f (fma, plus_infty, 0.0, 1.0, qnan_value, INVALID_EXCEPTION),
8457 TEST_fff_f (fma, minus_infty, 0.0, 1.0, qnan_value, INVALID_EXCEPTION),
8458 TEST_fff_f (fma, 0.0, plus_infty, 1.0, qnan_value, INVALID_EXCEPTION),
8459 TEST_fff_f (fma, 0.0, minus_infty, 1.0, qnan_value, INVALID_EXCEPTION),
8460
8461 TEST_fff_f (fma, plus_infty, plus_infty, minus_infty, qnan_value, INVALID_EXCEPTION),
8462 TEST_fff_f (fma, minus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8463 TEST_fff_f (fma, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8464 TEST_fff_f (fma, minus_infty, minus_infty, minus_infty, qnan_value, INVALID_EXCEPTION),
8465 TEST_fff_f (fma, plus_infty, 3.5L, minus_infty, qnan_value, INVALID_EXCEPTION),
8466 TEST_fff_f (fma, minus_infty, -7.5L, minus_infty, qnan_value, INVALID_EXCEPTION),
8467 TEST_fff_f (fma, -13.5L, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8468 TEST_fff_f (fma, minus_infty, 7.5L, plus_infty, qnan_value, INVALID_EXCEPTION),
8469
8470 TEST_fff_f (fma, 1.25L, 0.75L, 0.0625L, 1.0L),
8471
8472 TEST_fff_f (fma, -max_value, -max_value, minus_infty, minus_infty),
8473 TEST_fff_f (fma, max_value / 2, max_value / 2, minus_infty, minus_infty),
8474 TEST_fff_f (fma, -max_value, max_value, plus_infty, plus_infty),
8475 TEST_fff_f (fma, max_value / 2, -max_value / 4, plus_infty, plus_infty),
8476 TEST_fff_f (fma, plus_infty, 4, plus_infty, plus_infty),
8477 TEST_fff_f (fma, 2, minus_infty, minus_infty, minus_infty),
8478 TEST_fff_f (fma, minus_infty, minus_infty, plus_infty, plus_infty),
8479 TEST_fff_f (fma, plus_infty, minus_infty, minus_infty, minus_infty),
8480
8481 TEST_fff_f (fma, plus_zero, plus_zero, plus_zero, plus_zero),
8482 TEST_fff_f (fma, plus_zero, plus_zero, minus_zero, plus_zero),
8483 TEST_fff_f (fma, plus_zero, minus_zero, plus_zero, plus_zero),
8484 TEST_fff_f (fma, plus_zero, minus_zero, minus_zero, minus_zero),
8485 TEST_fff_f (fma, minus_zero, plus_zero, plus_zero, plus_zero),
8486 TEST_fff_f (fma, minus_zero, plus_zero, minus_zero, minus_zero),
8487 TEST_fff_f (fma, minus_zero, minus_zero, plus_zero, plus_zero),
8488 TEST_fff_f (fma, minus_zero, minus_zero, minus_zero, plus_zero),
8489 TEST_fff_f (fma, 1.0, plus_zero, plus_zero, plus_zero),
8490 TEST_fff_f (fma, 1.0, plus_zero, minus_zero, plus_zero),
8491 TEST_fff_f (fma, 1.0, minus_zero, plus_zero, plus_zero),
8492 TEST_fff_f (fma, 1.0, minus_zero, minus_zero, minus_zero),
8493 TEST_fff_f (fma, -1.0, plus_zero, plus_zero, plus_zero),
8494 TEST_fff_f (fma, -1.0, plus_zero, minus_zero, minus_zero),
8495 TEST_fff_f (fma, -1.0, minus_zero, plus_zero, plus_zero),
8496 TEST_fff_f (fma, -1.0, minus_zero, minus_zero, plus_zero),
8497 TEST_fff_f (fma, plus_zero, 1.0, plus_zero, plus_zero),
8498 TEST_fff_f (fma, plus_zero, 1.0, minus_zero, plus_zero),
8499 TEST_fff_f (fma, plus_zero, -1.0, plus_zero, plus_zero),
8500 TEST_fff_f (fma, plus_zero, -1.0, minus_zero, minus_zero),
8501 TEST_fff_f (fma, minus_zero, 1.0, plus_zero, plus_zero),
8502 TEST_fff_f (fma, minus_zero, 1.0, minus_zero, minus_zero),
8503 TEST_fff_f (fma, minus_zero, -1.0, plus_zero, plus_zero),
8504 TEST_fff_f (fma, minus_zero, -1.0, minus_zero, plus_zero),
8505
8506 TEST_fff_f (fma, 1.0, 1.0, -1.0, plus_zero),
8507 TEST_fff_f (fma, 1.0, -1.0, 1.0, plus_zero),
8508 TEST_fff_f (fma, -1.0, 1.0, 1.0, plus_zero),
8509 TEST_fff_f (fma, -1.0, -1.0, -1.0, plus_zero),
8510
8511 TEST_fff_f (fma, min_value, min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8512 TEST_fff_f (fma, min_value, min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8513 TEST_fff_f (fma, min_value, -min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8514 TEST_fff_f (fma, min_value, -min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8515 TEST_fff_f (fma, -min_value, min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8516 TEST_fff_f (fma, -min_value, min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8517 TEST_fff_f (fma, -min_value, -min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8518 TEST_fff_f (fma, -min_value, -min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8519
8520 TEST_fff_f (fma, max_value, max_value, min_value, plus_infty, OVERFLOW_EXCEPTION),
8521 TEST_fff_f (fma, max_value, max_value, -min_value, plus_infty, OVERFLOW_EXCEPTION),
8522 TEST_fff_f (fma, max_value, -max_value, min_value, minus_infty, OVERFLOW_EXCEPTION),
8523 TEST_fff_f (fma, max_value, -max_value, -min_value, minus_infty, OVERFLOW_EXCEPTION),
8524 TEST_fff_f (fma, -max_value, max_value, min_value, minus_infty, OVERFLOW_EXCEPTION),
8525 TEST_fff_f (fma, -max_value, max_value, -min_value, minus_infty, OVERFLOW_EXCEPTION),
8526 TEST_fff_f (fma, -max_value, -max_value, min_value, plus_infty, OVERFLOW_EXCEPTION),
8527 TEST_fff_f (fma, -max_value, -max_value, -min_value, plus_infty, OVERFLOW_EXCEPTION),
a0c2940d 8528
5e908464 8529#if defined (TEST_FLOAT) && FLT_MANT_DIG == 24
4f184d30
JM		 8530 TEST_fff_f (fma, 0x1.7ff8p+13, 0x1.000002p+0, 0x1.ffffp-24, 0x1.7ff802p+13),
8531 TEST_fff_f (fma, 0x1.fffp+0, 0x1.00001p+0, -0x1.fffp+0, 0x1.fffp-20),
8532 TEST_fff_f (fma, 0x1.9abcdep+127, 0x0.9abcdep-126, -0x1.f08948p+0, 0x1.bb421p-25),
8533 TEST_fff_f (fma, 0x1.9abcdep+100, 0x0.9abcdep-126, -0x1.f08948p-27, 0x1.bb421p-52),
8534 TEST_fff_f (fma, 0x1.fffffep+127, 0x1.001p+0, -0x1.fffffep+127, 0x1.fffffep+115),
8535 TEST_fff_f (fma, -0x1.fffffep+127, 0x1.fffffep+0, 0x1.fffffep+127, -0x1.fffffap+127),
8536 TEST_fff_f (fma, 0x1.fffffep+127, 2.0, -0x1.fffffep+127, 0x1.fffffep+127),
8537 TEST_fff_f (fma, 0x1.4p-126, 0x1.000004p-1, 0x1p-128, 0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8538 TEST_fff_f (fma, -0x1.4p-126, 0x1.000004p-1, -0x1p-128, -0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8539 TEST_fff_f (fma, 0x1.fffff8p-126, 0x1.000002p-1, 0x1p-149, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8540 TEST_fff_f (fma, -0x1.fffff8p-126, 0x1.000002p-1, -0x1p-149, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8541 TEST_fff_f (fma, 0x1p-149, 0x1p-1, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION),
8542 TEST_fff_f (fma, -0x1p-149, 0x1p-1, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION),
8543 TEST_fff_f (fma, 0x1p-149, 0x1.1p-1, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION),
8544 TEST_fff_f (fma, -0x1p-149, 0x1.1p-1, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION),
8545 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p127, 0x1p127),
8546 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p127, 0x1p127),
8547 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p127, -0x1p127),
8548 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p127, -0x1p127),
8549 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-126, 0x1p-126),
8550 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-126, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8551 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-126, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8552 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-126, -0x1p-126),
8553 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8554 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8555 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8556 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8557 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
8558 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
8559 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
8560 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
8561 TEST_fff_f (fma, 0x0.fffp0, 0x0.fffp0, -0x0.ffep0, 0x1p-24),
8562 TEST_fff_f (fma, 0x0.fffp0, -0x0.fffp0, 0x0.ffep0, -0x1p-24),
8563 TEST_fff_f (fma, -0x0.fffp0, 0x0.fffp0, 0x0.ffep0, -0x1p-24),
8564 TEST_fff_f (fma, -0x0.fffp0, -0x0.fffp0, -0x0.ffep0, 0x1p-24),
8565 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p127, 0x1p127),
8566 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p127, 0x1p127),
8567 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p127, -0x1p127),
8568 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p127, -0x1p127),
8569 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p103, 0x1p103),
8570 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p103, 0x1p103),
8571 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p103, -0x1p103),
8572 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p103, -0x1p103),
5e908464
JJ		 8573#endif
8574#if defined (TEST_DOUBLE) && DBL_MANT_DIG == 53
4f184d30
JM		 8575 TEST_fff_f (fma, 0x1.7fp+13, 0x1.0000000000001p+0, 0x1.ffep-48, 0x1.7f00000000001p+13),
8576 TEST_fff_f (fma, 0x1.fffp+0, 0x1.0000000000001p+0, -0x1.fffp+0, 0x1.fffp-52),
8577 TEST_fff_f (fma, 0x1.0000002p+0, 0x1.ffffffcp-1, 0x1p-300, 1.0),
8578 TEST_fff_f (fma, 0x1.0000002p+0, 0x1.ffffffcp-1, -0x1p-300, 0x1.fffffffffffffp-1),
8579 TEST_fff_f (fma, 0x1.deadbeef2feedp+1023, 0x0.deadbeef2feedp-1022, -0x1.a05f8c01a4bfbp+1, 0x1.0989687bc9da4p-53),
8580 TEST_fff_f (fma, 0x1.deadbeef2feedp+900, 0x0.deadbeef2feedp-1022, -0x1.a05f8c01a4bfbp-122, 0x1.0989687bc9da4p-176),
8581 TEST_fff_f (fma, 0x1.fffffffffffffp+1023, 0x1.001p+0, -0x1.fffffffffffffp+1023, 0x1.fffffffffffffp+1011),
8582 TEST_fff_f (fma, -0x1.fffffffffffffp+1023, 0x1.fffffffffffffp+0, 0x1.fffffffffffffp+1023, -0x1.ffffffffffffdp+1023),
8583 TEST_fff_f (fma, 0x1.fffffffffffffp+1023, 2.0, -0x1.fffffffffffffp+1023, 0x1.fffffffffffffp+1023),
8584 TEST_fff_f (fma, 0x1.6a09e667f3bccp-538, 0x1.6a09e667f3bccp-538, 0.0, 0.0, UNDERFLOW_EXCEPTION),
8585 TEST_fff_f (fma, 0x1.deadbeef2feedp-495, 0x1.deadbeef2feedp-495, -0x1.bf86a5786a574p-989, 0x0.0000042625a1fp-1022, UNDERFLOW_EXCEPTION),
8586 TEST_fff_f (fma, 0x1.deadbeef2feedp-503, 0x1.deadbeef2feedp-503, -0x1.bf86a5786a574p-1005, 0x0.0000000004262p-1022, UNDERFLOW_EXCEPTION),
8587 TEST_fff_f (fma, 0x1p-537, 0x1p-538, 0x1p-1074, 0x0.0000000000002p-1022, UNDERFLOW_EXCEPTION),
8588 TEST_fff_f (fma, 0x1.7fffff8p-968, 0x1p-106, 0x0.000001p-1022, 0x0.0000010000001p-1022, UNDERFLOW_EXCEPTION),
8589 TEST_fff_f (fma, 0x1.4000004p-967, 0x1p-106, 0x0.000001p-1022, 0x0.0000010000003p-1022, UNDERFLOW_EXCEPTION),
8590 TEST_fff_f (fma, 0x1.4p-967, -0x1p-106, -0x0.000001p-1022, -0x0.0000010000002p-1022, UNDERFLOW_EXCEPTION),
8591 TEST_fff_f (fma, -0x1.19cab66d73e17p-959, 0x1.c7108a8c5ff51p-107, -0x0.80b0ad65d9b64p-1022, -0x0.80b0ad65d9d59p-1022, UNDERFLOW_EXCEPTION),
8592 TEST_fff_f (fma, -0x1.d2eaed6e8e9d3p-979, -0x1.4e066c62ac9ddp-63, -0x0.9245e6b003454p-1022, -0x0.9245c09c5fb5dp-1022, UNDERFLOW_EXCEPTION),
8593 TEST_fff_f (fma, 0x1.153d650bb9f06p-907, 0x1.2d01230d48407p-125, -0x0.b278d5acfc3cp-1022, -0x0.b22757123bbe9p-1022, UNDERFLOW_EXCEPTION),
8594 TEST_fff_f (fma, -0x1.fffffffffffffp-711, 0x1.fffffffffffffp-275, 0x1.fffffe00007ffp-983, 0x1.7ffffe00007ffp-983),
8595 TEST_fff_f (fma, 0x1.4p-1022, 0x1.0000000000002p-1, 0x1p-1024, 0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8596 TEST_fff_f (fma, -0x1.4p-1022, 0x1.0000000000002p-1, -0x1p-1024, -0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8597 TEST_fff_f (fma, 0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, 0x1p-1074, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8598 TEST_fff_f (fma, -0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, -0x1p-1074, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8599 TEST_fff_f (fma, 0x1p-1074, 0x1p-1, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION),
8600 TEST_fff_f (fma, -0x1p-1074, 0x1p-1, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION),
8601 TEST_fff_f (fma, 0x1p-1074, 0x1.1p-1, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION),
8602 TEST_fff_f (fma, -0x1p-1074, 0x1.1p-1, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION),
8603 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p1023, 0x1p1023),
8604 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p1023, 0x1p1023),
8605 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p1023, -0x1p1023),
8606 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p1023, -0x1p1023),
8607 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1022, 0x1p-1022),
8608 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1022, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8609 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1022, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8610 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1022, -0x1p-1022),
8611 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8612 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8613 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8614 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8615 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
8616 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
8617 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
8618 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
8619 TEST_fff_f (fma, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8620 TEST_fff_f (fma, 0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8621 TEST_fff_f (fma, -0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8622 TEST_fff_f (fma, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8623 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
8624 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
8625 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
8626 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
8627 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p970, 0x1p970),
8628 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p970, 0x1p970),
8629 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p970, -0x1p970),
8630 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p970, -0x1p970),
3e692e05
JJ		 8631#endif
8632#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 64
4f184d30
JM		 8633 TEST_fff_f (fma, -0x8.03fcp+3696L, 0xf.fffffffffffffffp-6140L, 0x8.3ffffffffffffffp-2450L, -0x8.01ecp-2440L),
8634 TEST_fff_f (fma, 0x9.fcp+2033L, -0x8.000e1f000ff800fp-3613L, -0xf.fffffffffffc0ffp-1579L, -0xd.fc119fb093ed092p-1577L),
8635 TEST_fff_f (fma, 0xc.7fc000003ffffffp-1194L, 0x8.1e0003fffffffffp+15327L, -0x8.fffep+14072L, 0xc.ae9f164020effffp+14136L),
8636 TEST_fff_f (fma, -0x8.0001fc000000003p+1798L, 0xcp-2230L, 0x8.f7e000000000007p-468L, -0xc.0002f9ffee10404p-429L),
8637 TEST_fff_f (fma, 0xc.0000000000007ffp+10130L, -0x8.000000000000001p+4430L, 0xc.07000000001ffffp+14513L, -0xb.fffffffffffd7e4p+14563L),
8638 TEST_fff_f (fma, 0xb.ffffp-4777L, 0x8.000000fffffffffp-11612L, -0x0.3800fff8p-16385L, 0x5.c7fe80c7ffeffffp-16385L, UNDERFLOW_EXCEPTION),
8639 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000004p-1L, 0x1p-16384L, 0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8640 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000004p-1L, -0x1p-16384L, -0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8641 TEST_fff_f (fma, 0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, 0x1p-16445L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8642 TEST_fff_f (fma, -0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, -0x1p-16445L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8643 TEST_fff_f (fma, 0x1p-16445L, 0x1p-1L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
8644 TEST_fff_f (fma, -0x1p-16445L, 0x1p-1L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8645 TEST_fff_f (fma, 0x1p-16445L, 0x1.1p-1L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
8646 TEST_fff_f (fma, -0x1p-16445L, 0x1.1p-1L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8647 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p16383L, 0x1p16383L),
8648 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p16383L, 0x1p16383L),
8649 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p16383L, -0x1p16383L),
8650 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p16383L, -0x1p16383L),
8651 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16382L, 0x1p-16382L),
8652 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8653 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8654 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16382L, -0x1p-16382L),
8655 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8656 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8657 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8658 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8659 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
8660 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
8661 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
8662 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
8663 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
8664 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
8665 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
8666 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
8667 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
8668 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
8669 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
8670 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
8671 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
8672 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
8673 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
8674 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
9ff8d36f 8675#endif
7c08a05c 8676#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 113
4f184d30
JM		 8677 TEST_fff_f (fma, 0x1.bb2de33e02ccbbfa6e245a7c1f71p-2584L, -0x1.6b500daf0580d987f1bc0cadfcddp-13777L, 0x1.613cd91d9fed34b33820e5ab9d8dp-16378L, -0x1.3a79fb50eb9ce887cffa0f09bd9fp-16360L),
8678 TEST_fff_f (fma, -0x1.f949b880cacb0f0c61540105321dp-5954L, -0x1.3876cec84b4140f3bd6198731b7ep-10525L, -0x0.a5dc1c6cfbc498c54fb0b504bf19p-16382L, -0x0.a5dc1c6cfbc498c54fb0b5038abbp-16382L, UNDERFLOW_EXCEPTION),
8679 TEST_fff_f (fma, -0x1.0000fffffffffp-16221L, 0x1.0000001fffff8007fep-239L, 0x0.ff87ffffffffffffe000003fffffp-16382L, 0x0.ff87ffffffffffffdffc003bff7fp-16382L, UNDERFLOW_EXCEPTION),
8680 TEST_fff_f (fma, -0x1.ac79c9376ef447f3827c9e9de008p-2228L, -0x1.5ba830022b6139e21fbe7270cad8p-6314L, 0x1.e8282b6a26bb6a9daf5c8e73e9f9p-8616L, 0x1.22f14a0253878a730cd1aee373adp-8541L),
8681 TEST_fff_f (fma, -0x1.c69749ec574caaa2ab8e97ddb9f3p+2652L, 0x1.f34235ff9d095449c29b4831b62dp+3311L, 0x1.fbe4302df23354dbd0c4d3cfe606p+5879L, -0x1.bb473bfdfb7a6e18886ce6e57eafp+5964L),
8682 TEST_fff_f (fma, -0x1.ca8835fc6ecfb5398625fc891be5p-1686L, 0x1.621e1972bbe2180e5be9dd7d8df5p-7671L, -0x1.7d2d21b73b52cf20dec2a83902a4p-9395L, -0x1.3d2322191c9c88bc68a62ab8042cp-9356L),
8683 TEST_fff_f (fma, -0x1.55cff679ec49c2541fab41fc843ep-11819L, 0x1.e60e9f464f9e8df0509647c7c971p+12325L, 0x1.eaa2a7649d765c2f564f7a5beca7p+454L, -0x1.447e29fa7e406a285f4e350fcf86p+507L),
8684 TEST_fff_f (fma, 0x1.f0e7b1454908576f2537d863cf9bp+11432L, 0x1.cdce52f09d4ca76e68706f34b5d5p-1417L, -0x1.2e986187c70f146235ea2066e486p+9979L, 0x1.c030dad3cc5643f3dd0f5619f661p+10016L),
8685 TEST_fff_f (fma, 0x1.f102f7da4a57a3a4aab620e29452p-3098L, -0x1.cc06a4ff40248f9e2dcc4b6afd84p-11727L, 0x1.d512a11126b5ac8ed8973b8580c8p-14849L, -0x1.be8f1cf737ab4d1c31c54f5ec23bp-14824L),
8686 TEST_fff_f (fma, -0x1.fc47ac7434b993cd8dcb2b431f25p-3816L, 0x1.fbc9750da8468852d84558e1db6dp-5773L, -0x1.00a98abf783f75c40fe5b7a37d86p-9607L, -0x1.f81917b166f45e763cfcc057e2adp-9588L),
8687 TEST_fff_f (fma, 0x1.00000000000007ffffffffffffffp-9045L, -0x1.ffffffffffff80000001ffffffffp+4773L, -0x1.f8p-4316L, -0x1.00000000000f88000000fffffdffp-4271L),
8688 TEST_fff_f (fma, 0x1.4e922764c90701d4a2f21d01893dp-8683L, -0x1.955a12e2d7c9447c27fa022fc865p+212L, -0x1.e9634462eaef96528b90b6944578p-8521L, -0x1.08e1783184a371943d3598e10865p-8470L),
8689 TEST_fff_f (fma, 0x1.801181509c03bdbef10d6165588cp-15131L, 0x1.ad86f8e57d3d40bfa8007780af63p-368L, -0x1.6e9df0dab1c9f1d7a6043c390741p-15507L, 0x1.417c9b2b15e2ad57dc9e0e920844p-15498L),
8690 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, 0x1p-16384L, 0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
8691 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, -0x1p-16384L, -0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
8692 TEST_fff_f (fma, 0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, 0x1p-16494L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8693 TEST_fff_f (fma, -0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, -0x1p-16494L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8694 TEST_fff_f (fma, 0x1p-16494L, 0x1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
8695 TEST_fff_f (fma, -0x1p-16494L, 0x1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8696 TEST_fff_f (fma, 0x1p-16494L, 0x1.1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
8697 TEST_fff_f (fma, -0x1p-16494L, 0x1.1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8698 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p16383L, 0x1p16383L),
8699 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p16383L, 0x1p16383L),
8700 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p16383L, -0x1p16383L),
8701 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p16383L, -0x1p16383L),
8702 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16382L, 0x1p-16382L),
8703 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8704 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8705 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16382L, -0x1p-16382L),
8706 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8707 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8708 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8709 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8710 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
8711 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
8712 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
8713 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
8714 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
8715 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
8716 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
8717 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
8718 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
8719 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
8720 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
8721 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
8722 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
8723 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
8724 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
8725 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
8726#endif
8727 END_DATA (fma)
8728 };
8847214f 8729
8ec5b013 8730static void
4f184d30 8731fma_test (void)
8ec5b013 8732{
4f184d30
JM		 8733 START (fma);
8734 RUN_TEST_LOOP_fff_f (fma, fma_test_data, );
8735 END (fma);
8736}
8ec5b013 8737
8ec5b013 8738
4f184d30
JM		 8739static const struct test_fff_f_data fma_towardzero_test_data[] =
8740 {
8741 START_DATA (fma_towardzero),
8742 TEST_fff_f (fma, plus_zero, plus_zero, plus_zero, plus_zero),
8743 TEST_fff_f (fma, plus_zero, plus_zero, minus_zero, plus_zero),
8744 TEST_fff_f (fma, plus_zero, minus_zero, plus_zero, plus_zero),
8745 TEST_fff_f (fma, plus_zero, minus_zero, minus_zero, minus_zero),
8746 TEST_fff_f (fma, minus_zero, plus_zero, plus_zero, plus_zero),
8747 TEST_fff_f (fma, minus_zero, plus_zero, minus_zero, minus_zero),
8748 TEST_fff_f (fma, minus_zero, minus_zero, plus_zero, plus_zero),
8749 TEST_fff_f (fma, minus_zero, minus_zero, minus_zero, plus_zero),
8750 TEST_fff_f (fma, 1.0, plus_zero, plus_zero, plus_zero),
8751 TEST_fff_f (fma, 1.0, plus_zero, minus_zero, plus_zero),
8752 TEST_fff_f (fma, 1.0, minus_zero, plus_zero, plus_zero),
8753 TEST_fff_f (fma, 1.0, minus_zero, minus_zero, minus_zero),
8754 TEST_fff_f (fma, -1.0, plus_zero, plus_zero, plus_zero),
8755 TEST_fff_f (fma, -1.0, plus_zero, minus_zero, minus_zero),
8756 TEST_fff_f (fma, -1.0, minus_zero, plus_zero, plus_zero),
8757 TEST_fff_f (fma, -1.0, minus_zero, minus_zero, plus_zero),
8758 TEST_fff_f (fma, plus_zero, 1.0, plus_zero, plus_zero),
8759 TEST_fff_f (fma, plus_zero, 1.0, minus_zero, plus_zero),
8760 TEST_fff_f (fma, plus_zero, -1.0, plus_zero, plus_zero),
8761 TEST_fff_f (fma, plus_zero, -1.0, minus_zero, minus_zero),
8762 TEST_fff_f (fma, minus_zero, 1.0, plus_zero, plus_zero),
8763 TEST_fff_f (fma, minus_zero, 1.0, minus_zero, minus_zero),
8764 TEST_fff_f (fma, minus_zero, -1.0, plus_zero, plus_zero),
8765 TEST_fff_f (fma, minus_zero, -1.0, minus_zero, plus_zero),
8766
8767 TEST_fff_f (fma, 1.0, 1.0, -1.0, plus_zero),
8768 TEST_fff_f (fma, 1.0, -1.0, 1.0, plus_zero),
8769 TEST_fff_f (fma, -1.0, 1.0, 1.0, plus_zero),
8770 TEST_fff_f (fma, -1.0, -1.0, -1.0, plus_zero),
8771
8772 TEST_fff_f (fma, min_value, min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8773 TEST_fff_f (fma, min_value, min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8774 TEST_fff_f (fma, min_value, -min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8775 TEST_fff_f (fma, min_value, -min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8776 TEST_fff_f (fma, -min_value, min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8777 TEST_fff_f (fma, -min_value, min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8778 TEST_fff_f (fma, -min_value, -min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8779 TEST_fff_f (fma, -min_value, -min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8627a232 8780
7184dcdf 8781#if !(defined TEST_LDOUBLE && LDBL_MANT_DIG == 106) /* Bug 13304. */
4f184d30
JM		 8782 TEST_fff_f (fma, max_value, max_value, min_value, max_value, OVERFLOW_EXCEPTION),
8783 TEST_fff_f (fma, max_value, max_value, -min_value, max_value, OVERFLOW_EXCEPTION),
8784 TEST_fff_f (fma, max_value, -max_value, min_value, -max_value, OVERFLOW_EXCEPTION),
8785 TEST_fff_f (fma, max_value, -max_value, -min_value, -max_value, OVERFLOW_EXCEPTION),
8786 TEST_fff_f (fma, -max_value, max_value, min_value, -max_value, OVERFLOW_EXCEPTION),
8787 TEST_fff_f (fma, -max_value, max_value, -min_value, -max_value, OVERFLOW_EXCEPTION),
8788 TEST_fff_f (fma, -max_value, -max_value, min_value, max_value, OVERFLOW_EXCEPTION),
8789 TEST_fff_f (fma, -max_value, -max_value, -min_value, max_value, OVERFLOW_EXCEPTION),
7184dcdf 8790#endif
a0c2940d 8791
8627a232 8792#if defined (TEST_FLOAT) && FLT_MANT_DIG == 24
4f184d30
JM		 8793 TEST_fff_f (fma, 0x1.4p-126, 0x1.000004p-1, 0x1p-128, 0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8794 TEST_fff_f (fma, -0x1.4p-126, 0x1.000004p-1, -0x1p-128, -0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8795 TEST_fff_f (fma, 0x1.fffff8p-126, 0x1.000002p-1, 0x1p-149, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8796 TEST_fff_f (fma, -0x1.fffff8p-126, 0x1.000002p-1, -0x1p-149, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8797 TEST_fff_f (fma, 0x1p-149, 0x1p-1, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8798 TEST_fff_f (fma, -0x1p-149, 0x1p-1, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8799 TEST_fff_f (fma, 0x1p-149, 0x1.1p-1, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8800 TEST_fff_f (fma, -0x1p-149, 0x1.1p-1, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8801 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p127, 0x1p127),
8802 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p127, 0x0.ffffffp127),
8803 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p127, -0x0.ffffffp127),
8804 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p127, -0x1p127),
8805 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-126, 0x1p-126),
8806 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8807 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8808 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-126, -0x1p-126),
8809 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8810 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x0.fffffep-126, 0x0.fffffcp-126, UNDERFLOW_EXCEPTION),
8811 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x0.fffffep-126, -0x0.fffffcp-126, UNDERFLOW_EXCEPTION),
8812 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8813 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
8814 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-149, plus_zero, UNDERFLOW_EXCEPTION),
8815 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-149, minus_zero, UNDERFLOW_EXCEPTION),
8816 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
8817 TEST_fff_f (fma, 0x0.fffp0, 0x0.fffp0, -0x0.ffep0, 0x1p-24),
8818 TEST_fff_f (fma, 0x0.fffp0, -0x0.fffp0, 0x0.ffep0, -0x1p-24),
8819 TEST_fff_f (fma, -0x0.fffp0, 0x0.fffp0, 0x0.ffep0, -0x1p-24),
8820 TEST_fff_f (fma, -0x0.fffp0, -0x0.fffp0, -0x0.ffep0, 0x1p-24),
8821 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p127, 0x1p127),
8822 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p127, 0x0.ffffffp127),
8823 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p127, -0x0.ffffffp127),
8824 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p127, -0x1p127),
8825 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p103, 0x1p103),
8826 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p103, 0x0.ffffffp103),
8827 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p103, -0x0.ffffffp103),
8828 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p103, -0x1p103),
8627a232
JM		 8829#endif
8830#if defined (TEST_DOUBLE) && DBL_MANT_DIG == 53
4f184d30
JM		 8831 TEST_fff_f (fma, 0x1.4p-1022, 0x1.0000000000002p-1, 0x1p-1024, 0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8832 TEST_fff_f (fma, -0x1.4p-1022, 0x1.0000000000002p-1, -0x1p-1024, -0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8833 TEST_fff_f (fma, 0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, 0x1p-1074, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8834 TEST_fff_f (fma, -0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, -0x1p-1074, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8835 TEST_fff_f (fma, 0x1p-1074, 0x1p-1, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8836 TEST_fff_f (fma, -0x1p-1074, 0x1p-1, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8837 TEST_fff_f (fma, 0x1p-1074, 0x1.1p-1, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8838 TEST_fff_f (fma, -0x1p-1074, 0x1.1p-1, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8839 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p1023, 0x1p1023),
8840 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p1023, 0x0.fffffffffffff8p1023),
8841 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p1023, -0x0.fffffffffffff8p1023),
8842 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p1023, -0x1p1023),
8843 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1022, 0x1p-1022),
8844 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8845 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8846 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1022, -0x1p-1022),
8847 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8848 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.ffffffffffffep-1022, UNDERFLOW_EXCEPTION),
8849 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.ffffffffffffep-1022, UNDERFLOW_EXCEPTION),
8850 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8851 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
8852 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1074, plus_zero, UNDERFLOW_EXCEPTION),
8853 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1074, minus_zero, UNDERFLOW_EXCEPTION),
8854 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
8855 TEST_fff_f (fma, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8856 TEST_fff_f (fma, 0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8857 TEST_fff_f (fma, -0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8858 TEST_fff_f (fma, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8859 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
8860 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p1023, 0x0.fffffffffffff8p1023),
8861 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p1023, -0x0.fffffffffffff8p1023),
8862 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
8863 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p970, 0x1p970),
8864 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p970, 0x0.fffffffffffff8p970),
8865 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p970, -0x0.fffffffffffff8p970),
8866 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p970, -0x1p970),
8627a232
JM		 8867#endif
8868#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 64
4f184d30
JM		 8869 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000004p-1L, 0x1p-16384L, 0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8870 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000004p-1L, -0x1p-16384L, -0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8871 TEST_fff_f (fma, 0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8872 TEST_fff_f (fma, -0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8873 TEST_fff_f (fma, 0x1p-16445L, 0x1p-1L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8874 TEST_fff_f (fma, -0x1p-16445L, 0x1p-1L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8875 TEST_fff_f (fma, 0x1p-16445L, 0x1.1p-1L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8876 TEST_fff_f (fma, -0x1p-16445L, 0x1.1p-1L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8877 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p16383L, 0x1p16383L),
8878 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p16383L, 0x0.ffffffffffffffffp16383L),
8879 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p16383L, -0x0.ffffffffffffffffp16383L),
8880 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p16383L, -0x1p16383L),
8881 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16382L, 0x1p-16382L),
8882 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8883 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8884 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16382L, -0x1p-16382L),
8885 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8886 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffcp-16382L, UNDERFLOW_EXCEPTION),
8887 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffcp-16382L, UNDERFLOW_EXCEPTION),
8888 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8889 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
8890 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16445L, plus_zero, UNDERFLOW_EXCEPTION),
8891 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16445L, minus_zero, UNDERFLOW_EXCEPTION),
8892 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
8893 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
8894 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
8895 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
8896 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
8897 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
8898 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16383L, 0x0.ffffffffffffffffp16383L),
8899 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16383L, -0x0.ffffffffffffffffp16383L),
8900 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
8901 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
8902 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16319L, 0x0.ffffffffffffffffp16319L),
8903 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16319L, -0x0.ffffffffffffffffp16319L),
8904 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
8627a232
JM		 8905#endif
8906#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 113
4f184d30
JM		 8907 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, 0x1p-16384L, 0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
8908 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, -0x1p-16384L, -0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
8909 TEST_fff_f (fma, 0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8910 TEST_fff_f (fma, -0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8911 TEST_fff_f (fma, 0x1p-16494L, 0x1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8912 TEST_fff_f (fma, -0x1p-16494L, 0x1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8913 TEST_fff_f (fma, 0x1p-16494L, 0x1.1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8914 TEST_fff_f (fma, -0x1p-16494L, 0x1.1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8915 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p16383L, 0x1p16383L),
8916 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p16383L, 0x0.ffffffffffffffffffffffffffff8p16383L),
8917 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p16383L, -0x0.ffffffffffffffffffffffffffff8p16383L),
8918 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p16383L, -0x1p16383L),
8919 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16382L, 0x1p-16382L),
8920 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8921 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8922 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16382L, -0x1p-16382L),
8923 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8924 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.fffffffffffffffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8925 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.fffffffffffffffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8926 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8927 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
8928 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16494L, plus_zero, UNDERFLOW_EXCEPTION),
8929 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16494L, minus_zero, UNDERFLOW_EXCEPTION),
8930 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
8931 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
8932 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
8933 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
8934 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
8935 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
8936 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x0.ffffffffffffffffffffffffffff8p16383L),
8937 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x0.ffffffffffffffffffffffffffff8p16383L),
8938 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
8939 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
8940 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x0.ffffffffffffffffffffffffffff8p16319L),
8941 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x0.ffffffffffffffffffffffffffff8p16319L),
8942 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
8943#endif
8944 END_DATA (fma_towardzero)
8945 };
8ec5b013
JM		 8946
8947static void
4f184d30 8948fma_test_towardzero (void)
8ec5b013 8949{
4f184d30
JM		 8950 START (fma_towardzero);
8951 RUN_TEST_LOOP_fff_f (fma, fma_towardzero_test_data, FE_TOWARDZERO);
8952 END (fma_towardzero);
8953}
8ec5b013 8954
8ec5b013 8955
4f184d30
JM		 8956static const struct test_fff_f_data fma_downward_test_data[] =
8957 {
8958 START_DATA (fma_downward),
8959 TEST_fff_f (fma, plus_zero, plus_zero, plus_zero, plus_zero),
8960 TEST_fff_f (fma, plus_zero, plus_zero, minus_zero, minus_zero),
8961 TEST_fff_f (fma, plus_zero, minus_zero, plus_zero, minus_zero),
8962 TEST_fff_f (fma, plus_zero, minus_zero, minus_zero, minus_zero),
8963 TEST_fff_f (fma, minus_zero, plus_zero, plus_zero, minus_zero),
8964 TEST_fff_f (fma, minus_zero, plus_zero, minus_zero, minus_zero),
8965 TEST_fff_f (fma, minus_zero, minus_zero, plus_zero, plus_zero),
8966 TEST_fff_f (fma, minus_zero, minus_zero, minus_zero, minus_zero),
8967 TEST_fff_f (fma, 1.0, plus_zero, plus_zero, plus_zero),
8968 TEST_fff_f (fma, 1.0, plus_zero, minus_zero, minus_zero),
8969 TEST_fff_f (fma, 1.0, minus_zero, plus_zero, minus_zero),
8970 TEST_fff_f (fma, 1.0, minus_zero, minus_zero, minus_zero),
8971 TEST_fff_f (fma, -1.0, plus_zero, plus_zero, minus_zero),
8972 TEST_fff_f (fma, -1.0, plus_zero, minus_zero, minus_zero),
8973 TEST_fff_f (fma, -1.0, minus_zero, plus_zero, plus_zero),
8974 TEST_fff_f (fma, -1.0, minus_zero, minus_zero, minus_zero),
8975 TEST_fff_f (fma, plus_zero, 1.0, plus_zero, plus_zero),
8976 TEST_fff_f (fma, plus_zero, 1.0, minus_zero, minus_zero),
8977 TEST_fff_f (fma, plus_zero, -1.0, plus_zero, minus_zero),
8978 TEST_fff_f (fma, plus_zero, -1.0, minus_zero, minus_zero),
8979 TEST_fff_f (fma, minus_zero, 1.0, plus_zero, minus_zero),
8980 TEST_fff_f (fma, minus_zero, 1.0, minus_zero, minus_zero),
8981 TEST_fff_f (fma, minus_zero, -1.0, plus_zero, plus_zero),
8982 TEST_fff_f (fma, minus_zero, -1.0, minus_zero, minus_zero),
8983
8984 TEST_fff_f (fma, 1.0, 1.0, -1.0, minus_zero),
8985 TEST_fff_f (fma, 1.0, -1.0, 1.0, minus_zero),
8986 TEST_fff_f (fma, -1.0, 1.0, 1.0, minus_zero),
8987 TEST_fff_f (fma, -1.0, -1.0, -1.0, minus_zero),
8988
8989 TEST_fff_f (fma, min_value, min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8990 TEST_fff_f (fma, min_value, min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8991 TEST_fff_f (fma, min_value, -min_value, plus_zero, -min_subnorm_value, UNDERFLOW_EXCEPTION),
8992 TEST_fff_f (fma, min_value, -min_value, minus_zero, -min_subnorm_value, UNDERFLOW_EXCEPTION),
8993 TEST_fff_f (fma, -min_value, min_value, plus_zero, -min_subnorm_value, UNDERFLOW_EXCEPTION),
8994 TEST_fff_f (fma, -min_value, min_value, minus_zero, -min_subnorm_value, UNDERFLOW_EXCEPTION),
8995 TEST_fff_f (fma, -min_value, -min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8996 TEST_fff_f (fma, -min_value, -min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8627a232 8997
7184dcdf 8998#if !(defined TEST_LDOUBLE && LDBL_MANT_DIG == 106) /* Bug 13304. */
4f184d30
JM		 8999 TEST_fff_f (fma, max_value, max_value, min_value, max_value, OVERFLOW_EXCEPTION),
9000 TEST_fff_f (fma, max_value, max_value, -min_value, max_value, OVERFLOW_EXCEPTION),
9001 TEST_fff_f (fma, max_value, -max_value, min_value, minus_infty, OVERFLOW_EXCEPTION),
9002 TEST_fff_f (fma, max_value, -max_value, -min_value, minus_infty, OVERFLOW_EXCEPTION),
9003 TEST_fff_f (fma, -max_value, max_value, min_value, minus_infty, OVERFLOW_EXCEPTION),
9004 TEST_fff_f (fma, -max_value, max_value, -min_value, minus_infty, OVERFLOW_EXCEPTION),
9005 TEST_fff_f (fma, -max_value, -max_value, min_value, max_value, OVERFLOW_EXCEPTION),
9006 TEST_fff_f (fma, -max_value, -max_value, -min_value, max_value, OVERFLOW_EXCEPTION),
7184dcdf 9007#endif
a0c2940d 9008
8627a232 9009#if defined (TEST_FLOAT) && FLT_MANT_DIG == 24
4f184d30
JM		 9010 TEST_fff_f (fma, 0x1.4p-126, 0x1.000004p-1, 0x1p-128, 0x1.c00004p-127, UNDERFLOW_EXCEPTION),
9011 TEST_fff_f (fma, -0x1.4p-126, 0x1.000004p-1, -0x1p-128, -0x1.c00008p-127, UNDERFLOW_EXCEPTION),
9012 TEST_fff_f (fma, 0x1.fffff8p-126, 0x1.000002p-1, 0x1p-149, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9013 TEST_fff_f (fma, -0x1.fffff8p-126, 0x1.000002p-1, -0x1p-149, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9014 TEST_fff_f (fma, 0x1p-149, 0x1p-1, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9015 TEST_fff_f (fma, -0x1p-149, 0x1p-1, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION),
9016 TEST_fff_f (fma, 0x1p-149, 0x1.1p-1, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9017 TEST_fff_f (fma, -0x1p-149, 0x1.1p-1, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9018 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p127, 0x1p127),
9019 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p127, 0x0.ffffffp127),
9020 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p127, -0x1p127),
9021 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p127, -0x1.000002p127),
9022 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-126, 0x1p-126),
9023 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9024 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-126, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9025 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-126, -0x1.000002p-126),
9026 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9027 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x0.fffffep-126, 0x0.fffffcp-126, UNDERFLOW_EXCEPTION),
9028 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9029 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION),
9030 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
9031 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-149, plus_zero, UNDERFLOW_EXCEPTION),
9032 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
9033 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-149, -0x1p-148, UNDERFLOW_EXCEPTION),
9034 TEST_fff_f (fma, 0x0.fffp0, 0x0.fffp0, -0x0.ffep0, 0x1p-24),
9035 TEST_fff_f (fma, 0x0.fffp0, -0x0.fffp0, 0x0.ffep0, -0x1p-24),
9036 TEST_fff_f (fma, -0x0.fffp0, 0x0.fffp0, 0x0.ffep0, -0x1p-24),
9037 TEST_fff_f (fma, -0x0.fffp0, -0x0.fffp0, -0x0.ffep0, 0x1p-24),
9038 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p127, 0x1p127),
9039 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p127, 0x0.ffffffp127),
9040 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p127, -0x1p127),
9041 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p127, -0x1.000002p127),
9042 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p103, 0x1p103),
9043 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p103, 0x0.ffffffp103),
9044 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p103, -0x1p103),
9045 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p103, -0x1.000002p103),
8627a232
JM		 9046#endif
9047#if defined (TEST_DOUBLE) && DBL_MANT_DIG == 53
4f184d30
JM		 9048 TEST_fff_f (fma, 0x1.4p-1022, 0x1.0000000000002p-1, 0x1p-1024, 0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
9049 TEST_fff_f (fma, -0x1.4p-1022, 0x1.0000000000002p-1, -0x1p-1024, -0x1.c000000000004p-1023, UNDERFLOW_EXCEPTION),
9050 TEST_fff_f (fma, 0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, 0x1p-1074, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9051 TEST_fff_f (fma, -0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, -0x1p-1074, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9052 TEST_fff_f (fma, 0x1p-1074, 0x1p-1, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9053 TEST_fff_f (fma, -0x1p-1074, 0x1p-1, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION),
9054 TEST_fff_f (fma, 0x1p-1074, 0x1.1p-1, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9055 TEST_fff_f (fma, -0x1p-1074, 0x1.1p-1, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9056 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p1023, 0x1p1023),
9057 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p1023, 0x0.fffffffffffff8p1023),
9058 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p1023, -0x1p1023),
9059 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p1023, -0x1.0000000000001p1023),
9060 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1022, 0x1p-1022),
9061 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9062 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1022, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9063 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1022, -0x1.0000000000001p-1022),
9064 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9065 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.ffffffffffffep-1022, UNDERFLOW_EXCEPTION),
9066 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9067 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION),
9068 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
9069 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1074, plus_zero, UNDERFLOW_EXCEPTION),
9070 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
9071 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1074, -0x1p-1073, UNDERFLOW_EXCEPTION),
9072 TEST_fff_f (fma, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
9073 TEST_fff_f (fma, 0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
9074 TEST_fff_f (fma, -0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
9075 TEST_fff_f (fma, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
9076 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
9077 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p1023, 0x0.fffffffffffff8p1023),
9078 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
9079 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p1023, -0x1.0000000000001p1023),
9080 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p970, 0x1p970),
9081 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p970, 0x0.fffffffffffff8p970),
9082 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p970, -0x1p970),
9083 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p970, -0x1.0000000000001p970),
8627a232
JM		 9084#endif
9085#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 64
4f184d30
JM		 9086 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000004p-1L, 0x1p-16384L, 0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
9087 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000004p-1L, -0x1p-16384L, -0x1.c000000000000008p-16383L, UNDERFLOW_EXCEPTION),
9088 TEST_fff_f (fma, 0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9089 TEST_fff_f (fma, -0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, -0x1p-16445L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9090 TEST_fff_f (fma, 0x1p-16445L, 0x1p-1L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9091 TEST_fff_f (fma, -0x1p-16445L, 0x1p-1L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
9092 TEST_fff_f (fma, 0x1p-16445L, 0x1.1p-1L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9093 TEST_fff_f (fma, -0x1p-16445L, 0x1.1p-1L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9094 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p16383L, 0x1p16383L),
9095 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p16383L, 0x0.ffffffffffffffffp16383L),
9096 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p16383L, -0x1p16383L),
9097 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p16383L, -0x1.0000000000000002p16383L),
9098 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16382L, 0x1p-16382L),
9099 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9100 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9101 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16382L, -0x1.0000000000000002p-16382L),
9102 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9103 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffcp-16382L, UNDERFLOW_EXCEPTION),
9104 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9105 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
9106 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
9107 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16445L, plus_zero, UNDERFLOW_EXCEPTION),
9108 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
9109 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, -0x1p-16444L, UNDERFLOW_EXCEPTION),
9110 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9111 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
9112 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
9113 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9114 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
9115 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16383L, 0x0.ffffffffffffffffp16383L),
9116 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
9117 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16383L, -0x1.0000000000000002p16383L),
9118 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
9119 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16319L, 0x0.ffffffffffffffffp16319L),
9120 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
9121 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16319L, -0x1.0000000000000002p16319L),
8627a232
JM		 9122#endif
9123#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 113
4f184d30
JM		 9124 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, 0x1p-16384L, 0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
9125 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, -0x1p-16384L, -0x1.c000000000000000000000000004p-16383L, UNDERFLOW_EXCEPTION),
9126 TEST_fff_f (fma, 0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9127 TEST_fff_f (fma, -0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, -0x1p-16494L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9128 TEST_fff_f (fma, 0x1p-16494L, 0x1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9129 TEST_fff_f (fma, -0x1p-16494L, 0x1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
9130 TEST_fff_f (fma, 0x1p-16494L, 0x1.1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9131 TEST_fff_f (fma, -0x1p-16494L, 0x1.1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9132 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p16383L, 0x1p16383L),
9133 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p16383L, 0x0.ffffffffffffffffffffffffffff8p16383L),
9134 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p16383L, -0x1p16383L),
9135 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p16383L, -0x1.0000000000000000000000000001p16383L),
9136 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16382L, 0x1p-16382L),
9137 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9138 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9139 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16382L, -0x1.0000000000000000000000000001p-16382L),
9140 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9141 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.fffffffffffffffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9142 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9143 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
9144 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
9145 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16494L, plus_zero, UNDERFLOW_EXCEPTION),
9146 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
9147 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, -0x1p-16493L, UNDERFLOW_EXCEPTION),
9148 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9149 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9150 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9151 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9152 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
9153 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x0.ffffffffffffffffffffffffffff8p16383L),
9154 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
9155 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1.0000000000000000000000000001p16383L),
9156 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
9157 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x0.ffffffffffffffffffffffffffff8p16319L),
9158 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
9159 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1.0000000000000000000000000001p16319L),
9160#endif
9161 END_DATA (fma_downward)
9162 };
8ec5b013
JM		 9163
9164static void
4f184d30 9165fma_test_downward (void)
8ec5b013 9166{
4f184d30
JM		 9167 START (fma_downward);
9168 RUN_TEST_LOOP_fff_f (fma, fma_downward_test_data, FE_DOWNWARD);
9169 END (fma_downward);
9170}
8ec5b013 9171
8ec5b013 9172
4f184d30
JM		 9173static const struct test_fff_f_data fma_upward_test_data[] =
9174 {
9175 START_DATA (fma_upward),
9176 TEST_fff_f (fma, plus_zero, plus_zero, plus_zero, plus_zero),
9177 TEST_fff_f (fma, plus_zero, plus_zero, minus_zero, plus_zero),
9178 TEST_fff_f (fma, plus_zero, minus_zero, plus_zero, plus_zero),
9179 TEST_fff_f (fma, plus_zero, minus_zero, minus_zero, minus_zero),
9180 TEST_fff_f (fma, minus_zero, plus_zero, plus_zero, plus_zero),
9181 TEST_fff_f (fma, minus_zero, plus_zero, minus_zero, minus_zero),
9182 TEST_fff_f (fma, minus_zero, minus_zero, plus_zero, plus_zero),
9183 TEST_fff_f (fma, minus_zero, minus_zero, minus_zero, plus_zero),
9184 TEST_fff_f (fma, 1.0, plus_zero, plus_zero, plus_zero),
9185 TEST_fff_f (fma, 1.0, plus_zero, minus_zero, plus_zero),
9186 TEST_fff_f (fma, 1.0, minus_zero, plus_zero, plus_zero),
9187 TEST_fff_f (fma, 1.0, minus_zero, minus_zero, minus_zero),
9188 TEST_fff_f (fma, -1.0, plus_zero, plus_zero, plus_zero),
9189 TEST_fff_f (fma, -1.0, plus_zero, minus_zero, minus_zero),
9190 TEST_fff_f (fma, -1.0, minus_zero, plus_zero, plus_zero),
9191 TEST_fff_f (fma, -1.0, minus_zero, minus_zero, plus_zero),
9192 TEST_fff_f (fma, plus_zero, 1.0, plus_zero, plus_zero),
9193 TEST_fff_f (fma, plus_zero, 1.0, minus_zero, plus_zero),
9194 TEST_fff_f (fma, plus_zero, -1.0, plus_zero, plus_zero),
9195 TEST_fff_f (fma, plus_zero, -1.0, minus_zero, minus_zero),
9196 TEST_fff_f (fma, minus_zero, 1.0, plus_zero, plus_zero),
9197 TEST_fff_f (fma, minus_zero, 1.0, minus_zero, minus_zero),
9198 TEST_fff_f (fma, minus_zero, -1.0, plus_zero, plus_zero),
9199 TEST_fff_f (fma, minus_zero, -1.0, minus_zero, plus_zero),
9200
9201 TEST_fff_f (fma, 1.0, 1.0, -1.0, plus_zero),
9202 TEST_fff_f (fma, 1.0, -1.0, 1.0, plus_zero),
9203 TEST_fff_f (fma, -1.0, 1.0, 1.0, plus_zero),
9204 TEST_fff_f (fma, -1.0, -1.0, -1.0, plus_zero),
9205
9206 TEST_fff_f (fma, min_value, min_value, plus_zero, min_subnorm_value, UNDERFLOW_EXCEPTION),
9207 TEST_fff_f (fma, min_value, min_value, minus_zero, min_subnorm_value, UNDERFLOW_EXCEPTION),
9208 TEST_fff_f (fma, min_value, -min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
9209 TEST_fff_f (fma, min_value, -min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
9210 TEST_fff_f (fma, -min_value, min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
9211 TEST_fff_f (fma, -min_value, min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
9212 TEST_fff_f (fma, -min_value, -min_value, plus_zero, min_subnorm_value, UNDERFLOW_EXCEPTION),
9213 TEST_fff_f (fma, -min_value, -min_value, minus_zero, min_subnorm_value, UNDERFLOW_EXCEPTION),
8627a232 9214
7184dcdf 9215#if !(defined TEST_LDOUBLE && LDBL_MANT_DIG == 106) /* Bug 13304. */
4f184d30
JM		 9216 TEST_fff_f (fma, max_value, max_value, min_value, plus_infty, OVERFLOW_EXCEPTION),
9217 TEST_fff_f (fma, max_value, max_value, -min_value, plus_infty, OVERFLOW_EXCEPTION),
9218 TEST_fff_f (fma, max_value, -max_value, min_value, -max_value, OVERFLOW_EXCEPTION),
9219 TEST_fff_f (fma, max_value, -max_value, -min_value, -max_value, OVERFLOW_EXCEPTION),
9220 TEST_fff_f (fma, -max_value, max_value, min_value, -max_value, OVERFLOW_EXCEPTION),
9221 TEST_fff_f (fma, -max_value, max_value, -min_value, -max_value, OVERFLOW_EXCEPTION),
9222 TEST_fff_f (fma, -max_value, -max_value, min_value, plus_infty, OVERFLOW_EXCEPTION),
9223 TEST_fff_f (fma, -max_value, -max_value, -min_value, plus_infty, OVERFLOW_EXCEPTION),
7184dcdf 9224#endif
a0c2940d 9225
8627a232 9226#if defined (TEST_FLOAT) && FLT_MANT_DIG == 24
4f184d30
JM		 9227 TEST_fff_f (fma, 0x1.4p-126, 0x1.000004p-1, 0x1p-128, 0x1.c00008p-127, UNDERFLOW_EXCEPTION),
9228 TEST_fff_f (fma, -0x1.4p-126, 0x1.000004p-1, -0x1p-128, -0x1.c00004p-127, UNDERFLOW_EXCEPTION),
9229 TEST_fff_f (fma, 0x1.fffff8p-126, 0x1.000002p-1, 0x1p-149, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9230 TEST_fff_f (fma, -0x1.fffff8p-126, 0x1.000002p-1, -0x1p-149, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9231 TEST_fff_f (fma, 0x1p-149, 0x1p-1, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION),
9232 TEST_fff_f (fma, -0x1p-149, 0x1p-1, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9233 TEST_fff_f (fma, 0x1p-149, 0x1.1p-1, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9234 TEST_fff_f (fma, -0x1p-149, 0x1.1p-1, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9235 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p127, 0x1.000002p127),
9236 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p127, 0x1p127),
9237 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p127, -0x0.ffffffp127),
9238 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p127, -0x1p127),
9239 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-126, 0x1.000002p-126),
9240 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-126, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9241 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9242 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-126, -0x1p-126),
9243 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION),
9244 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9245 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x0.fffffep-126, -0x0.fffffcp-126, UNDERFLOW_EXCEPTION),
9246 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9247 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-149, 0x1p-148, UNDERFLOW_EXCEPTION),
9248 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
9249 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-149, minus_zero, UNDERFLOW_EXCEPTION),
9250 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
9251 TEST_fff_f (fma, 0x0.fffp0, 0x0.fffp0, -0x0.ffep0, 0x1p-24),
9252 TEST_fff_f (fma, 0x0.fffp0, -0x0.fffp0, 0x0.ffep0, -0x1p-24),
9253 TEST_fff_f (fma, -0x0.fffp0, 0x0.fffp0, 0x0.ffep0, -0x1p-24),
9254 TEST_fff_f (fma, -0x0.fffp0, -0x0.fffp0, -0x0.ffep0, 0x1p-24),
9255 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p127, 0x1.000002p127),
9256 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p127, 0x1p127),
9257 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p127, -0x0.ffffffp127),
9258 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p127, -0x1p127),
9259 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p103, 0x1.000002p103),
9260 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p103, 0x1p103),
9261 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p103, -0x0.ffffffp103),
9262 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p103, -0x1p103),
8627a232
JM		 9263#endif
9264#if defined (TEST_DOUBLE) && DBL_MANT_DIG == 53
4f184d30
JM		 9265 TEST_fff_f (fma, 0x1.4p-1022, 0x1.0000000000002p-1, 0x1p-1024, 0x1.c000000000004p-1023, UNDERFLOW_EXCEPTION),
9266 TEST_fff_f (fma, -0x1.4p-1022, 0x1.0000000000002p-1, -0x1p-1024, -0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
9267 TEST_fff_f (fma, 0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, 0x1p-1074, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9268 TEST_fff_f (fma, -0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, -0x1p-1074, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9269 TEST_fff_f (fma, 0x1p-1074, 0x1p-1, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION),
9270 TEST_fff_f (fma, -0x1p-1074, 0x1p-1, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9271 TEST_fff_f (fma, 0x1p-1074, 0x1.1p-1, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9272 TEST_fff_f (fma, -0x1p-1074, 0x1.1p-1, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9273 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p1023, 0x1.0000000000001p1023),
9274 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p1023, 0x1p1023),
9275 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p1023, -0x0.fffffffffffff8p1023),
9276 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p1023, -0x1p1023),
9277 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1022, 0x1.0000000000001p-1022),
9278 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1022, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9279 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9280 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1022, -0x1p-1022),
9281 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION),
9282 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9283 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.ffffffffffffep-1022, UNDERFLOW_EXCEPTION),
9284 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9285 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1074, 0x1p-1073, UNDERFLOW_EXCEPTION),
9286 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
9287 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1074, minus_zero, UNDERFLOW_EXCEPTION),
9288 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
9289 TEST_fff_f (fma, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
9290 TEST_fff_f (fma, 0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
9291 TEST_fff_f (fma, -0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
9292 TEST_fff_f (fma, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
9293 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p1023, 0x1.0000000000001p1023),
9294 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
9295 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p1023, -0x0.fffffffffffff8p1023),
9296 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
9297 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p970, 0x1.0000000000001p970),
9298 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p970, 0x1p970),
9299 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p970, -0x0.fffffffffffff8p970),
9300 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p970, -0x1p970),
8627a232
JM		 9301#endif
9302#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 64
4f184d30
JM		 9303 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000004p-1L, 0x1p-16384L, 0x1.c000000000000008p-16383L, UNDERFLOW_EXCEPTION),
9304 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000004p-1L, -0x1p-16384L, -0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
9305 TEST_fff_f (fma, 0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, 0x1p-16445L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9306 TEST_fff_f (fma, -0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9307 TEST_fff_f (fma, 0x1p-16445L, 0x1p-1L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
9308 TEST_fff_f (fma, -0x1p-16445L, 0x1p-1L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9309 TEST_fff_f (fma, 0x1p-16445L, 0x1.1p-1L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9310 TEST_fff_f (fma, -0x1p-16445L, 0x1.1p-1L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9311 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p16383L, 0x1.0000000000000002p16383L),
9312 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p16383L, 0x1p16383L),
9313 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p16383L, -0x0.ffffffffffffffffp16383L),
9314 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p16383L, -0x1p16383L),
9315 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16382L, 0x1.0000000000000002p-16382L),
9316 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9317 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9318 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16382L, -0x1p-16382L),
9319 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
9320 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9321 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffcp-16382L, UNDERFLOW_EXCEPTION),
9322 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9323 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, 0x1p-16444L, UNDERFLOW_EXCEPTION),
9324 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
9325 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16445L, minus_zero, UNDERFLOW_EXCEPTION),
9326 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
9327 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9328 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
9329 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
9330 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9331 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16383L, 0x1.0000000000000002p16383L),
9332 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
9333 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16383L, -0x0.ffffffffffffffffp16383L),
9334 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
9335 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16319L, 0x1.0000000000000002p16319L),
9336 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
9337 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16319L, -0x0.ffffffffffffffffp16319L),
9338 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
8627a232
JM		 9339#endif
9340#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 113
4f184d30
JM		 9341 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, 0x1p-16384L, 0x1.c000000000000000000000000004p-16383L, UNDERFLOW_EXCEPTION),
9342 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, -0x1p-16384L, -0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
9343 TEST_fff_f (fma, 0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, 0x1p-16494L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9344 TEST_fff_f (fma, -0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9345 TEST_fff_f (fma, 0x1p-16494L, 0x1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
9346 TEST_fff_f (fma, -0x1p-16494L, 0x1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9347 TEST_fff_f (fma, 0x1p-16494L, 0x1.1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9348 TEST_fff_f (fma, -0x1p-16494L, 0x1.1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9349 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p16383L, 0x1.0000000000000000000000000001p16383L),
9350 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p16383L, 0x1p16383L),
9351 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p16383L, -0x0.ffffffffffffffffffffffffffff8p16383L),
9352 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p16383L, -0x1p16383L),
9353 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16382L, 0x1.0000000000000000000000000001p-16382L),
9354 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9355 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9356 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16382L, -0x1p-16382L),
9357 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
9358 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9359 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.fffffffffffffffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9360 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9361 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, 0x1p-16493L, UNDERFLOW_EXCEPTION),
9362 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
9363 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16494L, minus_zero, UNDERFLOW_EXCEPTION),
9364 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
9365 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9366 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9367 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9368 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9369 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1.0000000000000000000000000001p16383L),
9370 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
9371 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x0.ffffffffffffffffffffffffffff8p16383L),
9372 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
9373 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1.0000000000000000000000000001p16319L),
9374 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
9375 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x0.ffffffffffffffffffffffffffff8p16319L),
9376 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
9377#endif
9378 END_DATA (fma_upward)
9379 };
8ec5b013 9380
4f184d30
JM		 9381static void
9382fma_test_upward (void)
9383{
9384 START (fma_upward);
9385 RUN_TEST_LOOP_fff_f (fma, fma_upward_test_data, FE_UPWARD);
8ec5b013
JM		 9386 END (fma_upward);
9387}
9388
9389
601a3a5f
JM		 9390static const struct test_ff_f_data fmax_test_data[] =
9391 {
9392 START_DATA (fmax),
9393 TEST_ff_f (fmax, 0, 0, 0),
9394 TEST_ff_f (fmax, minus_zero, minus_zero, minus_zero),
9395 TEST_ff_f (fmax, 9, 0, 9),
9396 TEST_ff_f (fmax, 0, 9, 9),
9397 TEST_ff_f (fmax, -9, 0, 0),
9398 TEST_ff_f (fmax, 0, -9, 0),
9399
9400 TEST_ff_f (fmax, plus_infty, 9, plus_infty),
9401 TEST_ff_f (fmax, 0, plus_infty, plus_infty),
9402 TEST_ff_f (fmax, -9, plus_infty, plus_infty),
9403 TEST_ff_f (fmax, plus_infty, -9, plus_infty),
9404
9405 TEST_ff_f (fmax, minus_infty, 9, 9),
9406 TEST_ff_f (fmax, minus_infty, -9, -9),
9407 TEST_ff_f (fmax, 9, minus_infty, 9),
9408 TEST_ff_f (fmax, -9, minus_infty, -9),
9409
9410 TEST_ff_f (fmax, 0, qnan_value, 0),
9411 TEST_ff_f (fmax, 9, qnan_value, 9),
9412 TEST_ff_f (fmax, -9, qnan_value, -9),
9413 TEST_ff_f (fmax, qnan_value, 0, 0),
9414 TEST_ff_f (fmax, qnan_value, 9, 9),
9415 TEST_ff_f (fmax, qnan_value, -9, -9),
9416 TEST_ff_f (fmax, plus_infty, qnan_value, plus_infty),
9417 TEST_ff_f (fmax, minus_infty, qnan_value, minus_infty),
9418 TEST_ff_f (fmax, qnan_value, plus_infty, plus_infty),
9419 TEST_ff_f (fmax, qnan_value, minus_infty, minus_infty),
9420 TEST_ff_f (fmax, qnan_value, qnan_value, qnan_value),
9421 END_DATA (fmax)
9422 };
9423
8847214f
UD		 9424static void
9425fmax_test (void)
9426{
9427 START (fmax);
601a3a5f 9428 RUN_TEST_LOOP_ff_f (fmax, fmax_test_data, );
8847214f
UD		 9429 END (fmax);
9430}
9431
9432
601a3a5f
JM		 9433static const struct test_ff_f_data fmin_test_data[] =
9434 {
9435 START_DATA (fmin),
9436 TEST_ff_f (fmin, 0, 0, 0),
9437 TEST_ff_f (fmin, minus_zero, minus_zero, minus_zero),
9438 TEST_ff_f (fmin, 9, 0, 0),
9439 TEST_ff_f (fmin, 0, 9, 0),
9440 TEST_ff_f (fmin, -9, 0, -9),
9441 TEST_ff_f (fmin, 0, -9, -9),
9442
9443 TEST_ff_f (fmin, plus_infty, 9, 9),
9444 TEST_ff_f (fmin, 9, plus_infty, 9),
9445 TEST_ff_f (fmin, plus_infty, -9, -9),
9446 TEST_ff_f (fmin, -9, plus_infty, -9),
9447 TEST_ff_f (fmin, minus_infty, 9, minus_infty),
9448 TEST_ff_f (fmin, minus_infty, -9, minus_infty),
9449 TEST_ff_f (fmin, 9, minus_infty, minus_infty),
9450 TEST_ff_f (fmin, -9, minus_infty, minus_infty),
9451
9452 TEST_ff_f (fmin, 0, qnan_value, 0),
9453 TEST_ff_f (fmin, 9, qnan_value, 9),
9454 TEST_ff_f (fmin, -9, qnan_value, -9),
9455 TEST_ff_f (fmin, qnan_value, 0, 0),
9456 TEST_ff_f (fmin, qnan_value, 9, 9),
9457 TEST_ff_f (fmin, qnan_value, -9, -9),
9458 TEST_ff_f (fmin, plus_infty, qnan_value, plus_infty),
9459 TEST_ff_f (fmin, minus_infty, qnan_value, minus_infty),
9460 TEST_ff_f (fmin, qnan_value, plus_infty, plus_infty),
9461 TEST_ff_f (fmin, qnan_value, minus_infty, minus_infty),
9462 TEST_ff_f (fmin, qnan_value, qnan_value, qnan_value),
9463 END_DATA (fmin)
9464 };
9465
8847214f
UD		 9466static void
9467fmin_test (void)
9468{
9469 START (fmin);
601a3a5f 9470 RUN_TEST_LOOP_ff_f (fmin, fmin_test_data, );
8847214f
UD		 9471 END (fmin);
9472}
9473
9474
601a3a5f
JM		 9475static const struct test_ff_f_data fmod_test_data[] =
9476 {
9477 START_DATA (fmod),
9478 /* fmod (+0, y) == +0 for y != 0. */
9479 TEST_ff_f (fmod, 0, 3, 0),
9480
9481 /* fmod (-0, y) == -0 for y != 0. */
9482 TEST_ff_f (fmod, minus_zero, 3, minus_zero),
9483
9484 /* fmod (+inf, y) == qNaN plus invalid exception. */
9485 TEST_ff_f (fmod, plus_infty, 3, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
9486 /* fmod (-inf, y) == qNaN plus invalid exception. */
9487 TEST_ff_f (fmod, minus_infty, 3, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
9488 /* fmod (x, +0) == qNaN plus invalid exception. */
9489 TEST_ff_f (fmod, 3, 0, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
9490 /* fmod (x, -0) == qNaN plus invalid exception. */
9491 TEST_ff_f (fmod, 3, minus_zero, qnan_value, INVALID_EXCEPTION),
9492
9493 /* fmod (x, +inf) == x for x not infinite. */
9494 TEST_ff_f (fmod, 3.0, plus_infty, 3.0),
9495 /* fmod (x, -inf) == x for x not infinite. */
9496 TEST_ff_f (fmod, 3.0, minus_infty, 3.0),
9497
9498 TEST_ff_f (fmod, qnan_value, qnan_value, qnan_value),
9499
9500 TEST_ff_f (fmod, 6.5, 2.25L, 2.0L),
9501 TEST_ff_f (fmod, -6.5, 2.25L, -2.0L),
9502 TEST_ff_f (fmod, 6.5, -2.25L, 2.0L),
9503 TEST_ff_f (fmod, -6.5, -2.25L, -2.0L),
9504
9505 TEST_ff_f (fmod, 0x0.fffffep-126L, 0x1p-149L, plus_zero),
9506#ifndef TEST_FLOAT
9507 TEST_ff_f (fmod, 0x0.fffffffffffffp-1022L, 0x1p-1074L, plus_zero),
9508#endif
9509#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
9510 TEST_ff_f (fmod, 0x0.fffffffffffffffep-16382L, 0x1p-16445L, plus_zero),
9511#endif
9512 END_DATA (fmod)
9513 };
9514
8847214f
UD		 9515static void
9516fmod_test (void)
9517{
aaca11d8 9518 errno = 0;
3c6cad26 9519 FUNC(fmod) (6.5, 2.3L);
aaca11d8
UD		 9520 if (errno == ENOSYS)
9521 /* Function not implemented. */
9522 return;
9523
8847214f 9524 START (fmod);
601a3a5f 9525 RUN_TEST_LOOP_ff_f (fmod, fmod_test_data, );
8847214f
UD		 9526 END (fmod);
9527}
9528
2550dfe9 9529
8847214f
UD		 9530static void
9531fpclassify_test (void)
9532{
9533 START (fpclassify);
9534
67e971f1 9535 TEST_f_i (fpclassify, qnan_value, FP_NAN);
8847214f
UD		 9536 TEST_f_i (fpclassify, plus_infty, FP_INFINITE);
9537 TEST_f_i (fpclassify, minus_infty, FP_INFINITE);
9538 TEST_f_i (fpclassify, plus_zero, FP_ZERO);
9539 TEST_f_i (fpclassify, minus_zero, FP_ZERO);
9540 TEST_f_i (fpclassify, 1000, FP_NORMAL);
ef1bb361 9541 TEST_f_i (fpclassify, min_subnorm_value, FP_SUBNORMAL);
8847214f
UD		 9542
9543 END (fpclassify);
9544}
9545
9546
9547static void
9548frexp_test (void)
9549{
9550 int x;
9551
9552 START (frexp);
9553
9554 TEST_fI_f1 (frexp, plus_infty, plus_infty, IGNORE);
9555 TEST_fI_f1 (frexp, minus_infty, minus_infty, IGNORE);
67e971f1 9556 TEST_fI_f1 (frexp, qnan_value, qnan_value, IGNORE);
8847214f
UD		 9557
9558 TEST_fI_f1 (frexp, 0.0, 0.0, 0.0);
9559 TEST_fI_f1 (frexp, minus_zero, minus_zero, 0.0);
9560
b15cb495
UD		 9561 TEST_fI_f1 (frexp, 12.8L, 0.8L, 4);
9562 TEST_fI_f1 (frexp, -27.34L, -0.854375L, 5);
8847214f
UD		 9563
9564 END (frexp);
9565}
9566
9567
87aa21df
JM		 9568static const struct test_f_f1_data gamma_test_data[] =
9569 {
9570 START_DATA (gamma),
9571 TEST_f_f1 (gamma, plus_infty, plus_infty, 1),
9572 TEST_f_f1 (gamma, 0, plus_infty, 1, DIVIDE_BY_ZERO_EXCEPTION),
9573 TEST_f_f1 (gamma, -3, plus_infty, IGNORE, DIVIDE_BY_ZERO_EXCEPTION),
9574 TEST_f_f1 (gamma, minus_infty, plus_infty, IGNORE),
9575 TEST_f_f1 (gamma, qnan_value, qnan_value, IGNORE),
9576
9577 TEST_f_f1 (gamma, 1, 0, 1),
9578 TEST_f_f1 (gamma, 3, M_LN2l, 1),
9579
9580 TEST_f_f1 (gamma, 0.5, M_LOG_SQRT_PIl, 1),
9581 TEST_f_f1 (gamma, -0.5, M_LOG_2_SQRT_PIl, -1),
9582 END_DATA (gamma)
9583 };
9584
8847214f
UD		 9585static void
9586gamma_test (void)
9587{
9588 errno = 0;
9589 FUNC(gamma) (1);
9590
9591 if (errno == ENOSYS)
9592 /* Function not implemented. */
9593 return;
8847214f
UD		 9594
9595 START (gamma);
87aa21df 9596 RUN_TEST_LOOP_f_f1 (gamma, gamma_test_data, , signgam);
8847214f
UD		 9597 END (gamma);
9598}
9599
601a3a5f
JM		 9600static const struct test_ff_f_data hypot_test_data[] =
9601 {
9602 START_DATA (hypot),
9603 TEST_ff_f (hypot, plus_infty, 1, plus_infty),
9604 TEST_ff_f (hypot, minus_infty, 1, plus_infty),
8847214f 9605
15daa639 9606#ifndef TEST_INLINE
601a3a5f
JM		 9607 TEST_ff_f (hypot, plus_infty, qnan_value, plus_infty),
9608 TEST_ff_f (hypot, minus_infty, qnan_value, plus_infty),
9609 TEST_ff_f (hypot, qnan_value, plus_infty, plus_infty),
9610 TEST_ff_f (hypot, qnan_value, minus_infty, plus_infty),
15daa639 9611#endif
8847214f 9612
601a3a5f 9613 TEST_ff_f (hypot, qnan_value, qnan_value, qnan_value),
8847214f 9614
601a3a5f
JM		 9615 /* hypot (x,y) == hypot (+-x, +-y) */
9616 TEST_ff_f (hypot, 0.7L, 12.4L, 12.419742348374220601176836866763271L),
9617 TEST_ff_f (hypot, -0.7L, 12.4L, 12.419742348374220601176836866763271L),
9618 TEST_ff_f (hypot, 0.7L, -12.4L, 12.419742348374220601176836866763271L),
9619 TEST_ff_f (hypot, -0.7L, -12.4L, 12.419742348374220601176836866763271L),
9620 TEST_ff_f (hypot, 12.4L, 0.7L, 12.419742348374220601176836866763271L),
9621 TEST_ff_f (hypot, -12.4L, 0.7L, 12.419742348374220601176836866763271L),
9622 TEST_ff_f (hypot, 12.4L, -0.7L, 12.419742348374220601176836866763271L),
9623 TEST_ff_f (hypot, -12.4L, -0.7L, 12.419742348374220601176836866763271L),
8847214f 9624
601a3a5f
JM		 9625 /* hypot (x,0) == fabs (x) */
9626 TEST_ff_f (hypot, 0.75L, 0, 0.75L),
9627 TEST_ff_f (hypot, -0.75L, 0, 0.75L),
9628 TEST_ff_f (hypot, -5.7e7, 0, 5.7e7L),
8847214f 9629
601a3a5f 9630 TEST_ff_f (hypot, 0.75L, 1.25L, 1.45773797371132511771853821938639577L),
8847214f 9631
601a3a5f
JM		 9632 TEST_ff_f (hypot, 1.0L, 0x1p-61L, 1.0L),
9633 TEST_ff_f (hypot, 0x1p+0L, 0x1.fp-129L, 0x1p+0L),
1468ded3 9634#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
601a3a5f 9635 TEST_ff_f (hypot, 0x1.23456789abcdef0123456789ab8p-500L, 0x1.23456789abcdef0123456789ab8p-500L, 4.9155782399407039128612180934736799735113e-151L),
1468ded3 9636#endif
8e27e3cc 9637
aa4a2ae1 9638#if !(defined TEST_FLOAT && defined TEST_INLINE)
601a3a5f
JM		 9639 TEST_ff_f (hypot, 0x3p125L, 0x4p125L, 0x5p125L),
9640 TEST_ff_f (hypot, 0x1.234566p-126L, 0x1.234566p-126L, 1.891441686191081936598531534017449451173e-38L),
aa4a2ae1
JM		 9641#endif
9642
5779f134 9643#if !defined TEST_FLOAT && !(defined TEST_DOUBLE && defined TEST_INLINE)
601a3a5f
JM		 9644 TEST_ff_f (hypot, 0x3p1021L, 0x4p1021L, 0x5p1021L),
9645 TEST_ff_f (hypot, 0x1p+0L, 0x0.3ep-1022L, 0x1p+0L),
aa4a2ae1
JM		 9646#endif
9647
9648#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384 && !defined TEST_INLINE
601a3a5f 9649 TEST_ff_f (hypot, 0x3p16381L, 0x4p16381L, 0x5p16381L),
aa4a2ae1 9650#endif
601a3a5f
JM		 9651 END_DATA (hypot)
9652 };
9653
9654static void
9655hypot_test (void)
9656{
9657 errno = 0;
9658 FUNC(hypot) (0.7L, 12.4L);
9659 if (errno == ENOSYS)
9660 /* Function not implemented. */
9661 return;
aa4a2ae1 9662
601a3a5f
JM		 9663 START (hypot);
9664 RUN_TEST_LOOP_ff_f (hypot, hypot_test_data, );
8847214f
UD		 9665 END (hypot);
9666}
9667
9668
9669static void
9670ilogb_test (void)
9671{
9672 START (ilogb);
9673
9674 TEST_f_i (ilogb, 1, 0);
9675 TEST_f_i (ilogb, M_El, 1);
9676 TEST_f_i (ilogb, 1024, 10);
9677 TEST_f_i (ilogb, -2000, 10);
9678
76da7265 9679 /* ilogb (0.0) == FP_ILOGB0 plus invalid exception */
f2da7793 9680 TEST_f_i (ilogb, 0.0, FP_ILOGB0, INVALID_EXCEPTION|ERRNO_EDOM);
67e971f1 9681 /* ilogb (qNaN) == FP_ILOGBNAN plus invalid exception */
f2da7793 9682 TEST_f_i (ilogb, qnan_value, FP_ILOGBNAN, INVALID_EXCEPTION|ERRNO_EDOM);
76da7265 9683 /* ilogb (inf) == INT_MAX plus invalid exception */
f2da7793 9684 TEST_f_i (ilogb, plus_infty, INT_MAX, INVALID_EXCEPTION|ERRNO_EDOM);
76da7265 9685 /* ilogb (-inf) == INT_MAX plus invalid exception */
f2da7793 9686 TEST_f_i (ilogb, minus_infty, INT_MAX, INVALID_EXCEPTION|ERRNO_EDOM);
8847214f
UD		 9687
9688 END (ilogb);
9689}
9690
9691static void
9692isfinite_test (void)
9693{
9694 START (isfinite);
9695
9696 TEST_f_b (isfinite, 0, 1);
9697 TEST_f_b (isfinite, minus_zero, 1);
9698 TEST_f_b (isfinite, 10, 1);
ef1bb361 9699 TEST_f_b (isfinite, min_subnorm_value, 1);
8847214f
UD		 9700 TEST_f_b (isfinite, plus_infty, 0);
9701 TEST_f_b (isfinite, minus_infty, 0);
67e971f1 9702 TEST_f_b (isfinite, qnan_value, 0);
8847214f
UD		 9703
9704 END (isfinite);
9705}
9706
0e8e0c1c
JM		 9707static void
9708isgreater_test (void)
9709{
9710 START (isgreater);
9711
9712 TEST_ff_i (isgreater, minus_zero, minus_zero, 0);
9713 TEST_ff_i (isgreater, minus_zero, plus_zero, 0);
9714 TEST_ff_i (isgreater, minus_zero, (FLOAT) 1, 0);
67e971f1 9715 TEST_ff_i (isgreater, minus_zero, qnan_value, 0);
0e8e0c1c
JM		 9716 TEST_ff_i (isgreater, plus_zero, minus_zero, 0);
9717 TEST_ff_i (isgreater, plus_zero, plus_zero, 0);
9718 TEST_ff_i (isgreater, plus_zero, (FLOAT) 1, 0);
67e971f1 9719 TEST_ff_i (isgreater, plus_zero, qnan_value, 0);
0e8e0c1c
JM		 9720 TEST_ff_i (isgreater, (FLOAT) 1, minus_zero, 1);
9721 TEST_ff_i (isgreater, (FLOAT) 1, plus_zero, 1);
9722 TEST_ff_i (isgreater, (FLOAT) 1, (FLOAT) 1, 0);
67e971f1
TS		 9723 TEST_ff_i (isgreater, (FLOAT) 1, qnan_value, 0);
9724 TEST_ff_i (isgreater, qnan_value, minus_zero, 0);
9725 TEST_ff_i (isgreater, qnan_value, plus_zero, 0);
9726 TEST_ff_i (isgreater, qnan_value, (FLOAT) 1, 0);
9727 TEST_ff_i (isgreater, qnan_value, qnan_value, 0);
0e8e0c1c
JM		 9728
9729 END (isgreater);
9730}
9731
9732static void
9733isgreaterequal_test (void)
9734{
9735 START (isgreaterequal);
9736
9737 TEST_ff_i (isgreaterequal, minus_zero, minus_zero, 1);
9738 TEST_ff_i (isgreaterequal, minus_zero, plus_zero, 1);
9739 TEST_ff_i (isgreaterequal, minus_zero, (FLOAT) 1, 0);
67e971f1 9740 TEST_ff_i (isgreaterequal, minus_zero, qnan_value, 0);
0e8e0c1c
JM		 9741 TEST_ff_i (isgreaterequal, plus_zero, minus_zero, 1);
9742 TEST_ff_i (isgreaterequal, plus_zero, plus_zero, 1);
9743 TEST_ff_i (isgreaterequal, plus_zero, (FLOAT) 1, 0);
67e971f1 9744 TEST_ff_i (isgreaterequal, plus_zero, qnan_value, 0);
0e8e0c1c
JM		 9745 TEST_ff_i (isgreaterequal, (FLOAT) 1, minus_zero, 1);
9746 TEST_ff_i (isgreaterequal, (FLOAT) 1, plus_zero, 1);
9747 TEST_ff_i (isgreaterequal, (FLOAT) 1, (FLOAT) 1, 1);
67e971f1
TS		 9748 TEST_ff_i (isgreaterequal, (FLOAT) 1, qnan_value, 0);
9749 TEST_ff_i (isgreaterequal, qnan_value, minus_zero, 0);
9750 TEST_ff_i (isgreaterequal, qnan_value, plus_zero, 0);
9751 TEST_ff_i (isgreaterequal, qnan_value, (FLOAT) 1, 0);
9752 TEST_ff_i (isgreaterequal, qnan_value, qnan_value, 0);
0e8e0c1c
JM		 9753
9754 END (isgreaterequal);
9755}
9756
ef1bb361
JM		 9757static void
9758isinf_test (void)
9759{
9760 START (isinf);
9761
9762 TEST_f_b (isinf, 0, 0);
9763 TEST_f_b (isinf, minus_zero, 0);
9764 TEST_f_b (isinf, 10, 0);
9765 TEST_f_b (isinf, min_subnorm_value, 0);
9766 TEST_f_b (isinf, plus_infty, 1);
9767 TEST_f_b (isinf, minus_infty, 1);
67e971f1 9768 TEST_f_b (isinf, qnan_value, 0);
ef1bb361
JM		 9769
9770 END (isinf);
9771}
9772
0e8e0c1c
JM		 9773static void
9774isless_test (void)
9775{
9776 START (isless);
9777
9778 TEST_ff_i (isless, minus_zero, minus_zero, 0);
9779 TEST_ff_i (isless, minus_zero, plus_zero, 0);
9780 TEST_ff_i (isless, minus_zero, (FLOAT) 1, 1);
67e971f1 9781 TEST_ff_i (isless, minus_zero, qnan_value, 0);
0e8e0c1c
JM		 9782 TEST_ff_i (isless, plus_zero, minus_zero, 0);
9783 TEST_ff_i (isless, plus_zero, plus_zero, 0);
9784 TEST_ff_i (isless, plus_zero, (FLOAT) 1, 1);
67e971f1 9785 TEST_ff_i (isless, plus_zero, qnan_value, 0);
0e8e0c1c
JM		 9786 TEST_ff_i (isless, (FLOAT) 1, minus_zero, 0);
9787 TEST_ff_i (isless, (FLOAT) 1, plus_zero, 0);
9788 TEST_ff_i (isless, (FLOAT) 1, (FLOAT) 1, 0);
67e971f1
TS		 9789 TEST_ff_i (isless, (FLOAT) 1, qnan_value, 0);
9790 TEST_ff_i (isless, qnan_value, minus_zero, 0);
9791 TEST_ff_i (isless, qnan_value, plus_zero, 0);
9792 TEST_ff_i (isless, qnan_value, (FLOAT) 1, 0);
9793 TEST_ff_i (isless, qnan_value, qnan_value, 0);
0e8e0c1c
JM		 9794
9795 END (isless);
9796}
9797
9798static void
9799islessequal_test (void)
9800{
9801 START (islessequal);
9802
9803 TEST_ff_i (islessequal, minus_zero, minus_zero, 1);
9804 TEST_ff_i (islessequal, minus_zero, plus_zero, 1);
9805 TEST_ff_i (islessequal, minus_zero, (FLOAT) 1, 1);
67e971f1 9806 TEST_ff_i (islessequal, minus_zero, qnan_value, 0);
0e8e0c1c
JM		 9807 TEST_ff_i (islessequal, plus_zero, minus_zero, 1);
9808 TEST_ff_i (islessequal, plus_zero, plus_zero, 1);
9809 TEST_ff_i (islessequal, plus_zero, (FLOAT) 1, 1);
67e971f1 9810 TEST_ff_i (islessequal, plus_zero, qnan_value, 0);
0e8e0c1c
JM		 9811 TEST_ff_i (islessequal, (FLOAT) 1, minus_zero, 0);
9812 TEST_ff_i (islessequal, (FLOAT) 1, plus_zero, 0);
9813 TEST_ff_i (islessequal, (FLOAT) 1, (FLOAT) 1, 1);
67e971f1
TS		 9814 TEST_ff_i (islessequal, (FLOAT) 1, qnan_value, 0);
9815 TEST_ff_i (islessequal, qnan_value, minus_zero, 0);
9816 TEST_ff_i (islessequal, qnan_value, plus_zero, 0);
9817 TEST_ff_i (islessequal, qnan_value, (FLOAT) 1, 0);
9818 TEST_ff_i (islessequal, qnan_value, qnan_value, 0);
0e8e0c1c
JM		 9819
9820 END (islessequal);
9821}
9822
9823static void
9824islessgreater_test (void)
9825{
9826 START (islessgreater);
9827
9828 TEST_ff_i (islessgreater, minus_zero, minus_zero, 0);
9829 TEST_ff_i (islessgreater, minus_zero, plus_zero, 0);
9830 TEST_ff_i (islessgreater, minus_zero, (FLOAT) 1, 1);
67e971f1 9831 TEST_ff_i (islessgreater, minus_zero, qnan_value, 0);
0e8e0c1c
JM		 9832 TEST_ff_i (islessgreater, plus_zero, minus_zero, 0);
9833 TEST_ff_i (islessgreater, plus_zero, plus_zero, 0);
9834 TEST_ff_i (islessgreater, plus_zero, (FLOAT) 1, 1);
67e971f1 9835 TEST_ff_i (islessgreater, plus_zero, qnan_value, 0);
0e8e0c1c
JM		 9836 TEST_ff_i (islessgreater, (FLOAT) 1, minus_zero, 1);
9837 TEST_ff_i (islessgreater, (FLOAT) 1, plus_zero, 1);
9838 TEST_ff_i (islessgreater, (FLOAT) 1, (FLOAT) 1, 0);
67e971f1
TS		 9839 TEST_ff_i (islessgreater, (FLOAT) 1, qnan_value, 0);
9840 TEST_ff_i (islessgreater, qnan_value, minus_zero, 0);
9841 TEST_ff_i (islessgreater, qnan_value, plus_zero, 0);
9842 TEST_ff_i (islessgreater, qnan_value, (FLOAT) 1, 0);
9843 TEST_ff_i (islessgreater, qnan_value, qnan_value, 0);
0e8e0c1c
JM		 9844
9845 END (islessgreater);
9846}
9847
ef1bb361
JM		 9848static void
9849isnan_test (void)
9850{
9851 START (isnan);
9852
9853 TEST_f_b (isnan, 0, 0);
9854 TEST_f_b (isnan, minus_zero, 0);
9855 TEST_f_b (isnan, 10, 0);
9856 TEST_f_b (isnan, min_subnorm_value, 0);
9857 TEST_f_b (isnan, plus_infty, 0);
9858 TEST_f_b (isnan, minus_infty, 0);
67e971f1 9859 TEST_f_b (isnan, qnan_value, 1);
ef1bb361
JM		 9860
9861 END (isnan);
9862}
9863
8847214f
UD		 9864static void
9865isnormal_test (void)
9866{
9867 START (isnormal);
9868
9869 TEST_f_b (isnormal, 0, 0);
9870 TEST_f_b (isnormal, minus_zero, 0);
9871 TEST_f_b (isnormal, 10, 1);
ef1bb361 9872 TEST_f_b (isnormal, min_subnorm_value, 0);
8847214f
UD		 9873 TEST_f_b (isnormal, plus_infty, 0);
9874 TEST_f_b (isnormal, minus_infty, 0);
67e971f1 9875 TEST_f_b (isnormal, qnan_value, 0);
8847214f
UD		 9876
9877 END (isnormal);
9878}
9879
57267616
TS		 9880static void
9881issignaling_test (void)
9882{
9883 START (issignaling);
9884
9885 TEST_f_b (issignaling, 0, 0);
9886 TEST_f_b (issignaling, minus_zero, 0);
9887 TEST_f_b (issignaling, 10, 0);
9888 TEST_f_b (issignaling, min_subnorm_value, 0);
9889 TEST_f_b (issignaling, plus_infty, 0);
9890 TEST_f_b (issignaling, minus_infty, 0);
9891 TEST_f_b (issignaling, qnan_value, 0);
9892
9893 END (issignaling);
9894}
9895
0e8e0c1c
JM		 9896static void
9897isunordered_test (void)
9898{
9899 START (isunordered);
9900
9901 TEST_ff_i (isunordered, minus_zero, minus_zero, 0);
9902 TEST_ff_i (isunordered, minus_zero, plus_zero, 0);
9903 TEST_ff_i (isunordered, minus_zero, (FLOAT) 1, 0);
67e971f1 9904 TEST_ff_i (isunordered, minus_zero, qnan_value, 1);
0e8e0c1c
JM		 9905 TEST_ff_i (isunordered, plus_zero, minus_zero, 0);
9906 TEST_ff_i (isunordered, plus_zero, plus_zero, 0);
9907 TEST_ff_i (isunordered, plus_zero, (FLOAT) 1, 0);
67e971f1 9908 TEST_ff_i (isunordered, plus_zero, qnan_value, 1);
0e8e0c1c
JM		 9909 TEST_ff_i (isunordered, (FLOAT) 1, minus_zero, 0);
9910 TEST_ff_i (isunordered, (FLOAT) 1, plus_zero, 0);
9911 TEST_ff_i (isunordered, (FLOAT) 1, (FLOAT) 1, 0);
67e971f1
TS		 9912 TEST_ff_i (isunordered, (FLOAT) 1, qnan_value, 1);
9913 TEST_ff_i (isunordered, qnan_value, minus_zero, 1);
9914 TEST_ff_i (isunordered, qnan_value, plus_zero, 1);
9915 TEST_ff_i (isunordered, qnan_value, (FLOAT) 1, 1);
9916 TEST_ff_i (isunordered, qnan_value, qnan_value, 1);
0e8e0c1c
JM		 9917
9918 END (isunordered);
9919}
9920
74c57478
JM		 9921static const struct test_f_f_data j0_test_data[] =
9922 {
9923 START_DATA (j0),
9924 /* j0 is the Bessel function of the first kind of order 0 */
9925 TEST_f_f (j0, qnan_value, qnan_value),
9926 TEST_f_f (j0, plus_infty, 0),
9927 TEST_f_f (j0, -1.0, 0.765197686557966551449717526102663221L),
9928 TEST_f_f (j0, 0.0, 1.0),
9929 TEST_f_f (j0, 0.125L, 0.996097563041985204620768999453174712L),
9930 TEST_f_f (j0, 0.75L, 0.864242275166648623555731103820923211L),
9931 TEST_f_f (j0, 1.0, 0.765197686557966551449717526102663221L),
9932 TEST_f_f (j0, 1.5, 0.511827671735918128749051744283411720L),
9933 TEST_f_f (j0, 2.0, 0.223890779141235668051827454649948626L),
9934 TEST_f_f (j0, 8.0, 0.171650807137553906090869407851972001L),
9935 TEST_f_f (j0, 10.0, -0.245935764451348335197760862485328754L),
9936 TEST_f_f (j0, 4.0, -3.9714980986384737228659076845169804197562E-1L),
9937 TEST_f_f (j0, -4.0, -3.9714980986384737228659076845169804197562E-1L),
8847214f 9938
74c57478 9939 TEST_f_f (j0, 0x1.d7ce3ap+107L, 2.775523647291230802651040996274861694514e-17L),
c36e1d23
JM		 9940
9941#ifndef TEST_FLOAT
74c57478
JM		 9942 TEST_f_f (j0, -0x1.001000001p+593L, -3.927269966354206207832593635798954916263e-90L),
9943 TEST_f_f (j0, 0x1p1023L, -1.5665258060609012834424478437196679802783e-155L),
c36e1d23
JM		 9944#endif
9945
d2f9799e 9946#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM		 9947 TEST_f_f (j0, 0x1p16382L, -1.2193782500509000574176799046642541129387e-2466L),
9948 TEST_f_f (j0, 0x1p16383L, 9.5859502826270374691362975419147645151233e-2467L),
d2f9799e 9949#endif
74c57478
JM		 9950 END_DATA (j0)
9951 };
8847214f
UD		 9952
9953static void
74c57478 9954j0_test (void)
8847214f 9955{
8a216c1b 9956 FLOAT s, c;
8847214f 9957 errno = 0;
cd53c157
UD		 9958 FUNC (sincos) (0, &s, &c);
9959 if (errno == ENOSYS)
9960 /* Required function not implemented. */
9961 return;
74c57478 9962 FUNC(j0) (0);
8847214f
UD		 9963 if (errno == ENOSYS)
9964 /* Function not implemented. */
9965 return;
9966
74c57478
JM		 9967 START (j0);
9968 RUN_TEST_LOOP_f_f (j0, j0_test_data, );
9969 END (j0);
9970}
8847214f 9971
8847214f 9972
74c57478
JM		 9973static const struct test_f_f_data j1_test_data[] =
9974 {
9975 START_DATA (j1),
9976 /* j1 is the Bessel function of the first kind of order 1 */
9977 TEST_f_f (j1, qnan_value, qnan_value),
9978 TEST_f_f (j1, plus_infty, 0),
8847214f 9979
74c57478
JM		 9980 TEST_f_f (j1, -1.0, -0.440050585744933515959682203718914913L),
9981 TEST_f_f (j1, 0.0, 0.0),
9982 TEST_f_f (j1, 0.125L, 0.0623780091344946810942311355879361177L),
9983 TEST_f_f (j1, 0.75L, 0.349243602174862192523281016426251335L),
9984 TEST_f_f (j1, 1.0, 0.440050585744933515959682203718914913L),
9985 TEST_f_f (j1, 1.5, 0.557936507910099641990121213156089400L),
9986 TEST_f_f (j1, 2.0, 0.576724807756873387202448242269137087L),
9987 TEST_f_f (j1, 8.0, 0.234636346853914624381276651590454612L),
9988 TEST_f_f (j1, 10.0, 0.0434727461688614366697487680258592883L),
8847214f 9989
74c57478 9990 TEST_f_f (j1, 0x1.3ffp+74L, 1.818984347516051243459364437186082741567e-12L),
c36e1d23
JM		 9991
9992#ifndef TEST_FLOAT
74c57478
JM		 9993 TEST_f_f (j1, 0x1.ff00000000002p+840L, 1.846591691699331493194965158699937660696e-127L),
9994 TEST_f_f (j1, 0x1p1023L, 8.2687542933709649327986678723012001545638e-155L),
c36e1d23
JM		 9995#endif
9996
d2f9799e 9997#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM		 9998 TEST_f_f (j1, 0x1p16382L, 8.0839224448726336195866026476176740513439e-2467L),
9999 TEST_f_f (j1, 0x1p16383L, -3.8895531955766020648617743624167352352217e-2467L),
d2f9799e 10000#endif
74c57478
JM		 10001 END_DATA (j1)
10002 };
d2f9799e 10003
74c57478
JM		 10004static void
10005j1_test (void)
10006{
10007 FLOAT s, c;
10008 errno = 0;
10009 FUNC (sincos) (0, &s, &c);
10010 if (errno == ENOSYS)
10011 /* Required function not implemented. */
10012 return;
10013 FUNC(j1) (0);
10014 if (errno == ENOSYS)
10015 /* Function not implemented. */
10016 return;
10017
10018 START (j1);
10019 RUN_TEST_LOOP_f_f (j1, j1_test_data, );
8847214f
UD		 10020 END (j1);
10021}
10022
0e400df5
JM		 10023static const struct test_if_f_data jn_test_data[] =
10024 {
10025 START_DATA (jn),
10026 /* jn is the Bessel function of the first kind of order n. */
10027 /* jn (0, x) == j0 (x) */
10028 TEST_if_f (jn, 0, qnan_value, qnan_value),
10029 TEST_if_f (jn, 0, plus_infty, 0),
10030 TEST_if_f (jn, 0, -1.0, 0.765197686557966551449717526102663221L),
10031 TEST_if_f (jn, 0, 0.0, 1.0),
10032 TEST_if_f (jn, 0, 0.125L, 0.996097563041985204620768999453174712L),
10033 TEST_if_f (jn, 0, 0.75L, 0.864242275166648623555731103820923211L),
10034 TEST_if_f (jn, 0, 1.0, 0.765197686557966551449717526102663221L),
10035 TEST_if_f (jn, 0, 1.5, 0.511827671735918128749051744283411720L),
10036 TEST_if_f (jn, 0, 2.0, 0.223890779141235668051827454649948626L),
10037 TEST_if_f (jn, 0, 8.0, 0.171650807137553906090869407851972001L),
10038 TEST_if_f (jn, 0, 10.0, -0.245935764451348335197760862485328754L),
10039 TEST_if_f (jn, 0, 4.0, -3.9714980986384737228659076845169804197562E-1L),
10040 TEST_if_f (jn, 0, -4.0, -3.9714980986384737228659076845169804197562E-1L),
10041
10042 /* jn (1, x) == j1 (x) */
10043 TEST_if_f (jn, 1, qnan_value, qnan_value),
10044 TEST_if_f (jn, 1, plus_infty, 0),
10045 TEST_if_f (jn, 1, -1.0, -0.440050585744933515959682203718914913L),
10046 TEST_if_f (jn, 1, 0.0, 0.0),
10047 TEST_if_f (jn, 1, 0.125L, 0.0623780091344946810942311355879361177L),
10048 TEST_if_f (jn, 1, 0.75L, 0.349243602174862192523281016426251335L),
10049 TEST_if_f (jn, 1, 1.0, 0.440050585744933515959682203718914913L),
10050 TEST_if_f (jn, 1, 1.5, 0.557936507910099641990121213156089400L),
10051 TEST_if_f (jn, 1, 2.0, 0.576724807756873387202448242269137087L),
10052 TEST_if_f (jn, 1, 8.0, 0.234636346853914624381276651590454612L),
10053 TEST_if_f (jn, 1, 10.0, 0.0434727461688614366697487680258592883L),
10054
10055 /* jn (3, x) */
10056 TEST_if_f (jn, 3, qnan_value, qnan_value),
10057 TEST_if_f (jn, 3, plus_infty, 0),
10058
10059 TEST_if_f (jn, 3, -1.0, -0.0195633539826684059189053216217515083L),
10060 TEST_if_f (jn, 3, 0.0, 0.0),
10061 TEST_if_f (jn, 3, 0.125L, 0.406503832554912875023029337653442868e-4L),
10062 TEST_if_f (jn, 3, 0.75L, 0.848438342327410884392755236884386804e-2L),
10063 TEST_if_f (jn, 3, 1.0, 0.0195633539826684059189053216217515083L),
10064 TEST_if_f (jn, 3, 2.0, 0.128943249474402051098793332969239835L),
10065 TEST_if_f (jn, 3, 10.0, 0.0583793793051868123429354784103409563L),
10066
10067 /* jn (10, x) */
10068 TEST_if_f (jn, 10, qnan_value, qnan_value),
10069 TEST_if_f (jn, 10, plus_infty, 0),
10070
10071 TEST_if_f (jn, 10, -1.0, 0.263061512368745320699785368779050294e-9L),
10072 TEST_if_f (jn, 10, 0.0, 0.0),
10073 TEST_if_f (jn, 10, 0.125L, 0.250543369809369890173993791865771547e-18L),
10074 TEST_if_f (jn, 10, 0.75L, 0.149621713117596814698712483621682835e-10L),
10075 TEST_if_f (jn, 10, 1.0, 0.263061512368745320699785368779050294e-9L),
10076 TEST_if_f (jn, 10, 2.0, 0.251538628271673670963516093751820639e-6L),
10077 TEST_if_f (jn, 10, 10.0, 0.207486106633358857697278723518753428L),
10078
10079 /* BZ #11589 .*/
10080 TEST_if_f (jn, 2, 2.4048255576957729L, 0.43175480701968038399746111312430703L),
10081 TEST_if_f (jn, 3, 2.4048255576957729L, 0.19899990535769083404042146764530813L),
10082 TEST_if_f (jn, 4, 2.4048255576957729L, 0.647466661641779720084932282551219891E-1L),
10083 TEST_if_f (jn, 5, 2.4048255576957729L, 0.163892432048058525099230549946147698E-1L),
10084 TEST_if_f (jn, 6, 2.4048255576957729L, 0.34048184720278336646673682895929161E-2L),
10085 TEST_if_f (jn, 7, 2.4048255576957729L, 0.60068836573295394221291569249883076E-3L),
10086 TEST_if_f (jn, 8, 2.4048255576957729L, 0.92165786705344923232879022467054148E-4L),
10087 TEST_if_f (jn, 9, 2.4048255576957729L, 0.12517270977961513005428966643852564E-4L),
10088
10089 /* Bug 14155: spurious exception may occur. */
10090 TEST_if_f (jn, 2, 0x1.ffff62p+99L, -4.43860668048170034334926693188979974489e-16L, UNDERFLOW_EXCEPTION_OK),
10091 END_DATA (jn)
10092 };
10093
8847214f
UD		 10094static void
10095jn_test (void)
10096{
8a216c1b 10097 FLOAT s, c;
8847214f 10098 errno = 0;
cd53c157
UD		 10099 FUNC (sincos) (0, &s, &c);
10100 if (errno == ENOSYS)
10101 /* Required function not implemented. */
10102 return;
8847214f
UD		 10103 FUNC(jn) (1, 1);
10104 if (errno == ENOSYS)
10105 /* Function not implemented. */
10106 return;
10107
8847214f 10108 START (jn);
0e400df5 10109 RUN_TEST_LOOP_if_f (jn, jn_test_data, );
8847214f
UD		 10110 END (jn);
10111}
10112
10113
243216e1
JM		 10114static const struct test_fi_f_data ldexp_test_data[] =
10115 {
10116 START_DATA (ldexp),
10117 TEST_fi_f (ldexp, 0, 0, 0),
10118 TEST_fi_f (ldexp, minus_zero, 0, minus_zero),
8847214f 10119
243216e1
JM		 10120 TEST_fi_f (ldexp, plus_infty, 1, plus_infty),
10121 TEST_fi_f (ldexp, minus_infty, 1, minus_infty),
10122 TEST_fi_f (ldexp, qnan_value, 1, qnan_value),
8847214f 10123
243216e1
JM		 10124 TEST_fi_f (ldexp, 0.8L, 4, 12.8L),
10125 TEST_fi_f (ldexp, -0.854375L, 5, -27.34L),
8847214f 10126
243216e1
JM		 10127 /* ldexp (x, 0) == x. */
10128 TEST_fi_f (ldexp, 1.0L, 0L, 1.0L),
10129 END_DATA (ldexp)
10130 };
af00a34d 10131
243216e1
JM		 10132static void
10133ldexp_test (void)
10134{
10135 START (ldexp);
10136 RUN_TEST_LOOP_fi_f (ldexp, ldexp_test_data, );
af00a34d 10137 END (ldexp);
8847214f
UD		 10138}
10139
2550dfe9 10140
87aa21df
JM		 10141static const struct test_f_f1_data lgamma_test_data[] =
10142 {
10143 START_DATA (lgamma),
10144 TEST_f_f1 (lgamma, plus_infty, plus_infty, 1),
10145 TEST_f_f1 (lgamma, 0, plus_infty, 1, DIVIDE_BY_ZERO_EXCEPTION),
10146 TEST_f_f1 (lgamma, minus_zero, plus_infty, -1, DIVIDE_BY_ZERO_EXCEPTION),
10147 TEST_f_f1 (lgamma, qnan_value, qnan_value, IGNORE),
10148
10149 /* lgamma (x) == +inf plus divide by zero exception for integer x <= 0. */
10150 TEST_f_f1 (lgamma, -3, plus_infty, IGNORE, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
10151 TEST_f_f1 (lgamma, minus_infty, plus_infty, IGNORE),
10152 TEST_f_f1 (lgamma, -max_value, plus_infty, IGNORE, DIVIDE_BY_ZERO_EXCEPTION),
10153 TEST_f_f1 (lgamma, max_value, plus_infty, 1, OVERFLOW_EXCEPTION),
10154
10155 TEST_f_f1 (lgamma, 1, 0, 1),
10156
10157 TEST_f_f1 (lgamma, 3, M_LN2l, 1),
10158
10159 TEST_f_f1 (lgamma, 0.5, M_LOG_SQRT_PIl, 1),
10160 TEST_f_f1 (lgamma, -0.5, M_LOG_2_SQRT_PIl, -1),
10161 TEST_f_f1 (lgamma, 0.7L, 0.260867246531666514385732417016759578L, 1),
10162 TEST_f_f1 (lgamma, 1.2L, -0.853740900033158497197028392998854470e-1L, 1),
10163 END_DATA (lgamma)
10164 };
10165
8847214f
UD		 10166static void
10167lgamma_test (void)
10168{
10169 errno = 0;
10170 FUNC(lgamma) (0);
10171 if (errno == ENOSYS)
10172 /* Function not implemented. */
10173 return;
8847214f
UD		 10174
10175 START (lgamma);
87aa21df 10176 RUN_TEST_LOOP_f_f1 (lgamma, lgamma_test_data, , signgam);
8847214f
UD		 10177 END (lgamma);
10178}
10179
2550dfe9 10180
8847214f
UD		 10181static void
10182lrint_test (void)
10183{
10184 /* XXX this test is incomplete. We need to have a way to specifiy
10185 the rounding method and test the critical cases. So far, only
10186 unproblematic numbers are tested. */
64d063b8 10187 /* TODO: missing +/-Inf as well as qNaN tests. */
8847214f
UD		 10188
10189 START (lrint);
10190
10191 TEST_f_l (lrint, 0.0, 0);
10192 TEST_f_l (lrint, minus_zero, 0);
3c6cad26
UD		 10193 TEST_f_l (lrint, 0.2L, 0);
10194 TEST_f_l (lrint, -0.2L, 0);
8847214f 10195
3c6cad26
UD		 10196 TEST_f_l (lrint, 1.4L, 1);
10197 TEST_f_l (lrint, -1.4L, -1);
8847214f 10198
3c6cad26
UD		 10199 TEST_f_l (lrint, 8388600.3L, 8388600);
10200 TEST_f_l (lrint, -8388600.3L, -8388600);
8847214f 10201
3eb61415
UD		 10202 TEST_f_l (lrint, 1071930.0008, 1071930);
10203#ifndef TEST_FLOAT
10204 TEST_f_l (lrint, 1073741824.01, 1073741824);
39007ae3
UD		 10205# if LONG_MAX > 281474976710656
10206 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
10207# endif
3eb61415
UD		 10208#endif
10209
8847214f
UD		 10210 END (lrint);
10211}
10212
2550dfe9 10213
6624dbc0
UD		 10214static void
10215lrint_test_tonearest (void)
10216{
10217 int save_round_mode;
10218 START (lrint_tonearest);
10219
10220 save_round_mode = fegetround ();
10221
10222 if (!fesetround (FE_TONEAREST))
10223 {
10224 TEST_f_l (lrint, 0.0, 0);
10225 TEST_f_l (lrint, minus_zero, 0);
10226 TEST_f_l (lrint, 0.2L, 0);
10227 TEST_f_l (lrint, -0.2L, 0);
10228 TEST_f_l (lrint, 0.5L, 0);
10229 TEST_f_l (lrint, -0.5L, 0);
10230 TEST_f_l (lrint, 0.8L, 1);
10231 TEST_f_l (lrint, -0.8L, -1);
10232
10233 TEST_f_l (lrint, 1.4L, 1);
10234 TEST_f_l (lrint, -1.4L, -1);
10235
10236 TEST_f_l (lrint, 8388600.3L, 8388600);
10237 TEST_f_l (lrint, -8388600.3L, -8388600);
10238
10239 TEST_f_l (lrint, 1071930.0008, 1071930);
10240#ifndef TEST_FLOAT
10241 TEST_f_l (lrint, 1073741824.01, 1073741824);
10242# if LONG_MAX > 281474976710656
10243 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
10244# endif
10245#endif
10246 }
10247
10248 fesetround (save_round_mode);
10249
10250 END (lrint_tonearest);
10251}
10252
10253
10254static void
10255lrint_test_towardzero (void)
10256{
10257 int save_round_mode;
10258 START (lrint_towardzero);
10259
10260 save_round_mode = fegetround ();
10261
10262 if (!fesetround (FE_TOWARDZERO))
10263 {
10264 TEST_f_l (lrint, 0.0, 0);
10265 TEST_f_l (lrint, minus_zero, 0);
10266 TEST_f_l (lrint, 0.2L, 0);
10267 TEST_f_l (lrint, -0.2L, 0);
10268 TEST_f_l (lrint, 0.5L, 0);
10269 TEST_f_l (lrint, -0.5L, 0);
10270 TEST_f_l (lrint, 0.8L, 0);
10271 TEST_f_l (lrint, -0.8L, 0);
10272
10273 TEST_f_l (lrint, 1.4L, 1);
10274 TEST_f_l (lrint, -1.4L, -1);
10275
10276 TEST_f_l (lrint, 8388600.3L, 8388600);
10277 TEST_f_l (lrint, -8388600.3L, -8388600);
10278
10279 TEST_f_l (lrint, 1071930.0008, 1071930);
10280#ifndef TEST_FLOAT
10281 TEST_f_l (lrint, 1073741824.01, 1073741824);
10282# if LONG_MAX > 281474976710656
10283 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
10284# endif
10285#endif
10286 }
10287
10288 fesetround (save_round_mode);
10289
10290 END (lrint_towardzero);
10291}
10292
10293
10294static void
10295lrint_test_downward (void)
10296{
10297 int save_round_mode;
10298 START (lrint_downward);
10299
10300 save_round_mode = fegetround ();
10301
10302 if (!fesetround (FE_DOWNWARD))
10303 {
10304 TEST_f_l (lrint, 0.0, 0);
10305 TEST_f_l (lrint, minus_zero, 0);
10306 TEST_f_l (lrint, 0.2L, 0);
10307 TEST_f_l (lrint, -0.2L, -1);
10308 TEST_f_l (lrint, 0.5L, 0);
10309 TEST_f_l (lrint, -0.5L, -1);
10310 TEST_f_l (lrint, 0.8L, 0);
10311 TEST_f_l (lrint, -0.8L, -1);
10312
10313 TEST_f_l (lrint, 1.4L, 1);
10314 TEST_f_l (lrint, -1.4L, -2);
10315
10316 TEST_f_l (lrint, 8388600.3L, 8388600);
10317 TEST_f_l (lrint, -8388600.3L, -8388601);
10318
10319 TEST_f_l (lrint, 1071930.0008, 1071930);
10320#ifndef TEST_FLOAT
10321 TEST_f_l (lrint, 1073741824.01, 1073741824);
10322# if LONG_MAX > 281474976710656
10323 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
10324# endif
10325#endif
10326 }
10327
10328 fesetround (save_round_mode);
10329
10330 END (lrint_downward);
10331}
10332
10333
10334static void
10335lrint_test_upward (void)
10336{
10337 int save_round_mode;
10338 START (lrint_upward);
10339
10340 save_round_mode = fegetround ();
10341
10342 if (!fesetround (FE_UPWARD))
10343 {
10344 TEST_f_l (lrint, 0.0, 0);
10345 TEST_f_l (lrint, minus_zero, 0);
10346 TEST_f_l (lrint, 0.2L, 1);
10347 TEST_f_l (lrint, -0.2L, 0);
10348 TEST_f_l (lrint, 0.5L, 1);
10349 TEST_f_l (lrint, -0.5L, 0);
10350 TEST_f_l (lrint, 0.8L, 1);
10351 TEST_f_l (lrint, -0.8L, 0);
10352
10353 TEST_f_l (lrint, 1.4L, 2);
10354 TEST_f_l (lrint, -1.4L, -1);
10355
10356 TEST_f_l (lrint, 8388600.3L, 8388601);
10357 TEST_f_l (lrint, -8388600.3L, -8388600);
10358
10359#ifndef TEST_FLOAT
10360 TEST_f_l (lrint, 1071930.0008, 1071931);
10361 TEST_f_l (lrint, 1073741824.01, 1073741825);
10362# if LONG_MAX > 281474976710656 && defined (TEST_LDOUBLE)
89210b4c 10363 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
6624dbc0
UD		 10364# endif
10365#endif
10366 }
10367
10368 fesetround (save_round_mode);
10369
10370 END (lrint_upward);
10371}
10372
10373
8847214f
UD		 10374static void
10375llrint_test (void)
10376{
10377 /* XXX this test is incomplete. We need to have a way to specifiy
10378 the rounding method and test the critical cases. So far, only
10379 unproblematic numbers are tested. */
64d063b8 10380 /* TODO: missing +/-Inf as well as qNaN tests. */
8847214f
UD		 10381
10382 START (llrint);
10383
10384 TEST_f_L (llrint, 0.0, 0);
10385 TEST_f_L (llrint, minus_zero, 0);
3c6cad26
UD		 10386 TEST_f_L (llrint, 0.2L, 0);
10387 TEST_f_L (llrint, -0.2L, 0);
8847214f 10388
3c6cad26
UD		 10389 TEST_f_L (llrint, 1.4L, 1);
10390 TEST_f_L (llrint, -1.4L, -1);
8847214f 10391
3c6cad26
UD		 10392 TEST_f_L (llrint, 8388600.3L, 8388600);
10393 TEST_f_L (llrint, -8388600.3L, -8388600);
8847214f 10394
3eb61415
UD		 10395 TEST_f_l (llrint, 1071930.0008, 1071930);
10396
8847214f
UD		 10397 /* Test boundary conditions. */
10398 /* 0x1FFFFF */
10399 TEST_f_L (llrint, 2097151.0,2097151LL);
10400 /* 0x800000 */
10401 TEST_f_L (llrint, 8388608.0, 8388608LL);
10402 /* 0x1000000 */
10403 TEST_f_L (llrint, 16777216.0, 16777216LL);
10404 /* 0x20000000000 */
10405 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10406 /* 0x40000000000 */
10407 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
39007ae3
UD		 10408 /* 0x1000000000000 */
10409 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
8847214f
UD		 10410 /* 0x10000000000000 */
10411 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10412 /* 0x10000080000000 */
10413 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10414 /* 0x20000000000000 */
10415 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10416 /* 0x80000000000000 */
10417 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10418 /* 0x100000000000000 */
10419 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
f964490f
RM		 10420#ifdef TEST_LDOUBLE
10421 /* The input can only be represented in long double. */
10422 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370496LL);
10423 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370496LL);
10424 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370496LL);
10425 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370497LL);
10426 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370498LL);
10427
10428 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370496LL);
10429 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370496LL);
10430 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370496LL);
10431 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370497LL);
10432 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370498LL);
10433
830fce04
RM		 10434# if LDBL_MANT_DIG > 100
10435 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370495LL);
10436 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370496LL);
10437 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370497LL);
10438 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370495LL);
10439 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370496LL);
10440 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370497LL);
10441
10442 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370495LL);
10443 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370496LL);
10444 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370497LL);
10445 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370495LL);
10446 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370496LL);
10447 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370497LL);
10448#endif
10449
f964490f
RM		 10450 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740992LL);
10451 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740992LL);
10452 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740992LL);
10453 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740993LL);
10454 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740994LL);
10455
10456 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740992LL);
10457 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740992LL);
10458 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740992LL);
10459 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740993LL);
10460 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740994LL);
10461
830fce04
RM		 10462# if LDBL_MANT_DIG > 100
10463 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740991LL);
10464 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740992LL);
10465 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740993LL);
10466 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740992LL);
10467 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740993LL);
10468 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740994LL);
10469
10470 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740991LL);
10471 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740992LL);
10472 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740993LL);
10473 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740992LL);
10474 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740993LL);
10475 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740994LL);
10476#endif
10477
f964490f
RM		 10478 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927936LL);
10479 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927936LL);
10480 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927936LL);
10481 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927937LL);
10482 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927938LL);
10483
10484 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927936LL);
10485 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927936LL);
10486 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927936LL);
10487 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927937LL);
10488 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927938LL);
830fce04
RM		 10489
10490# if LDBL_MANT_DIG > 100
10491 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775806LL);
10492 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775806LL);
10493 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
10494 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
10495 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775806LL);
10496 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775806LL);
10497 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775806L);
10498 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775806LL);
10499 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775807LL);
10500 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775807LL);
10501 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
10502 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
10503# endif
f964490f 10504#endif
8847214f
UD		 10505
10506 END (llrint);
10507}
10508
830fce04
RM		 10509static void
10510llrint_test_tonearest (void)
10511{
10512 int save_round_mode;
10513 START (llrint_tonearest);
10514
10515 save_round_mode = fegetround ();
10516
10517 if (!fesetround (FE_TONEAREST))
10518 {
10519 TEST_f_L (llrint, 0.0, 0);
10520 TEST_f_L (llrint, minus_zero, 0);
10521 TEST_f_L (llrint, 0.2L, 0);
10522 TEST_f_L (llrint, -0.2L, 0);
10523
10524 TEST_f_L (llrint, 1.4L, 1);
10525 TEST_f_L (llrint, -1.4L, -1);
10526
10527 TEST_f_L (llrint, 8388600.3L, 8388600);
10528 TEST_f_L (llrint, -8388600.3L, -8388600);
10529
10530 TEST_f_l (llrint, 1071930.0008, 1071930);
10531
10532 /* Test boundary conditions. */
10533 /* 0x1FFFFF */
10534 TEST_f_L (llrint, 2097151.0,2097151LL);
10535 /* 0x800000 */
10536 TEST_f_L (llrint, 8388608.0, 8388608LL);
10537 /* 0x1000000 */
10538 TEST_f_L (llrint, 16777216.0, 16777216LL);
10539 /* 0x20000000000 */
10540 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10541 /* 0x40000000000 */
10542 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
10543 /* 0x1000000000000 */
10544 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
10545 /* 0x10000000000000 */
10546 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10547 /* 0x10000080000000 */
10548 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10549 /* 0x20000000000000 */
10550 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10551 /* 0x80000000000000 */
10552 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10553 /* 0x100000000000000 */
10554 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
10555#ifdef TEST_LDOUBLE
10556 /* The input can only be represented in long double. */
10557 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370496LL);
10558 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370496LL);
10559 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370496LL);
10560 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370497LL);
10561 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370498LL);
10562
10563 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370496LL);
10564 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370496LL);
10565 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370496LL);
10566 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370497LL);
10567 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370498LL);
10568
10569# if LDBL_MANT_DIG > 100
10570 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370495LL);
10571 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370496LL);
10572 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370497LL);
10573 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370495LL);
10574 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370496LL);
10575 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370497LL);
10576
10577 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370495LL);
10578 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370496LL);
10579 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370497LL);
10580 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370495LL);
10581 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370496LL);
10582 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370497LL);
10583#endif
10584
10585 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740992LL);
10586 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740992LL);
10587 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740992LL);
10588 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740993LL);
10589 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740994LL);
10590
10591 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740992LL);
10592 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740992LL);
10593 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740992LL);
10594 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740993LL);
10595 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740994LL);
10596
10597# if LDBL_MANT_DIG > 100
10598 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740991LL);
10599 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740992LL);
10600 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740993LL);
10601 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740992LL);
10602 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740993LL);
10603 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740994LL);
10604
10605 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740991LL);
10606 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740992LL);
10607 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740993LL);
10608 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740992LL);
10609 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740993LL);
10610 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740994LL);
10611#endif
10612
10613 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927936LL);
10614 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927936LL);
10615 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927936LL);
10616 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927937LL);
10617 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927938LL);
10618
10619 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927936LL);
10620 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927936LL);
10621 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927936LL);
10622 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927937LL);
10623 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927938LL);
10624
10625# if LDBL_MANT_DIG > 100
10626 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775806LL);
10627 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775806LL);
10628 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
10629 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
10630 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775806LL);
10631 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775806LL);
10632 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775806L);
10633 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775806LL);
10634 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775807LL);
10635 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775807LL);
10636 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
10637 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
10638# endif
10639#endif
10640 }
10641
10642 fesetround (save_round_mode);
10643
10644 END (llrint_tonearest);
10645}
10646
10647static void
10648llrint_test_towardzero (void)
10649{
10650 int save_round_mode;
10651 START (llrint_towardzero);
10652
10653 save_round_mode = fegetround ();
10654
10655 if (!fesetround (FE_TOWARDZERO))
10656 {
10657 TEST_f_L (llrint, 0.0, 0);
10658 TEST_f_L (llrint, minus_zero, 0);
10659 TEST_f_L (llrint, 0.2L, 0);
10660 TEST_f_L (llrint, -0.2L, 0);
10661
10662 TEST_f_L (llrint, 1.4L, 1);
10663 TEST_f_L (llrint, -1.4L, -1);
10664
10665 TEST_f_L (llrint, 8388600.3L, 8388600);
10666 TEST_f_L (llrint, -8388600.3L, -8388600);
10667
10668 TEST_f_l (llrint, 1071930.0008, 1071930);
10669
10670 /* Test boundary conditions. */
10671 /* 0x1FFFFF */
10672 TEST_f_L (llrint, 2097151.0,2097151LL);
10673 /* 0x800000 */
10674 TEST_f_L (llrint, 8388608.0, 8388608LL);
10675 /* 0x1000000 */
10676 TEST_f_L (llrint, 16777216.0, 16777216LL);
10677 /* 0x20000000000 */
10678 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10679 /* 0x40000000000 */
10680 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
10681 /* 0x1000000000000 */
10682 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
10683 /* 0x10000000000000 */
10684 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10685 /* 0x10000080000000 */
10686 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10687 /* 0x20000000000000 */
10688 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10689 /* 0x80000000000000 */
10690 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10691 /* 0x100000000000000 */
10692 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
10693#ifdef TEST_LDOUBLE
10694 /* The input can only be represented in long double. */
10695 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370495LL);
10696 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370496LL);
10697 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370496LL);
10698 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370496LL);
10699 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370497LL);
10700
10701 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370495LL);
10702 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370496LL);
10703 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370496LL);
10704 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370496LL);
10705 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370497LL);
10706
10707# if LDBL_MANT_DIG > 100
10708 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370495LL);
10709 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370496LL);
10710 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370497LL);
10711 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370494LL);
10712 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370495LL);
10713 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370496LL);
10714
10715 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370495LL);
10716 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370496LL);
10717 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370497LL);
10718 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370494LL);
10719 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370495LL);
10720 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370496LL);
10721#endif
10722
10723 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740991LL);
10724 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740992LL);
10725 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740992LL);
10726 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740992LL);
10727 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740993LL);
10728
10729 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740991LL);
10730 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740992LL);
10731 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740992LL);
10732 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740992LL);
10733 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740993LL);
10734
10735# if LDBL_MANT_DIG > 100
10736 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740991LL);
10737 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740992LL);
10738 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740993LL);
10739 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740991LL);
10740 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740992LL);
10741 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740993LL);
10742
10743 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740991LL);
10744 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740992LL);
10745 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740993LL);
10746 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740991LL);
10747 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740992LL);
10748 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740993LL);
10749#endif
10750
10751 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927935LL);
10752 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927936LL);
10753 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927936LL);
10754 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927936LL);
10755 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927937LL);
10756
10757 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927935LL);
10758 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927936LL);
10759 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927936LL);
10760 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927936LL);
10761 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927937LL);
10762
10763# if LDBL_MANT_DIG > 100
10764 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775805LL);
10765 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775805LL);
10766 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
10767 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
10768 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775806LL);
10769 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775806LL);
10770 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775806L);
10771 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775806LL);
10772 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775806LL);
10773 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775806LL);
10774 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
10775 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
10776# endif
10777#endif
10778 }
10779
10780 fesetround (save_round_mode);
10781
10782 END (llrint_towardzero);
10783}
10784
10785static void
10786llrint_test_downward (void)
10787{
10788 int save_round_mode;
10789 START (llrint_downward);
10790
10791 save_round_mode = fegetround ();
10792
10793 if (!fesetround (FE_DOWNWARD))
10794 {
10795 TEST_f_L (llrint, 0.0, 0);
10796 TEST_f_L (llrint, minus_zero, 0);
10797 TEST_f_L (llrint, 0.2L, 0);
10798 TEST_f_L (llrint, -0.2L, -1);
10799
10800 TEST_f_L (llrint, 1.4L, 1);
10801 TEST_f_L (llrint, -1.4L, -2);
10802
10803 TEST_f_L (llrint, 8388600.3L, 8388600);
10804 TEST_f_L (llrint, -8388600.3L, -8388601);
10805
10806 TEST_f_l (llrint, 1071930.0008, 1071930);
10807
10808 /* Test boundary conditions. */
10809 /* 0x1FFFFF */
10810 TEST_f_L (llrint, 2097151.0,2097151LL);
10811 /* 0x800000 */
10812 TEST_f_L (llrint, 8388608.0, 8388608LL);
10813 /* 0x1000000 */
10814 TEST_f_L (llrint, 16777216.0, 16777216LL);
10815 /* 0x20000000000 */
10816 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10817 /* 0x40000000000 */
10818 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
10819 /* 0x1000000000000 */
10820 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
10821 /* 0x10000000000000 */
10822 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10823 /* 0x10000080000000 */
10824 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10825 /* 0x20000000000000 */
10826 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10827 /* 0x80000000000000 */
10828 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10829 /* 0x100000000000000 */
10830 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
10831#ifdef TEST_LDOUBLE
10832 /* The input can only be represented in long double. */
10833 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370495LL);
10834 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370496LL);
10835 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370496LL);
10836 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370496LL);
10837 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370497LL);
10838
10839 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370495LL);
10840 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370496LL);
10841 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370497LL);
10842 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370494LL);
10843 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370495LL);
10844 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370496LL);
10845
10846 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370496LL);
10847 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370497LL);
10848 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370497LL);
10849 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370497LL);
10850 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370498LL);
10851
10852 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370496LL);
10853 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370497LL);
10854 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370498LL);
10855 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370495LL);
10856 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370496LL);
10857 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370497LL);
10858
10859 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740991LL);
10860 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740992LL);
10861 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740992LL);
10862 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740992LL);
10863 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740993LL);
10864
10865 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740991LL);
10866 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740992LL);
10867 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740993LL);
10868 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740991LL);
10869 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740992LL);
10870 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740993LL);
10871
10872 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740992LL);
10873 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740993LL);
10874 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740993LL);
10875 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740993LL);
10876 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740994LL);
10877
10878 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740992LL);
10879 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740993LL);
10880 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740994LL);
10881 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740992LL);
10882 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740993LL);
10883 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740994LL);
10884
10885 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927935LL);
10886 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927936LL);
10887 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927936LL);
10888 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927936LL);
10889 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927937LL);
10890
10891 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927936LL);
10892 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927937LL);
10893 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927937LL);
10894 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927937LL);
10895 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927938LL);
10896
10897# if LDBL_MANT_DIG > 100
10898 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775805LL);
10899 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775806LL);
10900 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
10901 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
10902 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775806LL);
10903 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775807LL);
10904 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775806L);
10905 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775807LL);
10906 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775806LL);
10907 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775807LL);
10908 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
10909 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
10910# endif
10911#endif
10912 }
10913
10914 fesetround (save_round_mode);
10915
10916 END (llrint_downward);
10917}
10918
10919static void
10920llrint_test_upward (void)
10921{
10922 int save_round_mode;
10923 START (llrint_upward);
10924
10925 save_round_mode = fegetround ();
10926
10927 if (!fesetround (FE_UPWARD))
10928 {
10929 TEST_f_L (llrint, 0.0, 0);
10930 TEST_f_L (llrint, minus_zero, 0);
10931 TEST_f_L (llrint, 0.2L, 1);
10932 TEST_f_L (llrint, -0.2L, 0);
10933
10934 TEST_f_L (llrint, 1.4L, 2);
10935 TEST_f_L (llrint, -1.4L, -1);
10936
10937 TEST_f_L (llrint, 8388600.3L, 8388601);
10938 TEST_f_L (llrint, -8388600.3L, -8388600);
10939#ifndef TEST_FLOAT
10940 TEST_f_l (llrint, 1071930.0008, 1071931);
10941#endif
10942 /* Test boundary conditions. */
10943 /* 0x1FFFFF */
10944 TEST_f_L (llrint, 2097151.0,2097151LL);
10945 /* 0x800000 */
10946 TEST_f_L (llrint, 8388608.0, 8388608LL);
10947 /* 0x1000000 */
10948 TEST_f_L (llrint, 16777216.0, 16777216LL);
10949 /* 0x20000000000 */
10950 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10951 /* 0x40000000000 */
10952 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
10953 /* 0x1000000000000 */
10954 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
10955 /* 0x10000000000000 */
10956 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10957 /* 0x10000080000000 */
10958 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10959 /* 0x20000000000000 */
10960 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10961 /* 0x80000000000000 */
10962 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10963 /* 0x100000000000000 */
10964 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
10965#ifdef TEST_LDOUBLE
10966 /* The input can only be represented in long double. */
10967 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370496LL);
10968 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370497LL);
10969 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370497LL);
10970 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370497LL);
10971 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370498LL);
10972
10973 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370496LL);
10974 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370497LL);
10975 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370498LL);
10976 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370495LL);
10977 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370496LL);
10978 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370497LL);
10979
10980 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370495LL);
10981 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370496LL);
10982 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370496LL);
10983 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370496LL);
10984 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370497LL);
10985
10986 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370495LL);
10987 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370496LL);
10988 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370497LL);
10989 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370494LL);
10990 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370495LL);
10991 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370496LL);
10992
10993 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740992LL);
10994 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740993LL);
10995 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740993LL);
10996 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740993LL);
10997 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740994LL);
10998
10999 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740992LL);
11000 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740993LL);
11001 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740994LL);
11002 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740992LL);
11003 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740993LL);
11004 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740994LL);
11005
11006 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740991LL);
11007 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740992LL);
11008 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740992LL);
11009 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740992LL);
11010 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740993LL);
11011
11012 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740991LL);
11013 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740992LL);
11014 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740993LL);
11015 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740991LL);
11016 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740992LL);
11017 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740993LL);
11018
11019 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927936LL);
11020 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927937LL);
11021 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927937LL);
11022 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927937LL);
11023 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927938LL);
11024
11025 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927935LL);
11026 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927936LL);
11027 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927936LL);
11028 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927936LL);
11029 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927937LL);
11030
11031# if LDBL_MANT_DIG > 100
11032 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775806LL);
11033 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775805LL);
11034 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
11035 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
11036 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775807LL);
11037 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775806LL);
11038 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775807L);
11039 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775806LL);
11040 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775807LL);
11041 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775806LL);
11042 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
11043 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
11044# endif
11045#endif
11046 }
11047
11048 fesetround (save_round_mode);
11049
11050 END (llrint_upward);
11051}
11052
2550dfe9 11053
74c57478
JM		 11054static const struct test_f_f_data log_test_data[] =
11055 {
11056 START_DATA (log),
11057 TEST_f_f (log, 0, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11058 TEST_f_f (log, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11059
11060 TEST_f_f (log, 1, 0),
11061
11062 TEST_f_f (log, -1, qnan_value, INVALID_EXCEPTION),
11063 TEST_f_f (log, -max_value, qnan_value, INVALID_EXCEPTION),
11064 TEST_f_f (log, minus_infty, qnan_value, INVALID_EXCEPTION),
11065 TEST_f_f (log, plus_infty, plus_infty),
11066 TEST_f_f (log, qnan_value, qnan_value),
11067
11068 TEST_f_f (log, M_El, 1),
f98ece5f 11069 TEST_f_f (log, M_1_DIV_El, -1),
74c57478
JM		 11070 TEST_f_f (log, 2, M_LN2l),
11071 TEST_f_f (log, 10, M_LN10l),
11072 TEST_f_f (log, 0.75L, -0.287682072451780927439219005993827432L),
11073 END_DATA (log)
11074 };
11075
8847214f
UD		 11076static void
11077log_test (void)
11078{
e6d3c4a7
AJ		 11079 errno = 0;
11080 FUNC(log) (1);
11081 if (errno == ENOSYS)
11082 /* Function not implemented. */
11083 return;
8847214f 11084 START (log);
74c57478 11085 RUN_TEST_LOOP_f_f (log, log_test_data, );
8847214f
UD		 11086 END (log);
11087}
11088
11089
74c57478
JM		 11090static const struct test_f_f_data log10_test_data[] =
11091 {
11092 START_DATA (log10),
11093 TEST_f_f (log10, 0, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11094 TEST_f_f (log10, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11095
11096 TEST_f_f (log10, 1, 0),
11097
11098 /* log10 (x) == qNaN plus invalid exception if x < 0. */
11099 TEST_f_f (log10, -1, qnan_value, INVALID_EXCEPTION),
11100 TEST_f_f (log10, -max_value, qnan_value, INVALID_EXCEPTION),
11101 TEST_f_f (log10, minus_infty, qnan_value, INVALID_EXCEPTION),
11102
11103 TEST_f_f (log10, plus_infty, plus_infty),
11104 TEST_f_f (log10, qnan_value, qnan_value),
11105
11106 TEST_f_f (log10, 0.1L, -1),
11107 TEST_f_f (log10, 10.0, 1),
11108 TEST_f_f (log10, 100.0, 2),
11109 TEST_f_f (log10, 10000.0, 4),
11110 TEST_f_f (log10, M_El, M_LOG10El),
11111 TEST_f_f (log10, 0.75L, -0.124938736608299953132449886193870744L),
11112 END_DATA (log10)
11113 };
11114
8847214f
UD		 11115static void
11116log10_test (void)
11117{
e6d3c4a7
AJ		 11118 errno = 0;
11119 FUNC(log10) (1);
11120 if (errno == ENOSYS)
11121 /* Function not implemented. */
11122 return;
11123
8847214f 11124 START (log10);
74c57478
JM		 11125 RUN_TEST_LOOP_f_f (log10, log10_test_data, );
11126 END (log10);
11127}
8847214f 11128
8847214f 11129
74c57478
JM		 11130static const struct test_f_f_data log1p_test_data[] =
11131 {
11132 START_DATA (log1p),
11133 TEST_f_f (log1p, 0, 0),
11134 TEST_f_f (log1p, minus_zero, minus_zero),
8847214f 11135
74c57478
JM		 11136 TEST_f_f (log1p, -1, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11137 TEST_f_f (log1p, -2, qnan_value, INVALID_EXCEPTION),
11138 TEST_f_f (log1p, -max_value, qnan_value, INVALID_EXCEPTION),
11139 TEST_f_f (log1p, minus_infty, qnan_value, INVALID_EXCEPTION),
8847214f 11140
74c57478
JM		 11141 TEST_f_f (log1p, plus_infty, plus_infty),
11142 TEST_f_f (log1p, qnan_value, qnan_value),
8847214f 11143
74c57478 11144 TEST_f_f (log1p, M_El - 1.0, 1),
8847214f 11145
74c57478
JM		 11146 TEST_f_f (log1p, -0.25L, -0.287682072451780927439219005993827432L),
11147 TEST_f_f (log1p, -0.875, -2.07944154167983592825169636437452970L),
11148 END_DATA (log1p)
11149 };
8847214f
UD		 11150
11151static void
11152log1p_test (void)
11153{
e6d3c4a7
AJ		 11154 errno = 0;
11155 FUNC(log1p) (0);
11156 if (errno == ENOSYS)
11157 /* Function not implemented. */
11158 return;
11159
8847214f 11160 START (log1p);
74c57478
JM		 11161 RUN_TEST_LOOP_f_f (log1p, log1p_test_data, );
11162 END (log1p);
11163}
8847214f 11164
8847214f 11165
74c57478
JM		 11166static const struct test_f_f_data log2_test_data[] =
11167 {
11168 START_DATA (log2),
11169 TEST_f_f (log2, 0, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11170 TEST_f_f (log2, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 11171
74c57478 11172 TEST_f_f (log2, 1, 0),
8847214f 11173
74c57478
JM		 11174 TEST_f_f (log2, -1, qnan_value, INVALID_EXCEPTION),
11175 TEST_f_f (log2, -max_value, qnan_value, INVALID_EXCEPTION),
11176 TEST_f_f (log2, minus_infty, qnan_value, INVALID_EXCEPTION),
8847214f 11177
74c57478
JM		 11178 TEST_f_f (log2, plus_infty, plus_infty),
11179 TEST_f_f (log2, qnan_value, qnan_value),
8847214f 11180
74c57478
JM		 11181 TEST_f_f (log2, M_El, M_LOG2El),
11182 TEST_f_f (log2, 2.0, 1),
11183 TEST_f_f (log2, 16.0, 4),
11184 TEST_f_f (log2, 256.0, 8),
11185 TEST_f_f (log2, 0.75L, -.415037499278843818546261056052183492L),
11186 END_DATA (log2)
11187 };
8847214f
UD		 11188
11189static void
11190log2_test (void)
11191{
e6d3c4a7
AJ		 11192 errno = 0;
11193 FUNC(log2) (1);
11194 if (errno == ENOSYS)
11195 /* Function not implemented. */
11196 return;
11197
8847214f 11198 START (log2);
74c57478 11199 RUN_TEST_LOOP_f_f (log2, log2_test_data, );
8847214f
UD		 11200 END (log2);
11201}
11202
11203
74c57478
JM		 11204static const struct test_f_f_data logb_test_data[] =
11205 {
11206 START_DATA (logb),
11207 TEST_f_f (logb, plus_infty, plus_infty),
11208 TEST_f_f (logb, minus_infty, plus_infty),
8847214f 11209
74c57478 11210 TEST_f_f (logb, 0, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 11211
74c57478
JM		 11212 TEST_f_f (logb, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11213 TEST_f_f (logb, qnan_value, qnan_value),
8847214f 11214
74c57478
JM		 11215 TEST_f_f (logb, 1, 0),
11216 TEST_f_f (logb, M_El, 1),
11217 TEST_f_f (logb, 1024, 10),
11218 TEST_f_f (logb, -2000, 10),
8847214f 11219
74c57478
JM		 11220 TEST_f_f (logb, 0x0.1p-127, -131),
11221 TEST_f_f (logb, 0x0.01p-127, -135),
11222 TEST_f_f (logb, 0x0.011p-127, -135),
89c9aa49 11223#ifndef TEST_FLOAT
74c57478
JM		 11224 TEST_f_f (logb, 0x0.8p-1022, -1023),
11225 TEST_f_f (logb, 0x0.1p-1022, -1026),
11226 TEST_f_f (logb, 0x0.00111p-1022, -1034),
11227 TEST_f_f (logb, 0x0.00001p-1022, -1042),
11228 TEST_f_f (logb, 0x0.000011p-1022, -1042),
11229 TEST_f_f (logb, 0x0.0000000000001p-1022, -1074),
89c9aa49
AZ		 11230#endif
11231#if defined TEST_LDOUBLE && LDBL_MIN_EXP - LDBL_MANT_DIG <= -16400
74c57478
JM		 11232 TEST_f_f (logb, 0x1p-16400L, -16400),
11233 TEST_f_f (logb, 0x.00000000001p-16382L, -16426),
89c9aa49 11234#endif
74c57478
JM		 11235 END_DATA (logb)
11236 };
89c9aa49 11237
74c57478
JM		 11238static void
11239logb_test (void)
11240{
11241 START (logb);
11242 RUN_TEST_LOOP_f_f (logb, logb_test_data, );
8847214f
UD		 11243 END (logb);
11244}
11245
74c57478
JM		 11246static const struct test_f_f_data logb_downward_test_data[] =
11247 {
11248 START_DATA (logb_downward),
11249 /* IEEE 754-2008 says (section 5.3.3) that "logB(1) is +0.". Libm
11250 should not return -0 from logb in any rounding mode. PowerPC32 has
11251 failed with this test for power4 logb (and logbl on all PowerPC
11252 platforms) in the past due to instruction selection. GCC PR 52775
11253 provides the availability of the fcfid insn in 32-bit mode which
11254 eliminates the use of fsub in this instance and prevents the negative
11255 signed 0.0. */
11256
11257 /* BZ #887 */
11258 TEST_f_f (logb, 1.000e+0, plus_zero),
11259 END_DATA (logb_downward)
11260 };
11261
a462cb63
RA		 11262static void
11263logb_test_downward (void)
11264{
a462cb63
RA		 11265 errno = 0;
11266
11267 FUNC(logb) (0);
11268 if (errno == ENOSYS)
11269 /* Function not implemented. */
11270 return;
11271
11272 START (logb_downward);
74c57478 11273 RUN_TEST_LOOP_f_f (logb, logb_downward_test_data, FE_DOWNWARD);
a462cb63
RA		 11274 END (logb_downward);
11275}
2550dfe9 11276
8847214f
UD		 11277static void
11278lround_test (void)
11279{
64d063b8
TS		 11280 /* TODO: missing +/-Inf as well as qNaN tests. */
11281
8847214f
UD		 11282 START (lround);
11283
11284 TEST_f_l (lround, 0, 0);
11285 TEST_f_l (lround, minus_zero, 0);
3c6cad26
UD		 11286 TEST_f_l (lround, 0.2L, 0.0);
11287 TEST_f_l (lround, -0.2L, 0);
8847214f
UD		 11288 TEST_f_l (lround, 0.5, 1);
11289 TEST_f_l (lround, -0.5, -1);
3c6cad26
UD		 11290 TEST_f_l (lround, 0.8L, 1);
11291 TEST_f_l (lround, -0.8L, -1);
8847214f
UD		 11292 TEST_f_l (lround, 1.5, 2);
11293 TEST_f_l (lround, -1.5, -2);
11294 TEST_f_l (lround, 22514.5, 22515);
11295 TEST_f_l (lround, -22514.5, -22515);
3eb61415 11296 TEST_f_l (lround, 1071930.0008, 1071930);
8847214f 11297#ifndef TEST_FLOAT
3eb61415 11298 TEST_f_l (lround, 1073741824.01, 1073741824);
39007ae3
UD		 11299# if LONG_MAX > 281474976710656
11300 TEST_f_l (lround, 281474976710656.025, 281474976710656);
169d7f11 11301 TEST_f_l (lround, 18014398509481974, 18014398509481974);
39007ae3 11302# endif
8847214f
UD		 11303 TEST_f_l (lround, 2097152.5, 2097153);
11304 TEST_f_l (lround, -2097152.5, -2097153);
c1e6b459
UD		 11305 /* nextafter(0.5,-1) */
11306 TEST_f_l (lround, 0x1.fffffffffffffp-2, 0);
11307 /* nextafter(-0.5,1) */
11308 TEST_f_l (lround, -0x1.fffffffffffffp-2, 0);
11309#else
11310 /* nextafter(0.5,-1) */
11311 TEST_f_l (lround, 0x1.fffffp-2, 0);
11312 /* nextafter(-0.5,1) */
11313 TEST_f_l (lround, -0x1.fffffp-2, 0);
11314 TEST_f_l (lround, 0x1.fffffep+23, 16777215);
11315 TEST_f_l (lround, -0x1.fffffep+23, -16777215);
8847214f
UD		 11316#endif
11317 END (lround);
11318}
11319
11320
11321static void
11322llround_test (void)
11323{
64d063b8
TS		 11324 /* TODO: missing +/-Inf as well as qNaN tests. */
11325
8847214f
UD		 11326 START (llround);
11327
11328 TEST_f_L (llround, 0, 0);
11329 TEST_f_L (llround, minus_zero, 0);
3c6cad26
UD		 11330 TEST_f_L (llround, 0.2L, 0.0);
11331 TEST_f_L (llround, -0.2L, 0);
8847214f
UD		 11332 TEST_f_L (llround, 0.5, 1);
11333 TEST_f_L (llround, -0.5, -1);
3c6cad26
UD		 11334 TEST_f_L (llround, 0.8L, 1);
11335 TEST_f_L (llround, -0.8L, -1);
8847214f
UD		 11336 TEST_f_L (llround, 1.5, 2);
11337 TEST_f_L (llround, -1.5, -2);
11338 TEST_f_L (llround, 22514.5, 22515);
11339 TEST_f_L (llround, -22514.5, -22515);
3eb61415 11340 TEST_f_l (llround, 1071930.0008, 1071930);
8847214f
UD		 11341#ifndef TEST_FLOAT
11342 TEST_f_L (llround, 2097152.5, 2097153);
11343 TEST_f_L (llround, -2097152.5, -2097153);
11344 TEST_f_L (llround, 34359738368.5, 34359738369ll);
11345 TEST_f_L (llround, -34359738368.5, -34359738369ll);
169d7f11 11346 TEST_f_L (llround, -3.65309740835E17, -365309740835000000LL);
8847214f
UD		 11347#endif
11348
11349 /* Test boundary conditions. */
11350 /* 0x1FFFFF */
11351 TEST_f_L (llround, 2097151.0, 2097151LL);
11352 /* 0x800000 */
11353 TEST_f_L (llround, 8388608.0, 8388608LL);
11354 /* 0x1000000 */
11355 TEST_f_L (llround, 16777216.0, 16777216LL);
11356 /* 0x20000000000 */
11357 TEST_f_L (llround, 2199023255552.0, 2199023255552LL);
11358 /* 0x40000000000 */
11359 TEST_f_L (llround, 4398046511104.0, 4398046511104LL);
39007ae3
UD		 11360 /* 0x1000000000000 */
11361 TEST_f_L (llround, 281474976710656.0, 281474976710656LL);
8847214f
UD		 11362 /* 0x10000000000000 */
11363 TEST_f_L (llround, 4503599627370496.0, 4503599627370496LL);
11364 /* 0x10000080000000 */
3eb61415 11365 TEST_f_L (llround, 4503601774854144.0, 4503601774854144LL);
8847214f
UD		 11366 /* 0x20000000000000 */
11367 TEST_f_L (llround, 9007199254740992.0, 9007199254740992LL);
11368 /* 0x80000000000000 */
11369 TEST_f_L (llround, 36028797018963968.0, 36028797018963968LL);
11370 /* 0x100000000000000 */
11371 TEST_f_L (llround, 72057594037927936.0, 72057594037927936LL);
11372
601d2942
UD		 11373#ifndef TEST_FLOAT
11374 /* 0x100000000 */
11375 TEST_f_L (llround, 4294967295.5, 4294967296LL);
11376 /* 0x200000000 */
11377 TEST_f_L (llround, 8589934591.5, 8589934592LL);
c1e6b459
UD		 11378
11379 /* nextafter(0.5,-1) */
11380 TEST_f_L (llround, 0x1.fffffffffffffp-2, 0);
11381 /* nextafter(-0.5,1) */
11382 TEST_f_L (llround, -0x1.fffffffffffffp-2, 0);
11383 /* On PowerPC an exponent of '52' is the largest incrementally
11384 * representable sequence of whole-numbers in the 'double' range. We test
11385 * lround to make sure that a guard bit set during the lround operation
11386 * hasn't forced an erroneous shift giving us an incorrect result. The odd
11387 * numbers between +-(2^52+1 and 2^53-1) are affected since they have the
11388 * rightmost bit set. */
11389 /* +-(2^52+1) */
11390 TEST_f_L (llround, 0x1.0000000000001p+52,4503599627370497LL);
11391 TEST_f_L (llround, -0x1.0000000000001p+52,-4503599627370497LL);
11392 /* +-(2^53-1): Input is the last (positive and negative) incrementally
11393 * representable whole-number in the 'double' range that might round
11394 * erroneously. */
11395 TEST_f_L (llround, 0x1.fffffffffffffp+52, 9007199254740991LL);
11396 TEST_f_L (llround, -0x1.fffffffffffffp+52, -9007199254740991LL);
11397#else
11398 /* nextafter(0.5,-1) */
11399 TEST_f_L (llround, 0x1.fffffep-2, 0);
11400 /* nextafter(-0.5,1) */
11401 TEST_f_L (llround, -0x1.fffffep-2, 0);
11402 /* As above, on PowerPC an exponent of '23' is the largest incrementally
11403 * representable sequence of whole-numbers in the 'float' range.
11404 * Likewise, numbers between +-(2^23+1 and 2^24-1) are affected. */
11405 TEST_f_L (llround, 0x1.000002p+23,8388609);
11406 TEST_f_L (llround, -0x1.000002p+23,-8388609);
11407 TEST_f_L (llround, 0x1.fffffep+23, 16777215);
11408 TEST_f_L (llround, -0x1.fffffep+23, -16777215);
601d2942
UD		 11409#endif
11410
c1e6b459 11411
f964490f
RM		 11412#ifdef TEST_LDOUBLE
11413 /* The input can only be represented in long double. */
11414 TEST_f_L (llround, 4503599627370495.5L, 4503599627370496LL);
11415 TEST_f_L (llround, 4503599627370496.25L, 4503599627370496LL);
11416 TEST_f_L (llround, 4503599627370496.5L, 4503599627370497LL);
11417 TEST_f_L (llround, 4503599627370496.75L, 4503599627370497LL);
11418 TEST_f_L (llround, 4503599627370497.5L, 4503599627370498LL);
11419
830fce04
RM		 11420# if LDBL_MANT_DIG > 100
11421 TEST_f_L (llround, 4503599627370495.4999999999999L, 4503599627370495LL);
11422 TEST_f_L (llround, 4503599627370496.4999999999999L, 4503599627370496LL);
11423 TEST_f_L (llround, 4503599627370497.4999999999999L, 4503599627370497LL);
11424 TEST_f_L (llround, 4503599627370494.5000000000001L, 4503599627370495LL);
11425 TEST_f_L (llround, 4503599627370495.5000000000001L, 4503599627370496LL);
11426 TEST_f_L (llround, 4503599627370496.5000000000001L, 4503599627370497LL);
11427
11428 TEST_f_L (llround, -4503599627370495.4999999999999L, -4503599627370495LL);
11429 TEST_f_L (llround, -4503599627370496.4999999999999L, -4503599627370496LL);
11430 TEST_f_L (llround, -4503599627370497.4999999999999L, -4503599627370497LL);
11431 TEST_f_L (llround, -4503599627370494.5000000000001L, -4503599627370495LL);
11432 TEST_f_L (llround, -4503599627370495.5000000000001L, -4503599627370496LL);
11433 TEST_f_L (llround, -4503599627370496.5000000000001L, -4503599627370497LL);
11434# endif
11435
f964490f
RM		 11436 TEST_f_L (llround, -4503599627370495.5L, -4503599627370496LL);
11437 TEST_f_L (llround, -4503599627370496.25L, -4503599627370496LL);
11438 TEST_f_L (llround, -4503599627370496.5L, -4503599627370497LL);
11439 TEST_f_L (llround, -4503599627370496.75L, -4503599627370497LL);
11440 TEST_f_L (llround, -4503599627370497.5L, -4503599627370498LL);
11441
11442 TEST_f_L (llround, 9007199254740991.5L, 9007199254740992LL);
11443 TEST_f_L (llround, 9007199254740992.25L, 9007199254740992LL);
11444 TEST_f_L (llround, 9007199254740992.5L, 9007199254740993LL);
11445 TEST_f_L (llround, 9007199254740992.75L, 9007199254740993LL);
11446 TEST_f_L (llround, 9007199254740993.5L, 9007199254740994LL);
11447
830fce04
RM		 11448# if LDBL_MANT_DIG > 100
11449 TEST_f_L (llround, 9007199254740991.4999999999999L, 9007199254740991LL);
11450 TEST_f_L (llround, 9007199254740992.4999999999999L, 9007199254740992LL);
11451 TEST_f_L (llround, 9007199254740993.4999999999999L, 9007199254740993LL);
11452 TEST_f_L (llround, 9007199254740991.5000000000001L, 9007199254740992LL);
11453 TEST_f_L (llround, 9007199254740992.5000000000001L, 9007199254740993LL);
11454 TEST_f_L (llround, 9007199254740993.5000000000001L, 9007199254740994LL);
11455
11456 TEST_f_L (llround, -9007199254740991.4999999999999L, -9007199254740991LL);
11457 TEST_f_L (llround, -9007199254740992.4999999999999L, -9007199254740992LL);
11458 TEST_f_L (llround, -9007199254740993.4999999999999L, -9007199254740993LL);
11459 TEST_f_L (llround, -9007199254740991.5000000000001L, -9007199254740992LL);
11460 TEST_f_L (llround, -9007199254740992.5000000000001L, -9007199254740993LL);
11461 TEST_f_L (llround, -9007199254740993.5000000000001L, -9007199254740994LL);
11462# endif
11463
f964490f
RM		 11464 TEST_f_L (llround, -9007199254740991.5L, -9007199254740992LL);
11465 TEST_f_L (llround, -9007199254740992.25L, -9007199254740992LL);
11466 TEST_f_L (llround, -9007199254740992.5L, -9007199254740993LL);
11467 TEST_f_L (llround, -9007199254740992.75L, -9007199254740993LL);
11468 TEST_f_L (llround, -9007199254740993.5L, -9007199254740994LL);
11469
11470 TEST_f_L (llround, 72057594037927935.5L, 72057594037927936LL);
11471 TEST_f_L (llround, 72057594037927936.25L, 72057594037927936LL);
11472 TEST_f_L (llround, 72057594037927936.5L, 72057594037927937LL);
11473 TEST_f_L (llround, 72057594037927936.75L, 72057594037927937LL);
11474 TEST_f_L (llround, 72057594037927937.5L, 72057594037927938LL);
11475
11476 TEST_f_L (llround, -72057594037927935.5L, -72057594037927936LL);
11477 TEST_f_L (llround, -72057594037927936.25L, -72057594037927936LL);
11478 TEST_f_L (llround, -72057594037927936.5L, -72057594037927937LL);
11479 TEST_f_L (llround, -72057594037927936.75L, -72057594037927937LL);
11480 TEST_f_L (llround, -72057594037927937.5L, -72057594037927938LL);
1e832e37
RM		 11481
11482 TEST_f_L (llround, 9223372036854775806.25L, 9223372036854775806LL);
11483 TEST_f_L (llround, -9223372036854775806.25L, -9223372036854775806LL);
11484 TEST_f_L (llround, 9223372036854775806.5L, 9223372036854775807LL);
11485 TEST_f_L (llround, -9223372036854775806.5L, -9223372036854775807LL);
11486 TEST_f_L (llround, 9223372036854775807.0L, 9223372036854775807LL);
11487 TEST_f_L (llround, -9223372036854775807.0L, -9223372036854775807LL);
f964490f
RM		 11488#endif
11489
8847214f
UD		 11490 END (llround);
11491}
11492
9dc9095d
JM		 11493static const struct test_fF_f1_data modf_test_data[] =
11494 {
11495 START_DATA (modf),
11496 TEST_fF_f1 (modf, plus_infty, 0, plus_infty),
11497 TEST_fF_f1 (modf, minus_infty, minus_zero, minus_infty),
11498 TEST_fF_f1 (modf, qnan_value, qnan_value, qnan_value),
11499 TEST_fF_f1 (modf, 0, 0, 0),
11500 TEST_fF_f1 (modf, 1.5, 0.5, 1),
11501 TEST_fF_f1 (modf, 2.5, 0.5, 2),
11502 TEST_fF_f1 (modf, -2.5, -0.5, -2),
11503 TEST_fF_f1 (modf, 20, 0, 20),
11504 TEST_fF_f1 (modf, 21, 0, 21),
11505 TEST_fF_f1 (modf, 89.5, 0.5, 89),
11506 END_DATA (modf)
11507 };
11508
8847214f
UD		 11509static void
11510modf_test (void)
11511{
11512 FLOAT x;
11513
11514 START (modf);
9dc9095d 11515 RUN_TEST_LOOP_fF_f1 (modf, modf_test_data, , x);
8847214f
UD		 11516 END (modf);
11517}
11518
11519
74c57478
JM		 11520static const struct test_f_f_data nearbyint_test_data[] =
11521 {
11522 START_DATA (nearbyint),
11523
11524 TEST_f_f (nearbyint, 0.0, 0.0),
11525 TEST_f_f (nearbyint, minus_zero, minus_zero),
11526 TEST_f_f (nearbyint, plus_infty, plus_infty),
11527 TEST_f_f (nearbyint, minus_infty, minus_infty),
11528 TEST_f_f (nearbyint, qnan_value, qnan_value),
11529
11530 /* Subnormal values */
11531 TEST_f_f (nearbyint, -8.98847e+307, -8.98847e+307),
11532 TEST_f_f (nearbyint, -4.45015e-308, minus_zero),
11533
11534 /* Default rounding mode is round to nearest. */
11535 TEST_f_f (nearbyint, 0.5, 0.0),
11536 TEST_f_f (nearbyint, 1.5, 2.0),
11537 TEST_f_f (nearbyint, -0.5, minus_zero),
11538 TEST_f_f (nearbyint, -1.5, -2.0),
11539
11540 TEST_f_f (nearbyint, 262144.75, 262145.0),
11541 TEST_f_f (nearbyint, 262142.75, 262143.0),
11542 TEST_f_f (nearbyint, 524286.75, 524287.0),
11543 TEST_f_f (nearbyint, 524288.75, 524289.0),
11544
11545 TEST_f_f (nearbyint, 1048576.75, 1048577.0),
11546 TEST_f_f (nearbyint, 2097152.75, 2097153.0),
11547 TEST_f_f (nearbyint, 2492472.75, 2492473.0),
11548 TEST_f_f (nearbyint, 2886220.75, 2886221.0),
11549 TEST_f_f (nearbyint, 3058792.75, 3058793.0),
11550 TEST_f_f (nearbyint, -1048576.75, -1048577.0),
11551 TEST_f_f (nearbyint, -2097152.75, -2097153.0),
11552 TEST_f_f (nearbyint, -2492472.75, -2492473.0),
11553 TEST_f_f (nearbyint, -2886220.75, -2886221.0),
11554 TEST_f_f (nearbyint, -3058792.75, -3058793.0),
11555#ifndef TEST_FLOAT
11556 TEST_f_f (nearbyint, 70368744177664.75, 70368744177665.0),
11557 TEST_f_f (nearbyint, 140737488355328.75, 140737488355329.0),
11558 TEST_f_f (nearbyint, 281474976710656.75, 281474976710657.0),
11559 TEST_f_f (nearbyint, 562949953421312.75, 562949953421313.0),
11560 TEST_f_f (nearbyint, 1125899906842624.75, 1125899906842625.0),
11561 TEST_f_f (nearbyint, -70368744177664.75, -70368744177665.0),
11562 TEST_f_f (nearbyint, -140737488355328.75, -140737488355329.0),
11563 TEST_f_f (nearbyint, -281474976710656.75, -281474976710657.0),
11564 TEST_f_f (nearbyint, -562949953421312.75, -562949953421313.0),
11565 TEST_f_f (nearbyint, -1125899906842624.75, -1125899906842625.0),
11566#endif
11567
11568 END_DATA (nearbyint)
11569 };
11570
8847214f
UD		 11571static void
11572nearbyint_test (void)
11573{
11574 START (nearbyint);
74c57478 11575 RUN_TEST_LOOP_f_f (nearbyint, nearbyint_test_data, );
8847214f
UD		 11576 END (nearbyint);
11577}
11578
601a3a5f
JM		 11579static const struct test_ff_f_data nextafter_test_data[] =
11580 {
11581 START_DATA (nextafter),
8847214f 11582
601a3a5f
JM		 11583 TEST_ff_f (nextafter, 0, 0, 0),
11584 TEST_ff_f (nextafter, minus_zero, 0, 0),
11585 TEST_ff_f (nextafter, 0, minus_zero, minus_zero),
11586 TEST_ff_f (nextafter, minus_zero, minus_zero, minus_zero),
8847214f 11587
601a3a5f
JM		 11588 TEST_ff_f (nextafter, 9, 9, 9),
11589 TEST_ff_f (nextafter, -9, -9, -9),
11590 TEST_ff_f (nextafter, plus_infty, plus_infty, plus_infty),
11591 TEST_ff_f (nextafter, minus_infty, minus_infty, minus_infty),
8847214f 11592
601a3a5f
JM		 11593 TEST_ff_f (nextafter, qnan_value, 1.1L, qnan_value),
11594 TEST_ff_f (nextafter, 1.1L, qnan_value, qnan_value),
11595 TEST_ff_f (nextafter, qnan_value, qnan_value, qnan_value),
8847214f 11596
601a3a5f
JM		 11597 TEST_ff_f (nextafter, max_value, plus_infty, plus_infty, OVERFLOW_EXCEPTION),
11598 TEST_ff_f (nextafter, -max_value, minus_infty, minus_infty, OVERFLOW_EXCEPTION),
64b02fd2 11599
757de559 11600#ifdef TEST_LDOUBLE
601a3a5f
JM		 11601 // XXX Enable once gcc is fixed.
11602 //TEST_ff_f (nextafter, 0x0.00000040000000000000p-16385L, -0.1L, 0x0.0000003ffffffff00000p-16385L),
757de559
UD		 11603#endif
11604
601a3a5f
JM		 11605 /* XXX We need the hexadecimal FP number representation here for further
11606 tests. */
11607 END_DATA (nextafter)
11608 };
8847214f 11609
601a3a5f
JM		 11610static void
11611nextafter_test (void)
11612{
11613
11614 START (nextafter);
11615 RUN_TEST_LOOP_ff_f (nextafter, nextafter_test_data, );
8847214f
UD		 11616 END (nextafter);
11617}
11618
fe559c5e 11619
601a3a5f
JM		 11620static const struct test_ff_f_data_nexttoward nexttoward_test_data[] =
11621 {
11622 START_DATA (nexttoward),
11623 TEST_ff_f (nexttoward, 0, 0, 0),
11624 TEST_ff_f (nexttoward, minus_zero, 0, 0),
11625 TEST_ff_f (nexttoward, 0, minus_zero, minus_zero),
11626 TEST_ff_f (nexttoward, minus_zero, minus_zero, minus_zero),
8847214f 11627
601a3a5f
JM		 11628 TEST_ff_f (nexttoward, 9, 9, 9),
11629 TEST_ff_f (nexttoward, -9, -9, -9),
11630 TEST_ff_f (nexttoward, plus_infty, plus_infty, plus_infty),
11631 TEST_ff_f (nexttoward, minus_infty, minus_infty, minus_infty),
8847214f 11632
601a3a5f
JM		 11633 TEST_ff_f (nexttoward, qnan_value, 1.1L, qnan_value),
11634 TEST_ff_f (nexttoward, 1.1L, qnan_value, qnan_value),
11635 TEST_ff_f (nexttoward, qnan_value, qnan_value, qnan_value),
8847214f 11636
7cb029ee 11637#ifdef TEST_FLOAT
601a3a5f
JM		 11638 TEST_ff_f (nexttoward, 1.0, 1.1L, 0x1.000002p0),
11639 TEST_ff_f (nexttoward, 1.0, LDBL_MAX, 0x1.000002p0),
11640 TEST_ff_f (nexttoward, 1.0, 0x1.0000000000001p0, 0x1.000002p0),
11641 TEST_ff_f (nexttoward, 1.0, 0.9L, 0x0.ffffffp0),
11642 TEST_ff_f (nexttoward, 1.0, -LDBL_MAX, 0x0.ffffffp0),
11643 TEST_ff_f (nexttoward, 1.0, 0x0.fffffffffffff8p0, 0x0.ffffffp0),
11644 TEST_ff_f (nexttoward, -1.0, -1.1L, -0x1.000002p0),
11645 TEST_ff_f (nexttoward, -1.0, -LDBL_MAX, -0x1.000002p0),
11646 TEST_ff_f (nexttoward, -1.0, -0x1.0000000000001p0, -0x1.000002p0),
11647 TEST_ff_f (nexttoward, -1.0, -0.9L, -0x0.ffffffp0),
11648 TEST_ff_f (nexttoward, -1.0, LDBL_MAX, -0x0.ffffffp0),
11649 TEST_ff_f (nexttoward, -1.0, -0x0.fffffffffffff8p0, -0x0.ffffffp0),
11650 TEST_ff_f (nexttoward, -0x1.3p-145, -0xap-148L, -0x1.4p-145, UNDERFLOW_EXCEPTION),
7cb029ee 11651# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 11652 TEST_ff_f (nexttoward, 1.0, 0x1.000000000000002p0L, 0x1.000002p0),
11653 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffp0L, 0x0.ffffffp0),
11654 TEST_ff_f (nexttoward, -1.0, -0x1.000000000000002p0L, -0x1.000002p0),
11655 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffp0L, -0x0.ffffffp0),
7cb029ee
JM		 11656# endif
11657# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 11658 TEST_ff_f (nexttoward, 1.0, 0x1.000000000000000000000000008p0L, 0x1.000002p0),
11659 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffffffffffffcp0L, 0x0.ffffffp0),
11660 TEST_ff_f (nexttoward, -1.0, -0x1.000000000000000000000000008p0L, -0x1.000002p0),
11661 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffffffffffffcp0L, -0x0.ffffffp0),
7cb029ee
JM		 11662# endif
11663# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 11664 TEST_ff_f (nexttoward, 1.0, 0x1.0000000000000000000000000001p0L, 0x1.000002p0),
11665 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffp0),
11666 TEST_ff_f (nexttoward, -1.0, -0x1.0000000000000000000000000001p0L, -0x1.000002p0),
11667 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffp0),
7cb029ee
JM		 11668# endif
11669#endif
11670#ifdef TEST_DOUBLE
601a3a5f
JM		 11671 TEST_ff_f (nexttoward, 1.0, 1.1L, 0x1.0000000000001p0),
11672 TEST_ff_f (nexttoward, 1.0, LDBL_MAX, 0x1.0000000000001p0),
11673 TEST_ff_f (nexttoward, 1.0, 0x1.0000000000001p0, 0x1.0000000000001p0),
11674 TEST_ff_f (nexttoward, 1.0, 0.9L, 0x0.fffffffffffff8p0),
11675 TEST_ff_f (nexttoward, 1.0, -LDBL_MAX, 0x0.fffffffffffff8p0),
11676 TEST_ff_f (nexttoward, 1.0, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0),
11677 TEST_ff_f (nexttoward, -1.0, -1.1L, -0x1.0000000000001p0),
11678 TEST_ff_f (nexttoward, -1.0, -LDBL_MAX, -0x1.0000000000001p0),
11679 TEST_ff_f (nexttoward, -1.0, -0x1.0000000000001p0, -0x1.0000000000001p0),
11680 TEST_ff_f (nexttoward, -1.0, -0.9L, -0x0.fffffffffffff8p0),
11681 TEST_ff_f (nexttoward, -1.0, LDBL_MAX, -0x0.fffffffffffff8p0),
11682 TEST_ff_f (nexttoward, -1.0, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0),
11683 TEST_ff_f (nexttoward, -1.0, -0x8.00346dc5d6388p-3L, -0x1.0000000000001p0),
11684 TEST_ff_f (nexttoward, 0x1p-1074, 0x1p-1073L, 0x1p-1073, UNDERFLOW_EXCEPTION),
7cb029ee 11685# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 11686 TEST_ff_f (nexttoward, 1.0, 0x1.000000000000002p0L, 0x1.0000000000001p0),
11687 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffff8p0),
11688 TEST_ff_f (nexttoward, -1.0, -0x1.000000000000002p0L, -0x1.0000000000001p0),
11689 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffff8p0),
7cb029ee
JM		 11690# endif
11691# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 11692 TEST_ff_f (nexttoward, 1.0, 0x1.000000000000000000000000008p0L, 0x1.0000000000001p0),
11693 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffffffffffffcp0L, 0x0.fffffffffffff8p0),
11694 TEST_ff_f (nexttoward, -1.0, -0x1.000000000000000000000000008p0L, -0x1.0000000000001p0),
11695 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffffffffffffcp0L, -0x0.fffffffffffff8p0),
7cb029ee
JM		 11696# endif
11697# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 11698 TEST_ff_f (nexttoward, 1.0, 0x1.0000000000000000000000000001p0L, 0x1.0000000000001p0),
11699 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.fffffffffffff8p0),
11700 TEST_ff_f (nexttoward, -1.0, -0x1.0000000000000000000000000001p0L, -0x1.0000000000001p0),
11701 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.fffffffffffff8p0),
7cb029ee
JM		 11702# endif
11703#endif
601a3a5f
JM		 11704 END_DATA (nexttoward)
11705 };
8847214f
UD		 11706
11707static void
601a3a5f 11708nexttoward_test (void)
8847214f 11709{
601a3a5f
JM		 11710 START (nexttoward);
11711 RUN_TEST_LOOP_ff_f (nexttoward, nexttoward_test_data, );
11712 END (nexttoward);
11713}
8847214f 11714
8847214f 11715
601a3a5f
JM		 11716static const struct test_ff_f_data pow_test_data[] =
11717 {
11718 START_DATA (pow),
11719 TEST_ff_f (pow, 0, 0, 1),
11720 TEST_ff_f (pow, 0, minus_zero, 1),
11721 TEST_ff_f (pow, minus_zero, 0, 1),
11722 TEST_ff_f (pow, minus_zero, minus_zero, 1),
8847214f 11723
601a3a5f
JM		 11724 TEST_ff_f (pow, 10, 0, 1),
11725 TEST_ff_f (pow, 10, minus_zero, 1),
11726 TEST_ff_f (pow, -10, 0, 1),
11727 TEST_ff_f (pow, -10, minus_zero, 1),
8847214f 11728
601a3a5f
JM		 11729 TEST_ff_f (pow, qnan_value, 0, 1),
11730 TEST_ff_f (pow, qnan_value, minus_zero, 1),
8847214f 11731
15daa639 11732#ifndef TEST_INLINE
601a3a5f
JM		 11733 TEST_ff_f (pow, 1.1L, plus_infty, plus_infty),
11734 TEST_ff_f (pow, plus_infty, plus_infty, plus_infty),
11735 TEST_ff_f (pow, -1.1L, plus_infty, plus_infty),
11736 TEST_ff_f (pow, minus_infty, plus_infty, plus_infty),
11737
11738 TEST_ff_f (pow, 0.9L, plus_infty, 0),
11739 TEST_ff_f (pow, 1e-7L, plus_infty, 0),
11740 TEST_ff_f (pow, -0.9L, plus_infty, 0),
11741 TEST_ff_f (pow, -1e-7L, plus_infty, 0),
11742
11743 TEST_ff_f (pow, 1.1L, minus_infty, 0),
11744 TEST_ff_f (pow, plus_infty, minus_infty, 0),
11745 TEST_ff_f (pow, -1.1L, minus_infty, 0),
11746 TEST_ff_f (pow, minus_infty, minus_infty, 0),
11747
11748 TEST_ff_f (pow, 0.9L, minus_infty, plus_infty),
11749 TEST_ff_f (pow, 1e-7L, minus_infty, plus_infty),
11750 TEST_ff_f (pow, -0.9L, minus_infty, plus_infty),
11751 TEST_ff_f (pow, -1e-7L, minus_infty, plus_infty),
11752
11753 TEST_ff_f (pow, plus_infty, 1e-7L, plus_infty),
11754 TEST_ff_f (pow, plus_infty, 1, plus_infty),
11755 TEST_ff_f (pow, plus_infty, 1e7L, plus_infty),
11756 TEST_ff_f (pow, plus_infty, min_subnorm_value, plus_infty),
11757
11758 TEST_ff_f (pow, plus_infty, -1e-7L, 0),
11759 TEST_ff_f (pow, plus_infty, -1, 0),
11760 TEST_ff_f (pow, plus_infty, -1e7L, 0),
11761 TEST_ff_f (pow, plus_infty, -min_subnorm_value, 0),
11762
11763 TEST_ff_f (pow, minus_infty, 1, minus_infty),
11764 TEST_ff_f (pow, minus_infty, 11, minus_infty),
11765 TEST_ff_f (pow, minus_infty, 1001, minus_infty),
11766
11767 TEST_ff_f (pow, minus_infty, 2, plus_infty),
11768 TEST_ff_f (pow, minus_infty, 12, plus_infty),
11769 TEST_ff_f (pow, minus_infty, 1002, plus_infty),
11770 TEST_ff_f (pow, minus_infty, 0.1L, plus_infty),
11771 TEST_ff_f (pow, minus_infty, 1.1L, plus_infty),
11772 TEST_ff_f (pow, minus_infty, 11.1L, plus_infty),
11773 TEST_ff_f (pow, minus_infty, 1001.1L, plus_infty),
11774 TEST_ff_f (pow, minus_infty, min_subnorm_value, plus_infty),
11775
11776 TEST_ff_f (pow, minus_infty, -1, minus_zero),
11777 TEST_ff_f (pow, minus_infty, -11, minus_zero),
11778 TEST_ff_f (pow, minus_infty, -1001, minus_zero),
11779
11780 TEST_ff_f (pow, minus_infty, -2, 0),
11781 TEST_ff_f (pow, minus_infty, -12, 0),
11782 TEST_ff_f (pow, minus_infty, -1002, 0),
11783 TEST_ff_f (pow, minus_infty, -0.1L, 0),
11784 TEST_ff_f (pow, minus_infty, -1.1L, 0),
11785 TEST_ff_f (pow, minus_infty, -11.1L, 0),
11786 TEST_ff_f (pow, minus_infty, -1001.1L, 0),
11787 TEST_ff_f (pow, minus_infty, -min_subnorm_value, 0),
11788#endif
11789
11790 TEST_ff_f (pow, qnan_value, qnan_value, qnan_value),
11791 TEST_ff_f (pow, 0, qnan_value, qnan_value),
11792 TEST_ff_f (pow, 1, qnan_value, 1),
11793 TEST_ff_f (pow, -1, qnan_value, qnan_value),
11794 TEST_ff_f (pow, qnan_value, 1, qnan_value),
11795 TEST_ff_f (pow, qnan_value, -1, qnan_value),
11796
11797 /* pow (x, qNaN) == qNaN. */
11798 TEST_ff_f (pow, 3.0, qnan_value, qnan_value),
11799 TEST_ff_f (pow, minus_zero, qnan_value, qnan_value),
11800 TEST_ff_f (pow, plus_infty, qnan_value, qnan_value),
11801 TEST_ff_f (pow, -3.0, qnan_value, qnan_value),
11802 TEST_ff_f (pow, minus_infty, qnan_value, qnan_value),
11803
11804 TEST_ff_f (pow, qnan_value, 3.0, qnan_value),
11805 TEST_ff_f (pow, qnan_value, -3.0, qnan_value),
11806 TEST_ff_f (pow, qnan_value, plus_infty, qnan_value),
11807 TEST_ff_f (pow, qnan_value, minus_infty, qnan_value),
11808 TEST_ff_f (pow, qnan_value, 2.5, qnan_value),
11809 TEST_ff_f (pow, qnan_value, -2.5, qnan_value),
11810 TEST_ff_f (pow, qnan_value, min_subnorm_value, qnan_value),
11811 TEST_ff_f (pow, qnan_value, -min_subnorm_value, qnan_value),
11812
11813 TEST_ff_f (pow, 1, plus_infty, 1),
11814 TEST_ff_f (pow, -1, plus_infty, 1),
11815 TEST_ff_f (pow, 1, minus_infty, 1),
11816 TEST_ff_f (pow, -1, minus_infty, 1),
11817 TEST_ff_f (pow, 1, 1, 1),
11818 TEST_ff_f (pow, 1, -1, 1),
11819 TEST_ff_f (pow, 1, 1.25, 1),
11820 TEST_ff_f (pow, 1, -1.25, 1),
11821 TEST_ff_f (pow, 1, 0x1p62L, 1),
11822 TEST_ff_f (pow, 1, 0x1p63L, 1),
11823 TEST_ff_f (pow, 1, 0x1p64L, 1),
11824 TEST_ff_f (pow, 1, 0x1p72L, 1),
11825 TEST_ff_f (pow, 1, min_subnorm_value, 1),
11826 TEST_ff_f (pow, 1, -min_subnorm_value, 1),
11827
11828 /* pow (x, +-0) == 1. */
11829 TEST_ff_f (pow, plus_infty, 0, 1),
11830 TEST_ff_f (pow, plus_infty, minus_zero, 1),
11831 TEST_ff_f (pow, minus_infty, 0, 1),
11832 TEST_ff_f (pow, minus_infty, minus_zero, 1),
11833 TEST_ff_f (pow, 32.75L, 0, 1),
11834 TEST_ff_f (pow, 32.75L, minus_zero, 1),
11835 TEST_ff_f (pow, -32.75L, 0, 1),
11836 TEST_ff_f (pow, -32.75L, minus_zero, 1),
11837 TEST_ff_f (pow, 0x1p72L, 0, 1),
11838 TEST_ff_f (pow, 0x1p72L, minus_zero, 1),
11839 TEST_ff_f (pow, 0x1p-72L, 0, 1),
11840 TEST_ff_f (pow, 0x1p-72L, minus_zero, 1),
11841
11842 TEST_ff_f (pow, -0.1L, 1.1L, qnan_value, INVALID_EXCEPTION),
11843 TEST_ff_f (pow, -0.1L, -1.1L, qnan_value, INVALID_EXCEPTION),
11844 TEST_ff_f (pow, -10.1L, 1.1L, qnan_value, INVALID_EXCEPTION),
11845 TEST_ff_f (pow, -10.1L, -1.1L, qnan_value, INVALID_EXCEPTION),
11846 TEST_ff_f (pow, -1.01L, min_subnorm_value, qnan_value, INVALID_EXCEPTION),
11847 TEST_ff_f (pow, -1.01L, -min_subnorm_value, qnan_value, INVALID_EXCEPTION),
11848 TEST_ff_f (pow, -1.0L, min_subnorm_value, qnan_value, INVALID_EXCEPTION),
11849 TEST_ff_f (pow, -1.0L, -min_subnorm_value, qnan_value, INVALID_EXCEPTION),
11850
11851 TEST_ff_f (pow, 0, -1, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11852 TEST_ff_f (pow, 0, -11, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11853 TEST_ff_f (pow, 0, -0xffffff, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa 11854#ifndef TEST_FLOAT
601a3a5f 11855 TEST_ff_f (pow, 0, -0x1.fffffffffffffp+52L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 11856#endif
11857#ifdef TEST_LDOUBLE
11858# if LDBL_MANT_DIG >= 64
601a3a5f 11859 TEST_ff_f (pow, 0, -0x1.fffffffffffffffep+63L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 11860# endif
11861# if LDBL_MANT_DIG >= 106
601a3a5f 11862 TEST_ff_f (pow, 0, -0x1.ffffffffffffffffffffffffff8p+105L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 11863# endif
11864# if LDBL_MANT_DIG >= 113
601a3a5f 11865 TEST_ff_f (pow, 0, -0x1.ffffffffffffffffffffffffffffp+112L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 11866# endif
11867#endif
601a3a5f
JM		 11868 TEST_ff_f (pow, minus_zero, -1, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11869 TEST_ff_f (pow, minus_zero, -11L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11870 TEST_ff_f (pow, minus_zero, -0xffffff, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11871 TEST_ff_f (pow, minus_zero, -0x1fffffe, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa 11872#ifndef TEST_FLOAT
601a3a5f
JM		 11873 TEST_ff_f (pow, minus_zero, -0x1.fffffffffffffp+52L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11874 TEST_ff_f (pow, minus_zero, -0x1.fffffffffffffp+53L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 11875#endif
11876#ifdef TEST_LDOUBLE
11877# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 11878 TEST_ff_f (pow, minus_zero, -0x1.fffffffffffffffep+63L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11879 TEST_ff_f (pow, minus_zero, -0x1.fffffffffffffffep+64L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 11880# endif
11881# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 11882 TEST_ff_f (pow, minus_zero, -0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11883 TEST_ff_f (pow, minus_zero, -0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 11884# endif
11885# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 11886 TEST_ff_f (pow, minus_zero, -0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11887 TEST_ff_f (pow, minus_zero, -0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 11888# endif
11889#endif
8847214f 11890
601a3a5f
JM		 11891 TEST_ff_f (pow, 0, -2, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11892 TEST_ff_f (pow, 0, -11.1L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11893 TEST_ff_f (pow, 0, -min_subnorm_value, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11894 TEST_ff_f (pow, 0, -0x1p24, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11895 TEST_ff_f (pow, 0, -0x1p127, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11896 TEST_ff_f (pow, 0, -max_value, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11897 TEST_ff_f (pow, minus_zero, -2, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11898 TEST_ff_f (pow, minus_zero, -11.1L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11899 TEST_ff_f (pow, minus_zero, -min_subnorm_value, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11900 TEST_ff_f (pow, minus_zero, -0x1p24, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11901 TEST_ff_f (pow, minus_zero, -0x1p127, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11902 TEST_ff_f (pow, minus_zero, -max_value, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11903
11904 TEST_ff_f (pow, 0x1p72L, 0x1p72L, plus_infty, OVERFLOW_EXCEPTION),
11905 TEST_ff_f (pow, 10, -0x1p72L, 0, UNDERFLOW_EXCEPTION),
11906 TEST_ff_f (pow, max_value, max_value, plus_infty, OVERFLOW_EXCEPTION),
11907 TEST_ff_f (pow, 10, -max_value, 0, UNDERFLOW_EXCEPTION),
11908
11909 TEST_ff_f (pow, 0, 1, 0),
11910 TEST_ff_f (pow, 0, 11, 0),
11911
11912 TEST_ff_f (pow, minus_zero, 1, minus_zero),
11913 TEST_ff_f (pow, minus_zero, 11, minus_zero),
11914
11915 TEST_ff_f (pow, 0, 2, 0),
11916 TEST_ff_f (pow, 0, 11.1L, 0),
11917
11918 TEST_ff_f (pow, minus_zero, 2, 0),
11919 TEST_ff_f (pow, minus_zero, 11.1L, 0),
11920 TEST_ff_f (pow, 0, plus_infty, 0),
11921 TEST_ff_f (pow, minus_zero, plus_infty, 0),
11922 TEST_ff_f (pow, 0, minus_infty, plus_infty, DIVIDE_BY_ZERO_EXCEPTION_OK),
11923 TEST_ff_f (pow, minus_zero, minus_infty, plus_infty, DIVIDE_BY_ZERO_EXCEPTION_OK),
8847214f 11924
15daa639 11925#ifndef TEST_INLINE
601a3a5f
JM		 11926 /* pow (x, +inf) == +inf for |x| > 1. */
11927 TEST_ff_f (pow, 1.5, plus_infty, plus_infty),
8847214f 11928
601a3a5f
JM		 11929 /* pow (x, +inf) == +0 for |x| < 1. */
11930 TEST_ff_f (pow, 0.5, plus_infty, 0.0),
8847214f 11931
601a3a5f
JM		 11932 /* pow (x, -inf) == +0 for |x| > 1. */
11933 TEST_ff_f (pow, 1.5, minus_infty, 0.0),
8847214f 11934
601a3a5f
JM		 11935 /* pow (x, -inf) == +inf for |x| < 1. */
11936 TEST_ff_f (pow, 0.5, minus_infty, plus_infty),
15daa639 11937#endif
8847214f 11938
601a3a5f
JM		 11939 /* pow (+inf, y) == +inf for y > 0. */
11940 TEST_ff_f (pow, plus_infty, 2, plus_infty),
11941 TEST_ff_f (pow, plus_infty, 0xffffff, plus_infty),
2460d3aa 11942#ifndef TEST_FLOAT
601a3a5f 11943 TEST_ff_f (pow, plus_infty, 0x1.fffffffffffffp+52L, plus_infty),
2460d3aa
JM		 11944#endif
11945#ifdef TEST_LDOUBLE
11946# if LDBL_MANT_DIG >= 64
601a3a5f 11947 TEST_ff_f (pow, plus_infty, 0x1.fffffffffffffffep+63L, plus_infty),
2460d3aa
JM		 11948# endif
11949# if LDBL_MANT_DIG >= 106
601a3a5f 11950 TEST_ff_f (pow, plus_infty, 0x1.ffffffffffffffffffffffffff8p+105L, plus_infty),
2460d3aa
JM		 11951# endif
11952# if LDBL_MANT_DIG >= 113
601a3a5f 11953 TEST_ff_f (pow, plus_infty, 0x1.ffffffffffffffffffffffffffffp+112L, plus_infty),
2460d3aa
JM		 11954# endif
11955#endif
601a3a5f
JM		 11956 TEST_ff_f (pow, plus_infty, 0x1p24, plus_infty),
11957 TEST_ff_f (pow, plus_infty, 0x1p127, plus_infty),
11958 TEST_ff_f (pow, plus_infty, max_value, plus_infty),
8847214f 11959
601a3a5f
JM		 11960 /* pow (+inf, y) == +0 for y < 0. */
11961 TEST_ff_f (pow, plus_infty, -1, 0.0),
11962 TEST_ff_f (pow, plus_infty, -0xffffff, 0.0),
2460d3aa 11963#ifndef TEST_FLOAT
601a3a5f 11964 TEST_ff_f (pow, plus_infty, -0x1.fffffffffffffp+52L, 0.0),
2460d3aa
JM		 11965#endif
11966#ifdef TEST_LDOUBLE
11967# if LDBL_MANT_DIG >= 64
601a3a5f 11968 TEST_ff_f (pow, plus_infty, -0x1.fffffffffffffffep+63L, 0.0),
2460d3aa
JM		 11969# endif
11970# if LDBL_MANT_DIG >= 106
601a3a5f 11971 TEST_ff_f (pow, plus_infty, -0x1.ffffffffffffffffffffffffff8p+105L, 0.0),
2460d3aa
JM		 11972# endif
11973# if LDBL_MANT_DIG >= 113
601a3a5f 11974 TEST_ff_f (pow, plus_infty, -0x1.ffffffffffffffffffffffffffffp+112L, 0.0),
2460d3aa
JM		 11975# endif
11976#endif
601a3a5f
JM		 11977 TEST_ff_f (pow, plus_infty, -0x1p24, 0.0),
11978 TEST_ff_f (pow, plus_infty, -0x1p127, 0.0),
11979 TEST_ff_f (pow, plus_infty, -max_value, 0.0),
8847214f 11980
601a3a5f
JM		 11981 /* pow (-inf, y) == -inf for y an odd integer > 0. */
11982 TEST_ff_f (pow, minus_infty, 27, minus_infty),
11983 TEST_ff_f (pow, minus_infty, 0xffffff, minus_infty),
11984 TEST_ff_f (pow, minus_infty, 0x1fffffe, plus_infty),
2460d3aa 11985#ifndef TEST_FLOAT
601a3a5f
JM		 11986 TEST_ff_f (pow, minus_infty, 0x1.fffffffffffffp+52L, minus_infty),
11987 TEST_ff_f (pow, minus_infty, 0x1.fffffffffffffp+53L, plus_infty),
2460d3aa
JM		 11988#endif
11989#ifdef TEST_LDOUBLE
11990# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 11991 TEST_ff_f (pow, minus_infty, 0x1.fffffffffffffffep+63L, minus_infty),
11992 TEST_ff_f (pow, minus_infty, 0x1.fffffffffffffffep+64L, plus_infty),
2460d3aa
JM		 11993# endif
11994# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 11995 TEST_ff_f (pow, minus_infty, 0x1.ffffffffffffffffffffffffff8p+105L, minus_infty),
11996 TEST_ff_f (pow, minus_infty, 0x1.ffffffffffffffffffffffffff8p+106L, plus_infty),
2460d3aa
JM		 11997# endif
11998# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 11999 TEST_ff_f (pow, minus_infty, 0x1.ffffffffffffffffffffffffffffp+112L, minus_infty),
12000 TEST_ff_f (pow, minus_infty, 0x1.ffffffffffffffffffffffffffffp+113L, plus_infty),
2460d3aa
JM		 12001# endif
12002#endif
8847214f 12003
601a3a5f
JM		 12004 /* pow (-inf, y) == +inf for y > 0 and not an odd integer. */
12005 TEST_ff_f (pow, minus_infty, 28, plus_infty),
12006 TEST_ff_f (pow, minus_infty, 0x1p24, plus_infty),
12007 TEST_ff_f (pow, minus_infty, 0x1p127, plus_infty),
12008 TEST_ff_f (pow, minus_infty, max_value, plus_infty),
8847214f 12009
601a3a5f
JM		 12010 /* pow (-inf, y) == -0 for y an odd integer < 0. */
12011 TEST_ff_f (pow, minus_infty, -3, minus_zero),
12012 TEST_ff_f (pow, minus_infty, -0xffffff, minus_zero),
12013 TEST_ff_f (pow, minus_infty, -0x1fffffe, plus_zero),
2460d3aa 12014#ifndef TEST_FLOAT
601a3a5f
JM		 12015 TEST_ff_f (pow, minus_infty, -0x1.fffffffffffffp+52L, minus_zero),
12016 TEST_ff_f (pow, minus_infty, -0x1.fffffffffffffp+53L, plus_zero),
2460d3aa
JM		 12017#endif
12018#ifdef TEST_LDOUBLE
12019# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12020 TEST_ff_f (pow, minus_infty, -0x1.fffffffffffffffep+63L, minus_zero),
12021 TEST_ff_f (pow, minus_infty, -0x1.fffffffffffffffep+64L, plus_zero),
2460d3aa
JM		 12022# endif
12023# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12024 TEST_ff_f (pow, minus_infty, -0x1.ffffffffffffffffffffffffff8p+105L, minus_zero),
12025 TEST_ff_f (pow, minus_infty, -0x1.ffffffffffffffffffffffffff8p+106L, plus_zero),
2460d3aa
JM		 12026# endif
12027# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12028 TEST_ff_f (pow, minus_infty, -0x1.ffffffffffffffffffffffffffffp+112L, minus_zero),
12029 TEST_ff_f (pow, minus_infty, -0x1.ffffffffffffffffffffffffffffp+113L, plus_zero),
2460d3aa
JM		 12030# endif
12031#endif
601a3a5f
JM		 12032 /* pow (-inf, y) == +0 for y < 0 and not an odd integer. */
12033 TEST_ff_f (pow, minus_infty, -2.0, 0.0),
12034 TEST_ff_f (pow, minus_infty, -0x1p24, 0.0),
12035 TEST_ff_f (pow, minus_infty, -0x1p127, 0.0),
12036 TEST_ff_f (pow, minus_infty, -max_value, 0.0),
8847214f 12037
601a3a5f
JM		 12038 /* pow (+0, y) == +0 for y an odd integer > 0. */
12039 TEST_ff_f (pow, 0.0, 27, 0.0),
12040 TEST_ff_f (pow, 0.0, 0xffffff, 0.0),
2460d3aa 12041#ifndef TEST_FLOAT
601a3a5f 12042 TEST_ff_f (pow, 0.0, 0x1.fffffffffffffp+52L, 0.0),
2460d3aa
JM		 12043#endif
12044#ifdef TEST_LDOUBLE
12045# if LDBL_MANT_DIG >= 64
601a3a5f 12046 TEST_ff_f (pow, 0.0, 0x1.fffffffffffffffep+63L, 0.0),
2460d3aa
JM		 12047# endif
12048# if LDBL_MANT_DIG >= 106
601a3a5f 12049 TEST_ff_f (pow, 0.0, 0x1.ffffffffffffffffffffffffff8p+105L, 0.0),
2460d3aa
JM		 12050# endif
12051# if LDBL_MANT_DIG >= 113
601a3a5f 12052 TEST_ff_f (pow, 0.0, 0x1.ffffffffffffffffffffffffffffp+112L, 0.0),
2460d3aa
JM		 12053# endif
12054#endif
8847214f 12055
601a3a5f
JM		 12056 /* pow (-0, y) == -0 for y an odd integer > 0. */
12057 TEST_ff_f (pow, minus_zero, 27, minus_zero),
12058 TEST_ff_f (pow, minus_zero, 0xffffff, minus_zero),
12059 TEST_ff_f (pow, minus_zero, 0x1fffffe, plus_zero),
2460d3aa 12060#ifndef TEST_FLOAT
601a3a5f
JM		 12061 TEST_ff_f (pow, minus_zero, 0x1.fffffffffffffp+52L, minus_zero),
12062 TEST_ff_f (pow, minus_zero, 0x1.fffffffffffffp+53L, plus_zero),
2460d3aa
JM		 12063#endif
12064#ifdef TEST_LDOUBLE
12065# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12066 TEST_ff_f (pow, minus_zero, 0x1.fffffffffffffffep+63L, minus_zero),
12067 TEST_ff_f (pow, minus_zero, 0x1.fffffffffffffffep+64L, plus_zero),
2460d3aa
JM		 12068# endif
12069# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12070 TEST_ff_f (pow, minus_zero, 0x1.ffffffffffffffffffffffffff8p+105L, minus_zero),
12071 TEST_ff_f (pow, minus_zero, 0x1.ffffffffffffffffffffffffff8p+106L, plus_zero),
2460d3aa
JM		 12072# endif
12073# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12074 TEST_ff_f (pow, minus_zero, 0x1.ffffffffffffffffffffffffffffp+112L, minus_zero),
12075 TEST_ff_f (pow, minus_zero, 0x1.ffffffffffffffffffffffffffffp+113L, plus_zero),
2460d3aa
JM		 12076# endif
12077#endif
8847214f 12078
601a3a5f
JM		 12079 /* pow (+0, y) == +0 for y > 0 and not an odd integer. */
12080 TEST_ff_f (pow, 0.0, 4, 0.0),
12081 TEST_ff_f (pow, 0.0, 0x1p24, 0.0),
12082 TEST_ff_f (pow, 0.0, 0x1p127, 0.0),
12083 TEST_ff_f (pow, 0.0, max_value, 0.0),
12084 TEST_ff_f (pow, 0.0, min_subnorm_value, 0.0),
8847214f 12085
601a3a5f
JM		 12086 /* pow (-0, y) == +0 for y > 0 and not an odd integer. */
12087 TEST_ff_f (pow, minus_zero, 4, 0.0),
12088 TEST_ff_f (pow, minus_zero, 0x1p24, 0.0),
12089 TEST_ff_f (pow, minus_zero, 0x1p127, 0.0),
12090 TEST_ff_f (pow, minus_zero, max_value, 0.0),
12091 TEST_ff_f (pow, minus_zero, min_subnorm_value, 0.0),
8847214f 12092
601a3a5f
JM		 12093 TEST_ff_f (pow, 16, 0.25L, 2),
12094 TEST_ff_f (pow, 0x1p64L, 0.125L, 256),
12095 TEST_ff_f (pow, 2, 4, 16),
12096 TEST_ff_f (pow, 256, 8, 0x1p64L),
164f863e 12097
601a3a5f 12098 TEST_ff_f (pow, 0.75L, 1.25L, 0.697953644326574699205914060237425566L),
8847214f 12099
4c95adde 12100#if defined TEST_DOUBLE || defined TEST_LDOUBLE
601a3a5f 12101 TEST_ff_f (pow, -7.49321e+133, -9.80818e+16, 0, UNDERFLOW_EXCEPTION),
8847214f
UD		 12102#endif
12103
601a3a5f
JM		 12104 TEST_ff_f (pow, -1.0, -0xffffff, -1.0),
12105 TEST_ff_f (pow, -1.0, -0x1fffffe, 1.0),
d6270972 12106#ifndef TEST_FLOAT
601a3a5f
JM		 12107 TEST_ff_f (pow, -1.0, -0x1.fffffffffffffp+52L, -1.0),
12108 TEST_ff_f (pow, -1.0, -0x1.fffffffffffffp+53L, 1.0),
d6270972
JM		 12109#endif
12110#ifdef TEST_LDOUBLE
12111# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12112 TEST_ff_f (pow, -1.0, -0x1.fffffffffffffffep+63L, -1.0),
12113 TEST_ff_f (pow, -1.0, -0x1.fffffffffffffffep+64L, 1.0),
d6270972
JM		 12114# endif
12115# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12116 TEST_ff_f (pow, -1.0, -0x1.ffffffffffffffffffffffffff8p+105L, -1.0),
12117 TEST_ff_f (pow, -1.0, -0x1.ffffffffffffffffffffffffff8p+106L, 1.0),
d6270972
JM		 12118# endif
12119# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12120 TEST_ff_f (pow, -1.0, -0x1.ffffffffffffffffffffffffffffp+112L, -1.0),
12121 TEST_ff_f (pow, -1.0, -0x1.ffffffffffffffffffffffffffffp+113L, 1.0),
d6270972
JM		 12122# endif
12123#endif
601a3a5f 12124 TEST_ff_f (pow, -1.0, -max_value, 1.0),
d6270972 12125
601a3a5f
JM		 12126 TEST_ff_f (pow, -1.0, 0xffffff, -1.0),
12127 TEST_ff_f (pow, -1.0, 0x1fffffe, 1.0),
d6270972 12128#ifndef TEST_FLOAT
601a3a5f
JM		 12129 TEST_ff_f (pow, -1.0, 0x1.fffffffffffffp+52L, -1.0),
12130 TEST_ff_f (pow, -1.0, 0x1.fffffffffffffp+53L, 1.0),
d6270972
JM		 12131#endif
12132#ifdef TEST_LDOUBLE
12133# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12134 TEST_ff_f (pow, -1.0, 0x1.fffffffffffffffep+63L, -1.0),
12135 TEST_ff_f (pow, -1.0, 0x1.fffffffffffffffep+64L, 1.0),
d6270972
JM		 12136# endif
12137# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12138 TEST_ff_f (pow, -1.0, 0x1.ffffffffffffffffffffffffff8p+105L, -1.0),
12139 TEST_ff_f (pow, -1.0, 0x1.ffffffffffffffffffffffffff8p+106L, 1.0),
d6270972
JM		 12140# endif
12141# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12142 TEST_ff_f (pow, -1.0, 0x1.ffffffffffffffffffffffffffffp+112L, -1.0),
12143 TEST_ff_f (pow, -1.0, 0x1.ffffffffffffffffffffffffffffp+113L, 1.0),
d6270972
JM		 12144# endif
12145#endif
601a3a5f 12146 TEST_ff_f (pow, -1.0, max_value, 1.0),
d6270972 12147
601a3a5f
JM		 12148 TEST_ff_f (pow, -2.0, 126, 0x1p126),
12149 TEST_ff_f (pow, -2.0, 127, -0x1p127),
12150 /* Allow inexact results for float to be considered to underflow. */
12151 TEST_ff_f (pow, -2.0, -126, 0x1p-126, UNDERFLOW_EXCEPTION_OK_FLOAT),
12152 TEST_ff_f (pow, -2.0, -127, -0x1p-127, UNDERFLOW_EXCEPTION_OK_FLOAT),
d6270972 12153
601a3a5f
JM		 12154 TEST_ff_f (pow, -2.0, -0xffffff, minus_zero, UNDERFLOW_EXCEPTION),
12155 TEST_ff_f (pow, -2.0, -0x1fffffe, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12156#ifndef TEST_FLOAT
601a3a5f
JM		 12157 TEST_ff_f (pow, -2.0, -0x1.fffffffffffffp+52L, minus_zero, UNDERFLOW_EXCEPTION),
12158 TEST_ff_f (pow, -2.0, -0x1.fffffffffffffp+53L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12159#endif
12160#ifdef TEST_LDOUBLE
12161# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12162 TEST_ff_f (pow, -2.0, -0x1.fffffffffffffffep+63L, minus_zero, UNDERFLOW_EXCEPTION),
12163 TEST_ff_f (pow, -2.0, -0x1.fffffffffffffffep+64L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12164# endif
12165# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12166 TEST_ff_f (pow, -2.0, -0x1.ffffffffffffffffffffffffff8p+105L, minus_zero, UNDERFLOW_EXCEPTION),
12167 TEST_ff_f (pow, -2.0, -0x1.ffffffffffffffffffffffffff8p+106L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12168# endif
12169# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12170 TEST_ff_f (pow, -2.0, -0x1.ffffffffffffffffffffffffffffp+112L, minus_zero, UNDERFLOW_EXCEPTION),
12171 TEST_ff_f (pow, -2.0, -0x1.ffffffffffffffffffffffffffffp+113L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12172# endif
12173#endif
601a3a5f 12174 TEST_ff_f (pow, -2.0, -max_value, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12175
601a3a5f
JM		 12176 TEST_ff_f (pow, -2.0, 0xffffff, minus_infty, OVERFLOW_EXCEPTION),
12177 TEST_ff_f (pow, -2.0, 0x1fffffe, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12178#ifndef TEST_FLOAT
601a3a5f
JM		 12179 TEST_ff_f (pow, -2.0, 0x1.fffffffffffffp+52L, minus_infty, OVERFLOW_EXCEPTION),
12180 TEST_ff_f (pow, -2.0, 0x1.fffffffffffffp+53L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12181#endif
12182#ifdef TEST_LDOUBLE
12183# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12184 TEST_ff_f (pow, -2.0, 0x1.fffffffffffffffep+63L, minus_infty, OVERFLOW_EXCEPTION),
12185 TEST_ff_f (pow, -2.0, 0x1.fffffffffffffffep+64L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12186# endif
12187# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12188 TEST_ff_f (pow, -2.0, 0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, OVERFLOW_EXCEPTION),
12189 TEST_ff_f (pow, -2.0, 0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12190# endif
12191# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12192 TEST_ff_f (pow, -2.0, 0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, OVERFLOW_EXCEPTION),
12193 TEST_ff_f (pow, -2.0, 0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12194# endif
12195#endif
601a3a5f 12196 TEST_ff_f (pow, -2.0, max_value, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12197
601a3a5f
JM		 12198 TEST_ff_f (pow, -max_value, 0.5, qnan_value, INVALID_EXCEPTION),
12199 TEST_ff_f (pow, -max_value, 1.5, qnan_value, INVALID_EXCEPTION),
12200 TEST_ff_f (pow, -max_value, 1000.5, qnan_value, INVALID_EXCEPTION),
12201 TEST_ff_f (pow, -max_value, -2, plus_zero, UNDERFLOW_EXCEPTION),
12202 TEST_ff_f (pow, -max_value, -3, minus_zero, UNDERFLOW_EXCEPTION),
12203 TEST_ff_f (pow, -max_value, 2, plus_infty, OVERFLOW_EXCEPTION),
12204 TEST_ff_f (pow, -max_value, 3, minus_infty, OVERFLOW_EXCEPTION),
d6270972 12205
601a3a5f
JM		 12206 TEST_ff_f (pow, -max_value, -0xffffff, minus_zero, UNDERFLOW_EXCEPTION),
12207 TEST_ff_f (pow, -max_value, -0x1fffffe, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12208#ifndef TEST_FLOAT
601a3a5f
JM		 12209 TEST_ff_f (pow, -max_value, -0x1.fffffffffffffp+52L, minus_zero, UNDERFLOW_EXCEPTION),
12210 TEST_ff_f (pow, -max_value, -0x1.fffffffffffffp+53L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12211#endif
12212#ifdef TEST_LDOUBLE
12213# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12214 TEST_ff_f (pow, -max_value, -0x1.fffffffffffffffep+63L, minus_zero, UNDERFLOW_EXCEPTION),
12215 TEST_ff_f (pow, -max_value, -0x1.fffffffffffffffep+64L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12216# endif
12217# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12218 TEST_ff_f (pow, -max_value, -0x1.ffffffffffffffffffffffffff8p+105L, minus_zero, UNDERFLOW_EXCEPTION),
12219 TEST_ff_f (pow, -max_value, -0x1.ffffffffffffffffffffffffff8p+106L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12220# endif
12221# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12222 TEST_ff_f (pow, -max_value, -0x1.ffffffffffffffffffffffffffffp+112L, minus_zero, UNDERFLOW_EXCEPTION),
12223 TEST_ff_f (pow, -max_value, -0x1.ffffffffffffffffffffffffffffp+113L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12224# endif
12225#endif
601a3a5f 12226 TEST_ff_f (pow, -max_value, -max_value, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12227
601a3a5f
JM		 12228 TEST_ff_f (pow, -max_value, 0xffffff, minus_infty, OVERFLOW_EXCEPTION),
12229 TEST_ff_f (pow, -max_value, 0x1fffffe, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12230#ifndef TEST_FLOAT
601a3a5f
JM		 12231 TEST_ff_f (pow, -max_value, 0x1.fffffffffffffp+52L, minus_infty, OVERFLOW_EXCEPTION),
12232 TEST_ff_f (pow, -max_value, 0x1.fffffffffffffp+53L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12233#endif
12234#ifdef TEST_LDOUBLE
12235# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12236 TEST_ff_f (pow, -max_value, 0x1.fffffffffffffffep+63L, minus_infty, OVERFLOW_EXCEPTION),
12237 TEST_ff_f (pow, -max_value, 0x1.fffffffffffffffep+64L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12238# endif
12239# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12240 TEST_ff_f (pow, -max_value, 0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, OVERFLOW_EXCEPTION),
12241 TEST_ff_f (pow, -max_value, 0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12242# endif
12243# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12244 TEST_ff_f (pow, -max_value, 0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, OVERFLOW_EXCEPTION),
12245 TEST_ff_f (pow, -max_value, 0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12246# endif
12247#endif
601a3a5f 12248 TEST_ff_f (pow, -max_value, max_value, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12249
601a3a5f
JM		 12250 TEST_ff_f (pow, -0.5, 126, 0x1p-126),
12251 TEST_ff_f (pow, -0.5, 127, -0x1p-127),
12252 TEST_ff_f (pow, -0.5, -126, 0x1p126),
12253 TEST_ff_f (pow, -0.5, -127, -0x1p127),
d6270972 12254
601a3a5f
JM		 12255 TEST_ff_f (pow, -0.5, -0xffffff, minus_infty, OVERFLOW_EXCEPTION),
12256 TEST_ff_f (pow, -0.5, -0x1fffffe, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12257#ifndef TEST_FLOAT
601a3a5f
JM		 12258 TEST_ff_f (pow, -0.5, -0x1.fffffffffffffp+52L, minus_infty, OVERFLOW_EXCEPTION),
12259 TEST_ff_f (pow, -0.5, -0x1.fffffffffffffp+53L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12260#endif
12261#ifdef TEST_LDOUBLE
12262# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12263 TEST_ff_f (pow, -0.5, -0x1.fffffffffffffffep+63L, minus_infty, OVERFLOW_EXCEPTION),
12264 TEST_ff_f (pow, -0.5, -0x1.fffffffffffffffep+64L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12265# endif
12266# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12267 TEST_ff_f (pow, -0.5, -0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, OVERFLOW_EXCEPTION),
12268 TEST_ff_f (pow, -0.5, -0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12269# endif
12270# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12271 TEST_ff_f (pow, -0.5, -0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, OVERFLOW_EXCEPTION),
12272 TEST_ff_f (pow, -0.5, -0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12273# endif
12274#endif
601a3a5f 12275 TEST_ff_f (pow, -0.5, -max_value, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12276
601a3a5f
JM		 12277 TEST_ff_f (pow, -0.5, 0xffffff, minus_zero, UNDERFLOW_EXCEPTION),
12278 TEST_ff_f (pow, -0.5, 0x1fffffe, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12279#ifndef TEST_FLOAT
601a3a5f
JM		 12280 TEST_ff_f (pow, -0.5, 0x1.fffffffffffffp+52L, minus_zero, UNDERFLOW_EXCEPTION),
12281 TEST_ff_f (pow, -0.5, 0x1.fffffffffffffp+53L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12282#endif
12283#ifdef TEST_LDOUBLE
12284# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12285 TEST_ff_f (pow, -0.5, 0x1.fffffffffffffffep+63L, minus_zero, UNDERFLOW_EXCEPTION),
12286 TEST_ff_f (pow, -0.5, 0x1.fffffffffffffffep+64L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12287# endif
12288# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12289 TEST_ff_f (pow, -0.5, 0x1.ffffffffffffffffffffffffff8p+105L, minus_zero, UNDERFLOW_EXCEPTION),
12290 TEST_ff_f (pow, -0.5, 0x1.ffffffffffffffffffffffffff8p+106L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12291# endif
12292# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12293 TEST_ff_f (pow, -0.5, 0x1.ffffffffffffffffffffffffffffp+112L, minus_zero, UNDERFLOW_EXCEPTION),
12294 TEST_ff_f (pow, -0.5, 0x1.ffffffffffffffffffffffffffffp+113L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12295# endif
12296#endif
601a3a5f 12297 TEST_ff_f (pow, -0.5, max_value, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12298
601a3a5f
JM		 12299 TEST_ff_f (pow, -min_value, 0.5, qnan_value, INVALID_EXCEPTION),
12300 TEST_ff_f (pow, -min_value, 1.5, qnan_value, INVALID_EXCEPTION),
12301 TEST_ff_f (pow, -min_value, 1000.5, qnan_value, INVALID_EXCEPTION),
12302 TEST_ff_f (pow, -min_value, -2, plus_infty, OVERFLOW_EXCEPTION),
12303 TEST_ff_f (pow, -min_value, -3, minus_infty, OVERFLOW_EXCEPTION),
12304 /* Allow inexact results to be considered to underflow. */
12305 TEST_ff_f (pow, -min_value, 1, -min_value, UNDERFLOW_EXCEPTION_OK),
12306 TEST_ff_f (pow, -min_value, 2, plus_zero, UNDERFLOW_EXCEPTION),
12307 TEST_ff_f (pow, -min_value, 3, minus_zero, UNDERFLOW_EXCEPTION),
d6270972 12308
601a3a5f
JM		 12309 TEST_ff_f (pow, -min_value, -0xffffff, minus_infty, OVERFLOW_EXCEPTION),
12310 TEST_ff_f (pow, -min_value, -0x1fffffe, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12311#ifndef TEST_FLOAT
601a3a5f
JM		 12312 TEST_ff_f (pow, -min_value, -0x1.fffffffffffffp+52L, minus_infty, OVERFLOW_EXCEPTION),
12313 TEST_ff_f (pow, -min_value, -0x1.fffffffffffffp+53L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12314#endif
12315#ifdef TEST_LDOUBLE
12316# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12317 TEST_ff_f (pow, -min_value, -0x1.fffffffffffffffep+63L, minus_infty, OVERFLOW_EXCEPTION),
12318 TEST_ff_f (pow, -min_value, -0x1.fffffffffffffffep+64L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12319# endif
12320# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12321 TEST_ff_f (pow, -min_value, -0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, OVERFLOW_EXCEPTION),
12322 TEST_ff_f (pow, -min_value, -0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12323# endif
12324# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12325 TEST_ff_f (pow, -min_value, -0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, OVERFLOW_EXCEPTION),
12326 TEST_ff_f (pow, -min_value, -0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12327# endif
12328#endif
601a3a5f 12329 TEST_ff_f (pow, -min_value, -max_value, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12330
601a3a5f
JM		 12331 TEST_ff_f (pow, -min_value, 0xffffff, minus_zero, UNDERFLOW_EXCEPTION),
12332 TEST_ff_f (pow, -min_value, 0x1fffffe, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12333#ifndef TEST_FLOAT
601a3a5f
JM		 12334 TEST_ff_f (pow, -min_value, 0x1.fffffffffffffp+52L, minus_zero, UNDERFLOW_EXCEPTION),
12335 TEST_ff_f (pow, -min_value, 0x1.fffffffffffffp+53L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12336#endif
12337#ifdef TEST_LDOUBLE
12338# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12339 TEST_ff_f (pow, -min_value, 0x1.fffffffffffffffep+63L, minus_zero, UNDERFLOW_EXCEPTION),
12340 TEST_ff_f (pow, -min_value, 0x1.fffffffffffffffep+64L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12341# endif
12342# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12343 TEST_ff_f (pow, -min_value, 0x1.ffffffffffffffffffffffffff8p+105L, minus_zero, UNDERFLOW_EXCEPTION),
12344 TEST_ff_f (pow, -min_value, 0x1.ffffffffffffffffffffffffff8p+106L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12345# endif
12346# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12347 TEST_ff_f (pow, -min_value, 0x1.ffffffffffffffffffffffffffffp+112L, minus_zero, UNDERFLOW_EXCEPTION),
12348 TEST_ff_f (pow, -min_value, 0x1.ffffffffffffffffffffffffffffp+113L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12349# endif
12350#endif
601a3a5f
JM		 12351 TEST_ff_f (pow, -min_value, max_value, plus_zero, UNDERFLOW_EXCEPTION),
12352
12353 TEST_ff_f (pow, 0x0.ffffffp0, 10, 0.999999403953712118183885036774764444747L),
12354 TEST_ff_f (pow, 0x0.ffffffp0, 100, 0.999994039553108359406305079606228341585L),
12355 TEST_ff_f (pow, 0x0.ffffffp0, 1000, 0.9999403971297699052276650144650733772182L),
12356 TEST_ff_f (pow, 0x0.ffffffp0, 0x1p24, 0.3678794302077803437135155590023422899744L),
12357 TEST_ff_f (pow, 0x0.ffffffp0, 0x1p30, 1.603807831524924233828134753069728224044e-28L),
12358 TEST_ff_f (pow, 0x0.ffffffp0, 0x1.234566p30, 2.374884712135295099971443365381007297732e-32L),
12359 TEST_ff_f (pow, 0x0.ffffffp0, -10, 1.000000596046643153205170848674671339688L),
12360 TEST_ff_f (pow, 0x0.ffffffp0, -100, 1.000005960482418779499387594989252621451L),
12361 TEST_ff_f (pow, 0x0.ffffffp0, -1000, 1.000059606422943986382898964231519867906L),
12362 TEST_ff_f (pow, 0x0.ffffffp0, -0x1p24, 2.7182819094701610539628664526874952929416L),
12363 TEST_ff_f (pow, 0x0.ffffffp0, -0x1p30, 6.2351609734265057988914412331288163636075e+27L),
12364 TEST_ff_f (pow, 0x0.ffffffp0, -0x1.234566p30, 4.2107307141696353498921307077142537353515e+31L),
12365 TEST_ff_f (pow, 0x1.000002p0, 0x1p24, 7.3890552180866447284268641248075832310141L),
12366 TEST_ff_f (pow, 0x1.000002p0, 0x1.234566p29, 4.2107033006507495188536371520637025716256e+31L),
12367 TEST_ff_f (pow, 0x1.000002p0, -0x1.234566p29, 2.3749001736727769098946062325205705312166e-32L),
c483f6b4 12368
1bead169 12369#if !defined TEST_FLOAT
601a3a5f
JM		 12370 TEST_ff_f (pow, 0x0.fffffffffffff8p0L, 0x1.23456789abcdfp62L, 1.0118762747827252817436395051178295138220e-253L),
12371 TEST_ff_f (pow, 0x0.fffffffffffff8p0L, -0x1.23456789abcdfp62L, 9.8826311568054561811190162420900667121992e+252L),
12372 TEST_ff_f (pow, 0x1.0000000000001p0L, 0x1.23456789abcdfp61L, 9.8826311568044974397135026217687399395481e+252L),
12373 TEST_ff_f (pow, 0x1.0000000000001p0L, -0x1.23456789abcdfp61L, 1.0118762747828234466621210689458255908670e-253L),
c483f6b4
JM		 12374#endif
12375
1bead169 12376#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64 && LDBL_MAX_EXP >= 16384
601a3a5f
JM		 12377 TEST_ff_f (pow, 0x0.ffffffffffffffffp0L, 0x1.23456789abcdef0ep77L, 1.2079212226420368189981778807634890018840e-4048L),
12378 TEST_ff_f (pow, 0x0.ffffffffffffffffp0L, -0x1.23456789abcdef0ep77L, 8.2786855736563746280496724205839522148001e+4047L),
12379 TEST_ff_f (pow, 0x1.0000000000000002p0L, 0x1.23456789abcdef0ep76L, 8.2786855736563683535324500168799315131570e+4047L),
12380 TEST_ff_f (pow, 0x1.0000000000000002p0L, -0x1.23456789abcdef0ep76L, 1.2079212226420377344964713407722652880280e-4048L),
1bead169
JM		 12381#endif
12382
12383#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
601a3a5f
JM		 12384 TEST_ff_f (pow, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.23456789abcdef0123456789abcdp126L, 1.2079212226420440237790185999151440179953e-4048L),
12385 TEST_ff_f (pow, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.23456789abcdef0123456789abcdp126L, 8.2786855736563252489063231915535105363602e+4047L),
12386 TEST_ff_f (pow, 0x1.0000000000000000000000000001p0L, 0x1.23456789abcdef0123456789abcdp125L, 8.2786855736563252489063231915423647547782e+4047L),
12387 TEST_ff_f (pow, 0x1.0000000000000000000000000001p0L, -0x1.23456789abcdef0123456789abcdp125L, 1.2079212226420440237790185999167702696503e-4048L),
1bead169
JM		 12388#endif
12389
12390#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
601a3a5f
JM		 12391 TEST_ff_f (pow, 1e4932L, 0.75L, 1e3699L),
12392 TEST_ff_f (pow, 1e4928L, 0.75L, 1e3696L),
12393 TEST_ff_f (pow, 1e4924L, 0.75L, 1e3693L),
12394 TEST_ff_f (pow, 1e4920L, 0.75L, 1e3690L),
12395 TEST_ff_f (pow, 10.0L, 4932.0L, 1e4932L),
12396 TEST_ff_f (pow, 10.0L, 4931.0L, 1e4931L),
12397 TEST_ff_f (pow, 10.0L, 4930.0L, 1e4930L),
12398 TEST_ff_f (pow, 10.0L, 4929.0L, 1e4929L),
12399 TEST_ff_f (pow, 10.0L, -4931.0L, 1e-4931L),
12400 TEST_ff_f (pow, 10.0L, -4930.0L, 1e-4930L),
12401 TEST_ff_f (pow, 10.0L, -4929.0L, 1e-4929L),
12402 TEST_ff_f (pow, 1e27L, 182.0L, 1e4914L),
12403 TEST_ff_f (pow, 1e27L, -182.0L, 1e-4914L),
12404#endif
12405
12406 TEST_ff_f (pow, min_subnorm_value, min_subnorm_value, 1.0L),
12407 TEST_ff_f (pow, min_subnorm_value, -min_subnorm_value, 1.0L),
12408 TEST_ff_f (pow, max_value, min_subnorm_value, 1.0L),
12409 TEST_ff_f (pow, max_value, -min_subnorm_value, 1.0L),
12410 TEST_ff_f (pow, 0.99L, min_subnorm_value, 1.0L),
12411 TEST_ff_f (pow, 0.99L, -min_subnorm_value, 1.0L),
12412 TEST_ff_f (pow, 1.01L, min_subnorm_value, 1.0L),
12413 TEST_ff_f (pow, 1.01L, -min_subnorm_value, 1.0L),
12414
12415 TEST_ff_f (pow, 2.0L, -100000.0L, plus_zero, UNDERFLOW_EXCEPTION),
12416 END_DATA (pow)
12417 };
7a25eb06 12418
601a3a5f
JM		 12419static void
12420pow_test (void)
12421{
12422
12423 errno = 0;
12424 FUNC(pow) (0, 0);
12425 if (errno == ENOSYS)
12426 /* Function not implemented. */
12427 return;
12428
12429 START (pow);
12430 RUN_TEST_LOOP_ff_f (pow, pow_test_data, );
8847214f
UD		 12431 END (pow);
12432}
12433
b7cd39e8 12434
601a3a5f
JM		 12435static const struct test_ff_f_data pow_tonearest_test_data[] =
12436 {
12437 START_DATA (pow_tonearest),
12438 TEST_ff_f (pow, 1.0625L, 1.125L, 1.070582293028761362162622578677070098674L),
12439 TEST_ff_f (pow, 1.5L, 1.03125L, 1.519127098714743184071644334163037684948L),
12440 END_DATA (pow_tonearest)
12441 };
12442
b7cd39e8
JM		 12443static void
12444pow_test_tonearest (void)
12445{
b7cd39e8
JM		 12446 errno = 0;
12447 FUNC(pow) (0, 0);
12448 if (errno == ENOSYS)
12449 /* Function not implemented. */
12450 return;
12451
12452 START (pow_tonearest);
601a3a5f 12453 RUN_TEST_LOOP_ff_f (pow, pow_tonearest_test_data, FE_TONEAREST);
b7cd39e8
JM		 12454 END (pow_tonearest);
12455}
12456
12457
601a3a5f
JM		 12458static const struct test_ff_f_data pow_towardzero_test_data[] =
12459 {
12460 START_DATA (pow_towardzero),
12461 TEST_ff_f (pow, 1.0625L, 1.125L, 1.070582293028761362162622578677070098674L),
12462 TEST_ff_f (pow, 1.5L, 1.03125L, 1.519127098714743184071644334163037684948L),
12463 END_DATA (pow_towardzero)
12464 };
12465
b7cd39e8
JM		 12466static void
12467pow_test_towardzero (void)
12468{
b7cd39e8
JM		 12469 errno = 0;
12470 FUNC(pow) (0, 0);
12471 if (errno == ENOSYS)
12472 /* Function not implemented. */
12473 return;
12474
12475 START (pow_towardzero);
601a3a5f 12476 RUN_TEST_LOOP_ff_f (pow, pow_towardzero_test_data, FE_TOWARDZERO);
b7cd39e8
JM		 12477 END (pow_towardzero);
12478}
12479
12480
601a3a5f
JM		 12481static const struct test_ff_f_data pow_downward_test_data[] =
12482 {
12483 START_DATA (pow_downward),
12484 TEST_ff_f (pow, 1.0625L, 1.125L, 1.070582293028761362162622578677070098674L),
12485 TEST_ff_f (pow, 1.5L, 1.03125L, 1.519127098714743184071644334163037684948L),
12486 END_DATA (pow_downward)
12487 };
12488
b7cd39e8
JM		 12489static void
12490pow_test_downward (void)
12491{
b7cd39e8
JM		 12492 errno = 0;
12493 FUNC(pow) (0, 0);
12494 if (errno == ENOSYS)
12495 /* Function not implemented. */
12496 return;
12497
12498 START (pow_downward);
601a3a5f 12499 RUN_TEST_LOOP_ff_f (pow, pow_downward_test_data, FE_DOWNWARD);
b7cd39e8
JM		 12500 END (pow_downward);
12501}
12502
12503
601a3a5f
JM		 12504static const struct test_ff_f_data pow_upward_test_data[] =
12505 {
12506 START_DATA (pow_upward),
12507 TEST_ff_f (pow, 1.0625L, 1.125L, 1.070582293028761362162622578677070098674L),
12508 TEST_ff_f (pow, 1.5L, 1.03125L, 1.519127098714743184071644334163037684948L),
12509 END_DATA (pow_upward)
12510 };
12511
b7cd39e8
JM		 12512static void
12513pow_test_upward (void)
12514{
b7cd39e8
JM		 12515 errno = 0;
12516 FUNC(pow) (0, 0);
12517 if (errno == ENOSYS)
12518 /* Function not implemented. */
12519 return;
12520
12521 START (pow_upward);
601a3a5f 12522 RUN_TEST_LOOP_ff_f (pow, pow_upward_test_data, FE_UPWARD);
b7cd39e8
JM		 12523 END (pow_upward);
12524}
12525
12526
601a3a5f
JM		 12527static const struct test_ff_f_data remainder_test_data[] =
12528 {
12529 START_DATA (remainder),
12530 TEST_ff_f (remainder, 1, 0, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12531 TEST_ff_f (remainder, 1, minus_zero, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12532 TEST_ff_f (remainder, plus_infty, minus_zero, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12533 TEST_ff_f (remainder, plus_infty, 0, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12534 TEST_ff_f (remainder, plus_infty, 1, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12535 TEST_ff_f (remainder, plus_infty, 2, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12536 TEST_ff_f (remainder, minus_infty, minus_zero, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12537 TEST_ff_f (remainder, minus_infty, 0, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12538 TEST_ff_f (remainder, minus_infty, 1, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12539 TEST_ff_f (remainder, minus_infty, 2, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12540 TEST_ff_f (remainder, qnan_value, qnan_value, qnan_value, ERRNO_UNCHANGED),
12541 TEST_ff_f (remainder, 0, qnan_value, qnan_value, ERRNO_UNCHANGED),
12542 TEST_ff_f (remainder, qnan_value, 0, qnan_value, ERRNO_UNCHANGED),
12543
12544 TEST_ff_f (remainder, 7.0, plus_infty, 7.0, ERRNO_UNCHANGED),
12545 TEST_ff_f (remainder, 7.0, minus_infty, 7.0, ERRNO_UNCHANGED),
12546
12547 TEST_ff_f (remainder, 1.625, 1.0, -0.375),
12548 TEST_ff_f (remainder, -1.625, 1.0, 0.375),
12549 TEST_ff_f (remainder, 1.625, -1.0, -0.375),
12550 TEST_ff_f (remainder, -1.625, -1.0, 0.375),
12551 TEST_ff_f (remainder, 5.0, 2.0, 1.0),
12552 TEST_ff_f (remainder, 3.0, 2.0, -1.0),
12553 END_DATA (remainder)
12554 };
12555
8847214f
UD		 12556static void
12557remainder_test (void)
12558{
aaca11d8
UD		 12559 errno = 0;
12560 FUNC(remainder) (1.625, 1.0);
12561 if (errno == ENOSYS)
12562 /* Function not implemented. */
12563 return;
8847214f
UD		 12564
12565 START (remainder);
601a3a5f 12566 RUN_TEST_LOOP_ff_f (remainder, remainder_test_data, );
8847214f
UD		 12567 END (remainder);
12568}
12569
12570static void
12571remquo_test (void)
12572{
12573 /* x is needed. */
12574 int x;
12575
aaca11d8
UD		 12576 errno = 0;
12577 FUNC(remquo) (1.625, 1.0, &x);
12578 if (errno == ENOSYS)
12579 /* Function not implemented. */
12580 return;
12581
8847214f
UD		 12582 START (remquo);
12583
67e971f1
TS		 12584 TEST_ffI_f1 (remquo, 1, 0, qnan_value, IGNORE, INVALID_EXCEPTION);
12585 TEST_ffI_f1 (remquo, 1, minus_zero, qnan_value, IGNORE, INVALID_EXCEPTION);
12586 TEST_ffI_f1 (remquo, plus_infty, 1, qnan_value, IGNORE, INVALID_EXCEPTION);
12587 TEST_ffI_f1 (remquo, minus_infty, 1, qnan_value, IGNORE, INVALID_EXCEPTION);
12588 TEST_ffI_f1 (remquo, qnan_value, qnan_value, qnan_value, IGNORE);
8847214f
UD		 12589
12590 TEST_ffI_f1 (remquo, 1.625, 1.0, -0.375, 2);
12591 TEST_ffI_f1 (remquo, -1.625, 1.0, 0.375, -2);
12592 TEST_ffI_f1 (remquo, 1.625, -1.0, -0.375, -2);
12593 TEST_ffI_f1 (remquo, -1.625, -1.0, 0.375, 2);
12594
12595 TEST_ffI_f1 (remquo, 5, 2, 1, 2);
12596 TEST_ffI_f1 (remquo, 3, 2, -1, 2);
12597
12598 END (remquo);
12599}
12600
74c57478
JM		 12601static const struct test_f_f_data rint_test_data[] =
12602 {
12603 START_DATA (rint),
12604 /* TODO: missing qNaN tests. */
12605
12606 TEST_f_f (rint, 0.0, 0.0),
12607 TEST_f_f (rint, minus_zero, minus_zero),
12608 TEST_f_f (rint, plus_infty, plus_infty),
12609 TEST_f_f (rint, minus_infty, minus_infty),
12610
12611 /* Default rounding mode is round to even. */
12612 TEST_f_f (rint, 0.5, 0.0),
12613 TEST_f_f (rint, 1.5, 2.0),
12614 TEST_f_f (rint, 2.5, 2.0),
12615 TEST_f_f (rint, 3.5, 4.0),
12616 TEST_f_f (rint, 4.5, 4.0),
12617 TEST_f_f (rint, -0.5, -0.0),
12618 TEST_f_f (rint, -1.5, -2.0),
12619 TEST_f_f (rint, -2.5, -2.0),
12620 TEST_f_f (rint, -3.5, -4.0),
12621 TEST_f_f (rint, -4.5, -4.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, -0.1, -0.0),
12626 TEST_f_f (rint, -0.25, -0.0),
12627 TEST_f_f (rint, -0.625, -1.0),
12628 TEST_f_f (rint, 262144.75, 262145.0),
12629 TEST_f_f (rint, 262142.75, 262143.0),
12630 TEST_f_f (rint, 524286.75, 524287.0),
12631 TEST_f_f (rint, 524288.75, 524289.0),
12632 TEST_f_f (rint, 1048576.75, 1048577.0),
12633 TEST_f_f (rint, 2097152.75, 2097153.0),
12634 TEST_f_f (rint, -1048576.75, -1048577.0),
12635 TEST_f_f (rint, -2097152.75, -2097153.0),
12636#ifndef TEST_FLOAT
12637 TEST_f_f (rint, 70368744177664.75, 70368744177665.0),
12638 TEST_f_f (rint, 140737488355328.75, 140737488355329.0),
12639 TEST_f_f (rint, 281474976710656.75, 281474976710657.0),
12640 TEST_f_f (rint, 562949953421312.75, 562949953421313.0),
12641 TEST_f_f (rint, 1125899906842624.75, 1125899906842625.0),
12642 TEST_f_f (rint, -70368744177664.75, -70368744177665.0),
12643 TEST_f_f (rint, -140737488355328.75, -140737488355329.0),
12644 TEST_f_f (rint, -281474976710656.75, -281474976710657.0),
12645 TEST_f_f (rint, -562949953421312.75, -562949953421313.0),
12646 TEST_f_f (rint, -1125899906842624.75, -1125899906842625.0),
fe45ce09 12647#endif
f964490f 12648#ifdef TEST_LDOUBLE
74c57478
JM		 12649 /* The result can only be represented in long double. */
12650 TEST_f_f (rint, 4503599627370495.5L, 4503599627370496.0L),
12651 TEST_f_f (rint, 4503599627370496.25L, 4503599627370496.0L),
12652 TEST_f_f (rint, 4503599627370496.5L, 4503599627370496.0L),
12653 TEST_f_f (rint, 4503599627370496.75L, 4503599627370497.0L),
12654 TEST_f_f (rint, 4503599627370497.5L, 4503599627370498.0L),
830fce04 12655
5c68d401 12656# if LDBL_MANT_DIG > 100
74c57478
JM		 12657 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370495.0L),
12658 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370496.0L),
12659 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370497.0L),
5c68d401 12660# endif
f964490f 12661
74c57478
JM		 12662 TEST_f_f (rint, -4503599627370495.5L, -4503599627370496.0L),
12663 TEST_f_f (rint, -4503599627370496.25L, -4503599627370496.0L),
12664 TEST_f_f (rint, -4503599627370496.5L, -4503599627370496.0L),
12665 TEST_f_f (rint, -4503599627370496.75L, -4503599627370497.0L),
12666 TEST_f_f (rint, -4503599627370497.5L, -4503599627370498.0L),
830fce04 12667
5c68d401 12668# if LDBL_MANT_DIG > 100
74c57478
JM		 12669 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370495.0L),
12670 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370496.0L),
12671 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370497.0L),
12672
12673 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740991.0L),
12674 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740992.0L),
12675 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740993.0L),
12676 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740992.0L),
12677 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740993.0L),
12678 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740994.0L),
12679
12680 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740991.0L),
12681 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740992.0L),
12682 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740993.0L),
12683 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740992.0L),
12684 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740993.0L),
12685 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740994.0L),
5c68d401 12686# endif
f964490f 12687
74c57478
JM		 12688 TEST_f_f (rint, 9007199254740991.5L, 9007199254740992.0L),
12689 TEST_f_f (rint, 9007199254740992.25L, 9007199254740992.0L),
12690 TEST_f_f (rint, 9007199254740992.5L, 9007199254740992.0L),
12691 TEST_f_f (rint, 9007199254740992.75L, 9007199254740993.0L),
12692 TEST_f_f (rint, 9007199254740993.5L, 9007199254740994.0L),
12693
12694 TEST_f_f (rint, -9007199254740991.5L, -9007199254740992.0L),
12695 TEST_f_f (rint, -9007199254740992.25L, -9007199254740992.0L),
12696 TEST_f_f (rint, -9007199254740992.5L, -9007199254740992.0L),
12697 TEST_f_f (rint, -9007199254740992.75L, -9007199254740993.0L),
12698 TEST_f_f (rint, -9007199254740993.5L, -9007199254740994.0L),
12699
12700 TEST_f_f (rint, 72057594037927935.5L, 72057594037927936.0L),
12701 TEST_f_f (rint, 72057594037927936.25L, 72057594037927936.0L),
12702 TEST_f_f (rint, 72057594037927936.5L, 72057594037927936.0L),
12703 TEST_f_f (rint, 72057594037927936.75L, 72057594037927937.0L),
12704 TEST_f_f (rint, 72057594037927937.5L, 72057594037927938.0L),
12705
12706 TEST_f_f (rint, -72057594037927935.5L, -72057594037927936.0L),
12707 TEST_f_f (rint, -72057594037927936.25L, -72057594037927936.0L),
12708 TEST_f_f (rint, -72057594037927936.5L, -72057594037927936.0L),
12709 TEST_f_f (rint, -72057594037927936.75L, -72057594037927937.0L),
12710 TEST_f_f (rint, -72057594037927937.5L, -72057594037927938.0L),
12711
12712 TEST_f_f (rint, 10141204801825835211973625643007.5L, 10141204801825835211973625643008.0L),
12713 TEST_f_f (rint, 10141204801825835211973625643008.25L, 10141204801825835211973625643008.0L),
12714 TEST_f_f (rint, 10141204801825835211973625643008.5L, 10141204801825835211973625643008.0L),
12715 TEST_f_f (rint, 10141204801825835211973625643008.75L, 10141204801825835211973625643009.0L),
12716 TEST_f_f (rint, 10141204801825835211973625643009.5L, 10141204801825835211973625643010.0L),
12717#endif
12718 END_DATA (rint)
12719 };
1dc23588 12720
74c57478
JM		 12721static void
12722rint_test (void)
12723{
12724 START (rint);
12725 RUN_TEST_LOOP_f_f (rint, rint_test_data, );
8847214f
UD		 12726 END (rint);
12727}
12728
74c57478
JM		 12729static const struct test_f_f_data rint_tonearest_test_data[] =
12730 {
12731 START_DATA (rint_tonearest),
12732 TEST_f_f (rint, 2.0, 2.0),
12733 TEST_f_f (rint, 1.5, 2.0),
12734 TEST_f_f (rint, 1.0, 1.0),
12735 TEST_f_f (rint, 0.5, 0.0),
12736 TEST_f_f (rint, 0.0, 0.0),
12737 TEST_f_f (rint, minus_zero, minus_zero),
12738 TEST_f_f (rint, -0.5, -0.0),
12739 TEST_f_f (rint, -1.0, -1.0),
12740 TEST_f_f (rint, -1.5, -2.0),
12741 TEST_f_f (rint, -2.0, -2.0),
12742 TEST_f_f (rint, 0.1, 0.0),
12743 TEST_f_f (rint, 0.25, 0.0),
12744 TEST_f_f (rint, 0.625, 1.0),
12745 TEST_f_f (rint, -0.1, -0.0),
12746 TEST_f_f (rint, -0.25, -0.0),
12747 TEST_f_f (rint, -0.625, -1.0),
12748 TEST_f_f (rint, 1048576.75, 1048577.0),
12749 TEST_f_f (rint, 2097152.75, 2097153.0),
12750 TEST_f_f (rint, -1048576.75, -1048577.0),
12751 TEST_f_f (rint, -2097152.75, -2097153.0),
12752#ifndef TEST_FLOAT
12753 TEST_f_f (rint, 70368744177664.75, 70368744177665.0),
12754 TEST_f_f (rint, 140737488355328.75, 140737488355329.0),
12755 TEST_f_f (rint, 281474976710656.75, 281474976710657.0),
12756 TEST_f_f (rint, 562949953421312.75, 562949953421313.0),
12757 TEST_f_f (rint, 1125899906842624.75, 1125899906842625.0),
12758 TEST_f_f (rint, -70368744177664.75, -70368744177665.0),
12759 TEST_f_f (rint, -140737488355328.75, -140737488355329.0),
12760 TEST_f_f (rint, -281474976710656.75, -281474976710657.0),
12761 TEST_f_f (rint, -562949953421312.75, -562949953421313.0),
12762 TEST_f_f (rint, -1125899906842624.75, -1125899906842625.0),
12763#endif
12764#ifdef TEST_LDOUBLE
12765 /* The result can only be represented in long double. */
12766 TEST_f_f (rint, 4503599627370495.5L, 4503599627370496.0L),
12767 TEST_f_f (rint, 4503599627370496.25L, 4503599627370496.0L),
12768 TEST_f_f (rint, 4503599627370496.5L, 4503599627370496.0L),
12769 TEST_f_f (rint, 4503599627370496.75L, 4503599627370497.0L),
12770 TEST_f_f (rint, 4503599627370497.5L, 4503599627370498.0L),
12771# if LDBL_MANT_DIG > 100
12772 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370495.0L),
12773 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370496.0L),
12774 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370497.0L),
12775# endif
12776 TEST_f_f (rint, -4503599627370495.5L, -4503599627370496.0L),
12777 TEST_f_f (rint, -4503599627370496.25L, -4503599627370496.0L),
12778 TEST_f_f (rint, -4503599627370496.5L, -4503599627370496.0L),
12779 TEST_f_f (rint, -4503599627370496.75L, -4503599627370497.0L),
12780 TEST_f_f (rint, -4503599627370497.5L, -4503599627370498.0L),
12781# if LDBL_MANT_DIG > 100
12782 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370495.0L),
12783 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370496.0L),
12784 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370497.0L),
12785
12786 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740991.0L),
12787 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740992.0L),
12788 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740993.0L),
12789 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740992.0L),
12790 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740993.0L),
12791 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740994.0L),
12792
12793 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740991.0L),
12794 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740992.0L),
12795 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740993.0L),
12796 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740992.0L),
12797 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740993.0L),
12798 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740994.0L),
12799# endif
12800#endif
12801 END_DATA (rint_tonearest)
12802 };
12803
4d37c8aa
UD		 12804static void
12805rint_test_tonearest (void)
12806{
4d37c8aa 12807 START (rint_tonearest);
74c57478
JM		 12808 RUN_TEST_LOOP_f_f (rint, rint_tonearest_test_data, FE_TONEAREST);
12809 END (rint_tonearest);
12810}
4d37c8aa 12811
74c57478
JM		 12812static const struct test_f_f_data rint_towardzero_test_data[] =
12813 {
12814 START_DATA (rint_towardzero),
12815 TEST_f_f (rint, 2.0, 2.0),
12816 TEST_f_f (rint, 1.5, 1.0),
12817 TEST_f_f (rint, 1.0, 1.0),
12818 TEST_f_f (rint, 0.5, 0.0),
12819 TEST_f_f (rint, 0.0, 0.0),
12820 TEST_f_f (rint, minus_zero, minus_zero),
12821 TEST_f_f (rint, -0.5, -0.0),
12822 TEST_f_f (rint, -1.0, -1.0),
12823 TEST_f_f (rint, -1.5, -1.0),
12824 TEST_f_f (rint, -2.0, -2.0),
12825 TEST_f_f (rint, 0.1, 0.0),
12826 TEST_f_f (rint, 0.25, 0.0),
12827 TEST_f_f (rint, 0.625, 0.0),
12828 TEST_f_f (rint, -0.1, -0.0),
12829 TEST_f_f (rint, -0.25, -0.0),
12830 TEST_f_f (rint, -0.625, -0.0),
12831 TEST_f_f (rint, 1048576.75, 1048576.0),
12832 TEST_f_f (rint, 2097152.75, 2097152.0),
12833 TEST_f_f (rint, -1048576.75, -1048576.0),
12834 TEST_f_f (rint, -2097152.75, -2097152.0),
12835#ifndef TEST_FLOAT
12836 TEST_f_f (rint, 70368744177664.75, 70368744177664.0),
12837 TEST_f_f (rint, 140737488355328.75, 140737488355328.0),
12838 TEST_f_f (rint, 281474976710656.75, 281474976710656.0),
12839 TEST_f_f (rint, 562949953421312.75, 562949953421312.0),
12840 TEST_f_f (rint, 1125899906842624.75, 1125899906842624.0),
12841 TEST_f_f (rint, -70368744177664.75, -70368744177664.0),
12842 TEST_f_f (rint, -140737488355328.75, -140737488355328.0),
12843 TEST_f_f (rint, -281474976710656.75, -281474976710656.0),
12844 TEST_f_f (rint, -562949953421312.75, -562949953421312.0),
12845 TEST_f_f (rint, -1125899906842624.75, -1125899906842624.0),
fe45ce09 12846#endif
5c68d401 12847#ifdef TEST_LDOUBLE
74c57478
JM		 12848 /* The result can only be represented in long double. */
12849 TEST_f_f (rint, 4503599627370495.5L, 4503599627370495.0L),
12850 TEST_f_f (rint, 4503599627370496.25L, 4503599627370496.0L),
12851 TEST_f_f (rint, 4503599627370496.5L, 4503599627370496.0L),
12852 TEST_f_f (rint, 4503599627370496.75L, 4503599627370496.0L),
12853 TEST_f_f (rint, 4503599627370497.5L, 4503599627370497.0L),
5c68d401 12854# if LDBL_MANT_DIG > 100
74c57478
JM		 12855 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370494.0L),
12856 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370495.0L),
12857 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370496.0L),
5c68d401 12858# endif
74c57478
JM		 12859 TEST_f_f (rint, -4503599627370495.5L, -4503599627370495.0L),
12860 TEST_f_f (rint, -4503599627370496.25L, -4503599627370496.0L),
12861 TEST_f_f (rint, -4503599627370496.5L, -4503599627370496.0L),
12862 TEST_f_f (rint, -4503599627370496.75L, -4503599627370496.0L),
12863 TEST_f_f (rint, -4503599627370497.5L, -4503599627370497.0L),
5c68d401 12864# if LDBL_MANT_DIG > 100
74c57478
JM		 12865 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370494.0L),
12866 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370495.0L),
12867 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370496.0L),
12868
12869 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740991.0L),
12870 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740992.0L),
12871 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740993.0L),
12872 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740991.0L),
12873 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740992.0L),
12874 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740993.0L),
12875
12876 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740991.0L),
12877 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740992.0L),
12878 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740993.0L),
12879 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740991.0L),
12880 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740992.0L),
12881 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740993.0L),
5c68d401
RM		 12882# endif
12883#endif
74c57478
JM		 12884 END_DATA (rint_towardzero)
12885 };
4d37c8aa
UD		 12886
12887static void
12888rint_test_towardzero (void)
12889{
4d37c8aa 12890 START (rint_towardzero);
74c57478
JM		 12891 RUN_TEST_LOOP_f_f (rint, rint_towardzero_test_data, FE_TOWARDZERO);
12892 END (rint_towardzero);
12893}
4d37c8aa 12894
74c57478
JM		 12895static const struct test_f_f_data rint_downward_test_data[] =
12896 {
12897 START_DATA (rint_downward),
12898 TEST_f_f (rint, 2.0, 2.0),
12899 TEST_f_f (rint, 1.5, 1.0),
12900 TEST_f_f (rint, 1.0, 1.0),
12901 TEST_f_f (rint, 0.5, 0.0),
12902 TEST_f_f (rint, 0.0, 0.0),
12903 TEST_f_f (rint, minus_zero, minus_zero),
12904 TEST_f_f (rint, -0.5, -1.0),
12905 TEST_f_f (rint, -1.0, -1.0),
12906 TEST_f_f (rint, -1.5, -2.0),
12907 TEST_f_f (rint, -2.0, -2.0),
12908 TEST_f_f (rint, 0.1, 0.0),
12909 TEST_f_f (rint, 0.25, 0.0),
12910 TEST_f_f (rint, 0.625, 0.0),
12911 TEST_f_f (rint, -0.1, -1.0),
12912 TEST_f_f (rint, -0.25, -1.0),
12913 TEST_f_f (rint, -0.625, -1.0),
12914 TEST_f_f (rint, 1048576.75, 1048576.0),
12915 TEST_f_f (rint, 2097152.75, 2097152.0),
12916 TEST_f_f (rint, -1048576.75, -1048577.0),
12917 TEST_f_f (rint, -2097152.75, -2097153.0),
12918#ifndef TEST_FLOAT
12919 TEST_f_f (rint, 70368744177664.75, 70368744177664.0),
12920 TEST_f_f (rint, 140737488355328.75, 140737488355328.0),
12921 TEST_f_f (rint, 281474976710656.75, 281474976710656.0),
12922 TEST_f_f (rint, 562949953421312.75, 562949953421312.0),
12923 TEST_f_f (rint, 1125899906842624.75, 1125899906842624.0),
12924 TEST_f_f (rint, -70368744177664.75, -70368744177665.0),
12925 TEST_f_f (rint, -140737488355328.75, -140737488355329.0),
12926 TEST_f_f (rint, -281474976710656.75, -281474976710657.0),
12927 TEST_f_f (rint, -562949953421312.75, -562949953421313.0),
12928 TEST_f_f (rint, -1125899906842624.75, -1125899906842625.0),
fe45ce09 12929#endif
5c68d401 12930#ifdef TEST_LDOUBLE
74c57478
JM		 12931 /* The result can only be represented in long double. */
12932 TEST_f_f (rint, 4503599627370495.5L, 4503599627370495.0L),
12933 TEST_f_f (rint, 4503599627370496.25L, 4503599627370496.0L),
12934 TEST_f_f (rint, 4503599627370496.5L, 4503599627370496.0L),
12935 TEST_f_f (rint, 4503599627370496.75L, 4503599627370496.0L),
12936 TEST_f_f (rint, 4503599627370497.5L, 4503599627370497.0L),
5c68d401 12937# if LDBL_MANT_DIG > 100
74c57478
JM		 12938 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370494.0L),
12939 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370495.0L),
12940 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370496.0L),
5c68d401 12941# endif
74c57478
JM		 12942 TEST_f_f (rint, -4503599627370495.5L, -4503599627370496.0L),
12943 TEST_f_f (rint, -4503599627370496.25L, -4503599627370497.0L),
12944 TEST_f_f (rint, -4503599627370496.5L, -4503599627370497.0L),
12945 TEST_f_f (rint, -4503599627370496.75L, -4503599627370497.0L),
12946 TEST_f_f (rint, -4503599627370497.5L, -4503599627370498.0L),
5c68d401 12947# if LDBL_MANT_DIG > 100
74c57478
JM		 12948 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370495.0L),
12949 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370496.0L),
12950 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370497.0L),
12951
12952 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740991.0L),
12953 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740992.0L),
12954 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740993.0L),
12955 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740991.0L),
12956 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740992.0L),
12957 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740993.0L),
12958
12959 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740992.0L),
12960 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740993.0L),
12961 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740994.0L),
12962 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740992.0L),
12963 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740993.0L),
12964 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740994.0L),
5c68d401
RM		 12965# endif
12966#endif
74c57478
JM		 12967 END_DATA (rint_downward)
12968 };
4d37c8aa
UD		 12969
12970static void
12971rint_test_downward (void)
12972{
4d37c8aa 12973 START (rint_downward);
74c57478
JM		 12974 RUN_TEST_LOOP_f_f (rint, rint_downward_test_data, FE_DOWNWARD);
12975 END (rint_downward);
12976}
4d37c8aa 12977
74c57478
JM		 12978static const struct test_f_f_data rint_upward_test_data[] =
12979 {
12980 START_DATA (rint_upward),
12981 TEST_f_f (rint, 2.0, 2.0),
12982 TEST_f_f (rint, 1.5, 2.0),
12983 TEST_f_f (rint, 1.0, 1.0),
12984 TEST_f_f (rint, 0.5, 1.0),
12985 TEST_f_f (rint, 0.0, 0.0),
12986 TEST_f_f (rint, minus_zero, minus_zero),
12987 TEST_f_f (rint, -0.5, -0.0),
12988 TEST_f_f (rint, -1.0, -1.0),
12989 TEST_f_f (rint, -1.5, -1.0),
12990 TEST_f_f (rint, -2.0, -2.0),
12991 TEST_f_f (rint, 0.1, 1.0),
12992 TEST_f_f (rint, 0.25, 1.0),
12993 TEST_f_f (rint, 0.625, 1.0),
12994 TEST_f_f (rint, -0.1, -0.0),
12995 TEST_f_f (rint, -0.25, -0.0),
12996 TEST_f_f (rint, -0.625, -0.0),
12997 TEST_f_f (rint, 1048576.75, 1048577.0),
12998 TEST_f_f (rint, 2097152.75, 2097153.0),
12999 TEST_f_f (rint, -1048576.75, -1048576.0),
13000 TEST_f_f (rint, -2097152.75, -2097152.0),
13001#ifndef TEST_FLOAT
13002 TEST_f_f (rint, 70368744177664.75, 70368744177665.0),
13003 TEST_f_f (rint, 140737488355328.75, 140737488355329.0),
13004 TEST_f_f (rint, 281474976710656.75, 281474976710657.0),
13005 TEST_f_f (rint, 562949953421312.75, 562949953421313.0),
13006 TEST_f_f (rint, 1125899906842624.75, 1125899906842625.0),
13007 TEST_f_f (rint, -70368744177664.75, -70368744177664.0),
13008 TEST_f_f (rint, -140737488355328.75, -140737488355328.0),
13009 TEST_f_f (rint, -281474976710656.75, -281474976710656.0),
13010 TEST_f_f (rint, -562949953421312.75, -562949953421312.0),
13011 TEST_f_f (rint, -1125899906842624.75, -1125899906842624.0),
fe45ce09 13012#endif
5c68d401 13013#ifdef TEST_LDOUBLE
74c57478
JM		 13014 /* The result can only be represented in long double. */
13015 TEST_f_f (rint, 4503599627370495.5L, 4503599627370496.0L),
13016 TEST_f_f (rint, 4503599627370496.25L, 4503599627370497.0L),
13017 TEST_f_f (rint, 4503599627370496.5L, 4503599627370497.0L),
13018 TEST_f_f (rint, 4503599627370496.75L, 4503599627370497.0L),
13019 TEST_f_f (rint, 4503599627370497.5L, 4503599627370498.0L),
5c68d401 13020# if LDBL_MANT_DIG > 100
74c57478
JM		 13021 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370495.0L),
13022 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370496.0L),
13023 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370497.0L),
5c68d401 13024# endif
74c57478
JM		 13025 TEST_f_f (rint, -4503599627370495.5L, -4503599627370495.0L),
13026 TEST_f_f (rint, -4503599627370496.25L, -4503599627370496.0L),
13027 TEST_f_f (rint, -4503599627370496.5L, -4503599627370496.0L),
13028 TEST_f_f (rint, -4503599627370496.75L, -4503599627370496.0L),
13029 TEST_f_f (rint, -4503599627370497.5L, -4503599627370497.0L),
5c68d401 13030# if LDBL_MANT_DIG > 100
74c57478
JM		 13031 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370494.0L),
13032 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370495.0L),
13033 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370496.0L),
13034
13035 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740992.0L),
13036 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740993.0L),
13037 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740994.0L),
13038 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740992.0L),
13039 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740993.0L),
13040 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740994.0L),
13041
13042 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740991.0L),
13043 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740992.0L),
13044 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740993.0L),
13045 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740991.0L),
13046 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740992.0L),
13047 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740993.0L),
5c68d401
RM		 13048# endif
13049#endif
74c57478
JM		 13050 END_DATA (rint_upward)
13051 };
4d37c8aa
UD		 13052
13053static void
13054rint_test_upward (void)
13055{
4d37c8aa 13056 START (rint_upward);
74c57478 13057 RUN_TEST_LOOP_f_f (rint, rint_upward_test_data, FE_UPWARD);
4d37c8aa
UD		 13058 END (rint_upward);
13059}
13060
74c57478
JM		 13061static const struct test_f_f_data round_test_data[] =
13062 {
13063 START_DATA (round),
13064 /* TODO: missing +/-Inf as well as qNaN tests. */
13065
13066 TEST_f_f (round, 0, 0),
13067 TEST_f_f (round, minus_zero, minus_zero),
13068 TEST_f_f (round, 0.2L, 0.0),
13069 TEST_f_f (round, -0.2L, minus_zero),
13070 TEST_f_f (round, 0.5, 1.0),
13071 TEST_f_f (round, -0.5, -1.0),
13072 TEST_f_f (round, 0.8L, 1.0),
13073 TEST_f_f (round, -0.8L, -1.0),
13074 TEST_f_f (round, 1.5, 2.0),
13075 TEST_f_f (round, -1.5, -2.0),
13076 TEST_f_f (round, 0.1, 0.0),
13077 TEST_f_f (round, 0.25, 0.0),
13078 TEST_f_f (round, 0.625, 1.0),
13079 TEST_f_f (round, -0.1, -0.0),
13080 TEST_f_f (round, -0.25, -0.0),
13081 TEST_f_f (round, -0.625, -1.0),
13082 TEST_f_f (round, 2097152.5, 2097153),
13083 TEST_f_f (round, -2097152.5, -2097153),
8847214f 13084
f964490f 13085#ifdef TEST_LDOUBLE
74c57478
JM		 13086 /* The result can only be represented in long double. */
13087 TEST_f_f (round, 4503599627370495.5L, 4503599627370496.0L),
13088 TEST_f_f (round, 4503599627370496.25L, 4503599627370496.0L),
13089 TEST_f_f (round, 4503599627370496.5L, 4503599627370497.0L),
13090 TEST_f_f (round, 4503599627370496.75L, 4503599627370497.0L),
13091 TEST_f_f (round, 4503599627370497.5L, 4503599627370498.0L),
5c68d401 13092# if LDBL_MANT_DIG > 100
74c57478
JM		 13093 TEST_f_f (round, 4503599627370494.5000000000001L, 4503599627370495.0L),
13094 TEST_f_f (round, 4503599627370495.5000000000001L, 4503599627370496.0L),
13095 TEST_f_f (round, 4503599627370496.5000000000001L, 4503599627370497.0L),
5c68d401 13096# endif
f964490f 13097
74c57478
JM		 13098 TEST_f_f (round, -4503599627370495.5L, -4503599627370496.0L),
13099 TEST_f_f (round, -4503599627370496.25L, -4503599627370496.0L),
13100 TEST_f_f (round, -4503599627370496.5L, -4503599627370497.0L),
13101 TEST_f_f (round, -4503599627370496.75L, -4503599627370497.0L),
13102 TEST_f_f (round, -4503599627370497.5L, -4503599627370498.0L),
5c68d401 13103# if LDBL_MANT_DIG > 100
74c57478
JM		 13104 TEST_f_f (round, -4503599627370494.5000000000001L, -4503599627370495.0L),
13105 TEST_f_f (round, -4503599627370495.5000000000001L, -4503599627370496.0L),
13106 TEST_f_f (round, -4503599627370496.5000000000001L, -4503599627370497.0L),
5c68d401 13107# endif
f964490f 13108
74c57478
JM		 13109 TEST_f_f (round, 9007199254740991.5L, 9007199254740992.0L),
13110 TEST_f_f (round, 9007199254740992.25L, 9007199254740992.0L),
13111 TEST_f_f (round, 9007199254740992.5L, 9007199254740993.0L),
13112 TEST_f_f (round, 9007199254740992.75L, 9007199254740993.0L),
13113 TEST_f_f (round, 9007199254740993.5L, 9007199254740994.0L),
f964490f 13114
74c57478
JM		 13115 TEST_f_f (round, -9007199254740991.5L, -9007199254740992.0L),
13116 TEST_f_f (round, -9007199254740992.25L, -9007199254740992.0L),
13117 TEST_f_f (round, -9007199254740992.5L, -9007199254740993.0L),
13118 TEST_f_f (round, -9007199254740992.75L, -9007199254740993.0L),
13119 TEST_f_f (round, -9007199254740993.5L, -9007199254740994.0L),
f964490f 13120
5c68d401 13121# if LDBL_MANT_DIG > 100
74c57478
JM		 13122 TEST_f_f (round, 9007199254740991.0000000000001L, 9007199254740991.0L),
13123 TEST_f_f (round, 9007199254740992.0000000000001L, 9007199254740992.0L),
13124 TEST_f_f (round, 9007199254740993.0000000000001L, 9007199254740993.0L),
13125 TEST_f_f (round, 9007199254740991.5000000000001L, 9007199254740992.0L),
13126 TEST_f_f (round, 9007199254740992.5000000000001L, 9007199254740993.0L),
13127 TEST_f_f (round, 9007199254740993.5000000000001L, 9007199254740994.0L),
13128
13129 TEST_f_f (round, -9007199254740991.0000000000001L, -9007199254740991.0L),
13130 TEST_f_f (round, -9007199254740992.0000000000001L, -9007199254740992.0L),
13131 TEST_f_f (round, -9007199254740993.0000000000001L, -9007199254740993.0L),
13132 TEST_f_f (round, -9007199254740991.5000000000001L, -9007199254740992.0L),
13133 TEST_f_f (round, -9007199254740992.5000000000001L, -9007199254740993.0L),
13134 TEST_f_f (round, -9007199254740993.5000000000001L, -9007199254740994.0L),
5c68d401
RM		 13135# endif
13136
74c57478
JM		 13137 TEST_f_f (round, 72057594037927935.5L, 72057594037927936.0L),
13138 TEST_f_f (round, 72057594037927936.25L, 72057594037927936.0L),
13139 TEST_f_f (round, 72057594037927936.5L, 72057594037927937.0L),
13140 TEST_f_f (round, 72057594037927936.75L, 72057594037927937.0L),
13141 TEST_f_f (round, 72057594037927937.5L, 72057594037927938.0L),
13142
13143 TEST_f_f (round, -72057594037927935.5L, -72057594037927936.0L),
13144 TEST_f_f (round, -72057594037927936.25L, -72057594037927936.0L),
13145 TEST_f_f (round, -72057594037927936.5L, -72057594037927937.0L),
13146 TEST_f_f (round, -72057594037927936.75L, -72057594037927937.0L),
13147 TEST_f_f (round, -72057594037927937.5L, -72057594037927938.0L),
13148
13149 TEST_f_f (round, 10141204801825835211973625643007.5L, 10141204801825835211973625643008.0L),
13150 TEST_f_f (round, 10141204801825835211973625643008.25L, 10141204801825835211973625643008.0L),
13151 TEST_f_f (round, 10141204801825835211973625643008.5L, 10141204801825835211973625643009.0L),
13152 TEST_f_f (round, 10141204801825835211973625643008.75L, 10141204801825835211973625643009.0L),
13153 TEST_f_f (round, 10141204801825835211973625643009.5L, 10141204801825835211973625643010.0L),
13154#endif
13155 END_DATA (round)
13156 };
f964490f 13157
74c57478
JM		 13158static void
13159round_test (void)
13160{
13161 START (round);
13162 RUN_TEST_LOOP_f_f (round, round_test_data, );
8847214f
UD		 13163 END (round);
13164}
13165
13166
601a3a5f
JM		 13167static const struct test_ff_f_data scalb_test_data[] =
13168 {
13169 START_DATA (scalb),
13170 TEST_ff_f (scalb, 2.0, 0.5, qnan_value, INVALID_EXCEPTION),
13171 TEST_ff_f (scalb, 3.0, -2.5, qnan_value, INVALID_EXCEPTION),
13172
13173 TEST_ff_f (scalb, 0, qnan_value, qnan_value),
13174 TEST_ff_f (scalb, 1, qnan_value, qnan_value),
13175
13176 TEST_ff_f (scalb, 1, 0, 1),
13177 TEST_ff_f (scalb, -1, 0, -1),
13178
13179 TEST_ff_f (scalb, 0, plus_infty, qnan_value, INVALID_EXCEPTION),
13180 TEST_ff_f (scalb, minus_zero, plus_infty, qnan_value, INVALID_EXCEPTION),
13181
13182 TEST_ff_f (scalb, 0, 2, 0),
13183 TEST_ff_f (scalb, minus_zero, -4, minus_zero),
13184 TEST_ff_f (scalb, 0, 0, 0),
13185 TEST_ff_f (scalb, minus_zero, 0, minus_zero),
13186 TEST_ff_f (scalb, 0, -1, 0),
13187 TEST_ff_f (scalb, minus_zero, -10, minus_zero),
13188 TEST_ff_f (scalb, 0, minus_infty, 0),
13189 TEST_ff_f (scalb, minus_zero, minus_infty, minus_zero),
13190
13191 TEST_ff_f (scalb, plus_infty, -1, plus_infty),
13192 TEST_ff_f (scalb, minus_infty, -10, minus_infty),
13193 TEST_ff_f (scalb, plus_infty, 0, plus_infty),
13194 TEST_ff_f (scalb, minus_infty, 0, minus_infty),
13195 TEST_ff_f (scalb, plus_infty, 2, plus_infty),
13196 TEST_ff_f (scalb, minus_infty, 100, minus_infty),
13197
13198 TEST_ff_f (scalb, 0.1L, minus_infty, 0.0),
13199 TEST_ff_f (scalb, -0.1L, minus_infty, minus_zero),
13200
13201 TEST_ff_f (scalb, 1, plus_infty, plus_infty),
13202 TEST_ff_f (scalb, -1, plus_infty, minus_infty),
13203 TEST_ff_f (scalb, plus_infty, plus_infty, plus_infty),
13204 TEST_ff_f (scalb, minus_infty, plus_infty, minus_infty),
13205
13206 TEST_ff_f (scalb, plus_infty, minus_infty, qnan_value, INVALID_EXCEPTION),
13207 TEST_ff_f (scalb, minus_infty, minus_infty, qnan_value, INVALID_EXCEPTION),
13208
13209 TEST_ff_f (scalb, qnan_value, 1, qnan_value),
13210 TEST_ff_f (scalb, 1, qnan_value, qnan_value),
13211 TEST_ff_f (scalb, qnan_value, 0, qnan_value),
13212 TEST_ff_f (scalb, 0, qnan_value, qnan_value),
13213 TEST_ff_f (scalb, qnan_value, plus_infty, qnan_value),
13214 TEST_ff_f (scalb, plus_infty, qnan_value, qnan_value),
13215 TEST_ff_f (scalb, qnan_value, qnan_value, qnan_value),
13216
13217 TEST_ff_f (scalb, 0.8L, 4, 12.8L),
13218 TEST_ff_f (scalb, -0.854375L, 5, -27.34L),
13219 END_DATA (scalb)
13220 };
13221
8847214f
UD		 13222static void
13223scalb_test (void)
13224{
13225
13226 START (scalb);
601a3a5f 13227 RUN_TEST_LOOP_ff_f (scalb, scalb_test_data, );
8847214f
UD		 13228 END (scalb);
13229}
13230
13231
243216e1
JM		 13232static const struct test_fi_f_data scalbn_test_data[] =
13233 {
13234 START_DATA (scalbn),
13235 TEST_fi_f (scalbn, 0, 0, 0),
13236 TEST_fi_f (scalbn, minus_zero, 0, minus_zero),
13237
13238 TEST_fi_f (scalbn, plus_infty, 1, plus_infty),
13239 TEST_fi_f (scalbn, minus_infty, 1, minus_infty),
13240 TEST_fi_f (scalbn, qnan_value, 1, qnan_value),
13241
13242 TEST_fi_f (scalbn, 0.8L, 4, 12.8L),
13243 TEST_fi_f (scalbn, -0.854375L, 5, -27.34L),
13244
13245 TEST_fi_f (scalbn, 1, 0L, 1),
13246
13247 TEST_fi_f (scalbn, 1, INT_MAX, plus_infty, OVERFLOW_EXCEPTION),
13248 TEST_fi_f (scalbn, 1, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13249 TEST_fi_f (scalbn, max_value, INT_MAX, plus_infty, OVERFLOW_EXCEPTION),
13250 TEST_fi_f (scalbn, max_value, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13251 TEST_fi_f (scalbn, min_value, INT_MAX, plus_infty, OVERFLOW_EXCEPTION),
13252 TEST_fi_f (scalbn, min_value, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13253 TEST_fi_f (scalbn, min_value / 4, INT_MAX, plus_infty, OVERFLOW_EXCEPTION),
13254 TEST_fi_f (scalbn, min_value / 4, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13255 END_DATA (scalbn)
13256 };
13257
8847214f
UD		 13258static void
13259scalbn_test (void)
13260{
13261
13262 START (scalbn);
243216e1 13263 RUN_TEST_LOOP_fi_f (scalbn, scalbn_test_data, );
8847214f
UD		 13264 END (scalbn);
13265}
13266
2550dfe9 13267
68fc074c
JM		 13268static const struct test_fl_f_data scalbln_test_data[] =
13269 {
13270 START_DATA (scalbln),
13271 TEST_fl_f (scalbln, 0, 0, 0),
13272 TEST_fl_f (scalbln, minus_zero, 0, minus_zero),
13273
13274 TEST_fl_f (scalbln, plus_infty, 1, plus_infty),
13275 TEST_fl_f (scalbln, minus_infty, 1, minus_infty),
13276 TEST_fl_f (scalbln, qnan_value, 1, qnan_value),
13277
13278 TEST_fl_f (scalbln, 0.8L, 4, 12.8L),
13279 TEST_fl_f (scalbln, -0.854375L, 5, -27.34L),
13280
13281 TEST_fl_f (scalbln, 1, 0L, 1),
13282
13283 TEST_fl_f (scalbln, 1, INT_MAX, plus_infty, OVERFLOW_EXCEPTION),
13284 TEST_fl_f (scalbln, 1, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13285 TEST_fl_f (scalbln, max_value, INT_MAX, plus_infty, OVERFLOW_EXCEPTION),
13286 TEST_fl_f (scalbln, max_value, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13287 TEST_fl_f (scalbln, min_value, INT_MAX, plus_infty, OVERFLOW_EXCEPTION),
13288 TEST_fl_f (scalbln, min_value, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13289 TEST_fl_f (scalbln, min_value / 4, INT_MAX, plus_infty, OVERFLOW_EXCEPTION),
13290 TEST_fl_f (scalbln, min_value / 4, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13291
13292 TEST_fl_f (scalbln, 1, LONG_MAX, plus_infty, OVERFLOW_EXCEPTION),
13293 TEST_fl_f (scalbln, 1, LONG_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13294 TEST_fl_f (scalbln, max_value, LONG_MAX, plus_infty, OVERFLOW_EXCEPTION),
13295 TEST_fl_f (scalbln, max_value, LONG_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13296 TEST_fl_f (scalbln, min_value, LONG_MAX, plus_infty, OVERFLOW_EXCEPTION),
13297 TEST_fl_f (scalbln, min_value, LONG_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13298 TEST_fl_f (scalbln, min_value / 4, LONG_MAX, plus_infty, OVERFLOW_EXCEPTION),
13299 TEST_fl_f (scalbln, min_value / 4, LONG_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13300
13301#if LONG_MAX >= 0x100000000
13302 TEST_fl_f (scalbln, 1, 0x88000000L, plus_infty, OVERFLOW_EXCEPTION),
13303 TEST_fl_f (scalbln, 1, -0x88000000L, plus_zero, UNDERFLOW_EXCEPTION),
13304 TEST_fl_f (scalbln, max_value, 0x88000000L, plus_infty, OVERFLOW_EXCEPTION),
13305 TEST_fl_f (scalbln, max_value, -0x88000000L, plus_zero, UNDERFLOW_EXCEPTION),
13306 TEST_fl_f (scalbln, min_value, 0x88000000L, plus_infty, OVERFLOW_EXCEPTION),
13307 TEST_fl_f (scalbln, min_value, -0x88000000L, plus_zero, UNDERFLOW_EXCEPTION),
13308 TEST_fl_f (scalbln, min_value / 4, 0x88000000L, plus_infty, OVERFLOW_EXCEPTION),
13309 TEST_fl_f (scalbln, min_value / 4, -0x88000000L, plus_zero, UNDERFLOW_EXCEPTION),
13310#endif
13311 END_DATA (scalbln)
13312 };
13313
8847214f
UD		 13314static void
13315scalbln_test (void)
13316{
13317
13318 START (scalbln);
68fc074c 13319 RUN_TEST_LOOP_fl_f (scalbln, scalbln_test_data, );
8847214f
UD		 13320 END (scalbn);
13321}
13322
2550dfe9 13323
8847214f
UD		 13324static void
13325signbit_test (void)
13326{
64d063b8 13327 /* TODO: missing qNaN tests. */
8847214f
UD		 13328
13329 START (signbit);
13330
13331 TEST_f_b (signbit, 0, 0);
13332 TEST_f_b (signbit, minus_zero, 1);
13333 TEST_f_b (signbit, plus_infty, 0);
13334 TEST_f_b (signbit, minus_infty, 1);
13335
13336 /* signbit (x) != 0 for x < 0. */
13337 TEST_f_b (signbit, -1, 1);
13338 /* signbit (x) == 0 for x >= 0. */
13339 TEST_f_b (signbit, 1, 0);
13340
13341 END (signbit);
13342}
13343
2550dfe9 13344
74c57478
JM		 13345static const struct test_f_f_data sin_test_data[] =
13346 {
13347 START_DATA (sin),
13348 TEST_f_f (sin, 0, 0),
13349 TEST_f_f (sin, minus_zero, minus_zero),
13350 TEST_f_f (sin, plus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13351 TEST_f_f (sin, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13352 TEST_f_f (sin, qnan_value, qnan_value, ERRNO_UNCHANGED),
8847214f 13353
74c57478
JM		 13354 TEST_f_f (sin, M_PI_6l, 0.5),
13355 TEST_f_f (sin, -M_PI_6l, -0.5),
13356 TEST_f_f (sin, M_PI_2l, 1),
13357 TEST_f_f (sin, -M_PI_2l, -1),
13358 TEST_f_f (sin, 0.75L, 0.681638760023334166733241952779893935L),
8847214f 13359
74c57478
JM		 13360 TEST_f_f (sin, 0x1p65, -0.047183876212354673805106149805700013943218L),
13361 TEST_f_f (sin, -0x1p65, 0.047183876212354673805106149805700013943218L),
8c0247db 13362
74c57478 13363 TEST_f_f (sin, 0x1.7f4134p+103, -6.6703229329788657073304190650534846045235e-08L),
7a845b2c 13364
d32e4346 13365#ifdef TEST_DOUBLE
74c57478
JM		 13366 TEST_f_f (sin, 0.80190127184058835, 0.71867942238767868),
13367 TEST_f_f (sin, 2.522464e-1, 2.4957989804940911e-1),
8848d99d
JM		 13368#endif
13369
13370#ifndef TEST_FLOAT
74c57478
JM		 13371 TEST_f_f (sin, 1e22, -0.8522008497671888017727058937530293682618L),
13372 TEST_f_f (sin, 0x1p1023, 0.5631277798508840134529434079444683477104L),
8848d99d
JM		 13373#endif
13374
13375#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478 13376 TEST_f_f (sin, 0x1p16383L, 0.3893629985894208126948115852610595405563L),
d32e4346
RM		 13377#endif
13378
74c57478
JM		 13379 TEST_f_f (sin, 0x1p+120, 3.77820109360752022655548470056922991960587e-01L),
13380 TEST_f_f (sin, 0x1p+127, 6.23385512955870240370428801097126489001833e-01L),
13381 TEST_f_f (sin, 0x1.fffff8p+127, 4.85786063130487339701113680434728152037092e-02L),
13382 TEST_f_f (sin, 0x1.fffffep+127, -5.21876523333658540551505357019806722935726e-01L),
13383 TEST_f_f (sin, 0x1p+50, 4.96396515208940840876821859865411368093356e-01L),
13384 TEST_f_f (sin, 0x1p+28, -9.86198211836975655703110310527108292055548e-01L),
13385 END_DATA (sin)
13386 };
4ffffbd2 13387
74c57478
JM		 13388static void
13389sin_test (void)
13390{
13391 errno = 0;
13392 FUNC(sin) (0);
13393 if (errno == ENOSYS)
13394 /* Function not implemented. */
13395 return;
8847214f 13396
74c57478
JM		 13397 START (sin);
13398 RUN_TEST_LOOP_f_f (sin, sin_test_data, );
13399 END (sin);
8847214f
UD		 13400}
13401
2550dfe9 13402
74c57478
JM		 13403static const struct test_f_f_data sin_tonearest_test_data[] =
13404 {
13405 START_DATA (sin_tonearest),
13406 TEST_f_f (sin, 1, 0.8414709848078965066525023216302989996226L),
13407 TEST_f_f (sin, 2, 0.9092974268256816953960198659117448427023L),
13408 TEST_f_f (sin, 3, 0.1411200080598672221007448028081102798469L),
13409 TEST_f_f (sin, 4, -0.7568024953079282513726390945118290941359L),
13410 TEST_f_f (sin, 5, -0.9589242746631384688931544061559939733525L),
13411 TEST_f_f (sin, 6, -0.2794154981989258728115554466118947596280L),
13412 TEST_f_f (sin, 7, 0.6569865987187890903969990915936351779369L),
13413 TEST_f_f (sin, 8, 0.9893582466233817778081235982452886721164L),
13414 TEST_f_f (sin, 9, 0.4121184852417565697562725663524351793439L),
13415 TEST_f_f (sin, 10, -0.5440211108893698134047476618513772816836L),
13416 END_DATA (sin_tonearest)
13417 };
13418
804360ed
JM		 13419static void
13420sin_test_tonearest (void)
13421{
804360ed
JM		 13422 errno = 0;
13423 FUNC(sin) (0);
13424 if (errno == ENOSYS)
13425 /* Function not implemented. */
13426 return;
13427
13428 START (sin_tonearest);
74c57478 13429 RUN_TEST_LOOP_f_f (sin, sin_tonearest_test_data, FE_TONEAREST);
804360ed
JM		 13430 END (sin_tonearest);
13431}
13432
13433
74c57478
JM		 13434static const struct test_f_f_data sin_towardzero_test_data[] =
13435 {
13436 START_DATA (sin_towardzero),
13437 TEST_f_f (sin, 1, 0.8414709848078965066525023216302989996226L),
13438 TEST_f_f (sin, 2, 0.9092974268256816953960198659117448427023L),
13439 TEST_f_f (sin, 3, 0.1411200080598672221007448028081102798469L),
13440 TEST_f_f (sin, 4, -0.7568024953079282513726390945118290941359L),
13441 TEST_f_f (sin, 5, -0.9589242746631384688931544061559939733525L),
13442 TEST_f_f (sin, 6, -0.2794154981989258728115554466118947596280L),
13443 TEST_f_f (sin, 7, 0.6569865987187890903969990915936351779369L),
13444 TEST_f_f (sin, 8, 0.9893582466233817778081235982452886721164L),
13445 TEST_f_f (sin, 9, 0.4121184852417565697562725663524351793439L),
13446 TEST_f_f (sin, 10, -0.5440211108893698134047476618513772816836L),
13447 END_DATA (sin_towardzero)
13448 };
13449
804360ed
JM		 13450static void
13451sin_test_towardzero (void)
13452{
804360ed
JM		 13453 errno = 0;
13454 FUNC(sin) (0);
13455 if (errno == ENOSYS)
13456 /* Function not implemented. */
13457 return;
13458
13459 START (sin_towardzero);
74c57478 13460 RUN_TEST_LOOP_f_f (sin, sin_towardzero_test_data, FE_TOWARDZERO);
804360ed
JM		 13461 END (sin_towardzero);
13462}
13463
13464
74c57478
JM		 13465static const struct test_f_f_data sin_downward_test_data[] =
13466 {
13467 START_DATA (sin_downward),
13468 TEST_f_f (sin, 1, 0.8414709848078965066525023216302989996226L),
13469 TEST_f_f (sin, 2, 0.9092974268256816953960198659117448427023L),
13470 TEST_f_f (sin, 3, 0.1411200080598672221007448028081102798469L),
13471 TEST_f_f (sin, 4, -0.7568024953079282513726390945118290941359L),
13472 TEST_f_f (sin, 5, -0.9589242746631384688931544061559939733525L),
13473 TEST_f_f (sin, 6, -0.2794154981989258728115554466118947596280L),
13474 TEST_f_f (sin, 7, 0.6569865987187890903969990915936351779369L),
13475 TEST_f_f (sin, 8, 0.9893582466233817778081235982452886721164L),
13476 TEST_f_f (sin, 9, 0.4121184852417565697562725663524351793439L),
13477 TEST_f_f (sin, 10, -0.5440211108893698134047476618513772816836L),
13478 END_DATA (sin_downward)
13479 };
13480
804360ed
JM		 13481static void
13482sin_test_downward (void)
13483{
804360ed
JM		 13484 errno = 0;
13485 FUNC(sin) (0);
13486 if (errno == ENOSYS)
13487 /* Function not implemented. */
13488 return;
13489
13490 START (sin_downward);
74c57478 13491 RUN_TEST_LOOP_f_f (sin, sin_downward_test_data, FE_DOWNWARD);
804360ed
JM		 13492 END (sin_downward);
13493}
13494
13495
74c57478
JM		 13496static const struct test_f_f_data sin_upward_test_data[] =
13497 {
13498 START_DATA (sin_upward),
13499 TEST_f_f (sin, 1, 0.8414709848078965066525023216302989996226L),
13500 TEST_f_f (sin, 2, 0.9092974268256816953960198659117448427023L),
13501 TEST_f_f (sin, 3, 0.1411200080598672221007448028081102798469L),
13502 TEST_f_f (sin, 4, -0.7568024953079282513726390945118290941359L),
13503 TEST_f_f (sin, 5, -0.9589242746631384688931544061559939733525L),
13504 TEST_f_f (sin, 6, -0.2794154981989258728115554466118947596280L),
13505 TEST_f_f (sin, 7, 0.6569865987187890903969990915936351779369L),
13506 TEST_f_f (sin, 8, 0.9893582466233817778081235982452886721164L),
13507 TEST_f_f (sin, 9, 0.4121184852417565697562725663524351793439L),
13508 TEST_f_f (sin, 10, -0.5440211108893698134047476618513772816836L),
13509 END_DATA (sin_upward)
13510 };
13511
804360ed
JM		 13512static void
13513sin_test_upward (void)
13514{
804360ed
JM		 13515 errno = 0;
13516 FUNC(sin) (0);
13517 if (errno == ENOSYS)
13518 /* Function not implemented. */
13519 return;
13520
13521 START (sin_upward);
74c57478 13522 RUN_TEST_LOOP_f_f (sin, sin_upward_test_data, FE_UPWARD);
804360ed
JM		 13523 END (sin_upward);
13524}
13525
13526
8847214f
UD		 13527static void
13528sincos_test (void)
13529{
13530 FLOAT sin_res, cos_res;
13531
aaca11d8
UD		 13532 errno = 0;
13533 FUNC(sincos) (0, &sin_res, &cos_res);
13534 if (errno == ENOSYS)
13535 /* Function not implemented. */
13536 return;
13537
8847214f
UD		 13538 START (sincos);
13539
13540 /* sincos is treated differently because it returns void. */
13541 TEST_extra (sincos, 0, 0, 1);
13542
13543 TEST_extra (sincos, minus_zero, minus_zero, 1);
67e971f1
TS		 13544 TEST_extra (sincos, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION);
13545 TEST_extra (sincos, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION);
13546 TEST_extra (sincos, qnan_value, qnan_value, qnan_value);
8847214f 13547
aba5e333
CD		 13548 /* The value of M_PI_2l is never exactly PI/2, and therefore the
13549 answer is never exactly zero. The answer is equal to the error
13550 in rounding PI/2 for the type used. Thus the answer is unique
13551 to each type. */
13552#ifdef TEST_FLOAT
13553 /* 32-bit float. */
418601aa 13554 TEST_extra (sincos, M_PI_2l, 1, -0x1.777a5cp-25L);
aba5e333
CD		 13555#endif
13556#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MANT_DIG == 53)
13557 /* 64-bit double or 64-bit long double. */
418601aa 13558 TEST_extra (sincos, M_PI_2l, 1, 0x1.1a62633145c07p-54L);
aba5e333
CD		 13559#endif
13560#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 64
13561 /* 96-bit long double. */
418601aa 13562 TEST_extra (sincos, M_PI_2l, 1, -0xe.ce675d1fc8f8cbbp-69L);
aba5e333
CD		 13563#endif
13564#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 106
13565 /* 128-bit IBM long double. */
418601aa 13566 TEST_extra (sincos, M_PI_2l, 1, 0x1.c1cd129024e088a67cc74020bcp-107L);
aba5e333
CD		 13567#endif
13568#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 113
13569 /* 128-bit long double. */
418601aa 13570 TEST_extra (sincos, M_PI_2l, 1, 0x1.cd129024e088a67cc74020bbea64p-115L);
aba5e333
CD		 13571#endif
13572
3c6cad26
UD		 13573 TEST_extra (sincos, M_PI_6l, 0.5, 0.86602540378443864676372317075293616L);
13574 TEST_extra (sincos, M_PI_6l*2.0, 0.86602540378443864676372317075293616L, 0.5);
2550dfe9 13575 TEST_extra (sincos, 0.75L, 0.681638760023334166733241952779893935L, 0.731688868873820886311838753000084544L);
8847214f 13576
ea40808a
AJ		 13577 TEST_extra (sincos, 0x1p65, -0.047183876212354673805106149805700013943218L, 0.99888622066058013610642172179340364209972L);
13578 TEST_extra (sincos, -0x1p65, 0.047183876212354673805106149805700013943218L, 0.99888622066058013610642172179340364209972L);
8c0247db 13579
d32e4346
RM		 13580#ifdef TEST_DOUBLE
13581 TEST_extra (sincos, 0.80190127184058835, 0.71867942238767868, 0.69534156199418473);
8848d99d
JM		 13582#endif
13583
13584#ifndef TEST_FLOAT
13585 TEST_extra (sincos, 1e22, -0.8522008497671888017727058937530293682618L, 0.5232147853951389454975944733847094921409L);
13586 TEST_extra (sincos, 0x1p1023, 0.5631277798508840134529434079444683477104L, -0.826369834614147994500785680811743734805L);
13587#endif
13588
13589#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
13590 TEST_extra (sincos, 0x1p16383L, 0.3893629985894208126948115852610595405563L, 0.9210843909921906206874509522505756251609L);
d32e4346
RM		 13591#endif
13592
4ffffbd2
LD		 13593 TEST_extra (sincos, 0x1p+120, 3.77820109360752022655548470056922991960587e-01L, -9.25879022854837867303861764107414946730833e-01L);
13594 TEST_extra (sincos, 0x1p+127, 6.23385512955870240370428801097126489001833e-01L, 7.81914638714960072263910298466369236613162e-01L);
13595 TEST_extra (sincos, 0x1.fffff8p+127, 4.85786063130487339701113680434728152037092e-02L, 9.98819362551949040703862043664101081064641e-01L);
13596 TEST_extra (sincos, 0x1.fffffep+127, -5.21876523333658540551505357019806722935726e-01L, 8.53021039830304158051791467692161107353094e-01L);
13597 TEST_extra (sincos, 0x1p+50, 4.96396515208940840876821859865411368093356e-01L, 8.68095904660550604334592502063501320395739e-01L);
13598 TEST_extra (sincos, 0x1p+28, -9.86198211836975655703110310527108292055548e-01L, -1.65568979490578758865468278195361551113358e-01L);
13599
8847214f
UD		 13600 END (sincos);
13601}
13602
74c57478
JM		 13603static const struct test_f_f_data sinh_test_data[] =
13604 {
13605 START_DATA (sinh),
13606 TEST_f_f (sinh, 0, 0),
13607 TEST_f_f (sinh, minus_zero, minus_zero),
13608
13609#ifndef TEST_INLINE
13610 TEST_f_f (sinh, plus_infty, plus_infty),
13611 TEST_f_f (sinh, minus_infty, minus_infty),
13612#endif
13613 TEST_f_f (sinh, qnan_value, qnan_value),
13614
13615 TEST_f_f (sinh, 0.75L, 0.822316731935829980703661634446913849L),
13616 TEST_f_f (sinh, 0x8p-32L, 1.86264514923095703232705808926175479e-9L),
13617 END_DATA (sinh)
13618 };
13619
8847214f
UD		 13620static void
13621sinh_test (void)
13622{
aaca11d8 13623 errno = 0;
3c6cad26 13624 FUNC(sinh) (0.7L);
aaca11d8
UD		 13625 if (errno == ENOSYS)
13626 /* Function not implemented. */
13627 return;
13628
8847214f 13629 START (sinh);
74c57478 13630 RUN_TEST_LOOP_f_f (sinh, sinh_test_data, );
8847214f
UD		 13631 END (sinh);
13632}
13633
ca811b22 13634
74c57478
JM		 13635static const struct test_f_f_data sinh_tonearest_test_data[] =
13636 {
13637 START_DATA (sinh_tonearest),
13638 TEST_f_f (sinh, 22, 1792456423.065795780701106568345764104225L),
13639 TEST_f_f (sinh, 23, 4872401723.124451299966006944252978187305L),
13640 TEST_f_f (sinh, 24, 13244561064.92173614705070540368454568168L),
13641 END_DATA (sinh_tonearest)
13642 };
13643
ca811b22
JM		 13644static void
13645sinh_test_tonearest (void)
13646{
ca811b22
JM		 13647 errno = 0;
13648 FUNC(sinh) (0);
13649 if (errno == ENOSYS)
13650 /* Function not implemented. */
13651 return;
13652
13653 START (sinh_tonearest);
74c57478 13654 RUN_TEST_LOOP_f_f (sinh, sinh_tonearest_test_data, FE_TONEAREST);
ca811b22
JM		 13655 END (sinh_tonearest);
13656}
13657
13658
74c57478
JM		 13659static const struct test_f_f_data sinh_towardzero_test_data[] =
13660 {
13661 START_DATA (sinh_towardzero),
13662 TEST_f_f (sinh, 22, 1792456423.065795780701106568345764104225L),
13663 TEST_f_f (sinh, 23, 4872401723.124451299966006944252978187305L),
13664 TEST_f_f (sinh, 24, 13244561064.92173614705070540368454568168L),
13665 END_DATA (sinh_towardzero)
13666 };
13667
ca811b22
JM		 13668static void
13669sinh_test_towardzero (void)
13670{
ca811b22
JM		 13671 errno = 0;
13672 FUNC(sinh) (0);
13673 if (errno == ENOSYS)
13674 /* Function not implemented. */
13675 return;
13676
13677 START (sinh_towardzero);
74c57478 13678 RUN_TEST_LOOP_f_f (sinh, sinh_towardzero_test_data, FE_TOWARDZERO);
ca811b22
JM		 13679 END (sinh_towardzero);
13680}
13681
13682
74c57478
JM		 13683static const struct test_f_f_data sinh_downward_test_data[] =
13684 {
13685 START_DATA (sinh_downward),
13686 TEST_f_f (sinh, 22, 1792456423.065795780701106568345764104225L),
13687 TEST_f_f (sinh, 23, 4872401723.124451299966006944252978187305L),
13688 TEST_f_f (sinh, 24, 13244561064.92173614705070540368454568168L),
13689 END_DATA (sinh_downward)
13690 };
13691
ca811b22
JM		 13692static void
13693sinh_test_downward (void)
13694{
ca811b22
JM		 13695 errno = 0;
13696 FUNC(sinh) (0);
13697 if (errno == ENOSYS)
13698 /* Function not implemented. */
13699 return;
13700
13701 START (sinh_downward);
74c57478 13702 RUN_TEST_LOOP_f_f (sinh, sinh_downward_test_data, FE_DOWNWARD);
ca811b22
JM		 13703 END (sinh_downward);
13704}
13705
13706
74c57478
JM		 13707static const struct test_f_f_data sinh_upward_test_data[] =
13708 {
13709 START_DATA (sinh_upward),
13710 TEST_f_f (sinh, 22, 1792456423.065795780701106568345764104225L),
13711 TEST_f_f (sinh, 23, 4872401723.124451299966006944252978187305L),
13712 TEST_f_f (sinh, 24, 13244561064.92173614705070540368454568168L),
13713 END_DATA (sinh_upward)
13714 };
13715
ca811b22
JM		 13716static void
13717sinh_test_upward (void)
13718{
ca811b22
JM		 13719 errno = 0;
13720 FUNC(sinh) (0);
13721 if (errno == ENOSYS)
13722 /* Function not implemented. */
13723 return;
13724
13725 START (sinh_upward);
74c57478 13726 RUN_TEST_LOOP_f_f (sinh, sinh_upward_test_data, FE_UPWARD);
ca811b22
JM		 13727 END (sinh_upward);
13728}
13729
13730
74c57478
JM		 13731static const struct test_f_f_data sqrt_test_data[] =
13732 {
13733 START_DATA (sqrt),
13734 TEST_f_f (sqrt, 0, 0),
13735 TEST_f_f (sqrt, qnan_value, qnan_value),
13736 TEST_f_f (sqrt, plus_infty, plus_infty),
13737
13738 TEST_f_f (sqrt, minus_zero, minus_zero),
13739
13740 /* sqrt (x) == qNaN plus invalid exception for x < 0. */
13741 TEST_f_f (sqrt, -1, qnan_value, INVALID_EXCEPTION),
13742 TEST_f_f (sqrt, -max_value, qnan_value, INVALID_EXCEPTION),
13743 TEST_f_f (sqrt, minus_infty, qnan_value, INVALID_EXCEPTION),
13744
13745 TEST_f_f (sqrt, 2209, 47),
13746 TEST_f_f (sqrt, 4, 2),
13747 TEST_f_f (sqrt, 2, M_SQRT2l),
13748 TEST_f_f (sqrt, 0.25, 0.5),
13749 TEST_f_f (sqrt, 6642.25, 81.5),
13750 TEST_f_f (sqrt, 15190.5625L, 123.25L),
13751 TEST_f_f (sqrt, 0.75L, 0.866025403784438646763723170752936183L),
13752 END_DATA (sqrt)
13753 };
13754
8847214f
UD		 13755static void
13756sqrt_test (void)
13757{
e6d3c4a7
AJ		 13758 errno = 0;
13759 FUNC(sqrt) (1);
13760 if (errno == ENOSYS)
13761 /* Function not implemented. */
13762 return;
13763
8847214f 13764 START (sqrt);
74c57478 13765 RUN_TEST_LOOP_f_f (sqrt, sqrt_test_data, );
8847214f
UD		 13766 END (sqrt);
13767}
13768
2550dfe9 13769
74c57478
JM		 13770static const struct test_f_f_data tan_test_data[] =
13771 {
13772 START_DATA (tan),
13773 TEST_f_f (tan, 0, 0),
13774 TEST_f_f (tan, minus_zero, minus_zero),
13775 TEST_f_f (tan, plus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13776 TEST_f_f (tan, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13777 TEST_f_f (tan, qnan_value, qnan_value, ERRNO_UNCHANGED),
13778
13779 TEST_f_f (tan, M_PI_4l, 1),
13780 TEST_f_f (tan, 0.75L, 0.931596459944072461165202756573936428L),
13781
13782 TEST_f_f (tan, 0x1p65, -0.0472364872359047946798414219288370688827L),
13783 TEST_f_f (tan, -0x1p65, 0.0472364872359047946798414219288370688827L),
13784
13785 TEST_f_f (tan, 0xc.9p-4, 0.9995162902115457818029468900654150261381L),
13786 TEST_f_f (tan, 0xc.908p-4, 0.9997603425502441410973077452249560802034L),
13787 TEST_f_f (tan, 0xc.90cp-4, 0.9998823910588060302788513970802357770031L),
13788 TEST_f_f (tan, 0xc.90ep-4, 0.9999434208994808753305784795924711152508L),
13789 TEST_f_f (tan, 0xc.90fp-4, 0.9999739372166156702433266059635165160515L),
13790 TEST_f_f (tan, 0xc.90f8p-4, 0.9999891957244072765118898375645469865764L),
13791 TEST_f_f (tan, 0xc.90fcp-4, 0.9999968250656122402859679132395522927393L),
13792 TEST_f_f (tan, 0xc.90fdp-4, 0.9999987324100083358016192309006353329444L),
13793 TEST_f_f (tan, 0xc.90fd8p-4, 0.9999996860835706212861509874451585282616L),
13794 TEST_f_f (tan, 0xc.90fdap-4, 0.9999999245021033010474530133665235922808L),
13795 TEST_f_f (tan, 0xc.ap-4, 1.0073556597407272165371804539701396631519L),
13796 TEST_f_f (tan, 0xc.98p-4, 1.0034282930863044654045449407466962736255L),
13797 TEST_f_f (tan, 0xc.94p-4, 1.0014703786820082237342656561856877993328L),
13798 TEST_f_f (tan, 0xc.92p-4, 1.0004928571392300571266638743539017593717L),
13799 TEST_f_f (tan, 0xc.91p-4, 1.0000044544650244953647966900221905361131L),
13800 TEST_f_f (tan, 0xc.90fep-4, 1.0000006397580424009014454926842136804016L),
13801 TEST_f_f (tan, 0xc.90fdcp-4, 1.0000001629206928242190327320047489394217L),
13802 TEST_f_f (tan, 0xc.90fdbp-4, 1.0000000437113909572052640953950483705005L),
13803
13804 TEST_f_f (tan, -0xc.9p-4, -0.9995162902115457818029468900654150261381L),
13805 TEST_f_f (tan, -0xc.908p-4, -0.9997603425502441410973077452249560802034L),
13806 TEST_f_f (tan, -0xc.90cp-4, -0.9998823910588060302788513970802357770031L),
13807 TEST_f_f (tan, -0xc.90ep-4, -0.9999434208994808753305784795924711152508L),
13808 TEST_f_f (tan, -0xc.90fp-4, -0.9999739372166156702433266059635165160515L),
13809 TEST_f_f (tan, -0xc.90f8p-4, -0.9999891957244072765118898375645469865764L),
13810 TEST_f_f (tan, -0xc.90fcp-4, -0.9999968250656122402859679132395522927393L),
13811 TEST_f_f (tan, -0xc.90fdp-4, -0.9999987324100083358016192309006353329444L),
13812 TEST_f_f (tan, -0xc.90fd8p-4, -0.9999996860835706212861509874451585282616L),
13813 TEST_f_f (tan, -0xc.90fdap-4, -0.9999999245021033010474530133665235922808L),
13814 TEST_f_f (tan, -0xc.ap-4, -1.0073556597407272165371804539701396631519L),
13815 TEST_f_f (tan, -0xc.98p-4, -1.0034282930863044654045449407466962736255L),
13816 TEST_f_f (tan, -0xc.94p-4, -1.0014703786820082237342656561856877993328L),
13817 TEST_f_f (tan, -0xc.92p-4, -1.0004928571392300571266638743539017593717L),
13818 TEST_f_f (tan, -0xc.91p-4, -1.0000044544650244953647966900221905361131L),
13819 TEST_f_f (tan, -0xc.90fep-4, -1.0000006397580424009014454926842136804016L),
13820 TEST_f_f (tan, -0xc.90fdcp-4, -1.0000001629206928242190327320047489394217L),
13821 TEST_f_f (tan, -0xc.90fdbp-4, -1.0000000437113909572052640953950483705005L),
13822
13823#ifndef TEST_FLOAT
13824 TEST_f_f (tan, 1e22, -1.628778225606898878549375936939548513545L),
13825 TEST_f_f (tan, 0x1p1023, -0.6814476476066215012854144040167365190368L),
13826#endif
13827
13828#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
13829 TEST_f_f (tan, 0x1p16383L, 0.422722393732022337800504160054440141575L),
13830#endif
13831 END_DATA (tan)
13832 };
13833
8847214f
UD		 13834static void
13835tan_test (void)
13836{
e6d3c4a7
AJ		 13837 errno = 0;
13838 FUNC(tan) (0);
13839 if (errno == ENOSYS)
13840 /* Function not implemented. */
13841 return;
13842
8847214f 13843 START (tan);
74c57478 13844 RUN_TEST_LOOP_f_f (tan, tan_test_data, );
8847214f
UD		 13845 END (tan);
13846}
13847
804360ed 13848
74c57478
JM		 13849static const struct test_f_f_data tan_tonearest_test_data[] =
13850 {
13851 START_DATA (tan_tonearest),
13852 TEST_f_f (tan, 1, 1.5574077246549022305069748074583601730873L),
13853 TEST_f_f (tan, 2, -2.1850398632615189916433061023136825434320L),
13854 TEST_f_f (tan, 3, -0.1425465430742778052956354105339134932261L),
13855 TEST_f_f (tan, 4, 1.1578212823495775831373424182673239231198L),
13856 TEST_f_f (tan, 5, -3.3805150062465856369827058794473439087096L),
13857 TEST_f_f (tan, 6, -0.2910061913847491570536995888681755428312L),
13858 TEST_f_f (tan, 7, 0.8714479827243187364564508896003135663222L),
13859 TEST_f_f (tan, 8, -6.7997114552203786999252627596086333648814L),
13860 TEST_f_f (tan, 9, -0.4523156594418098405903708757987855343087L),
13861 TEST_f_f (tan, 10, 0.6483608274590866712591249330098086768169L),
13862 END_DATA (tan_tonearest)
13863 };
13864
804360ed
JM		 13865static void
13866tan_test_tonearest (void)
13867{
804360ed
JM		 13868 errno = 0;
13869 FUNC(tan) (0);
13870 if (errno == ENOSYS)
13871 /* Function not implemented. */
13872 return;
13873
13874 START (tan_tonearest);
74c57478 13875 RUN_TEST_LOOP_f_f (tan, tan_tonearest_test_data, FE_TONEAREST);
804360ed
JM		 13876 END (tan_tonearest);
13877}
13878
13879
74c57478
JM		 13880static const struct test_f_f_data tan_towardzero_test_data[] =
13881 {
13882 START_DATA (tan_towardzero),
13883 TEST_f_f (tan, 1, 1.5574077246549022305069748074583601730873L),
13884 TEST_f_f (tan, 2, -2.1850398632615189916433061023136825434320L),
13885 TEST_f_f (tan, 3, -0.1425465430742778052956354105339134932261L),
13886 TEST_f_f (tan, 4, 1.1578212823495775831373424182673239231198L),
13887 TEST_f_f (tan, 5, -3.3805150062465856369827058794473439087096L),
13888 TEST_f_f (tan, 6, -0.2910061913847491570536995888681755428312L),
13889 TEST_f_f (tan, 7, 0.8714479827243187364564508896003135663222L),
13890 TEST_f_f (tan, 8, -6.7997114552203786999252627596086333648814L),
13891 TEST_f_f (tan, 9, -0.4523156594418098405903708757987855343087L),
13892 TEST_f_f (tan, 10, 0.6483608274590866712591249330098086768169L),
13893 END_DATA (tan_towardzero)
13894 };
13895
804360ed
JM		 13896static void
13897tan_test_towardzero (void)
13898{
804360ed
JM		 13899 errno = 0;
13900 FUNC(tan) (0);
13901 if (errno == ENOSYS)
13902 /* Function not implemented. */
13903 return;
13904
13905 START (tan_towardzero);
74c57478 13906 RUN_TEST_LOOP_f_f (tan, tan_towardzero_test_data, FE_TOWARDZERO);
804360ed
JM		 13907 END (tan_towardzero);
13908}
13909
13910
74c57478
JM		 13911static const struct test_f_f_data tan_downward_test_data[] =
13912 {
13913 START_DATA (tan_downward),
13914 TEST_f_f (tan, 1, 1.5574077246549022305069748074583601730873L),
13915 TEST_f_f (tan, 2, -2.1850398632615189916433061023136825434320L),
13916 TEST_f_f (tan, 3, -0.1425465430742778052956354105339134932261L),
13917 TEST_f_f (tan, 4, 1.1578212823495775831373424182673239231198L),
13918 TEST_f_f (tan, 5, -3.3805150062465856369827058794473439087096L),
13919 TEST_f_f (tan, 6, -0.2910061913847491570536995888681755428312L),
13920 TEST_f_f (tan, 7, 0.8714479827243187364564508896003135663222L),
13921 TEST_f_f (tan, 8, -6.7997114552203786999252627596086333648814L),
13922 TEST_f_f (tan, 9, -0.4523156594418098405903708757987855343087L),
13923 TEST_f_f (tan, 10, 0.6483608274590866712591249330098086768169L),
13924 END_DATA (tan_downward)
13925 };
13926
804360ed
JM		 13927static void
13928tan_test_downward (void)
13929{
804360ed
JM		 13930 errno = 0;
13931 FUNC(tan) (0);
13932 if (errno == ENOSYS)
13933 /* Function not implemented. */
13934 return;
13935
13936 START (tan_downward);
74c57478 13937 RUN_TEST_LOOP_f_f (tan, tan_downward_test_data, FE_DOWNWARD);
804360ed
JM		 13938 END (tan_downward);
13939}
13940
13941
74c57478
JM		 13942static const struct test_f_f_data tan_upward_test_data[] =
13943 {
13944 START_DATA (tan_upward),
13945 TEST_f_f (tan, 1, 1.5574077246549022305069748074583601730873L),
13946 TEST_f_f (tan, 2, -2.1850398632615189916433061023136825434320L),
13947 TEST_f_f (tan, 3, -0.1425465430742778052956354105339134932261L),
13948 TEST_f_f (tan, 4, 1.1578212823495775831373424182673239231198L),
13949 TEST_f_f (tan, 5, -3.3805150062465856369827058794473439087096L),
13950 TEST_f_f (tan, 6, -0.2910061913847491570536995888681755428312L),
13951 TEST_f_f (tan, 7, 0.8714479827243187364564508896003135663222L),
13952 TEST_f_f (tan, 8, -6.7997114552203786999252627596086333648814L),
13953 TEST_f_f (tan, 9, -0.4523156594418098405903708757987855343087L),
13954 TEST_f_f (tan, 10, 0.6483608274590866712591249330098086768169L),
13955 END_DATA (tan_upward)
13956 };
13957
804360ed
JM		 13958static void
13959tan_test_upward (void)
13960{
804360ed
JM		 13961 errno = 0;
13962 FUNC(tan) (0);
13963 if (errno == ENOSYS)
13964 /* Function not implemented. */
13965 return;
13966
13967 START (tan_upward);
74c57478 13968 RUN_TEST_LOOP_f_f (tan, tan_upward_test_data, FE_UPWARD);
804360ed
JM		 13969 END (tan_upward);
13970}
13971
13972
74c57478
JM		 13973static const struct test_f_f_data tanh_test_data[] =
13974 {
13975 START_DATA (tanh),
13976 TEST_f_f (tanh, 0, 0),
13977 TEST_f_f (tanh, minus_zero, minus_zero),
8847214f 13978
15daa639 13979#ifndef TEST_INLINE
74c57478
JM		 13980 TEST_f_f (tanh, plus_infty, 1),
13981 TEST_f_f (tanh, minus_infty, -1),
15daa639 13982#endif
74c57478 13983 TEST_f_f (tanh, qnan_value, qnan_value),
3eab00bd 13984
74c57478
JM		 13985 TEST_f_f (tanh, 0.75L, 0.635148952387287319214434357312496495L),
13986 TEST_f_f (tanh, -0.75L, -0.635148952387287319214434357312496495L),
8847214f 13987
74c57478
JM		 13988 TEST_f_f (tanh, 1.0L, 0.7615941559557648881194582826047935904L),
13989 TEST_f_f (tanh, -1.0L, -0.7615941559557648881194582826047935904L),
30e5dcb7 13990
74c57478
JM		 13991 /* 2^-57 */
13992 TEST_f_f (tanh, 0x1p-57L, 6.938893903907228377647697925567626953125e-18L),
13993 END_DATA (tanh)
13994 };
8847214f
UD		 13995
13996static void
74c57478 13997tanh_test (void)
8847214f
UD		 13998{
13999 errno = 0;
74c57478 14000 FUNC(tanh) (0.7L);
8847214f
UD		 14001 if (errno == ENOSYS)
14002 /* Function not implemented. */
14003 return;
8847214f 14004
74c57478
JM		 14005 START (tanh);
14006 RUN_TEST_LOOP_f_f (tanh, tanh_test_data, );
14007 END (tanh);
14008}
8847214f 14009
74c57478
JM		 14010static const struct test_f_f_data tgamma_test_data[] =
14011 {
14012 START_DATA (tgamma),
14013 TEST_f_f (tgamma, plus_infty, plus_infty),
14014 TEST_f_f (tgamma, max_value, plus_infty, OVERFLOW_EXCEPTION),
14015 TEST_f_f (tgamma, 0, plus_infty, DIVIDE_BY_ZERO_EXCEPTION),
14016 TEST_f_f (tgamma, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
14017 /* tgamma (x) == qNaN plus invalid exception for integer x <= 0. */
14018 TEST_f_f (tgamma, -2, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
14019 TEST_f_f (tgamma, -max_value, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
14020 TEST_f_f (tgamma, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
14021 TEST_f_f (tgamma, qnan_value, qnan_value),
14022
14023 TEST_f_f (tgamma, 0.5, M_SQRT_PIl),
14024 TEST_f_f (tgamma, -0.5, -M_2_SQRT_PIl),
14025
14026 TEST_f_f (tgamma, 1, 1),
14027 TEST_f_f (tgamma, 2, 1),
14028 TEST_f_f (tgamma, 3, 2),
14029 TEST_f_f (tgamma, 4, 6),
14030 TEST_f_f (tgamma, 5, 24),
14031 TEST_f_f (tgamma, 6, 120),
14032 TEST_f_f (tgamma, 7, 720),
14033 TEST_f_f (tgamma, 8, 5040),
14034 TEST_f_f (tgamma, 9, 40320),
14035 TEST_f_f (tgamma, 10, 362880),
14036
14037 TEST_f_f (tgamma, 0.7L, 1.29805533264755778568117117915281162L),
14038 TEST_f_f (tgamma, 1.2L, 0.918168742399760610640951655185830401L),
14039
14040 TEST_f_f (tgamma, 1.5L, 8.8622692545275801364908374167057259139877e-01L),
14041 TEST_f_f (tgamma, 2.5L, 1.3293403881791370204736256125058588870982e+00L),
14042 TEST_f_f (tgamma, 3.5L, 3.3233509704478425511840640312646472177454e+00L),
14043 TEST_f_f (tgamma, 4.5L, 1.1631728396567448929144224109426265262109e+01L),
14044 TEST_f_f (tgamma, 5.5L, 5.2342777784553520181149008492418193679490e+01L),
14045 TEST_f_f (tgamma, 6.5L, 2.8788527781504436099631954670830006523720e+02L),
14046 TEST_f_f (tgamma, 7.5L, 1.8712543057977883464760770536039504240418e+03L),
14047 TEST_f_f (tgamma, 8.5L, 1.4034407293483412598570577902029628180313e+04L),
14048 TEST_f_f (tgamma, 9.5L, 1.1929246199460900708784991216725183953266e+05L),
14049 TEST_f_f (tgamma, -1.5L, 2.3632718012073547030642233111215269103967e+00L),
14050 TEST_f_f (tgamma, -2.5L, -9.4530872048294188122568932444861076415869e-01L),
14051 TEST_f_f (tgamma, -3.5L, 2.7008820585226910892162552127103164690248e-01L),
14052 TEST_f_f (tgamma, -4.5L, -6.0019601300504246427027893615784810422774e-02L),
14053 TEST_f_f (tgamma, -5.5L, 1.0912654781909862986732344293779056440504e-02L),
14054 TEST_f_f (tgamma, -6.5L, -1.6788699664476712287280529682737009908468e-03L),
14055 TEST_f_f (tgamma, -7.5L, 2.2384932885968949716374039576982679877958e-04L),
14056 TEST_f_f (tgamma, -8.5L, -2.6335215159963470254557693619979623385833e-05L),
14057 TEST_f_f (tgamma, -9.5L, 2.7721279115751021320587045915768024616666e-06L),
14058 TEST_f_f (tgamma, 0x1p-24L, 1.6777215422784394050795179874582764575261e+07L),
14059 TEST_f_f (tgamma, -0x1p-24L, -1.6777216577215723853867349114260580375249e+07L),
14060 TEST_f_f (tgamma, 0x1p-53L, 9.0071992547409914227843350984672492007618e+15L),
14061 TEST_f_f (tgamma, -0x1p-53L, -9.0071992547409925772156649015329704137860e+15L),
14062 TEST_f_f (tgamma, 0x1p-64L, 1.8446744073709551615422784335098467139447e+19L),
14063 TEST_f_f (tgamma, -0x1p-64L, -1.8446744073709551616577215664901532860660e+19L),
14064 TEST_f_f (tgamma, 0x1p-106L, 8.1129638414606681695789005144063422784335e+31L),
14065 TEST_f_f (tgamma, -0x1p-106L, -8.1129638414606681695789005144064577215665e+31L),
14066 TEST_f_f (tgamma, 0x1p-113L, 1.0384593717069655257060992658440191422784e+34L),
14067 TEST_f_f (tgamma, -0x1p-113L, -1.0384593717069655257060992658440192577216e+34L),
14068 TEST_f_f (tgamma, 0x1p-127L, 1.7014118346046923173168730371588410572742e+38L),
14069 TEST_f_f (tgamma, -0x1p-127L, -1.7014118346046923173168730371588410572858e+38L),
d8cd06db 14070#ifdef TEST_FLOAT
74c57478
JM		 14071 TEST_f_f (tgamma, 0x1p-128L, plus_infty, OVERFLOW_EXCEPTION),
14072 TEST_f_f (tgamma, -0x1p-128L, minus_infty, OVERFLOW_EXCEPTION),
14073 TEST_f_f (tgamma, 0x1p-149L, plus_infty, OVERFLOW_EXCEPTION),
14074 TEST_f_f (tgamma, -0x1p-149L, minus_infty, OVERFLOW_EXCEPTION),
d8cd06db 14075#else
74c57478
JM		 14076 TEST_f_f (tgamma, 0x1p-128L, 3.4028236692093846346337460743176821145542e+38L),
14077 TEST_f_f (tgamma, -0x1p-128L, -3.4028236692093846346337460743176821145658e+38L),
14078 TEST_f_f (tgamma, 0x1p-149L, 7.1362384635297994052914298472474756819137e+44L),
14079 TEST_f_f (tgamma, -0x1p-149L, -7.1362384635297994052914298472474756819137e+44L),
d8cd06db
JM		 14080#endif
14081#ifndef TEST_FLOAT
74c57478
JM		 14082 TEST_f_f (tgamma, 0x1p-1023L, 8.9884656743115795386465259539451236680899e+307L),
14083 TEST_f_f (tgamma, -0x1p-1023L, -8.9884656743115795386465259539451236680899e+307L),
d8cd06db 14084# if !defined TEST_LDOUBLE || LDBL_MAX_EXP <= 1024
74c57478
JM		 14085 TEST_f_f (tgamma, 0x1p-1024L, plus_infty, OVERFLOW_EXCEPTION),
14086 TEST_f_f (tgamma, -0x1p-1024L, minus_infty, OVERFLOW_EXCEPTION),
14087 TEST_f_f (tgamma, 0x1p-1074L, plus_infty, OVERFLOW_EXCEPTION),
14088 TEST_f_f (tgamma, -0x1p-1074L, minus_infty, OVERFLOW_EXCEPTION),
d8cd06db 14089# else
74c57478
JM		 14090 TEST_f_f (tgamma, 0x1p-1024L, 1.7976931348623159077293051907890247336180e+308L),
14091 TEST_f_f (tgamma, -0x1p-1024L, -1.7976931348623159077293051907890247336180e+308L),
14092 TEST_f_f (tgamma, 0x1p-1074L, 2.0240225330731061835249534671891730704956e+323L),
14093 TEST_f_f (tgamma, -0x1p-1074L, -2.0240225330731061835249534671891730704956e+323L),
d8cd06db
JM		 14094# endif
14095#endif
14096#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
74c57478
JM		 14097 TEST_f_f (tgamma, 0x1p-16383L, 5.9486574767861588254287966331400356538172e+4931L),
14098 TEST_f_f (tgamma, -0x1p-16383L, -5.9486574767861588254287966331400356538172e+4931L),
14099 TEST_f_f (tgamma, 0x1p-16384L, plus_infty, OVERFLOW_EXCEPTION),
14100 TEST_f_f (tgamma, -0x1p-16384L, minus_infty, OVERFLOW_EXCEPTION),
14101 TEST_f_f (tgamma, 0x1p-16445L, plus_infty, OVERFLOW_EXCEPTION),
14102 TEST_f_f (tgamma, -0x1p-16445L, minus_infty, OVERFLOW_EXCEPTION),
d8cd06db 14103# if LDBL_MANT_DIG >= 113
74c57478
JM		 14104 TEST_f_f (tgamma, 0x1p-16494L, plus_infty, OVERFLOW_EXCEPTION),
14105 TEST_f_f (tgamma, -0x1p-16494L, minus_infty, OVERFLOW_EXCEPTION),
d8cd06db
JM		 14106# endif
14107#endif
74c57478
JM		 14108 TEST_f_f (tgamma, 0x8.00001p0L, 5.0400096882277802019946778420223050233915e+03L),
14109 TEST_f_f (tgamma, 0x7.fffff8p0L, 5.0399951558933225045148935487583089307135e+03L),
14110 TEST_f_f (tgamma, 0x7.000008p0L, 7.2000064296977505705636258629805621178587e+02L),
14111 TEST_f_f (tgamma, 0x6.fffff8p0L, 7.1999935703082425988147448928288557689866e+02L),
14112 TEST_f_f (tgamma, 0x6.000008p0L, 1.2000009762487825358530770343720418162783e+02L),
14113 TEST_f_f (tgamma, 0x5.fffff8p0L, 1.1999990237520611552119807476573441975106e+02L),
14114 TEST_f_f (tgamma, 0x5.000008p0L, 2.4000017236155647574166073485628713443799e+01L),
14115 TEST_f_f (tgamma, 0x4.fffff8p0L, 2.3999982763857938712639837029547357501709e+01L),
14116 TEST_f_f (tgamma, 0x4.000008p0L, 6.0000035937827461765660468073471093546129e+00L),
14117 TEST_f_f (tgamma, 0x3.fffffcp0L, 5.9999982031095793171233994481968816873643e+00L),
14118 TEST_f_f (tgamma, 0x3.000004p0L, 2.0000004400179308360529417942462250547999e+00L),
14119 TEST_f_f (tgamma, 0x2.fffffcp0L, 1.9999995599822108706107786027549565954046e+00L),
14120 TEST_f_f (tgamma, 0x2.000004p0L, 1.0000001007996638509889062631687945799175e+00L),
14121 TEST_f_f (tgamma, 0x1.fffffep0L, 9.9999994960018563231526611134590489120697e-01L),
14122 TEST_f_f (tgamma, 0x1.000002p0L, 9.9999993119054472483596471908942669644327e-01L),
14123 TEST_f_f (tgamma, 0x0.ffffffp0L, 1.0000000344047381790797322460568297132998e+00L),
14124 TEST_f_f (tgamma, -0x0.ffffffp0L, -1.6777216422784419250710305882992376932423e+07L),
14125 TEST_f_f (tgamma, -0x1.000002p0L, 8.3886075772158332060084424806449513922858e+06L),
14126 TEST_f_f (tgamma, -0x1.fffffep0L, 4.1943044613922792026014320172298377770578e+06L),
14127 TEST_f_f (tgamma, -0x2.000004p0L, -2.0971515386080557574407223895988378776747e+06L),
14128 TEST_f_f (tgamma, -0x2.fffffcp0L, -6.9905087601970247876992248591045142913324e+05L),
14129 TEST_f_f (tgamma, -0x3.000004p0L, 6.9905045731381300146131914617735687322025e+05L),
14130 TEST_f_f (tgamma, -0x3.fffffcp0L, 1.7476272942159602684441970627092458855771e+05L),
14131 TEST_f_f (tgamma, -0x4.000008p0L, -8.7381270578483499672965708923121931082305e+04L),
14132 TEST_f_f (tgamma, -0x4.fffff8p0L, -1.7476280884325863043793087474680780379554e+04L),
14133 TEST_f_f (tgamma, -0x5.000008p0L, 1.7476252449031389167286893378510439443844e+04L),
14134 TEST_f_f (tgamma, -0x5.fffff8p0L, 2.9127137122026653716311560165769071985443e+03L),
14135 TEST_f_f (tgamma, -0x6.000008p0L, -2.9127085100239567622341538102130981196910e+03L),
14136 TEST_f_f (tgamma, -0x6.fffff8p0L, -4.1610198723079349791939054365613377035519e+02L),
14137 TEST_f_f (tgamma, -0x7.000008p0L, 4.1610118737306415004517215226199741948733e+02L),
14138 TEST_f_f (tgamma, -0x7.fffff8p0L, 5.2012751504050764429534086402871289946986e+01L),
14139 TEST_f_f (tgamma, -0x8.00001p0L, -2.6006296115134418896533598545925084576702e+01L),
14140 TEST_f_f (tgamma, -0x9.fffffp0L, 2.8896008370721717567612135720915723136310e-01L),
14141 TEST_f_f (tgamma, -0xa.00001p0L, -2.8895878754728051776830454190076999107021e-01L),
14142 TEST_f_f (tgamma, -0x13.ffffep0L, 2.1550026214525536756224040483579183652119e-13L),
14143 TEST_f_f (tgamma, -0x14.00002p0L, -2.1549777908265594916405421768142757507179e-13L),
14144 TEST_f_f (tgamma, -0x1d.ffffep0L, 1.9765721589464867957912772592816027583176e-27L),
14145 TEST_f_f (tgamma, -0x1e.00002p0L, -1.9765463890341964384070157599286498212650e-27L),
14146 TEST_f_f (tgamma, -0x27.ffffcp0L, 3.2129279441390812141195076945616975790225e-43L, UNDERFLOW_EXCEPTION_FLOAT),
14147 TEST_f_f (tgamma, -0x28.00004p0L, -3.2128372159115252365699015758097981155793e-43L, UNDERFLOW_EXCEPTION_FLOAT),
14148 TEST_f_f (tgamma, -0x28.ffffcp0L, -7.8364103489619817539676737414096652170685e-45L, UNDERFLOW_EXCEPTION_FLOAT),
14149 TEST_f_f (tgamma, -0x29.00004p0L, 7.8361876024016854597745353972619195760515e-45L, UNDERFLOW_EXCEPTION_FLOAT),
d8cd06db 14150#ifdef TEST_FLOAT
74c57478
JM		 14151 TEST_f_f (tgamma, -0x29.ffffcp0L, plus_zero, UNDERFLOW_EXCEPTION_FLOAT),
14152 TEST_f_f (tgamma, -0x2a.00004p0L, minus_zero, UNDERFLOW_EXCEPTION_FLOAT),
d8cd06db 14153#else
74c57478
JM		 14154 TEST_f_f (tgamma, -0x29.ffffcp0L, 1.8658121573125798145204120066590953505132e-46L),
14155 TEST_f_f (tgamma, -0x2a.00004p0L, -1.8657587834931410688246126853566488626385e-46L),
14156#endif
14157#ifndef TEST_FLOAT
14158 TEST_f_f (tgamma, 0x8.0000000000008p0L, 5.0400000000000180457125667322294144477136e+03L),
14159 TEST_f_f (tgamma, 0x7.ffffffffffffcp0L, 5.0399999999999909771437166339103165198442e+03L),
14160 TEST_f_f (tgamma, 0x7.0000000000004p0L, 7.2000000000000119762397445457359071259652e+02L),
14161 TEST_f_f (tgamma, 0x6.ffffffffffffcp0L, 7.1999999999999880237602554542848858572672e+02L),
14162 TEST_f_f (tgamma, 0x6.0000000000004p0L, 1.2000000000000018184042734842640022086408e+02L),
14163 TEST_f_f (tgamma, 0x5.ffffffffffffcp0L, 1.1999999999999981815957265157389249327533e+02L),
14164 TEST_f_f (tgamma, 0x5.0000000000004p0L, 2.4000000000000032104829055124673225982803e+01L),
14165 TEST_f_f (tgamma, 0x4.ffffffffffffcp0L, 2.3999999999999967895170944875373910918544e+01L),
14166 TEST_f_f (tgamma, 0x4.0000000000004p0L, 6.0000000000000066939396342309789716341613e+00L),
14167 TEST_f_f (tgamma, 0x3.ffffffffffffep0L, 5.9999999999999966530301828845138185025345e+00L),
14168 TEST_f_f (tgamma, 0x3.0000000000002p0L, 2.0000000000000008195971324717875960213536e+00L),
14169 TEST_f_f (tgamma, 0x2.ffffffffffffep0L, 1.9999999999999991804028675282128956223990e+00L),
14170 TEST_f_f (tgamma, 0x2.0000000000002p0L, 1.0000000000000001877539613108624482361963e+00L),
14171 TEST_f_f (tgamma, 0x1.fffffffffffffp0L, 9.9999999999999990612301934456883679778984e-01L),
14172 TEST_f_f (tgamma, 0x1.0000000000001p0L, 9.9999999999999987183237573039992418700531e-01L),
14173 TEST_f_f (tgamma, 0x0.fffffffffffff8p0L, 1.0000000000000000640838121348000744796665e+00L),
14174 TEST_f_f (tgamma, -0x0.fffffffffffff8p0L, -9.0071992547409924227843350984672961392521e+15L),
14175 TEST_f_f (tgamma, -0x1.0000000000001p0L, 4.5035996273704955772156649015331740980405e+15L),
14176 TEST_f_f (tgamma, -0x1.fffffffffffffp0L, 2.2517998136852484613921675492337776673289e+15L),
14177 TEST_f_f (tgamma, -0x2.0000000000002p0L, -1.1258999068426235386078324507668462444260e+15L),
14178 TEST_f_f (tgamma, -0x2.ffffffffffffep0L, -3.7529996894754154268627807196691509198813e+14L),
14179 TEST_f_f (tgamma, -0x3.0000000000002p0L, 3.7529996894754112398038859470009084971438e+14L),
14180 TEST_f_f (tgamma, -0x3.ffffffffffffep0L, 9.3824992236885396088236184658402406857503e+13L),
14181 TEST_f_f (tgamma, -0x4.0000000000004p0L, -4.6912496118442603911763815341745722862351e+13L),
14182 TEST_f_f (tgamma, -0x4.ffffffffffffcp0L, -9.3824992236885475509805702650262155809819e+12L),
14183 TEST_f_f (tgamma, -0x5.0000000000004p0L, 9.3824992236885191156860964016850034672946e+12L),
14184 TEST_f_f (tgamma, -0x5.ffffffffffffcp0L, 1.5637498706147581566449098589862357835505e+12L),
14185 TEST_f_f (tgamma, -0x6.0000000000004p0L, -1.5637498706147529544662012521330708016396e+12L),
14186 TEST_f_f (tgamma, -0x6.ffffffffffffcp0L, -2.2339283865925119357965832452642909859289e+11L),
14187 TEST_f_f (tgamma, -0x7.0000000000004p0L, 2.2339283865925039372192897706214475877342e+11L),
14188 TEST_f_f (tgamma, -0x7.ffffffffffffcp0L, 2.7924104832406402297655703264222230055898e+10L),
14189 TEST_f_f (tgamma, -0x8.0000000000008p0L, -1.3962052416203121511868106259843527348026e+10L),
14190 TEST_f_f (tgamma, -0x9.ffffffffffff8p0L, 1.5513391573559147700413058496716749249803e+08L),
14191 TEST_f_f (tgamma, -0xa.0000000000008p0L, -1.5513391573559018084419393002828541166901e+08L),
14192 TEST_f_f (tgamma, -0x13.ffffffffffffp0L, 1.1569515572952029402736625857313236848570e-04L),
14193 TEST_f_f (tgamma, -0x14.000000000001p0L, -1.1569515572951781096476686854873801225397e-04L),
14194 TEST_f_f (tgamma, -0x1d.ffffffffffffp0L, 1.0611571800204311628217068863959963842891e-18L),
14195 TEST_f_f (tgamma, -0x1e.000000000001p0L, -1.0611571800204053929094168642022073530425e-18L),
14196 TEST_f_f (tgamma, -0x27.fffffffffffep0L, 1.7249032006742266376460389310340465554361e-34L),
14197 TEST_f_f (tgamma, -0x28.000000000002p0L, -1.7249032006741359094184881234822934593822e-34L),
14198 TEST_f_f (tgamma, -0x28.fffffffffffep0L, -4.2070809772542120404320040128839297118648e-36L),
14199 TEST_f_f (tgamma, -0x29.000000000002p0L, 4.2070809772539892938717205103652583609422e-36L),
14200 TEST_f_f (tgamma, -0x29.fffffffffffep0L, 1.0016859469652887505173040814397197718981e-37L),
14201 TEST_f_f (tgamma, -0x2a.000000000002p0L, -1.0016859469652353766978684241048308120274e-37L),
14202 TEST_f_f (tgamma, -0x31.fffffffffffep0L, 4.6273774273632946947805289899230181990085e-51L),
14203 TEST_f_f (tgamma, -0x32.000000000002p0L, -4.6273774273630367887073532197576655720178e-51L),
14204 TEST_f_f (tgamma, -0x63.fffffffffffcp0L, 7.5400833348840965463348754984345825364294e-145L),
14205 TEST_f_f (tgamma, -0x64.000000000004p0L, -7.5400833348831085791638490135462230991587e-145L),
14206 TEST_f_f (tgamma, -0x95.fffffffffff8p0L, 6.1582369322723207086020016423767264008839e-250L),
14207 TEST_f_f (tgamma, -0x96.000000000008p0L, -6.1582369322705655439003240743176243138734e-250L),
14208 TEST_f_f (tgamma, -0xb4.fffffffffff8p0L, -9.6760879059917574597728750098636253931457e-319L, UNDERFLOW_EXCEPTION_DOUBLE),
14209 TEST_f_f (tgamma, -0xb5.000000000008p0L, 9.6760879059888966544677044221698800670218e-319L, UNDERFLOW_EXCEPTION_DOUBLE),
14210 TEST_f_f (tgamma, -0xb5.fffffffffff8p0L, 5.3165318164789884455066481673086605454904e-321L, UNDERFLOW_EXCEPTION_DOUBLE),
14211 TEST_f_f (tgamma, -0xb6.000000000008p0L, -5.3165318164774149139661976747137185876909e-321L, UNDERFLOW_EXCEPTION_DOUBLE),
14212 TEST_f_f (tgamma, -0xb6.fffffffffff8p0L, -2.9052086428846935908287469917922960610289e-323L, UNDERFLOW_EXCEPTION_DOUBLE),
14213 TEST_f_f (tgamma, -0xb7.000000000008p0L, 2.9052086428838328351126988236541632950925e-323L, UNDERFLOW_EXCEPTION_DOUBLE),
d8cd06db 14214# if !defined TEST_LDOUBLE || LDBL_MAX_EXP <= 1024
74c57478
JM		 14215 TEST_f_f (tgamma, -0xb7.fffffffffff8p0L, plus_zero, UNDERFLOW_EXCEPTION_DOUBLE),
14216 TEST_f_f (tgamma, -0xb8.000000000008p0L, minus_zero, UNDERFLOW_EXCEPTION_DOUBLE),
d8cd06db 14217# else
74c57478
JM		 14218 TEST_f_f (tgamma, -0xb7.fffffffffff8p0L, 1.5789177406982032823826953250736039527543e-325L),
14219 TEST_f_f (tgamma, -0xb8.000000000008p0L, -1.5789177406977349925854817486109369828857e-325L),
d8cd06db
JM		 14220# endif
14221#endif
14222#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
74c57478
JM		 14223 TEST_f_f (tgamma, 0x8.00000000000000000000000004p0L, 5.0400000000000000000000000000020034765587e+03L),
14224 TEST_f_f (tgamma, 0x7.fffffffffffffffffffffffffep0L, 5.0399999999999999999999999999989982617206e+03L),
14225 TEST_f_f (tgamma, 0x7.00000000000000000000000002p0L, 7.2000000000000000000000000000013296297113e+02L),
14226 TEST_f_f (tgamma, 0x6.fffffffffffffffffffffffffep0L, 7.1999999999999999999999999999986703702887e+02L),
14227 TEST_f_f (tgamma, 0x6.00000000000000000000000002p0L, 1.2000000000000000000000000000002018834292e+02L),
14228 TEST_f_f (tgamma, 0x5.fffffffffffffffffffffffffep0L, 1.1999999999999999999999999999997981165708e+02L),
14229 TEST_f_f (tgamma, 0x5.00000000000000000000000002p0L, 2.4000000000000000000000000000003564352042e+01L),
14230 TEST_f_f (tgamma, 0x4.fffffffffffffffffffffffffep0L, 2.3999999999999999999999999999996435647958e+01L),
14231 TEST_f_f (tgamma, 0x4.00000000000000000000000002p0L, 6.0000000000000000000000000000007431765907e+00L),
14232 TEST_f_f (tgamma, 0x3.ffffffffffffffffffffffffffp0L, 5.9999999999999999999999999999996284117046e+00L),
14233 TEST_f_f (tgamma, 0x3.00000000000000000000000001p0L, 2.0000000000000000000000000000000909935607e+00L),
14234 TEST_f_f (tgamma, 0x2.ffffffffffffffffffffffffffp0L, 1.9999999999999999999999999999999090064393e+00L),
14235 TEST_f_f (tgamma, 0x2.00000000000000000000000001p0L, 1.0000000000000000000000000000000208448771e+00L),
14236 TEST_f_f (tgamma, 0x1.ffffffffffffffffffffffffff8p0L, 9.9999999999999999999999999999998957756146e-01L),
14237 TEST_f_f (tgamma, 0x1.000000000000000000000000008p0L, 9.9999999999999999999999999999998577053525e-01L),
14238 TEST_f_f (tgamma, 0x0.ffffffffffffffffffffffffffcp0L, 1.0000000000000000000000000000000071147324e+00L),
14239 TEST_f_f (tgamma, -0x0.ffffffffffffffffffffffffffcp0L, -8.1129638414606681695789005144064422784335e+31L),
14240 TEST_f_f (tgamma, -0x1.000000000000000000000000008p0L, 4.0564819207303340847894502572031577215665e+31L),
14241 TEST_f_f (tgamma, -0x1.ffffffffffffffffffffffffff8p0L, 2.0282409603651670423947251286016461392168e+31L),
14242 TEST_f_f (tgamma, -0x2.00000000000000000000000001p0L, -1.0141204801825835211973625643007538607832e+31L),
14243 TEST_f_f (tgamma, -0x2.ffffffffffffffffffffffffffp0L, -3.3804016006086117373245418810028760196114e+30L),
14244 TEST_f_f (tgamma, -0x3.00000000000000000000000001p0L, 3.3804016006086117373245418810024573137219e+30L),
14245 TEST_f_f (tgamma, -0x3.ffffffffffffffffffffffffffp0L, 8.4510040015215293433113547025072942156952e+29L),
14246 TEST_f_f (tgamma, -0x4.00000000000000000000000002p0L, -4.2255020007607646716556773512527057843048e+29L),
14247 TEST_f_f (tgamma, -0x4.fffffffffffffffffffffffffep0L, -8.4510040015215293433113547025080884313904e+28L),
14248 TEST_f_f (tgamma, -0x5.00000000000000000000000002p0L, 8.4510040015215293433113547025052449019430e+28L),
14249 TEST_f_f (tgamma, -0x5.fffffffffffffffffffffffffep0L, 1.4085006669202548905518924504180378867132e+28L),
14250 TEST_f_f (tgamma, -0x6.00000000000000000000000002p0L, -1.4085006669202548905518924504175176688423e+28L),
14251 TEST_f_f (tgamma, -0x6.fffffffffffffffffffffffffep0L, -2.0121438098860784150741320720257967542615e+27L),
14252 TEST_f_f (tgamma, -0x7.00000000000000000000000002p0L, 2.0121438098860784150741320720249968965322e+27L),
14253 TEST_f_f (tgamma, -0x7.fffffffffffffffffffffffffep0L, 2.5151797623575980188426650900322769448110e+26L),
14254 TEST_f_f (tgamma, -0x8.00000000000000000000000004p0L, -1.2575898811787990094213325450153421028080e+26L),
14255 TEST_f_f (tgamma, -0x9.fffffffffffffffffffffffffcp0L, 1.3973220901986655660237028277960625420495e+24L),
14256 TEST_f_f (tgamma, -0xa.00000000000000000000000004p0L, -1.3973220901986655660237028277947663821128e+24L),
14257 TEST_f_f (tgamma, -0x13.fffffffffffffffffffffffff8p0L, 1.0420893204640670202556853709074896123293e+12L),
14258 TEST_f_f (tgamma, -0x14.00000000000000000000000008p0L, -1.0420893204640670202556853709050065497299e+12L),
14259 TEST_f_f (tgamma, -0x1d.fffffffffffffffffffffffff8p0L, 9.5580541610429641982963434151488827190079e-03L),
14260 TEST_f_f (tgamma, -0x1e.00000000000000000000000008p0L, -9.5580541610429641982963434151231128067179e-03L),
14261 TEST_f_f (tgamma, -0x27.fffffffffffffffffffffffffp0L, 1.5536546823612837336494536911280147806523e-18L),
14262 TEST_f_f (tgamma, -0x28.0000000000000000000000001p0L, -1.5536546823612837336494536911189419578973e-18L),
14263 TEST_f_f (tgamma, -0x28.fffffffffffffffffffffffffp0L, -3.7894016642958139845108626612879138384405e-20L),
14264 TEST_f_f (tgamma, -0x29.0000000000000000000000001p0L, 3.7894016642958139845108626612656391824122e-20L),
14265 TEST_f_f (tgamma, -0x29.fffffffffffffffffffffffffp0L, 9.0223849149900332964544349078285357440663e-22L),
14266 TEST_f_f (tgamma, -0x2a.0000000000000000000000001p0L, -9.0223849149900332964544349077751619246306e-22L),
14267 TEST_f_f (tgamma, -0x31.fffffffffffffffffffffffffp0L, 4.1679710515150795310771069868348482819424e-35L),
14268 TEST_f_f (tgamma, -0x32.0000000000000000000000001p0L, -4.1679710515150795310771069868090576746248e-35L),
14269 TEST_f_f (tgamma, -0x63.ffffffffffffffffffffffffep0L, 6.7915032994648558610510614163560656864280e-129L),
14270 TEST_f_f (tgamma, -0x64.0000000000000000000000002p0L, -6.7915032994648558610510614162572689693253e-129L),
14271 TEST_f_f (tgamma, -0x95.ffffffffffffffffffffffffcp0L, 5.5468467106873795353190582463444660395353e-234L),
14272 TEST_f_f (tgamma, -0x96.0000000000000000000000004p0L, -5.5468467106873795353190582461689495693675e-234L),
14273 TEST_f_f (tgamma, -0xb4.ffffffffffffffffffffffffcp0L, -8.7154451775644399729745472278589884205029e-303L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14274 TEST_f_f (tgamma, -0xb5.0000000000000000000000004p0L, 8.7154451775644399729745472275729078899858e-303L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14275 TEST_f_f (tgamma, -0xb5.ffffffffffffffffffffffffcp0L, 4.7887061415189230620739270482742524864974e-305L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14276 TEST_f_f (tgamma, -0xb6.0000000000000000000000004p0L, -4.7887061415189230620739270481168993324524e-305L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14277 TEST_f_f (tgamma, -0xb6.ffffffffffffffffffffffffcp0L, -2.6167793123054224382917634143575601407067e-307L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14278 TEST_f_f (tgamma, -0xb7.0000000000000000000000004p0L, 2.6167793123054224382917634142714845691019e-307L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14279 TEST_f_f (tgamma, -0xb7.ffffffffffffffffffffffffcp0L, 1.4221626697312078468976975078030462044826e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
14280 TEST_f_f (tgamma, -0xb8.0000000000000000000000004p0L, -1.4221626697312078468976975077562172247612e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
14281 TEST_f_f (tgamma, -0xbb.ffffffffffffffffffffffffcp0L, 1.1756150745511026776007338998283058108448e-318L, UNDERFLOW_EXCEPTION_DOUBLE),
14282 TEST_f_f (tgamma, -0xbc.0000000000000000000000004p0L, -1.1756150745511026776007338997894360215107e-318L, UNDERFLOW_EXCEPTION_DOUBLE),
14283 TEST_f_f (tgamma, -0xbc.ffffffffffffffffffffffffcp0L, -6.2201855796354639026493857133773832713743e-321L, UNDERFLOW_EXCEPTION_DOUBLE),
14284 TEST_f_f (tgamma, -0xbd.0000000000000000000000004p0L, 6.2201855796354639026493857131715153125175e-321L, UNDERFLOW_EXCEPTION_DOUBLE),
14285 TEST_f_f (tgamma, -0xbd.ffffffffffffffffffffffffcp0L, 3.2737818840186652119207293228302560914295e-323L, UNDERFLOW_EXCEPTION_DOUBLE),
14286 TEST_f_f (tgamma, -0xbe.0000000000000000000000004p0L, -3.2737818840186652119207293227217957948294e-323L, UNDERFLOW_EXCEPTION_DOUBLE),
d8cd06db 14287# if LDBL_MAX_EXP <= 1024
74c57478
JM		 14288 TEST_f_f (tgamma, -0xbe.ffffffffffffffffffffffffcp0L, minus_zero, UNDERFLOW_EXCEPTION_DOUBLE),
14289 TEST_f_f (tgamma, -0xbf.0000000000000000000000004p0L, plus_zero, UNDERFLOW_EXCEPTION_DOUBLE),
d8cd06db 14290# else
74c57478
JM		 14291 TEST_f_f (tgamma, -0xbe.ffffffffffffffffffffffffcp0L, -1.7140219288055838805867692789687487834686e-325L),
14292 TEST_f_f (tgamma, -0xbf.0000000000000000000000004p0L, 1.7140219288055838805867692789119066543632e-325L),
d8cd06db
JM		 14293# endif
14294#endif
14295#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM		 14296 TEST_f_f (tgamma, 0x8.000000000000001p0L, 5.0400000000000000088113830892247051102283e+03L),
14297 TEST_f_f (tgamma, 0x7.fffffffffffffff8p0L, 5.0399999999999999955943084553876474508520e+03L),
14298 TEST_f_f (tgamma, 0x7.0000000000000008p0L, 7.2000000000000000058477733127664675369681e+02L),
14299 TEST_f_f (tgamma, 0x6.fffffffffffffff8p0L, 7.1999999999999999941522266872335324679893e+02L),
14300 TEST_f_f (tgamma, 0x6.0000000000000008p0L, 1.2000000000000000008878927116622375680433e+02L),
14301 TEST_f_f (tgamma, 0x5.fffffffffffffff8p0L, 1.1999999999999999991121072883377624326546e+02L),
14302 TEST_f_f (tgamma, 0x5.0000000000000008p0L, 2.4000000000000000015676186062072582846211e+01L),
14303 TEST_f_f (tgamma, 0x4.fffffffffffffff8p0L, 2.3999999999999999984323813937927417165027e+01L),
14304 TEST_f_f (tgamma, 0x4.0000000000000008p0L, 6.0000000000000000032685252120268430507939e+00L),
14305 TEST_f_f (tgamma, 0x3.fffffffffffffffcp0L, 5.9999999999999999983657373939865784753909e+00L),
14306 TEST_f_f (tgamma, 0x3.0000000000000004p0L, 2.0000000000000000004001939123397399171482e+00L),
14307 TEST_f_f (tgamma, 0x2.fffffffffffffffcp0L, 1.9999999999999999995998060876602600829690e+00L),
14308 TEST_f_f (tgamma, 0x2.0000000000000004p0L, 1.0000000000000000000916767389213195151634e+00L),
14309 TEST_f_f (tgamma, 0x1.fffffffffffffffep0L, 9.9999999999999999995416163053934024243282e-01L),
14310 TEST_f_f (tgamma, 0x1.0000000000000002p0L, 9.9999999999999999993741815221210931418291e-01L),
14311 TEST_f_f (tgamma, 0x0.ffffffffffffffffp0L, 1.0000000000000000000312909238939453429173e+00L),
14312 TEST_f_f (tgamma, -0x0.ffffffffffffffffp0L, -1.8446744073709551616422784335098467139470e+19L),
14313 TEST_f_f (tgamma, -0x1.0000000000000002p0L, 9.2233720368547758075772156649015328607596e+18L),
14314 TEST_f_f (tgamma, -0x1.fffffffffffffffep0L, 4.6116860184273879044613921675492335697983e+18L),
14315 TEST_f_f (tgamma, -0x2.0000000000000004p0L, -2.3058430092136939515386078324507664305064e+18L),
14316 TEST_f_f (tgamma, -0x2.fffffffffffffffcp0L, -7.6861433640456465087601961140530007887063e+17L),
14317 TEST_f_f (tgamma, -0x3.0000000000000004p0L, 7.6861433640456465045731372192803325462836e+17L),
14318 TEST_f_f (tgamma, -0x3.fffffffffffffffcp0L, 1.9215358410114116272942156951799168638773e+17L),
14319 TEST_f_f (tgamma, -0x4.0000000000000008p0L, -9.6076792050570581270578430482008313684602e+16L),
14320 TEST_f_f (tgamma, -0x4.fffffffffffffff8p0L, -1.9215358410114116280884313903598337283601e+16L),
14321 TEST_f_f (tgamma, -0x5.0000000000000008p0L, 1.9215358410114116252449019429734996071487e+16L),
14322 TEST_f_f (tgamma, -0x5.fffffffffffffff8p0L, 3.2025597350190193803788671320812043622696e+15L),
14323 TEST_f_f (tgamma, -0x6.0000000000000008p0L, -3.2025597350190193751766884234743511972877e+15L),
14324 TEST_f_f (tgamma, -0x6.fffffffffffffff8p0L, -4.5750853357414562579675426149912896787735e+14L),
14325 TEST_f_f (tgamma, -0x7.0000000000000008p0L, 4.5750853357414562499689653215166468353753e+14L),
14326 TEST_f_f (tgamma, -0x7.fffffffffffffff8p0L, 5.7188566696768203227694481100089533685959e+13L),
14327 TEST_f_f (tgamma, -0x8.000000000000001p0L, -2.8594283348384101534210280804672371201060e+13L),
14328 TEST_f_f (tgamma, -0x9.fffffffffffffffp0L, 3.1771425942649001828476427167843945971988e+11L),
14329 TEST_f_f (tgamma, -0xa.000000000000001p0L, -3.1771425942649001698860433502350057763905e+11L),
14330 TEST_f_f (tgamma, -0x13.ffffffffffffffep0L, 2.3694367893405502075347562184931828448654e-01L),
14331 TEST_f_f (tgamma, -0x14.000000000000002p0L, -2.3694367893405501827041302245929389013031e-01L),
14332 TEST_f_f (tgamma, -0x1d.ffffffffffffffep0L, 2.1732499046818166459536268654187775086902e-15L),
14333 TEST_f_f (tgamma, -0x1e.000000000000002p0L, -2.1732499046818166201837145753965837196590e-15L),
14334 TEST_f_f (tgamma, -0x27.ffffffffffffffcp0L, 3.5326017549807232935581894777156474496719e-31L),
14335 TEST_f_f (tgamma, -0x28.000000000000004p0L, -3.5326017549807232028299619269080956965758e-31L),
14336 TEST_f_f (tgamma, -0x28.ffffffffffffffcp0L, -8.6161018414163982777002940498289948893044e-33L),
14337 TEST_f_f (tgamma, -0x29.000000000000004p0L, 8.6161018414163980549537337663264762179535e-33L),
14338 TEST_f_f (tgamma, -0x29.ffffffffffffffcp0L, 2.0514528193848567329552463626090806737389e-34L),
14339 TEST_f_f (tgamma, -0x2a.000000000000004p0L, -2.0514528193848566795814269269517457847791e-34L),
14340 TEST_f_f (tgamma, -0x31.ffffffffffffffcp0L, 9.4768689712397635680446279661359728835046e-48L),
14341 TEST_f_f (tgamma, -0x32.000000000000004p0L, -9.4768689712397633101385547903658075308777e-48L),
14342 TEST_f_f (tgamma, -0x63.ffffffffffffff8p0L, 1.5442090669841618542494279375256856430049e-141L),
14343 TEST_f_f (tgamma, -0x64.000000000000008p0L, -1.5442090669841617554527108348771968070612e-141L),
14344 TEST_f_f (tgamma, -0x95.ffffffffffffffp0L, 1.2612069237291916400144732227892704713839e-246L),
14345 TEST_f_f (tgamma, -0x96.00000000000001p0L, -1.2612069237291914644980030550324645611752e-246L),
14346 TEST_f_f (tgamma, -0xb4.ffffffffffffffp0L, -1.9816628031468191243385005680879281767694e-315L),
14347 TEST_f_f (tgamma, -0xb5.00000000000001p0L, 1.9816628031468188382579700510291588022368e-315L),
14348 TEST_f_f (tgamma, -0xb5.ffffffffffffffp0L, 1.0888257160147357826865964233809723297472e-317L),
14349 TEST_f_f (tgamma, -0xb6.00000000000001p0L, -1.0888257160147356253334423783317128355514e-317L),
14350 TEST_f_f (tgamma, -0xb6.ffffffffffffffp0L, -5.9498673006269714905418984659220067091260e-320L),
14351 TEST_f_f (tgamma, -0xb7.00000000000001p0L, 5.9498673006269706297861824177538685763601e-320L),
14352 TEST_f_f (tgamma, -0xb7.ffffffffffffffp0L, 3.2336235329494410277123118903958061569834e-322L),
14353 TEST_f_f (tgamma, -0xb8.00000000000001p0L, -3.2336235329494405594225146768193434900135e-322L),
14354 TEST_f_f (tgamma, -0xbb.ffffffffffffffp0L, 2.6730392040715350119087465463119939092815e-331L),
14355 TEST_f_f (tgamma, -0xbc.00000000000001p0L, -2.6730392040715346232108532050343031951651e-331L),
14356 TEST_f_f (tgamma, -0xbc.ffffffffffffffp0L, -1.4143064571807063556111222197839950086445e-333L),
14357 TEST_f_f (tgamma, -0xbd.00000000000001p0L, 1.4143064571807061497431633629389135273431e-333L),
14358 TEST_f_f (tgamma, -0xbd.ffffffffffffffp0L, 7.4437181956879281879706555863416819210399e-336L),
14359 TEST_f_f (tgamma, -0xbe.00000000000001p0L, -7.4437181956879271033676895858841525581153e-336L),
14360 TEST_f_f (tgamma, -0xbe.ffffffffffffffp0L, -3.8972346574282346536709453101948570578636e-338L),
14361 TEST_f_f (tgamma, -0xbf.00000000000001p0L, 3.8972346574282340852496542564155275274974e-338L),
14362 TEST_f_f (tgamma, -0xf9.ffffffffffffffp0L, 2.2289142548411573883553287678043297937797e-476L),
14363 TEST_f_f (tgamma, -0xfa.00000000000001p0L, -2.2289142548411570466476165308364665814265e-476L),
14364 TEST_f_f (tgamma, -0x1f3.fffffffffffffep0L, 2.9528489142763141594943668922610562530068e-1118L),
14365 TEST_f_f (tgamma, -0x1f4.00000000000002p0L, -2.9528489142763131406565394149878256133744e-1118L),
14366 TEST_f_f (tgamma, -0x2ed.fffffffffffffcp0L, 6.9801511765871818502006905472380418430269e-1817L),
14367 TEST_f_f (tgamma, -0x2ee.00000000000004p0L, -6.9801511765871767194421856376592926002995e-1817L),
14368 TEST_f_f (tgamma, -0x3e7.fffffffffffffcp0L, 4.4768809295877296071892611539415773519036e-2552L),
14369 TEST_f_f (tgamma, -0x3e8.00000000000004p0L, -4.4768809295877261735541135972060089530309e-2552L),
14370 TEST_f_f (tgamma, -0x4e1.fffffffffffff8p0L, 5.4651488569236507565341414077911790252381e-3315L),
14371 TEST_f_f (tgamma, -0x4e2.00000000000008p0L, -5.4651488569236421026544487194247355967789e-3315L),
14372 TEST_f_f (tgamma, -0x5db.fffffffffffff8p0L, 1.8718211510339187689122114747834510481993e-4099L),
14373 TEST_f_f (tgamma, -0x5dc.00000000000008p0L, -1.8718211510339157291960718369454861898499e-4099L),
14374 TEST_f_f (tgamma, -0x6d5.fffffffffffff8p0L, 4.2925786447266492555651378780094011518063e-4902L),
14375 TEST_f_f (tgamma, -0x6d6.00000000000008p0L, -4.2925786447266421378134368786479937285900e-4902L),
14376 TEST_f_f (tgamma, -0x6e2.fffffffffffff8p0L, -2.8229173528168668283609231628661510187536e-4944L, UNDERFLOW_EXCEPTION),
14377 TEST_f_f (tgamma, -0x6e3.00000000000008p0L, 2.8229173528168621428945467532322397890424e-4944L, UNDERFLOW_EXCEPTION),
14378 TEST_f_f (tgamma, -0x6e3.fffffffffffff8p0L, 1.6002932839097884515524894602387278842659e-4947L, UNDERFLOW_EXCEPTION),
14379 TEST_f_f (tgamma, -0x6e4.00000000000008p0L, -1.6002932839097857951909742110188634438017e-4947L, UNDERFLOW_EXCEPTION),
14380 TEST_f_f (tgamma, -0x6e4.fffffffffffff8p0L, -9.0668174725767051085164382743343408095146e-4951L, UNDERFLOW_EXCEPTION),
14381 TEST_f_f (tgamma, -0x6e5.00000000000008p0L, 9.0668174725766900571689083050287838090189e-4951L, UNDERFLOW_EXCEPTION),
d8cd06db 14382# if LDBL_MANT_DIG <= 64
74c57478
JM		 14383 TEST_f_f (tgamma, -0x6e5.fffffffffffff8p0L, plus_zero, UNDERFLOW_EXCEPTION),
14384 TEST_f_f (tgamma, -0x6e6.00000000000008p0L, minus_zero, UNDERFLOW_EXCEPTION),
d8cd06db 14385# else
74c57478
JM		 14386 TEST_f_f (tgamma, -0x6e5.fffffffffffff8p0L, 5.1340982290921319983501912122292601780326e-4954L, UNDERFLOW_EXCEPTION),
14387 TEST_f_f (tgamma, -0x6e6.00000000000008p0L, -5.1340982290921234748578193083614111497314e-4954L, UNDERFLOW_EXCEPTION),
d8cd06db
JM		 14388# endif
14389# if LDBL_MANT_DIG >= 113
74c57478
JM		 14390 TEST_f_f (tgamma, 0x8.0000000000000000000000000008p0L, 5.0400000000000000000000000000000156521606e+03L),
14391 TEST_f_f (tgamma, 0x7.fffffffffffffffffffffffffffcp0L, 5.0399999999999999999999999999999921739197e+03L),
14392 TEST_f_f (tgamma, 0x7.0000000000000000000000000004p0L, 7.2000000000000000000000000000000103877321e+02L),
14393 TEST_f_f (tgamma, 0x6.fffffffffffffffffffffffffffcp0L, 7.1999999999999999999999999999999896122679e+02L),
14394 TEST_f_f (tgamma, 0x6.0000000000000000000000000004p0L, 1.2000000000000000000000000000000015772143e+02L),
14395 TEST_f_f (tgamma, 0x5.fffffffffffffffffffffffffffcp0L, 1.1999999999999999999999999999999984227857e+02L),
14396 TEST_f_f (tgamma, 0x5.0000000000000000000000000004p0L, 2.4000000000000000000000000000000027846500e+01L),
14397 TEST_f_f (tgamma, 0x4.fffffffffffffffffffffffffffcp0L, 2.3999999999999999999999999999999972153500e+01L),
14398 TEST_f_f (tgamma, 0x4.0000000000000000000000000004p0L, 6.0000000000000000000000000000000058060671e+00L),
14399 TEST_f_f (tgamma, 0x3.fffffffffffffffffffffffffffep0L, 5.9999999999999999999999999999999970969664e+00L),
14400 TEST_f_f (tgamma, 0x3.0000000000000000000000000002p0L, 2.0000000000000000000000000000000007108872e+00L),
14401 TEST_f_f (tgamma, 0x2.fffffffffffffffffffffffffffep0L, 1.9999999999999999999999999999999992891128e+00L),
14402 TEST_f_f (tgamma, 0x2.0000000000000000000000000002p0L, 1.0000000000000000000000000000000001628506e+00L),
14403 TEST_f_f (tgamma, 0x1.ffffffffffffffffffffffffffffp0L, 9.9999999999999999999999999999999991857470e-01L),
14404 TEST_f_f (tgamma, 0x1.0000000000000000000000000001p0L, 9.9999999999999999999999999999999988883231e-01L),
14405 TEST_f_f (tgamma, 0x0.ffffffffffffffffffffffffffff8p0L, 1.0000000000000000000000000000000000555838e+00L),
14406 TEST_f_f (tgamma, -0x0.ffffffffffffffffffffffffffff8p0L, -1.0384593717069655257060992658440192422784e+34L),
14407 TEST_f_f (tgamma, -0x1.0000000000000000000000000001p0L, 5.1922968585348276285304963292200955772157e+33L),
14408 TEST_f_f (tgamma, -0x1.ffffffffffffffffffffffffffffp0L, 2.5961484292674138142652481646100484613922e+33L),
14409 TEST_f_f (tgamma, -0x2.0000000000000000000000000002p0L, -1.2980742146337069071326240823050235386078e+33L),
14410 TEST_f_f (tgamma, -0x2.fffffffffffffffffffffffffffep0L, -4.3269140487790230237754136076834154268628e+32L),
14411 TEST_f_f (tgamma, -0x3.0000000000000000000000000002p0L, 4.3269140487790230237754136076834112398039e+32L),
14412 TEST_f_f (tgamma, -0x3.fffffffffffffffffffffffffffep0L, 1.0817285121947557559438534019208539608824e+32L),
14413 TEST_f_f (tgamma, -0x4.0000000000000000000000000004p0L, -5.4086425609737787797192670096042603911764e+31L),
14414 TEST_f_f (tgamma, -0x4.fffffffffffffffffffffffffffcp0L, -1.0817285121947557559438534019208547550981e+31L),
14415 TEST_f_f (tgamma, -0x5.0000000000000000000000000004p0L, 1.0817285121947557559438534019208519115686e+31L),
14416 TEST_f_f (tgamma, -0x5.fffffffffffffffffffffffffffcp0L, 1.8028808536579262599064223365347581566449e+30L),
14417 TEST_f_f (tgamma, -0x6.0000000000000000000000000004p0L, -1.8028808536579262599064223365347529544662e+30L),
14418 TEST_f_f (tgamma, -0x6.fffffffffffffffffffffffffffcp0L, -2.5755440766541803712948890521925119357966e+29L),
14419 TEST_f_f (tgamma, -0x7.0000000000000000000000000004p0L, 2.5755440766541803712948890521925039372193e+29L),
14420 TEST_f_f (tgamma, -0x7.fffffffffffffffffffffffffffcp0L, 3.2194300958177254641186113152406402297656e+28L),
14421 TEST_f_f (tgamma, -0x8.0000000000000000000000000008p0L, -1.6097150479088627320593056576203121511868e+28L),
14422 TEST_f_f (tgamma, -0x9.fffffffffffffffffffffffffff8p0L, 1.7885722754542919245103396195781369922635e+26L),
14423 TEST_f_f (tgamma, -0xa.0000000000000000000000000008p0L, -1.7885722754542919245103396195781240306642e+26L),
14424 TEST_f_f (tgamma, -0x13.fffffffffffffffffffffffffffp0L, 1.3338743301940057859272772747600099590309e+14L),
14425 TEST_f_f (tgamma, -0x14.000000000000000000000000001p0L, -1.3338743301940057859272772747599851284049e+14L),
14426 TEST_f_f (tgamma, -0x1d.fffffffffffffffffffffffffffp0L, 1.2234309326134994173819319571374205986026e+00L),
14427 TEST_f_f (tgamma, -0x1e.000000000000000000000000001p0L, -1.2234309326134994173819319571373948286903e+00L),
14428 TEST_f_f (tgamma, -0x27.ffffffffffffffffffffffffffep0L, 1.9886779934224431790713007246380976767855e-16L),
14429 TEST_f_f (tgamma, -0x28.000000000000000000000000002p0L, -1.9886779934224431790713007246380069485580e-16L),
14430 TEST_f_f (tgamma, -0x28.ffffffffffffffffffffffffffep0L, -4.8504341302986419001739042064343853066259e-18L),
14431 TEST_f_f (tgamma, -0x29.000000000000000000000000002p0L, 4.8504341302986419001739042064341625600656e-18L),
14432 TEST_f_f (tgamma, -0x29.ffffffffffffffffffffffffffep0L, 1.1548652691187242619461676681986633377063e-19L),
14433 TEST_f_f (tgamma, -0x2a.000000000000000000000000002p0L, -1.1548652691187242619461676681986099638869e-19L),
14434 TEST_f_f (tgamma, -0x31.ffffffffffffffffffffffffffep0L, 5.3350029459393017997786969431322287652396e-33L),
14435 TEST_f_f (tgamma, -0x32.000000000000000000000000002p0L, -5.3350029459393017997786969431319708591664e-33L),
14436 TEST_f_f (tgamma, -0x63.ffffffffffffffffffffffffffcp0L, 8.6931242233150155021453586128730281632676e-127L),
14437 TEST_f_f (tgamma, -0x64.000000000000000000000000004p0L, -8.6931242233150155021453586128720401960966e-127L),
14438 TEST_f_f (tgamma, -0x95.ffffffffffffffffffffffffff8p0L, 7.0999637896798458052083945552094635720486e-232L),
14439 TEST_f_f (tgamma, -0x96.000000000000000000000000008p0L, -7.0999637896798458052083945552077084073470e-232L),
14440 TEST_f_f (tgamma, -0xb4.ffffffffffffffffffffffffff8p0L, -1.1155769827282483165407420451477844041365e-300L),
14441 TEST_f_f (tgamma, -0xb5.000000000000000000000000008p0L, 1.1155769827282483165407420451474983236060e-300L),
14442 TEST_f_f (tgamma, -0xb5.ffffffffffffffffffffffffff8p0L, 6.1295438611442215194546266216911239298981e-303L),
14443 TEST_f_f (tgamma, -0xb6.000000000000000000000000008p0L, -6.1295438611442215194546266216895503983577e-303L),
14444 TEST_f_f (tgamma, -0xb6.ffffffffffffffffffffffffff8p0L, -3.3494775197509407210134571703230189921356e-305L),
14445 TEST_f_f (tgamma, -0xb7.000000000000000000000000008p0L, 3.3494775197509407210134571703221582364195e-305L),
14446 TEST_f_f (tgamma, -0xb7.ffffffffffffffffffffffffff8p0L, 1.8203682172559460440290528099581627396147e-307L),
14447 TEST_f_f (tgamma, -0xb8.000000000000000000000000008p0L, -1.8203682172559460440290528099576944498174e-307L),
14448 TEST_f_f (tgamma, -0xbb.ffffffffffffffffffffffffff8p0L, 1.5047872954254114273289393917555491216542e-316L),
14449 TEST_f_f (tgamma, -0xbc.000000000000000000000000008p0L, -1.5047872954254114273289393917551604237609e-316L),
14450 TEST_f_f (tgamma, -0xbc.ffffffffffffffffffffffffff8p0L, -7.9618375419333937953912137129923244334851e-319L),
14451 TEST_f_f (tgamma, -0xbd.000000000000000000000000008p0L, 7.9618375419333937953912137129902657538965e-319L),
14452 TEST_f_f (tgamma, -0xbd.ffffffffffffffffffffffffff8p0L, 4.1904408115438914712585335331538555086887e-321L),
14453 TEST_f_f (tgamma, -0xbe.000000000000000000000000008p0L, -4.1904408115438914712585335331527709057227e-321L),
14454 TEST_f_f (tgamma, -0xbe.ffffffffffffffffffffffffff8p0L, -2.1939480688711473671510646770439036908579e-323L),
14455 TEST_f_f (tgamma, -0xbf.000000000000000000000000008p0L, 2.1939480688711473671510646770433352695669e-323L),
14456 TEST_f_f (tgamma, -0xf9.ffffffffffffffffffffffffff8p0L, 1.2547671759429278005937024349858508569625e-461L),
14457 TEST_f_f (tgamma, -0xfa.000000000000000000000000008p0L, -1.2547671759429278005937024349855091492502e-461L),
14458 TEST_f_f (tgamma, -0x1f3.ffffffffffffffffffffffffffp0L, 1.6623061587520224800948170558276526986560e-1103L),
14459 TEST_f_f (tgamma, -0x1f4.00000000000000000000000001p0L, -1.6623061587520224800948170558266338608285e-1103L),
14460 TEST_f_f (tgamma, -0x2ed.fffffffffffffffffffffffffep0L, 3.9294757797334687313030998663853566763041e-1802L),
14461 TEST_f_f (tgamma, -0x2ee.00000000000000000000000002p0L, -3.9294757797334687313030998663802259177992e-1802L),
14462 TEST_f_f (tgamma, -0x3e7.fffffffffffffffffffffffffep0L, 2.5202599107841713834679953735597552855978e-2537L),
14463 TEST_f_f (tgamma, -0x3e8.00000000000000000000000002p0L, -2.5202599107841713834679953735563216504503e-2537L),
14464 TEST_f_f (tgamma, -0x4e1.fffffffffffffffffffffffffcp0L, 3.0766052944457032773369415396747635242705e-3300L),
14465 TEST_f_f (tgamma, -0x4e2.00000000000000000000000004p0L, -3.0766052944457032773369415396661096445778e-3300L),
14466 TEST_f_f (tgamma, -0x5db.fffffffffffffffffffffffffcp0L, 1.0537416297875703295453200836588944487917e-4084L),
14467 TEST_f_f (tgamma, -0x5dc.00000000000000000000000004p0L, -1.0537416297875703295453200836558547326520e-4084L),
14468 TEST_f_f (tgamma, -0x6d5.fffffffffffffffffffffffffcp0L, 2.4165069481061837867659591369998698607387e-4887L),
14469 TEST_f_f (tgamma, -0x6d6.00000000000000000000000004p0L, -2.4165069481061837867659591369927521090377e-4887L),
14470 TEST_f_f (tgamma, -0x6e2.fffffffffffffffffffffffffcp0L, -1.5891611922804672355414813803008070609431e-4929L),
14471 TEST_f_f (tgamma, -0x6e3.00000000000000000000000004p0L, 1.5891611922804672355414813802961215945667e-4929L),
14472 TEST_f_f (tgamma, -0x6e3.fffffffffffffffffffffffffcp0L, 9.0088502963745308137272187091882496519917e-4933L, UNDERFLOW_EXCEPTION),
14473 TEST_f_f (tgamma, -0x6e4.00000000000000000000000004p0L, -9.0088502963745308137272187091616860368392e-4933L, UNDERFLOW_EXCEPTION),
14474 TEST_f_f (tgamma, -0x6e4.fffffffffffffffffffffffffcp0L, -5.1041644738665896961627301468488672286746e-4936L, UNDERFLOW_EXCEPTION),
14475 TEST_f_f (tgamma, -0x6e5.00000000000000000000000004p0L, 5.1041644738665896961627301468338158811446e-4936L, UNDERFLOW_EXCEPTION),
14476 TEST_f_f (tgamma, -0x6e5.fffffffffffffffffffffffffcp0L, 2.8902403589278537350864836618623260468143e-4939L, UNDERFLOW_EXCEPTION),
14477 TEST_f_f (tgamma, -0x6e6.00000000000000000000000004p0L, -2.8902403589278537350864836618538025544424e-4939L, UNDERFLOW_EXCEPTION),
14478 TEST_f_f (tgamma, -0x6eb.fffffffffffffffffffffffffcp0L, 9.4152481960798287090819640211017219042636e-4959L, UNDERFLOW_EXCEPTION),
14479 TEST_f_f (tgamma, -0x6ec.00000000000000000000000004p0L, -9.4152481960798287090819640210739431797168e-4959L, UNDERFLOW_EXCEPTION),
14480 TEST_f_f (tgamma, -0x6ec.fffffffffffffffffffffffffcp0L, -5.3103486723518492437010513373388172315540e-4962L, UNDERFLOW_EXCEPTION),
14481 TEST_f_f (tgamma, -0x6ed.00000000000000000000000004p0L, 5.3103486723518492437010513373231484108489e-4962L, UNDERFLOW_EXCEPTION),
14482 TEST_f_f (tgamma, -0x6ed.fffffffffffffffffffffffffcp0L, 2.9934321715624854812294539669328172615019e-4965L, UNDERFLOW_EXCEPTION),
14483 TEST_f_f (tgamma, -0x6ee.00000000000000000000000004p0L, -2.9934321715624854812294539669239841152754e-4965L, UNDERFLOW_EXCEPTION),
14484 TEST_f_f (tgamma, -0x6ee.fffffffffffffffffffffffffcp0L, minus_zero, UNDERFLOW_EXCEPTION),
14485 TEST_f_f (tgamma, -0x6ef.00000000000000000000000004p0L, plus_zero, UNDERFLOW_EXCEPTION),
d8cd06db
JM		 14486# endif
14487#endif
74c57478 14488 TEST_f_f (tgamma, -0x1.0a32a2p+5L, 1.8125267978155035272941154746083439329912e-37L),
d8cd06db 14489#ifndef TEST_FLOAT
74c57478 14490 TEST_f_f (tgamma, -0x1.5800000080001p+7L, -3.1439271448823567326093363350637118195240e-304L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d8cd06db 14491#endif
74c57478
JM		 14492 TEST_f_f (tgamma, 18.5L, 1.4986120533153361177371791123515513270334e+15L),
14493 TEST_f_f (tgamma, 19.5L, 2.7724322986333718178137813578503699550119e+16L),
14494 TEST_f_f (tgamma, 23.5L, 5.3613035875444147334274983856108155717836e+21L),
14495 TEST_f_f (tgamma, 29.5L, 1.6348125198274266444378807806868221866931e+30L),
14496 TEST_f_f (tgamma, 30.5L, 4.8226969334909086010917483030261254507447e+31L),
14497 TEST_f_f (tgamma, 31.5L, 1.4709225647147271233329832324229682624771e+33L),
14498 TEST_f_f (tgamma, 32.5L, 4.6334060788513904384988971821323500268029e+34L),
14499 TEST_f_f (tgamma, 33.5L, 1.5058569756267018925121415841930137587110e+36L),
14500 TEST_f_f (tgamma, 34.5L, 5.0446208683494513399156743070465960916817e+37L),
14501 TEST_f_f (tgamma, 0x2.30a43cp+4L, 3.4027979115654976101247558405326779640190e+38L),
d8cd06db 14502#ifdef TEST_FLOAT
74c57478 14503 TEST_f_f (tgamma, 0x2.30a44p+4L, plus_infty, OVERFLOW_EXCEPTION),
d8cd06db 14504#else
74c57478 14505 TEST_f_f (tgamma, 0x2.30a44p+4L, 3.4028438913396451054667218138127983367181e+38L),
d8cd06db
JM		 14506#endif
14507#ifndef TEST_FLOAT
74c57478 14508 TEST_f_f (tgamma, 0xa.b9fd72b0fb238p+4L, 1.7976931348622298700886249281842651388250e+308L),
d8cd06db 14509# if !defined TEST_LDOUBLE || LDBL_MAX_EXP <= 1024
74c57478 14510 TEST_f_f (tgamma, 0xa.b9fd72b0fb24p+4L, plus_infty, OVERFLOW_EXCEPTION),
d8cd06db 14511# else
74c57478 14512 TEST_f_f (tgamma, 0xa.b9fd72b0fb24p+4L, 1.7976931348624926129589466917917870782484e+308L),
d8cd06db
JM		 14513# endif
14514#endif
14515#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
74c57478 14516 TEST_f_f (tgamma, 0xa.b9fd72b0fb23a9ddbf0d3804f4p+4L, 1.7976931348623158079372897140307719334857e+308L),
d8cd06db 14517# if LDBL_MAX_EXP <= 1024
74c57478 14518 TEST_f_f (tgamma, 0xa.b9fd72b0fb23a9ddbf0d3804f8p+4L, plus_infty, OVERFLOW_EXCEPTION),
d8cd06db 14519# else
74c57478 14520 TEST_f_f (tgamma, 0xa.b9fd72b0fb23a9ddbf0d3804f8p+4L, 1.7976931348623158079372897140599422519044e+308L),
d8cd06db
JM		 14521# endif
14522#endif
14523#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM		 14524 TEST_f_f (tgamma, 0x6.db8c603359a97108p+8L, 1.1897314953572317517071551278058233700012e+4932L),
14525 TEST_f_f (tgamma, 0x6.db8c603359a9711p+8L, plus_infty, OVERFLOW_EXCEPTION),
d8cd06db 14526# if LDBL_MANT_DIG >= 113
74c57478
JM		 14527 TEST_f_f (tgamma, 0x6.db8c603359a971081bc4a2e9dfdp+8L, 1.1897314953572317650857593266265995494998e+4932L),
14528 TEST_f_f (tgamma, 0x6.db8c603359a971081bc4a2e9dfd4p+8L, plus_infty, OVERFLOW_EXCEPTION),
d8cd06db
JM		 14529# endif
14530#endif
74c57478
JM		 14531 END_DATA (tgamma)
14532 };
2550dfe9 14533
8847214f 14534static void
74c57478 14535tgamma_test (void)
8847214f 14536{
74c57478
JM		 14537 errno = 0;
14538 FUNC(tgamma) (1);
14539 if (errno == ENOSYS)
14540 /* Function not implemented. */
14541 return;
8847214f 14542
74c57478
JM		 14543 START (tgamma);
14544 RUN_TEST_LOOP_f_f (tgamma, tgamma_test_data, );
14545 END (tgamma);
14546}
8847214f 14547
8847214f 14548
74c57478
JM		 14549static const struct test_f_f_data trunc_test_data[] =
14550 {
14551 START_DATA (trunc),
14552 TEST_f_f (trunc, plus_infty, plus_infty),
14553 TEST_f_f (trunc, minus_infty, minus_infty),
14554 TEST_f_f (trunc, qnan_value, qnan_value),
14555
14556 TEST_f_f (trunc, 0, 0),
14557 TEST_f_f (trunc, minus_zero, minus_zero),
14558 TEST_f_f (trunc, 0.1, 0),
14559 TEST_f_f (trunc, 0.25, 0),
14560 TEST_f_f (trunc, 0.625, 0),
14561 TEST_f_f (trunc, -0.1, minus_zero),
14562 TEST_f_f (trunc, -0.25, minus_zero),
14563 TEST_f_f (trunc, -0.625, minus_zero),
14564 TEST_f_f (trunc, 1, 1),
14565 TEST_f_f (trunc, -1, -1),
14566 TEST_f_f (trunc, 1.625, 1),
14567 TEST_f_f (trunc, -1.625, -1),
14568
14569 TEST_f_f (trunc, 1048580.625L, 1048580L),
14570 TEST_f_f (trunc, -1048580.625L, -1048580L),
14571
14572 TEST_f_f (trunc, 8388610.125L, 8388610.0L),
14573 TEST_f_f (trunc, -8388610.125L, -8388610.0L),
14574
14575 TEST_f_f (trunc, 4294967296.625L, 4294967296.0L),
14576 TEST_f_f (trunc, -4294967296.625L, -4294967296.0L),
8847214f 14577
f964490f 14578#ifdef TEST_LDOUBLE
74c57478
JM		 14579 /* The result can only be represented in long double. */
14580 TEST_f_f (trunc, 4503599627370495.5L, 4503599627370495.0L),
14581 TEST_f_f (trunc, 4503599627370496.25L, 4503599627370496.0L),
14582 TEST_f_f (trunc, 4503599627370496.5L, 4503599627370496.0L),
14583 TEST_f_f (trunc, 4503599627370496.75L, 4503599627370496.0L),
14584 TEST_f_f (trunc, 4503599627370497.5L, 4503599627370497.0L),
f964490f 14585
5c68d401 14586# if LDBL_MANT_DIG > 100
74c57478
JM		 14587 TEST_f_f (trunc, 4503599627370494.5000000000001L, 4503599627370494.0L),
14588 TEST_f_f (trunc, 4503599627370495.5000000000001L, 4503599627370495.0L),
14589 TEST_f_f (trunc, 4503599627370496.5000000000001L, 4503599627370496.0L),
5c68d401 14590# endif
830fce04 14591
74c57478
JM		 14592 TEST_f_f (trunc, -4503599627370495.5L, -4503599627370495.0L),
14593 TEST_f_f (trunc, -4503599627370496.25L, -4503599627370496.0L),
14594 TEST_f_f (trunc, -4503599627370496.5L, -4503599627370496.0L),
14595 TEST_f_f (trunc, -4503599627370496.75L, -4503599627370496.0L),
14596 TEST_f_f (trunc, -4503599627370497.5L, -4503599627370497.0L),
830fce04 14597
5c68d401 14598# if LDBL_MANT_DIG > 100
74c57478
JM		 14599 TEST_f_f (trunc, -4503599627370494.5000000000001L, -4503599627370494.0L),
14600 TEST_f_f (trunc, -4503599627370495.5000000000001L, -4503599627370495.0L),
14601 TEST_f_f (trunc, -4503599627370496.5000000000001L, -4503599627370496.0L),
5c68d401 14602# endif
f964490f 14603
74c57478
JM		 14604 TEST_f_f (trunc, 9007199254740991.5L, 9007199254740991.0L),
14605 TEST_f_f (trunc, 9007199254740992.25L, 9007199254740992.0L),
14606 TEST_f_f (trunc, 9007199254740992.5L, 9007199254740992.0L),
14607 TEST_f_f (trunc, 9007199254740992.75L, 9007199254740992.0L),
14608 TEST_f_f (trunc, 9007199254740993.5L, 9007199254740993.0L),
f964490f 14609
5c68d401 14610# if LDBL_MANT_DIG > 100
74c57478
JM		 14611 TEST_f_f (trunc, 9007199254740991.0000000000001L, 9007199254740991.0L),
14612 TEST_f_f (trunc, 9007199254740992.0000000000001L, 9007199254740992.0L),
14613 TEST_f_f (trunc, 9007199254740993.0000000000001L, 9007199254740993.0L),
14614 TEST_f_f (trunc, 9007199254740991.5000000000001L, 9007199254740991.0L),
14615 TEST_f_f (trunc, 9007199254740992.5000000000001L, 9007199254740992.0L),
14616 TEST_f_f (trunc, 9007199254740993.5000000000001L, 9007199254740993.0L),
5c68d401
RM		 14617# endif
14618
74c57478
JM		 14619 TEST_f_f (trunc, -9007199254740991.5L, -9007199254740991.0L),
14620 TEST_f_f (trunc, -9007199254740992.25L, -9007199254740992.0L),
14621 TEST_f_f (trunc, -9007199254740992.5L, -9007199254740992.0L),
14622 TEST_f_f (trunc, -9007199254740992.75L, -9007199254740992.0L),
14623 TEST_f_f (trunc, -9007199254740993.5L, -9007199254740993.0L),
f964490f 14624
5c68d401 14625# if LDBL_MANT_DIG > 100
74c57478
JM		 14626 TEST_f_f (trunc, -9007199254740991.0000000000001L, -9007199254740991.0L),
14627 TEST_f_f (trunc, -9007199254740992.0000000000001L, -9007199254740992.0L),
14628 TEST_f_f (trunc, -9007199254740993.0000000000001L, -9007199254740993.0L),
14629 TEST_f_f (trunc, -9007199254740991.5000000000001L, -9007199254740991.0L),
14630 TEST_f_f (trunc, -9007199254740992.5000000000001L, -9007199254740992.0L),
14631 TEST_f_f (trunc, -9007199254740993.5000000000001L, -9007199254740993.0L),
5c68d401
RM		 14632# endif
14633
74c57478
JM		 14634 TEST_f_f (trunc, 72057594037927935.5L, 72057594037927935.0L),
14635 TEST_f_f (trunc, 72057594037927936.25L, 72057594037927936.0L),
14636 TEST_f_f (trunc, 72057594037927936.5L, 72057594037927936.0L),
14637 TEST_f_f (trunc, 72057594037927936.75L, 72057594037927936.0L),
14638 TEST_f_f (trunc, 72057594037927937.5L, 72057594037927937.0L),
14639
14640 TEST_f_f (trunc, -72057594037927935.5L, -72057594037927935.0L),
14641 TEST_f_f (trunc, -72057594037927936.25L, -72057594037927936.0L),
14642 TEST_f_f (trunc, -72057594037927936.5L, -72057594037927936.0L),
14643 TEST_f_f (trunc, -72057594037927936.75L, -72057594037927936.0L),
14644 TEST_f_f (trunc, -72057594037927937.5L, -72057594037927937.0L),
14645
14646 TEST_f_f (trunc, 10141204801825835211973625643007.5L, 10141204801825835211973625643007.0L),
14647 TEST_f_f (trunc, 10141204801825835211973625643008.25L, 10141204801825835211973625643008.0L),
14648 TEST_f_f (trunc, 10141204801825835211973625643008.5L, 10141204801825835211973625643008.0L),
14649 TEST_f_f (trunc, 10141204801825835211973625643008.75L, 10141204801825835211973625643008.0L),
14650 TEST_f_f (trunc, 10141204801825835211973625643009.5L, 10141204801825835211973625643009.0L),
14651#endif
14652 END_DATA (trunc)
14653 };
14654
14655static void
14656trunc_test (void)
14657{
14658 START (trunc);
14659 RUN_TEST_LOOP_f_f (trunc, trunc_test_data, );
14660 END (trunc);
14661}
14662
14663static const struct test_f_f_data y0_test_data[] =
14664 {
14665 START_DATA (y0),
14666 /* y0 is the Bessel function of the second kind of order 0 */
14667 TEST_f_f (y0, -1.0, minus_infty, INVALID_EXCEPTION),
14668 TEST_f_f (y0, -max_value, minus_infty, INVALID_EXCEPTION),
14669 TEST_f_f (y0, 0.0, minus_infty),
14670 TEST_f_f (y0, qnan_value, qnan_value),
14671 TEST_f_f (y0, plus_infty, 0),
14672
14673 TEST_f_f (y0, 0.125L, -1.38968062514384052915582277745018693L),
14674 TEST_f_f (y0, 0.75L, -0.137172769385772397522814379396581855L),
14675 TEST_f_f (y0, 1.0, 0.0882569642156769579829267660235151628L),
14676 TEST_f_f (y0, 1.5, 0.382448923797758843955068554978089862L),
14677 TEST_f_f (y0, 2.0, 0.510375672649745119596606592727157873L),
14678 TEST_f_f (y0, 8.0, 0.223521489387566220527323400498620359L),
14679 TEST_f_f (y0, 10.0, 0.0556711672835993914244598774101900481L),
f964490f 14680
74c57478 14681 TEST_f_f (y0, 0x1.3ffp+74L, 1.818984347516051243459467456433028748678e-12L),
f964490f 14682
74c57478
JM		 14683#ifndef TEST_FLOAT
14684 TEST_f_f (y0, 0x1.ff00000000002p+840L, 1.846591691699331493194965158699937660696e-127L),
14685 TEST_f_f (y0, 0x1p1023L, 8.2687542933709649327986678723012001545638e-155L),
f964490f 14686#endif
8847214f 14687
74c57478
JM		 14688#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
14689 TEST_f_f (y0, 0x1p16382L, 8.0839224448726336195866026476176740513439e-2467L),
14690 TEST_f_f (y0, 0x1p16383L, -3.8895531955766020648617743624167352352217e-2467L),
14691#endif
14692
14693 TEST_f_f (y0, 0x1p-10L, -4.4865150767109739412411806297168793661098L),
14694 TEST_f_f (y0, 0x1p-20L, -8.8992283012125827603076426611387876938160L),
14695 TEST_f_f (y0, 0x1p-30L, -1.3311940304267782826037118027401817264906e+1L),
14696 TEST_f_f (y0, 0x1p-40L, -1.7724652307320814696990854700366226762563e+1L),
14697 TEST_f_f (y0, 0x1p-50L, -2.2137364310373846564919987139743760738155e+1L),
14698 TEST_f_f (y0, 0x1p-60L, -2.6550076313426878432849115782108205929120e+1L),
14699 TEST_f_f (y0, 0x1p-70L, -3.0962788316479910300778244424468159753887e+1L),
14700 TEST_f_f (y0, 0x1p-80L, -3.5375500319532942168707373066828113573541e+1L),
14701 TEST_f_f (y0, 0x1p-90L, -3.9788212322585974036636501709188067393195e+1L),
14702 TEST_f_f (y0, 0x1p-100L, -4.420092432563900590456563035154802121284e+1L),
14703 TEST_f_f (y0, 0x1p-110L, -4.861363632869203777249475899390797503250e+1L),
14704 END_DATA (y0)
14705 };
8847214f
UD		 14706
14707static void
14708y0_test (void)
14709{
8a216c1b 14710 FLOAT s, c;
8847214f 14711 errno = 0;
cd53c157
UD		 14712 FUNC (sincos) (0, &s, &c);
14713 if (errno == ENOSYS)
14714 /* Required function not implemented. */
14715 return;
8847214f
UD		 14716 FUNC(y0) (1);
14717 if (errno == ENOSYS)
14718 /* Function not implemented. */
14719 return;
14720
8847214f 14721 START (y0);
74c57478
JM		 14722 RUN_TEST_LOOP_f_f (y0, y0_test_data, );
14723 END (y0);
14724}
14725
8847214f 14726
74c57478
JM		 14727static const struct test_f_f_data y1_test_data[] =
14728 {
14729 START_DATA (y1),
14730 /* y1 is the Bessel function of the second kind of order 1 */
14731 TEST_f_f (y1, -1.0, minus_infty, INVALID_EXCEPTION),
14732 TEST_f_f (y1, -max_value, minus_infty, INVALID_EXCEPTION),
14733 TEST_f_f (y1, 0.0, minus_infty),
14734 TEST_f_f (y1, plus_infty, 0),
14735 TEST_f_f (y1, qnan_value, qnan_value),
8847214f 14736
74c57478
JM		 14737 TEST_f_f (y1, 0.125L, -5.19993611253477499595928744876579921L),
14738 TEST_f_f (y1, 0.75L, -1.03759455076928541973767132140642198L),
14739 TEST_f_f (y1, 1.0, -0.781212821300288716547150000047964821L),
14740 TEST_f_f (y1, 1.5, -0.412308626973911295952829820633445323L),
14741 TEST_f_f (y1, 2.0, -0.107032431540937546888370772277476637L),
14742 TEST_f_f (y1, 8.0, -0.158060461731247494255555266187483550L),
14743 TEST_f_f (y1, 10.0, 0.249015424206953883923283474663222803L),
8847214f 14744
74c57478 14745 TEST_f_f (y1, 0x1.27e204p+99L, -8.881610148467797208469612080785210013461e-16L),
c36e1d23
JM		 14746
14747#ifndef TEST_FLOAT
74c57478
JM		 14748 TEST_f_f (y1, 0x1.001000001p+593L, 3.927269966354206207832593635798954916263e-90L),
14749 TEST_f_f (y1, 0x1p1023L, 1.5665258060609012834424478437196679802783e-155L),
c36e1d23
JM		 14750#endif
14751
d2f9799e 14752#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM		 14753 TEST_f_f (y1, 0x1p16382L, 1.2193782500509000574176799046642541129387e-2466L),
14754 TEST_f_f (y1, 0x1p16383L, -9.5859502826270374691362975419147645151233e-2467L),
14755#endif
14756
14757 TEST_f_f (y1, 0x1p-10L, -6.5190099301063115047395187618929589514382e+02L),
14758 TEST_f_f (y1, 0x1p-20L, -6.6754421443450423911167962313100637952285e+05L),
14759 TEST_f_f (y1, 0x1p-30L, -6.8356527557643159612937462812258975438856e+08L),
14760 TEST_f_f (y1, 0x1p-40L, -6.9997084219026594793707805777425993547887e+11L),
14761 TEST_f_f (y1, 0x1p-50L, -7.1677014240283233068755952926181262431559e+14L),
14762 TEST_f_f (y1, 0x1p-60L, -7.3397262582050030662406095795388448059822e+17L),
14763 TEST_f_f (y1, 0x1p-70L, -7.5158796884019231398303842094477769620063e+20L),
14764 TEST_f_f (y1, 0x1p-80L, -7.6962608009235692951863134304745236090943e+23L),
14765 TEST_f_f (y1, 0x1p-90L, -7.8809710601457349582707849528059121757126e+26L),
14766 TEST_f_f (y1, 0x1p-100L, -8.0701143655892325972692837916732540679297e+29L),
14767 TEST_f_f (y1, 0x1p-110L, -8.2637971103633741796037466026734121655600e+32L),
14768 END_DATA (y1)
14769 };
8847214f
UD		 14770
14771static void
14772y1_test (void)
14773{
8a216c1b 14774 FLOAT s, c;
8847214f 14775 errno = 0;
cd53c157
UD		 14776 FUNC (sincos) (0, &s, &c);
14777 if (errno == ENOSYS)
14778 /* Required function not implemented. */
14779 return;
8847214f
UD		 14780 FUNC(y1) (1);
14781 if (errno == ENOSYS)
14782 /* Function not implemented. */
14783 return;
14784
8847214f 14785 START (y1);
74c57478 14786 RUN_TEST_LOOP_f_f (y1, y1_test_data, );
8847214f
UD		 14787 END (y1);
14788}
14789
2550dfe9 14790
0e400df5
JM		 14791static const struct test_if_f_data yn_test_data[] =
14792 {
14793 START_DATA (yn),
14794 /* yn is the Bessel function of the second kind of order n */
14795 /* yn (0, x) == y0 (x) */
14796 TEST_if_f (yn, 0, -1.0, minus_infty, INVALID_EXCEPTION),
14797 TEST_if_f (yn, 0, -max_value, minus_infty, INVALID_EXCEPTION),
14798 TEST_if_f (yn, 0, 0.0, minus_infty),
14799 TEST_if_f (yn, 0, qnan_value, qnan_value),
14800 TEST_if_f (yn, 0, plus_infty, 0),
14801
14802 TEST_if_f (yn, 0, 0.125L, -1.38968062514384052915582277745018693L),
14803 TEST_if_f (yn, 0, 0.75L, -0.137172769385772397522814379396581855L),
14804 TEST_if_f (yn, 0, 1.0, 0.0882569642156769579829267660235151628L),
14805 TEST_if_f (yn, 0, 1.5, 0.382448923797758843955068554978089862L),
14806 TEST_if_f (yn, 0, 2.0, 0.510375672649745119596606592727157873L),
14807 TEST_if_f (yn, 0, 8.0, 0.223521489387566220527323400498620359L),
14808 TEST_if_f (yn, 0, 10.0, 0.0556711672835993914244598774101900481L),
14809
14810 /* yn (1, x) == y1 (x) */
14811 TEST_if_f (yn, 1, -1.0, minus_infty, INVALID_EXCEPTION),
14812 TEST_if_f (yn, 1, 0.0, minus_infty),
14813 TEST_if_f (yn, 1, plus_infty, 0),
14814 TEST_if_f (yn, 1, qnan_value, qnan_value),
14815
14816 TEST_if_f (yn, 1, 0.125L, -5.19993611253477499595928744876579921L),
14817 TEST_if_f (yn, 1, 0.75L, -1.03759455076928541973767132140642198L),
14818 TEST_if_f (yn, 1, 1.0, -0.781212821300288716547150000047964821L),
14819 TEST_if_f (yn, 1, 1.5, -0.412308626973911295952829820633445323L),
14820 TEST_if_f (yn, 1, 2.0, -0.107032431540937546888370772277476637L),
14821 TEST_if_f (yn, 1, 8.0, -0.158060461731247494255555266187483550L),
14822 TEST_if_f (yn, 1, 10.0, 0.249015424206953883923283474663222803L),
14823
14824 /* yn (3, x) */
14825 TEST_if_f (yn, 3, plus_infty, 0),
14826 TEST_if_f (yn, 3, qnan_value, qnan_value),
14827
14828 TEST_if_f (yn, 3, 0.125L, -2612.69757350066712600220955744091741L),
14829 TEST_if_f (yn, 3, 0.75L, -12.9877176234475433186319774484809207L),
14830 TEST_if_f (yn, 3, 1.0, -5.82151760596472884776175706442981440L),
14831 TEST_if_f (yn, 3, 2.0, -1.12778377684042778608158395773179238L),
14832 TEST_if_f (yn, 3, 10.0, -0.251362657183837329779204747654240998L),
14833
14834 /* yn (10, x) */
14835 TEST_if_f (yn, 10, plus_infty, 0),
14836 TEST_if_f (yn, 10, qnan_value, qnan_value),
14837
14838 TEST_if_f (yn, 10, 0.125L, -127057845771019398.252538486899753195L),
14839 TEST_if_f (yn, 10, 0.75L, -2133501638.90573424452445412893839236L),
14840 TEST_if_f (yn, 10, 1.0, -121618014.278689189288130426667971145L),
14841 TEST_if_f (yn, 10, 2.0, -129184.542208039282635913145923304214L),
14842 TEST_if_f (yn, 10, 10.0, -0.359814152183402722051986577343560609L),
14843
14844 /* Check whether yn returns correct value for LDBL_MIN, DBL_MIN,
14845 and FLT_MIN. See Bug 14173. */
14846 TEST_if_f (yn, 10, min_value, minus_infty, OVERFLOW_EXCEPTION),
14847
14848 TEST_if_f (yn, 10, min_value, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
14849 END_DATA (yn)
14850 };
14851
8847214f
UD		 14852static void
14853yn_test (void)
14854{
8a216c1b 14855 FLOAT s, c;
8847214f 14856 errno = 0;
cd53c157
UD		 14857 FUNC (sincos) (0, &s, &c);
14858 if (errno == ENOSYS)
14859 /* Required function not implemented. */
14860 return;
8847214f
UD		 14861 FUNC(yn) (1, 1);
14862 if (errno == ENOSYS)
14863 /* Function not implemented. */
14864 return;
14865
8847214f 14866 START (yn);
0e400df5 14867 RUN_TEST_LOOP_if_f (yn, yn_test_data, );
541428fe 14868 END (yn);
8847214f
UD		 14869}
14870
14871
74c57478
JM		 14872static const struct test_f_f_data significand_test_data[] =
14873 {
14874 START_DATA (significand),
14875 /* significand returns the mantissa of the exponential representation. */
14876 /* TODO: missing +/-Inf as well as qNaN tests. */
14877 TEST_f_f (significand, 4.0, 1.0),
14878 TEST_f_f (significand, 6.0, 1.5),
14879 TEST_f_f (significand, 8.0, 1.0),
14880 END_DATA (significand)
14881 };
14882
f5c8f285
UD		 14883static void
14884significand_test (void)
14885{
f5c8f285 14886 START (significand);
74c57478 14887 RUN_TEST_LOOP_f_f (significand, significand_test_data, );
f5c8f285
UD		 14888 END (significand);
14889}
14890
14891
8847214f
UD		 14892static void
14893initialize (void)
14894{
14895 fpstack_test ("start *init*");
8847214f 14896
8847214f
UD		 14897 /* Clear all exceptions. From now on we must not get random exceptions. */
14898 feclearexcept (FE_ALL_EXCEPT);
f2da7793 14899 errno = 0;
8847214f
UD		 14900
14901 /* Test to make sure we start correctly. */
14902 fpstack_test ("end *init*");
14903}
14904
14905/* Definitions of arguments for argp functions. */
14906static const struct argp_option options[] =
14907{
14908 { "verbose", 'v', "NUMBER", 0, "Level of verbosity (0..3)"},
14909 { "ulps-file", 'u', NULL, 0, "Output ulps to file ULPs"},
14910 { "no-max-error", 'f', NULL, 0,
14911 "Don't output maximal errors of functions"},
14912 { "no-points", 'p', NULL, 0,
14913 "Don't output results of functions invocations"},
cd33623e
UD		 14914 { "ignore-max-ulp", 'i', "yes/no", 0,
14915 "Ignore given maximal errors"},
26510bdd
CD		 14916 { "output-dir", 'o', "DIR", 0,
14917 "Directory where generated files will be placed"},
8847214f
UD		 14918 { NULL, 0, NULL, 0, NULL }
14919};
14920
14921/* Short description of program. */
14922static const char doc[] = "Math test suite: " TEST_MSG ;
14923
14924/* Prototype for option handler. */
fe559c5e 14925static error_t parse_opt (int key, char *arg, struct argp_state *state);
8847214f
UD		 14926
14927/* Data structure to communicate with argp functions. */
14928static struct argp argp =
14929{
14930 options, parse_opt, NULL, doc,
14931};
14932
14933
14934/* Handle program arguments. */
14935static error_t
14936parse_opt (int key, char *arg, struct argp_state *state)
14937{
14938 switch (key)
14939 {
14940 case 'f':
6815fabc 14941 output_max_error = 0;
8847214f 14942 break;
cd33623e
UD		 14943 case 'i':
14944 if (strcmp (arg, "yes") == 0)
14945 ignore_max_ulp = 1;
14946 else if (strcmp (arg, "no") == 0)
14947 ignore_max_ulp = 0;
14948 break;
26510bdd
CD		 14949 case 'o':
14950 output_dir = (char *) malloc (strlen (arg) + 1);
14951 if (output_dir != NULL)
14952 strcpy (output_dir, arg);
14953 else
14954 return errno;
14955 break;
8847214f 14956 case 'p':
6815fabc 14957 output_points = 0;
8847214f
UD		 14958 break;
14959 case 'u':
14960 output_ulps = 1;
14961 break;
14962 case 'v':
14963 if (optarg)
14964 verbose = (unsigned int) strtoul (optarg, NULL, 0);
14965 else
14966 verbose = 3;
14967 break;
14968 default:
14969 return ARGP_ERR_UNKNOWN;
14970 }
14971 return 0;
14972}
14973
14974#if 0
14975/* function to check our ulp calculation. */
14976void
14977check_ulp (void)
14978{
14979 int i;
14980
14981 FLOAT u, diff, ulp;
14982 /* This gives one ulp. */
14983 u = FUNC(nextafter) (10, 20);
14984 check_equal (10.0, u, 1, &diff, &ulp);
14985 printf ("One ulp: % .4" PRINTF_NEXPR "\n", ulp);
14986
14987 /* This gives one more ulp. */
14988 u = FUNC(nextafter) (u, 20);
14989 check_equal (10.0, u, 2, &diff, &ulp);
14990 printf ("two ulp: % .4" PRINTF_NEXPR "\n", ulp);
14991
14992 /* And now calculate 100 ulp. */
14993 for (i = 2; i < 100; i++)
14994 u = FUNC(nextafter) (u, 20);
14995 check_equal (10.0, u, 100, &diff, &ulp);
14996 printf ("100 ulp: % .4" PRINTF_NEXPR "\n", ulp);
14997}
14998#endif
14999
15000int
15001main (int argc, char **argv)
15002{
15003
15004 int remaining;
26510bdd
CD		 15005 char *ulps_file_path;
15006 size_t dir_len = 0;
8847214f
UD		 15007
15008 verbose = 1;
15009 output_ulps = 0;
15010 output_max_error = 1;
15011 output_points = 1;
26510bdd 15012 output_dir = NULL;
cd33623e
UD		 15013 /* XXX set to 0 for releases. */
15014 ignore_max_ulp = 0;
bdf09fab 15015
8847214f
UD		 15016 /* Parse and process arguments. */
15017 argp_parse (&argp, argc, argv, 0, &remaining, NULL);
15018
15019 if (remaining != argc)
15020 {
15021 fprintf (stderr, "wrong number of arguments");
15022 argp_help (&argp, stdout, ARGP_HELP_SEE, program_invocation_short_name);
15023 exit (EXIT_FAILURE);
15024 }
15025
15026 if (output_ulps)
15027 {
26510bdd
CD		 15028 if (output_dir != NULL)
15029 dir_len = strlen (output_dir);
15030 ulps_file_path = (char *) malloc (dir_len + strlen (ulps_file_name) + 1);
15031 if (ulps_file_path == NULL)
15032 {
15033 perror ("can't allocate path for `ULPs' file: ");
15034 exit (1);
15035 }
15036 sprintf (ulps_file_path, "%s%s", output_dir == NULL ? "" : output_dir, ulps_file_name);
15037 ulps_file = fopen (ulps_file_path, "a");
8847214f
UD		 15038 if (ulps_file == NULL)
15039 {
15040 perror ("can't open file `ULPs' for writing: ");
15041 exit (1);
15042 }
15043 }
15044
15045
15046 initialize ();
15047 printf (TEST_MSG);
15048
15049#if 0
15050 check_ulp ();
15051#endif
15052
ec751a23 15053 /* Keep the tests a wee bit ordered (according to ISO C99). */
8847214f 15054 /* Classification macros: */
ef1bb361 15055 finite_test ();
8847214f
UD		 15056 fpclassify_test ();
15057 isfinite_test ();
ef1bb361
JM		 15058 isinf_test ();
15059 isnan_test ();
8847214f 15060 isnormal_test ();
57267616 15061 issignaling_test ();
8847214f
UD		 15062 signbit_test ();
15063
15064 /* Trigonometric functions: */
15065 acos_test ();
5ba3cc69
JM		 15066 acos_test_tonearest ();
15067 acos_test_towardzero ();
15068 acos_test_downward ();
15069 acos_test_upward ();
8847214f 15070 asin_test ();
5ba3cc69
JM		 15071 asin_test_tonearest ();
15072 asin_test_towardzero ();
15073 asin_test_downward ();
15074 asin_test_upward ();
8847214f
UD		 15075 atan_test ();
15076 atan2_test ();
15077 cos_test ();
804360ed
JM		 15078 cos_test_tonearest ();
15079 cos_test_towardzero ();
15080 cos_test_downward ();
15081 cos_test_upward ();
8847214f 15082 sin_test ();
804360ed
JM		 15083 sin_test_tonearest ();
15084 sin_test_towardzero ();
15085 sin_test_downward ();
15086 sin_test_upward ();
8847214f
UD		 15087 sincos_test ();
15088 tan_test ();
804360ed
JM		 15089 tan_test_tonearest ();
15090 tan_test_towardzero ();
15091 tan_test_downward ();
15092 tan_test_upward ();
8847214f
UD		 15093
15094 /* Hyperbolic functions: */
15095 acosh_test ();
15096 asinh_test ();
15097 atanh_test ();
15098 cosh_test ();
ca811b22
JM		 15099 cosh_test_tonearest ();
15100 cosh_test_towardzero ();
15101 cosh_test_downward ();
15102 cosh_test_upward ();
8847214f 15103 sinh_test ();
ca811b22
JM		 15104 sinh_test_tonearest ();
15105 sinh_test_towardzero ();
15106 sinh_test_downward ();
15107 sinh_test_upward ();
8847214f
UD		 15108 tanh_test ();
15109
15110 /* Exponential and logarithmic functions: */
15111 exp_test ();
28afd92d
JM		 15112 exp_test_tonearest ();
15113 exp_test_towardzero ();
15114 exp_test_downward ();
15115 exp_test_upward ();
8847214f
UD		 15116 exp10_test ();
15117 exp2_test ();
15118 expm1_test ();
15119 frexp_test ();
15120 ldexp_test ();
15121 log_test ();
15122 log10_test ();
15123 log1p_test ();
15124 log2_test ();
15125 logb_test ();
a462cb63 15126 logb_test_downward ();
8847214f
UD		 15127 modf_test ();
15128 ilogb_test ();
15129 scalb_test ();
15130 scalbn_test ();
15131 scalbln_test ();
f5c8f285 15132 significand_test ();
8847214f
UD		 15133
15134 /* Power and absolute value functions: */
15135 cbrt_test ();
15136 fabs_test ();
15137 hypot_test ();
15138 pow_test ();
b7cd39e8
JM		 15139 pow_test_tonearest ();
15140 pow_test_towardzero ();
15141 pow_test_downward ();
15142 pow_test_upward ();
8847214f
UD		 15143 sqrt_test ();
15144
15145 /* Error and gamma functions: */
15146 erf_test ();
15147 erfc_test ();
15148 gamma_test ();
15149 lgamma_test ();
15150 tgamma_test ();
15151
15152 /* Nearest integer functions: */
15153 ceil_test ();
15154 floor_test ();
15155 nearbyint_test ();
15156 rint_test ();
4d37c8aa
UD		 15157 rint_test_tonearest ();
15158 rint_test_towardzero ();
15159 rint_test_downward ();
15160 rint_test_upward ();
8847214f 15161 lrint_test ();
6624dbc0
UD		 15162 lrint_test_tonearest ();
15163 lrint_test_towardzero ();
15164 lrint_test_downward ();
15165 lrint_test_upward ();
8847214f 15166 llrint_test ();
830fce04
RM		 15167 llrint_test_tonearest ();
15168 llrint_test_towardzero ();
15169 llrint_test_downward ();
15170 llrint_test_upward ();
8847214f
UD		 15171 round_test ();
15172 lround_test ();
15173 llround_test ();
15174 trunc_test ();
15175
15176 /* Remainder functions: */
15177 fmod_test ();
15178 remainder_test ();
15179 remquo_test ();
15180
15181 /* Manipulation functions: */
15182 copysign_test ();
15183 nextafter_test ();
fe559c5e 15184 nexttoward_test ();
8847214f
UD		 15185
15186 /* maximum, minimum and positive difference functions */
15187 fdim_test ();
15188 fmax_test ();
15189 fmin_test ();
15190
15191 /* Multiply and add: */
15192 fma_test ();
8ec5b013
JM		 15193 fma_test_towardzero ();
15194 fma_test_downward ();
15195 fma_test_upward ();
8847214f 15196
0e8e0c1c
JM		 15197 /* Comparison macros: */
15198 isgreater_test ();
15199 isgreaterequal_test ();
15200 isless_test ();
15201 islessequal_test ();
15202 islessgreater_test ();
15203 isunordered_test ();
15204
8847214f
UD		 15205 /* Complex functions: */
15206 cabs_test ();
15207 cacos_test ();
15208 cacosh_test ();
15209 carg_test ();
15210 casin_test ();
15211 casinh_test ();
15212 catan_test ();
15213 catanh_test ();
15214 ccos_test ();
15215 ccosh_test ();
15216 cexp_test ();
0cdc8e6f 15217 cimag_test ();
8847214f
UD		 15218 clog10_test ();
15219 clog_test ();
0cdc8e6f 15220 conj_test ();
8847214f
UD		 15221 cpow_test ();
15222 cproj_test ();
0cdc8e6f 15223 creal_test ();
8847214f
UD		 15224 csin_test ();
15225 csinh_test ();
15226 csqrt_test ();
15227 ctan_test ();
ca61cf32
JM		 15228 ctan_test_tonearest ();
15229 ctan_test_towardzero ();
15230 ctan_test_downward ();
15231 ctan_test_upward ();
8847214f 15232 ctanh_test ();
ca61cf32
JM		 15233 ctanh_test_tonearest ();
15234 ctanh_test_towardzero ();
15235 ctanh_test_downward ();
15236 ctanh_test_upward ();
8847214f
UD		 15237
15238 /* Bessel functions: */
15239 j0_test ();
15240 j1_test ();
15241 jn_test ();
15242 y0_test ();
15243 y1_test ();
15244 yn_test ();
15245
15246 if (output_ulps)
15247 fclose (ulps_file);
15248
15249 printf ("\nTest suite completed:\n");
f2da7793
JM		 15250 printf (" %d test cases plus %d tests for exception flags and\n"
15251 " %d tests for errno executed.\n",
15252 noTests, noExcTests, noErrnoTests);
8847214f
UD		 15253 if (noErrors)
15254 {
a9a56960 15255 printf (" %d errors occurred.\n", noErrors);
cf3141a5 15256 return 1;
8847214f
UD		 15257 }
15258 printf (" All tests passed successfully.\n");
cf3141a5
AJ		 15259
15260 return 0;
8847214f
UD		 15261}
15262
15263/*
15264 * Local Variables:
15265 * mode:c
15266 * End:
15267 */
A mirror of the official glibc repository