]> 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_if_f 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};
0e400df5
JM		 893struct test_if_f_data
894{
895 const char *test_name;
896 int arg1;
897 FLOAT arg2;
898 FLOAT expected;
899 FLOAT max_ulp;
900 int exceptions;
901};
4f184d30
JM		 902struct test_fff_f_data
903{
904 const char *test_name;
905 FLOAT arg1, arg2, arg3;
906 FLOAT expected;
907 FLOAT max_ulp;
908 int exceptions;
909};
08198877
JM		 910struct test_c_c_data
911{
912 const char *test_name;
913 FLOAT argr, argc;
914 FLOAT expr, expc;
915 __complex__ FLOAT max_ulp;
916 int exceptions;
917};
51df539d
JM		 918
919/* Set the rounding mode, or restore the saved value. */
920#define IF_ROUND_INIT_ /* Empty. */
921#define IF_ROUND_INIT_FE_DOWNWARD \
922 int save_round_mode = fegetround (); \
923 if (fesetround (FE_DOWNWARD) == 0)
924#define IF_ROUND_INIT_FE_TONEAREST \
925 int save_round_mode = fegetround (); \
926 if (fesetround (FE_TONEAREST) == 0)
927#define IF_ROUND_INIT_FE_TOWARDZERO \
928 int save_round_mode = fegetround (); \
929 if (fesetround (FE_TOWARDZERO) == 0)
930#define IF_ROUND_INIT_FE_UPWARD \
931 int save_round_mode = fegetround (); \
932 if (fesetround (FE_UPWARD) == 0)
933#define ROUND_RESTORE_ /* Empty. */
934#define ROUND_RESTORE_FE_DOWNWARD \
935 fesetround (save_round_mode)
936#define ROUND_RESTORE_FE_TONEAREST \
937 fesetround (save_round_mode)
938#define ROUND_RESTORE_FE_TOWARDZERO \
939 fesetround (save_round_mode)
940#define ROUND_RESTORE_FE_UPWARD \
941 fesetround (save_round_mode)
942
f44bf14a 943/* Run an individual test, including any required setup and checking
51df539d 944 of results, or loop over all tests in an array. */
f44bf14a
JM		 945#define RUN_TEST_f_f(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
946 MAX_ULP, EXCEPTIONS) \
947 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
948 MAX_ULP, EXCEPTIONS)
51df539d
JM		 949#define RUN_TEST_LOOP_f_f(FUNC_NAME, ARRAY, ROUNDING_MODE) \
950 IF_ROUND_INIT_ ## ROUNDING_MODE \
951 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
952 RUN_TEST_f_f ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg, \
953 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
954 (ARRAY)[i].exceptions); \
955 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 956#define RUN_TEST_2_f(TEST_NAME, FUNC_NAME, ARG1, ARG2, EXPECTED, \
957 MAX_ULP, EXCEPTIONS) \
958 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG1, ARG2), EXPECTED, \
959 MAX_ULP, EXCEPTIONS)
601a3a5f
JM		 960#define RUN_TEST_LOOP_2_f(FUNC_NAME, ARRAY, ROUNDING_MODE) \
961 IF_ROUND_INIT_ ## ROUNDING_MODE \
962 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
963 RUN_TEST_2_f ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg1, \
964 (ARRAY)[i].arg2, (ARRAY)[i].expected, \
965 (ARRAY)[i].max_ulp, (ARRAY)[i].exceptions); \
966 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a 967#define RUN_TEST_ff_f RUN_TEST_2_f
601a3a5f 968#define RUN_TEST_LOOP_ff_f RUN_TEST_LOOP_2_f
f44bf14a
JM		 969#define RUN_TEST_fi_f RUN_TEST_2_f
970#define RUN_TEST_fl_f RUN_TEST_2_f
ae08db3b 971#define RUN_TEST_if_f RUN_TEST_2_f
0e400df5 972#define RUN_TEST_LOOP_if_f RUN_TEST_LOOP_2_f
f44bf14a
JM		 973#define RUN_TEST_fff_f(TEST_NAME, FUNC_NAME, ARG1, ARG2, ARG3, \
974 EXPECTED, MAX_ULP, EXCEPTIONS) \
975 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG1, ARG2, ARG3), \
976 EXPECTED, MAX_ULP, EXCEPTIONS)
4f184d30
JM		 977#define RUN_TEST_LOOP_fff_f(FUNC_NAME, ARRAY, ROUNDING_MODE) \
978 IF_ROUND_INIT_ ## ROUNDING_MODE \
979 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
980 RUN_TEST_fff_f ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg1, \
981 (ARRAY)[i].arg2, (ARRAY)[i].arg3, \
982 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
983 (ARRAY)[i].exceptions); \
984 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 985#define RUN_TEST_c_f(TEST_NAME, FUNC_NAME, ARG1, ARG2, EXPECTED, \
986 MAX_ULP, EXCEPTIONS) \
987 check_float (TEST_NAME, \
988 FUNC (FUNC_NAME) (BUILD_COMPLEX (ARG1, ARG2)), \
989 EXPECTED, MAX_ULP, EXCEPTIONS)
990#define RUN_TEST_f_f1(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
991 MAX_ULP, EXCEPTIONS, \
992 EXTRA_NAME, EXTRA_VAR, EXTRA_INIT, EXTRA_TEST, \
993 EXTRA_EXPECTED, EXTRA_ULP) \
994 do \
995 { \
996 (EXTRA_VAR) = (EXTRA_INIT); \
997 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
998 MAX_ULP, EXCEPTIONS); \
999 if (EXTRA_TEST) \
1000 check_int (EXTRA_NAME, EXTRA_VAR, EXTRA_EXPECTED, \
1001 EXTRA_ULP, 0); \
1002 } \
1003 while (0)
1004#define RUN_TEST_fF_f1(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1005 MAX_ULP, EXCEPTIONS, \
1006 EXTRA_NAME, EXTRA_VAR, EXTRA_INIT, EXTRA_TEST, \
1007 EXTRA_EXPECTED, EXTRA_ULP) \
1008 do \
1009 { \
1010 (EXTRA_VAR) = (EXTRA_INIT); \
1011 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG, &(EXTRA_VAR)), \
1012 EXPECTED, MAX_ULP, EXCEPTIONS); \
1013 if (EXTRA_TEST) \
1014 check_float (EXTRA_NAME, EXTRA_VAR, EXTRA_EXPECTED, \
1015 EXTRA_ULP, 0); \
1016 } \
1017 while (0)
1018#define RUN_TEST_fI_f1(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1019 MAX_ULP, EXCEPTIONS, \
1020 EXTRA_NAME, EXTRA_VAR, EXTRA_INIT, EXTRA_TEST, \
1021 EXTRA_EXPECTED, EXTRA_ULP) \
1022 do \
1023 { \
1024 (EXTRA_VAR) = (EXTRA_INIT); \
1025 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG, &(EXTRA_VAR)), \
1026 EXPECTED, MAX_ULP, EXCEPTIONS); \
1027 if (EXTRA_TEST) \
1028 check_int (EXTRA_NAME, EXTRA_VAR, EXTRA_EXPECTED, \
1029 EXTRA_ULP, 0); \
1030 } \
1031 while (0)
1032#define RUN_TEST_ffI_f1(TEST_NAME, FUNC_NAME, ARG1, ARG2, EXPECTED, \
1033 MAX_ULP, EXCEPTIONS, \
1034 EXTRA_NAME, EXTRA_VAR, EXTRA_INIT, EXTRA_TEST, \
1035 EXTRA_EXPECTED, EXTRA_ULP) \
1036 do \
1037 { \
1038 (EXTRA_VAR) = (EXTRA_INIT); \
1039 check_float (TEST_NAME, \
1040 FUNC (FUNC_NAME) (ARG1, ARG2, &(EXTRA_VAR)), \
1041 EXPECTED, MAX_ULP, EXCEPTIONS); \
1042 if (EXTRA_TEST) \
1043 check_int (EXTRA_NAME, EXTRA_VAR, EXTRA_EXPECTED, \
1044 EXTRA_ULP, 0); \
1045 } \
1046 while (0)
1047#define RUN_TEST_c_c(TEST_NAME, FUNC_NAME, ARGR, ARGC, EXPR, EXPC, \
1048 MAX_ULP, EXCEPTIONS) \
1049 check_complex (TEST_NAME, \
1050 FUNC (FUNC_NAME) (BUILD_COMPLEX (ARGR, ARGC)), \
1051 BUILD_COMPLEX (EXPR, EXPC), \
1052 MAX_ULP, EXCEPTIONS)
08198877
JM		 1053#define RUN_TEST_LOOP_c_c(FUNC_NAME, ARRAY, ROUNDING_MODE) \
1054 IF_ROUND_INIT_ ## ROUNDING_MODE \
1055 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1056 RUN_TEST_c_c ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].argr, \
1057 (ARRAY)[i].argc, (ARRAY)[i].expr, (ARRAY)[i].expc, \
1058 (ARRAY)[i].max_ulp, (ARRAY)[i].exceptions); \
1059 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 1060#define RUN_TEST_cc_c(TEST_NAME, FUNC_NAME, ARG1R, ARG1C, ARG2R, ARG2C, \
1061 EXPR, EXPC, MAX_ULP, EXCEPTIONS) \
1062 check_complex (TEST_NAME, \
1063 FUNC (FUNC_NAME) (BUILD_COMPLEX (ARG1R, ARG1C), \
1064 BUILD_COMPLEX (ARG2R, ARG2C)), \
1065 BUILD_COMPLEX (EXPR, EXPC), \
1066 MAX_ULP, EXCEPTIONS)
1067#define RUN_TEST_f_i(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1068 MAX_ULP, EXCEPTIONS) \
1069 check_int (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1070 MAX_ULP, EXCEPTIONS)
1071#define RUN_TEST_f_i_tg(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1072 MAX_ULP, EXCEPTIONS) \
1073 check_int (TEST_NAME, FUNC_NAME (ARG), EXPECTED, \
1074 MAX_ULP, EXCEPTIONS)
1075#define RUN_TEST_ff_i_tg(TEST_NAME, FUNC_NAME, ARG1, ARG2, EXPECTED, \
1076 MAX_ULP, EXCEPTIONS) \
1077 check_int (TEST_NAME, FUNC_NAME (ARG1, ARG2), EXPECTED, \
1078 MAX_ULP, EXCEPTIONS)
1079#define RUN_TEST_f_b(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1080 MAX_ULP, EXCEPTIONS) \
1081 check_bool (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1082 MAX_ULP, EXCEPTIONS)
1083#define RUN_TEST_f_b_tg(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1084 MAX_ULP, EXCEPTIONS) \
1085 check_bool (TEST_NAME, FUNC_NAME (ARG), EXPECTED, \
1086 MAX_ULP, EXCEPTIONS)
1087#define RUN_TEST_f_l(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1088 MAX_ULP, EXCEPTIONS) \
1089 check_long (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1090 MAX_ULP, EXCEPTIONS)
1091#define RUN_TEST_f_L(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1092 MAX_ULP, EXCEPTIONS) \
1093 check_longlong (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1094 MAX_ULP, EXCEPTIONS)
1095#define RUN_TEST_sincos(ARG, TEST_NAME_SIN, SIN_RES_VAR, EXPECTED_SIN, \
1096 MAX_ULP_SIN, TEST_NAME_COS, COS_RES_VAR, \
1097 EXPECTED_COS, MAX_ULP_COS, EXCEPTIONS) \
1098 do \
1099 { \
1100 FUNC (sincos) (ARG, &(SIN_RES_VAR), &(COS_RES_VAR)); \
1101 check_float (TEST_NAME_SIN, SIN_RES_VAR, \
1102 EXPECTED_SIN, MAX_ULP_SIN, EXCEPTIONS); \
1103 check_float (TEST_NAME_COS, COS_RES_VAR, \
1104 EXPECTED_COS, MAX_ULP_COS, 0); \
1105 } \
1106 while (0)
1107
8847214f
UD		 1108
1109
1110/* This is to prevent messages from the SVID libm emulation. */
1111int
1112matherr (struct exception *x __attribute__ ((unused)))
1113{
1114 return 1;
1115}
1116
1117
1118/****************************************************************************
1119 Tests for single functions of libm.
1120 Please keep them alphabetically sorted!
1121****************************************************************************/
1122
51df539d
JM		 1123static const struct test_f_f_data acos_test_data[] =
1124 {
1125 START_DATA (acos),
1126 TEST_f_f (acos, plus_infty, qnan_value, INVALID_EXCEPTION),
1127 TEST_f_f (acos, minus_infty, qnan_value, INVALID_EXCEPTION),
1128 TEST_f_f (acos, qnan_value, qnan_value),
1129
1130 /* |x| > 1: */
1131 TEST_f_f (acos, 1.125L, qnan_value, INVALID_EXCEPTION),
1132 TEST_f_f (acos, -1.125L, qnan_value, INVALID_EXCEPTION),
1133 TEST_f_f (acos, max_value, qnan_value, INVALID_EXCEPTION),
1134 TEST_f_f (acos, -max_value, qnan_value, INVALID_EXCEPTION),
1135
1136 TEST_f_f (acos, 0, M_PI_2l),
1137 TEST_f_f (acos, minus_zero, M_PI_2l),
1138 TEST_f_f (acos, 1, 0),
1139 TEST_f_f (acos, -1, M_PIl),
1140 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1141 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1142 TEST_f_f (acos, 0.75L, 0.722734247813415611178377352641333362L),
1143 TEST_f_f (acos, 2e-17L, 1.57079632679489659923132169163975144L),
1144 TEST_f_f (acos, 0.0625L, 1.50825556499840522843072005474337068L),
1145 TEST_f_f (acos, 0x0.ffffffp0L, 3.4526698471620358760324948263873649728491e-4L),
1146 TEST_f_f (acos, -0x0.ffffffp0L, 3.1412473866050770348750401337968641476999L),
1147#ifndef TEST_FLOAT
1148 TEST_f_f (acos, 0x0.ffffffff8p0L, 1.5258789062648029736620564947844627548516e-5L),
1149 TEST_f_f (acos, -0x0.ffffffff8p0L, 3.1415773948007305904329067627145550395696L),
1150 TEST_f_f (acos, 0x0.ffffffffffffp0L, 8.4293697021788088529885473244391795127130e-8L),
1151 TEST_f_f (acos, -0x0.ffffffffffffp0L, 3.1415925692960962166745548533940296398054L),
1152#endif
1153#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
1154 TEST_f_f (acos, 0x0.ffffffffffffffffp0L, 3.2927225399135962333718255320079907245059e-10L),
1155 TEST_f_f (acos, -0x0.ffffffffffffffffp0L, 3.1415926532605209844712837599423203309964L),
1156#endif
1157 END_DATA (acos)
1158 };
1159
8847214f
UD		 1160static void
1161acos_test (void)
1162{
e6d3c4a7
AJ		 1163 errno = 0;
1164 FUNC(acos) (0);
1165 if (errno == ENOSYS)
1166 /* Function not implemented. */
1167 return;
1168
8847214f 1169 START (acos);
51df539d 1170 RUN_TEST_LOOP_f_f (acos, acos_test_data, );
8847214f
UD		 1171 END (acos);
1172}
1173
5ba3cc69 1174
51df539d
JM		 1175static const struct test_f_f_data acos_tonearest_test_data[] =
1176 {
1177 START_DATA (acos_tonearest),
1178 TEST_f_f (acos, 0, M_PI_2l),
1179 TEST_f_f (acos, minus_zero, M_PI_2l),
1180 TEST_f_f (acos, 1, 0),
1181 TEST_f_f (acos, -1, M_PIl),
1182 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1183 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1184 END_DATA (acos_tonearest)
1185 };
1186
5ba3cc69
JM		 1187static void
1188acos_test_tonearest (void)
1189{
5ba3cc69
JM		 1190 errno = 0;
1191 FUNC(acos) (0);
1192 if (errno == ENOSYS)
1193 /* Function not implemented. */
1194 return;
1195
1196 START (acos_tonearest);
51df539d 1197 RUN_TEST_LOOP_f_f (acos, acos_tonearest_test_data, FE_TONEAREST);
5ba3cc69
JM		 1198 END (acos_tonearest);
1199}
1200
1201
74c57478
JM		 1202static const struct test_f_f_data acos_towardzero_test_data[] =
1203 {
1204 START_DATA (acos_towardzero),
1205 TEST_f_f (acos, 0, M_PI_2l),
1206 TEST_f_f (acos, minus_zero, M_PI_2l),
1207 TEST_f_f (acos, 1, 0),
1208 TEST_f_f (acos, -1, M_PIl),
1209 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1210 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1211 END_DATA (acos_towardzero)
1212 };
1213
5ba3cc69
JM		 1214static void
1215acos_test_towardzero (void)
1216{
5ba3cc69
JM		 1217 errno = 0;
1218 FUNC(acos) (0);
1219 if (errno == ENOSYS)
1220 /* Function not implemented. */
1221 return;
1222
1223 START (acos_towardzero);
74c57478 1224 RUN_TEST_LOOP_f_f (acos, acos_towardzero_test_data, FE_TOWARDZERO);
5ba3cc69
JM		 1225 END (acos_towardzero);
1226}
1227
1228
74c57478
JM		 1229static const struct test_f_f_data acos_downward_test_data[] =
1230 {
1231 START_DATA (acos_downward),
1232 TEST_f_f (acos, 0, M_PI_2l),
1233 TEST_f_f (acos, minus_zero, M_PI_2l),
1234 TEST_f_f (acos, 1, 0),
1235 TEST_f_f (acos, -1, M_PIl),
1236 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1237 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1238 END_DATA (acos_downward)
1239 };
1240
5ba3cc69
JM		 1241static void
1242acos_test_downward (void)
1243{
5ba3cc69
JM		 1244 errno = 0;
1245 FUNC(acos) (0);
1246 if (errno == ENOSYS)
1247 /* Function not implemented. */
1248 return;
1249
1250 START (acos_downward);
74c57478 1251 RUN_TEST_LOOP_f_f (acos, acos_downward_test_data, FE_DOWNWARD);
5ba3cc69
JM		 1252 END (acos_downward);
1253}
1254
1255
74c57478
JM		 1256static const struct test_f_f_data acos_upward_test_data[] =
1257 {
1258 START_DATA (acos_upward),
1259 TEST_f_f (acos, 0, M_PI_2l),
1260 TEST_f_f (acos, minus_zero, M_PI_2l),
1261 TEST_f_f (acos, 1, 0),
1262 TEST_f_f (acos, -1, M_PIl),
1263 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1264 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1265 END_DATA (acos_upward)
1266 };
1267
5ba3cc69
JM		 1268static void
1269acos_test_upward (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_upward);
74c57478 1278 RUN_TEST_LOOP_f_f (acos, acos_upward_test_data, FE_UPWARD);
5ba3cc69
JM		 1279 END (acos_upward);
1280}
1281
74c57478
JM		 1282static const struct test_f_f_data acosh_test_data[] =
1283 {
1284 START_DATA (acosh),
1285 TEST_f_f (acosh, plus_infty, plus_infty),
1286 TEST_f_f (acosh, minus_infty, qnan_value, INVALID_EXCEPTION),
1287 TEST_f_f (acosh, qnan_value, qnan_value),
1288
1289 /* x < 1: */
1290 TEST_f_f (acosh, -1.125L, qnan_value, INVALID_EXCEPTION),
1291 TEST_f_f (acosh, -max_value, qnan_value, INVALID_EXCEPTION),
1292
1293 TEST_f_f (acosh, 1, 0),
1294 TEST_f_f (acosh, 7, 2.63391579384963341725009269461593689L),
1295 END_DATA (acosh)
1296 };
1297
8847214f
UD		 1298static void
1299acosh_test (void)
1300{
aaca11d8
UD		 1301 errno = 0;
1302 FUNC(acosh) (7);
1303 if (errno == ENOSYS)
1304 /* Function not implemented. */
1305 return;
1306
8847214f 1307 START (acosh);
74c57478 1308 RUN_TEST_LOOP_f_f (acosh, acosh_test_data, );
8847214f
UD		 1309 END (acosh);
1310}
1311
74c57478
JM		 1312static const struct test_f_f_data asin_test_data[] =
1313 {
1314 START_DATA (asin),
1315 TEST_f_f (asin, plus_infty, qnan_value, INVALID_EXCEPTION),
1316 TEST_f_f (asin, minus_infty, qnan_value, INVALID_EXCEPTION),
1317 TEST_f_f (asin, qnan_value, qnan_value),
1318
1319 /* asin x == qNaN plus invalid exception for |x| > 1. */
1320 TEST_f_f (asin, 1.125L, qnan_value, INVALID_EXCEPTION),
1321 TEST_f_f (asin, -1.125L, qnan_value, INVALID_EXCEPTION),
1322 TEST_f_f (asin, max_value, qnan_value, INVALID_EXCEPTION),
1323 TEST_f_f (asin, -max_value, qnan_value, INVALID_EXCEPTION),
1324
1325 TEST_f_f (asin, 0, 0),
1326 TEST_f_f (asin, minus_zero, minus_zero),
1327 TEST_f_f (asin, 0.5, M_PI_6l),
1328 TEST_f_f (asin, -0.5, -M_PI_6l),
1329 TEST_f_f (asin, 1.0, M_PI_2l),
1330 TEST_f_f (asin, -1.0, -M_PI_2l),
1331 TEST_f_f (asin, 0.75L, 0.848062078981481008052944338998418080L),
1332 TEST_f_f (asin, 0x0.ffffffp0L, 1.5704510598101804156437184421571127056013L),
1333 TEST_f_f (asin, -0x0.ffffffp0L, -1.5704510598101804156437184421571127056013L),
1334#ifndef TEST_FLOAT
1335 TEST_f_f (asin, 0x0.ffffffff8p0L, 1.5707810680058339712015850710748035974710L),
1336 TEST_f_f (asin, -0x0.ffffffff8p0L, -1.5707810680058339712015850710748035974710L),
1337 TEST_f_f (asin, 0x0.ffffffffffffp0L, 1.5707962425011995974432331617542781977068L),
1338 TEST_f_f (asin, -0x0.ffffffffffffp0L, -1.5707962425011995974432331617542781977068L),
1339#endif
1340#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
1341 TEST_f_f (asin, 0x0.ffffffffffffffffp0L, 1.5707963264656243652399620683025688888978L),
1342 TEST_f_f (asin, -0x0.ffffffffffffffffp0L, -1.5707963264656243652399620683025688888978L),
1343#endif
1344 END_DATA (asin)
1345 };
1346
8847214f
UD		 1347static void
1348asin_test (void)
1349{
e6d3c4a7
AJ		 1350 errno = 0;
1351 FUNC(asin) (0);
1352 if (errno == ENOSYS)
1353 /* Function not implemented. */
1354 return;
8847214f
UD		 1355
1356 START (asin);
74c57478 1357 RUN_TEST_LOOP_f_f (asin, asin_test_data, );
8847214f
UD		 1358 END (asin);
1359}
1360
5ba3cc69 1361
74c57478
JM		 1362static const struct test_f_f_data asin_tonearest_test_data[] =
1363 {
1364 START_DATA (asin_tonearest),
1365 TEST_f_f (asin, 0, 0),
1366 TEST_f_f (asin, minus_zero, minus_zero),
1367 TEST_f_f (asin, 0.5, M_PI_6l),
1368 TEST_f_f (asin, -0.5, -M_PI_6l),
1369 TEST_f_f (asin, 1.0, M_PI_2l),
1370 TEST_f_f (asin, -1.0, -M_PI_2l),
1371 END_DATA (asin_tonearest)
1372 };
1373
5ba3cc69
JM		 1374static void
1375asin_test_tonearest (void)
1376{
5ba3cc69
JM		 1377 errno = 0;
1378 FUNC(asin) (0);
1379 if (errno == ENOSYS)
1380 /* Function not implemented. */
1381 return;
1382
1383 START (asin_tonearest);
74c57478 1384 RUN_TEST_LOOP_f_f (asin, asin_tonearest_test_data, FE_TONEAREST);
5ba3cc69
JM		 1385 END (asin_tonearest);
1386}
1387
1388
74c57478
JM		 1389static const struct test_f_f_data asin_towardzero_test_data[] =
1390 {
1391 START_DATA (asin_towardzero),
1392 TEST_f_f (asin, 0, 0),
1393 TEST_f_f (asin, minus_zero, minus_zero),
1394 TEST_f_f (asin, 0.5, M_PI_6l),
1395 TEST_f_f (asin, -0.5, -M_PI_6l),
1396 TEST_f_f (asin, 1.0, M_PI_2l),
1397 TEST_f_f (asin, -1.0, -M_PI_2l),
1398 END_DATA (asin_towardzero)
1399 };
1400
5ba3cc69
JM		 1401static void
1402asin_test_towardzero (void)
1403{
5ba3cc69
JM		 1404 errno = 0;
1405 FUNC(asin) (0);
1406 if (errno == ENOSYS)
1407 /* Function not implemented. */
1408 return;
1409
1410 START (asin_towardzero);
74c57478 1411 RUN_TEST_LOOP_f_f (asin, asin_towardzero_test_data, FE_TOWARDZERO);
5ba3cc69
JM		 1412 END (asin_towardzero);
1413}
1414
1415
74c57478
JM		 1416static const struct test_f_f_data asin_downward_test_data[] =
1417 {
1418 START_DATA (asin_downward),
1419 TEST_f_f (asin, 0, 0),
1420 TEST_f_f (asin, minus_zero, minus_zero),
1421 TEST_f_f (asin, 0.5, M_PI_6l),
1422 TEST_f_f (asin, -0.5, -M_PI_6l),
1423 TEST_f_f (asin, 1.0, M_PI_2l),
1424 TEST_f_f (asin, -1.0, -M_PI_2l),
1425 END_DATA (asin_downward)
1426 };
1427
5ba3cc69
JM		 1428static void
1429asin_test_downward (void)
1430{
5ba3cc69
JM		 1431 errno = 0;
1432 FUNC(asin) (0);
1433 if (errno == ENOSYS)
1434 /* Function not implemented. */
1435 return;
1436
1437 START (asin_downward);
74c57478 1438 RUN_TEST_LOOP_f_f (asin, asin_downward_test_data, FE_DOWNWARD);
5ba3cc69
JM		 1439 END (asin_downward);
1440}
1441
1442
74c57478
JM		 1443static const struct test_f_f_data asin_upward_test_data[] =
1444 {
1445 START_DATA (asin_upward),
1446 TEST_f_f (asin, 0, 0),
1447 TEST_f_f (asin, minus_zero, minus_zero),
1448 TEST_f_f (asin, 0.5, M_PI_6l),
1449 TEST_f_f (asin, -0.5, -M_PI_6l),
1450 TEST_f_f (asin, 1.0, M_PI_2l),
1451 TEST_f_f (asin, -1.0, -M_PI_2l),
1452 END_DATA (asin_upward)
1453 };
1454
5ba3cc69
JM		 1455static void
1456asin_test_upward (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_upward);
74c57478 1465 RUN_TEST_LOOP_f_f (asin, asin_upward_test_data, FE_UPWARD);
5ba3cc69
JM		 1466 END (asin_upward);
1467}
1468
74c57478
JM		 1469static const struct test_f_f_data asinh_test_data[] =
1470 {
1471 START_DATA (asinh),
1472 TEST_f_f (asinh, 0, 0),
1473 TEST_f_f (asinh, minus_zero, minus_zero),
1474#ifndef TEST_INLINE
1475 TEST_f_f (asinh, plus_infty, plus_infty),
1476 TEST_f_f (asinh, minus_infty, minus_infty),
1477#endif
1478 TEST_f_f (asinh, qnan_value, qnan_value),
1479 TEST_f_f (asinh, 0.75L, 0.693147180559945309417232121458176568L),
1480 END_DATA (asinh)
1481 };
1482
8847214f
UD		 1483static void
1484asinh_test (void)
1485{
aaca11d8 1486 errno = 0;
3c6cad26 1487 FUNC(asinh) (0.7L);
aaca11d8
UD		 1488 if (errno == ENOSYS)
1489 /* Function not implemented. */
1490 return;
1491
8847214f 1492 START (asinh);
74c57478 1493 RUN_TEST_LOOP_f_f (asinh, asinh_test_data, );
8847214f
UD		 1494 END (asinh);
1495}
1496
74c57478
JM		 1497static const struct test_f_f_data atan_test_data[] =
1498 {
1499 START_DATA (atan),
1500 TEST_f_f (atan, 0, 0),
1501 TEST_f_f (atan, minus_zero, minus_zero),
1502
1503 TEST_f_f (atan, plus_infty, M_PI_2l),
1504 TEST_f_f (atan, minus_infty, -M_PI_2l),
1505 TEST_f_f (atan, qnan_value, qnan_value),
1506 TEST_f_f (atan, max_value, M_PI_2l),
1507 TEST_f_f (atan, -max_value, -M_PI_2l),
1508
1509 TEST_f_f (atan, 1, M_PI_4l),
1510 TEST_f_f (atan, -1, -M_PI_4l),
1511
1512 TEST_f_f (atan, 0.75L, 0.643501108793284386802809228717322638L),
1513
1514 TEST_f_f (atan, 0x1p-100L, 0x1p-100L),
1515#ifndef TEST_FLOAT
1516 TEST_f_f (atan, 0x1p-600L, 0x1p-600L),
1517#endif
1518#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
1519 TEST_f_f (atan, 0x1p-10000L, 0x1p-10000L),
1520#endif
1521 END_DATA (atan)
1522 };
1523
8847214f
UD		 1524static void
1525atan_test (void)
1526{
e6d3c4a7
AJ		 1527 errno = 0;
1528 FUNC(atan) (0);
1529 if (errno == ENOSYS)
1530 /* Function not implemented. */
1531 return;
8847214f
UD		 1532
1533 START (atan);
74c57478 1534 RUN_TEST_LOOP_f_f (atan, atan_test_data, );
8847214f
UD		 1535 END (atan);
1536}
1537
1538
1539
74c57478
JM		 1540static const struct test_f_f_data atanh_test_data[] =
1541 {
1542 START_DATA (atanh),
1543 TEST_f_f (atanh, 0, 0),
1544 TEST_f_f (atanh, minus_zero, minus_zero),
1545
1546 TEST_f_f (atanh, 1, plus_infty, DIVIDE_BY_ZERO_EXCEPTION),
1547 TEST_f_f (atanh, -1, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
1548 TEST_f_f (atanh, qnan_value, qnan_value),
1549
1550 /* atanh (x) == qNaN plus invalid exception if |x| > 1. */
1551 TEST_f_f (atanh, 1.125L, qnan_value, INVALID_EXCEPTION),
1552 TEST_f_f (atanh, -1.125L, qnan_value, INVALID_EXCEPTION),
1553 TEST_f_f (atanh, max_value, qnan_value, INVALID_EXCEPTION),
1554 TEST_f_f (atanh, -max_value, qnan_value, INVALID_EXCEPTION),
1555
1556 TEST_f_f (atanh, 0.75L, 0.972955074527656652552676371721589865L),
1557 END_DATA (atanh)
1558 };
1559
8847214f
UD		 1560static void
1561atanh_test (void)
1562{
aaca11d8 1563 errno = 0;
3c6cad26 1564 FUNC(atanh) (0.7L);
aaca11d8
UD		 1565 if (errno == ENOSYS)
1566 /* Function not implemented. */
1567 return;
8847214f
UD		 1568
1569 START (atanh);
74c57478 1570 RUN_TEST_LOOP_f_f (atanh, atanh_test_data, );
8847214f
UD		 1571 END (atanh);
1572}
1573
601a3a5f
JM		 1574static const struct test_ff_f_data atan2_test_data[] =
1575 {
1576 START_DATA (atan2),
1577 /* atan2 (0,x) == 0 for x > 0. */
1578 TEST_ff_f (atan2, 0, 1, 0),
8847214f 1579
601a3a5f
JM		 1580 /* atan2 (-0,x) == -0 for x > 0. */
1581 TEST_ff_f (atan2, minus_zero, 1, minus_zero),
8847214f 1582
601a3a5f
JM		 1583 TEST_ff_f (atan2, 0, 0, 0),
1584 TEST_ff_f (atan2, minus_zero, 0, minus_zero),
8847214f 1585
601a3a5f
JM		 1586 /* atan2 (+0,x) == +pi for x < 0. */
1587 TEST_ff_f (atan2, 0, -1, M_PIl),
8847214f 1588
601a3a5f
JM		 1589 /* atan2 (-0,x) == -pi for x < 0. */
1590 TEST_ff_f (atan2, minus_zero, -1, -M_PIl),
8847214f 1591
601a3a5f
JM		 1592 TEST_ff_f (atan2, 0, minus_zero, M_PIl),
1593 TEST_ff_f (atan2, minus_zero, minus_zero, -M_PIl),
8847214f 1594
601a3a5f
JM		 1595 /* atan2 (y,+0) == pi/2 for y > 0. */
1596 TEST_ff_f (atan2, 1, 0, M_PI_2l),
8847214f 1597
601a3a5f
JM		 1598 /* atan2 (y,-0) == pi/2 for y > 0. */
1599 TEST_ff_f (atan2, 1, minus_zero, M_PI_2l),
8847214f 1600
601a3a5f
JM		 1601 /* atan2 (y,+0) == -pi/2 for y < 0. */
1602 TEST_ff_f (atan2, -1, 0, -M_PI_2l),
8847214f 1603
601a3a5f
JM		 1604 /* atan2 (y,-0) == -pi/2 for y < 0. */
1605 TEST_ff_f (atan2, -1, minus_zero, -M_PI_2l),
8847214f 1606
601a3a5f
JM		 1607 /* atan2 (y,inf) == +0 for finite y > 0. */
1608 TEST_ff_f (atan2, 1, plus_infty, 0),
8847214f 1609
601a3a5f
JM		 1610 /* atan2 (y,inf) == -0 for finite y < 0. */
1611 TEST_ff_f (atan2, -1, plus_infty, minus_zero),
8847214f 1612
601a3a5f
JM		 1613 /* atan2(+inf, x) == pi/2 for finite x. */
1614 TEST_ff_f (atan2, plus_infty, -1, M_PI_2l),
8847214f 1615
601a3a5f
JM		 1616 /* atan2(-inf, x) == -pi/2 for finite x. */
1617 TEST_ff_f (atan2, minus_infty, 1, -M_PI_2l),
8847214f 1618
601a3a5f
JM		 1619 /* atan2 (y,-inf) == +pi for finite y > 0. */
1620 TEST_ff_f (atan2, 1, minus_infty, M_PIl),
8847214f 1621
601a3a5f
JM		 1622 /* atan2 (y,-inf) == -pi for finite y < 0. */
1623 TEST_ff_f (atan2, -1, minus_infty, -M_PIl),
8847214f 1624
601a3a5f
JM		 1625 TEST_ff_f (atan2, plus_infty, plus_infty, M_PI_4l),
1626 TEST_ff_f (atan2, minus_infty, plus_infty, -M_PI_4l),
1627 TEST_ff_f (atan2, plus_infty, minus_infty, M_PI_34l),
1628 TEST_ff_f (atan2, minus_infty, minus_infty, -M_PI_34l),
1629 TEST_ff_f (atan2, qnan_value, qnan_value, qnan_value),
8847214f 1630
601a3a5f 1631 TEST_ff_f (atan2, max_value, max_value, M_PI_4l),
7726d6a9 1632
601a3a5f
JM		 1633 TEST_ff_f (atan2, max_value, min_value, M_PI_2l),
1634 TEST_ff_f (atan2, -max_value, -min_value, -M_PI_2l),
6d33cc9d 1635
601a3a5f
JM		 1636 TEST_ff_f (atan2, 0.75L, 1, 0.643501108793284386802809228717322638L),
1637 TEST_ff_f (atan2, -0.75L, 1.0L, -0.643501108793284386802809228717322638L),
1638 TEST_ff_f (atan2, 0.75L, -1.0L, 2.49809154479650885165983415456218025L),
1639 TEST_ff_f (atan2, -0.75L, -1.0L, -2.49809154479650885165983415456218025L),
1640 TEST_ff_f (atan2, 0.390625L, .00029L, 1.57005392693128974780151246612928941L),
1641 TEST_ff_f (atan2, 1.390625L, 0.9296875L, 0.981498387184244311516296577615519772L),
8847214f 1642
601a3a5f 1643 TEST_ff_f (atan2, -0.00756827042671106339L, -.001792735857538728036L, -1.80338464113663849327153994379639112L),
16a0e2ec 1644#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
601a3a5f 1645 TEST_ff_f (atan2, 0x1.00000000000001p0L, 0x1.00000000000001p0L, M_PI_4l),
16a0e2ec 1646#endif
601a3a5f
JM		 1647 END_DATA (atan2)
1648 };
bb3f4825 1649
601a3a5f
JM		 1650static void
1651atan2_test (void)
1652{
1653 errno = 0;
1654 FUNC(atan2) (-0, 1);
1655 if (errno == ENOSYS)
1656 /* Function not implemented. */
1657 return;
1658
1659 START (atan2);
1660 RUN_TEST_LOOP_ff_f (atan2, atan2_test_data, );
8847214f
UD		 1661 END (atan2);
1662}
1663
8847214f
UD		 1664static void
1665cabs_test (void)
1666{
aaca11d8 1667 errno = 0;
3c6cad26 1668 FUNC(cabs) (BUILD_COMPLEX (0.7L, 12.4L));
aaca11d8
UD		 1669 if (errno == ENOSYS)
1670 /* Function not implemented. */
1671 return;
1672
8847214f
UD		 1673 START (cabs);
1674
1675 /* cabs (x + iy) is specified as hypot (x,y) */
1676
1677 /* cabs (+inf + i x) == +inf. */
1678 TEST_c_f (cabs, plus_infty, 1.0, plus_infty);
1679 /* cabs (-inf + i x) == +inf. */
1680 TEST_c_f (cabs, minus_infty, 1.0, plus_infty);
1681
67e971f1
TS		 1682 TEST_c_f (cabs, minus_infty, qnan_value, plus_infty);
1683 TEST_c_f (cabs, minus_infty, qnan_value, plus_infty);
8847214f 1684
67e971f1 1685 TEST_c_f (cabs, qnan_value, qnan_value, qnan_value);
8847214f
UD		 1686
1687 /* cabs (x,y) == cabs (y,x). */
2550dfe9 1688 TEST_c_f (cabs, 0.75L, 12.390625L, 12.4133028598606664302388810868156657L);
8847214f 1689 /* cabs (x,y) == cabs (-x,y). */
2550dfe9 1690 TEST_c_f (cabs, -12.390625L, 0.75L, 12.4133028598606664302388810868156657L);
8847214f 1691 /* cabs (x,y) == cabs (-y,x). */
2550dfe9 1692 TEST_c_f (cabs, -0.75L, 12.390625L, 12.4133028598606664302388810868156657L);
8847214f 1693 /* cabs (x,y) == cabs (-x,-y). */
2550dfe9 1694 TEST_c_f (cabs, -12.390625L, -0.75L, 12.4133028598606664302388810868156657L);
8847214f 1695 /* cabs (x,y) == cabs (-y,-x). */
2550dfe9 1696 TEST_c_f (cabs, -0.75L, -12.390625L, 12.4133028598606664302388810868156657L);
8847214f 1697 /* cabs (x,0) == fabs (x). */
2550dfe9
AJ		 1698 TEST_c_f (cabs, -0.75L, 0, 0.75L);
1699 TEST_c_f (cabs, 0.75L, 0, 0.75L);
8847214f
UD		 1700 TEST_c_f (cabs, -1.0L, 0, 1.0L);
1701 TEST_c_f (cabs, 1.0L, 0, 1.0L);
1702 TEST_c_f (cabs, -5.7e7L, 0, 5.7e7L);
1703 TEST_c_f (cabs, 5.7e7L, 0, 5.7e7L);
1704
2550dfe9 1705 TEST_c_f (cabs, 0.75L, 1.25L, 1.45773797371132511771853821938639577L);
8847214f
UD		 1706
1707 END (cabs);
1708}
1709
2550dfe9 1710
08198877
JM		 1711static const struct test_c_c_data cacos_test_data[] =
1712 {
1713 START_DATA (cacos),
1714 TEST_c_c (cacos, 0, 0, M_PI_2l, minus_zero),
1715 TEST_c_c (cacos, minus_zero, 0, M_PI_2l, minus_zero),
1716 TEST_c_c (cacos, minus_zero, minus_zero, M_PI_2l, 0.0),
1717 TEST_c_c (cacos, 0, minus_zero, M_PI_2l, 0.0),
1718
1719 TEST_c_c (cacos, minus_infty, plus_infty, M_PI_34l, minus_infty),
1720 TEST_c_c (cacos, minus_infty, minus_infty, M_PI_34l, plus_infty),
1721
1722 TEST_c_c (cacos, plus_infty, plus_infty, M_PI_4l, minus_infty),
1723 TEST_c_c (cacos, plus_infty, minus_infty, M_PI_4l, plus_infty),
1724
1725 TEST_c_c (cacos, -10.0, plus_infty, M_PI_2l, minus_infty),
1726 TEST_c_c (cacos, -10.0, minus_infty, M_PI_2l, plus_infty),
1727 TEST_c_c (cacos, 0, plus_infty, M_PI_2l, minus_infty),
1728 TEST_c_c (cacos, 0, minus_infty, M_PI_2l, plus_infty),
1729 TEST_c_c (cacos, 0.1L, plus_infty, M_PI_2l, minus_infty),
1730 TEST_c_c (cacos, 0.1L, minus_infty, M_PI_2l, plus_infty),
1731
1732 TEST_c_c (cacos, minus_infty, 0, M_PIl, minus_infty),
1733 TEST_c_c (cacos, minus_infty, minus_zero, M_PIl, plus_infty),
1734 TEST_c_c (cacos, minus_infty, 100, M_PIl, minus_infty),
1735 TEST_c_c (cacos, minus_infty, -100, M_PIl, plus_infty),
1736
1737 TEST_c_c (cacos, plus_infty, 0, 0.0, minus_infty),
1738 TEST_c_c (cacos, plus_infty, minus_zero, 0.0, plus_infty),
1739 TEST_c_c (cacos, plus_infty, 0.5, 0.0, minus_infty),
1740 TEST_c_c (cacos, plus_infty, -0.5, 0.0, plus_infty),
1741
1742 TEST_c_c (cacos, plus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
1743 TEST_c_c (cacos, minus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
1744
1745 TEST_c_c (cacos, 0, qnan_value, M_PI_2l, qnan_value),
1746 TEST_c_c (cacos, minus_zero, qnan_value, M_PI_2l, qnan_value),
1747
1748 TEST_c_c (cacos, qnan_value, plus_infty, qnan_value, minus_infty),
1749 TEST_c_c (cacos, qnan_value, minus_infty, qnan_value, plus_infty),
1750
1751 TEST_c_c (cacos, 10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
1752 TEST_c_c (cacos, -10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
1753
1754 TEST_c_c (cacos, qnan_value, 0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
1755 TEST_c_c (cacos, qnan_value, -0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
1756
1757 TEST_c_c (cacos, qnan_value, qnan_value, qnan_value, qnan_value),
1758
1759 TEST_c_c (cacos, plus_zero, -1.5L, M_PI_2l, 1.194763217287109304111930828519090523536L),
1760 TEST_c_c (cacos, minus_zero, -1.5L, M_PI_2l, 1.194763217287109304111930828519090523536L),
1761 TEST_c_c (cacos, plus_zero, -1.0L, M_PI_2l, 0.8813735870195430252326093249797923090282L),
1762 TEST_c_c (cacos, minus_zero, -1.0L, M_PI_2l, 0.8813735870195430252326093249797923090282L),
1763 TEST_c_c (cacos, plus_zero, -0.5L, M_PI_2l, 0.4812118250596034474977589134243684231352L),
1764 TEST_c_c (cacos, minus_zero, -0.5L, M_PI_2l, 0.4812118250596034474977589134243684231352L),
1765 TEST_c_c (cacos, plus_zero, 0.5L, M_PI_2l, -0.4812118250596034474977589134243684231352L),
1766 TEST_c_c (cacos, minus_zero, 0.5L, M_PI_2l, -0.4812118250596034474977589134243684231352L),
1767 TEST_c_c (cacos, plus_zero, 1.0L, M_PI_2l, -0.8813735870195430252326093249797923090282L),
1768 TEST_c_c (cacos, minus_zero, 1.0L, M_PI_2l, -0.8813735870195430252326093249797923090282L),
1769 TEST_c_c (cacos, plus_zero, 1.5L, M_PI_2l, -1.194763217287109304111930828519090523536L),
1770 TEST_c_c (cacos, minus_zero, 1.5L, M_PI_2l, -1.194763217287109304111930828519090523536L),
1771
1772 TEST_c_c (cacos, -1.5L, plus_zero, M_PIl, -0.9624236501192068949955178268487368462704L),
1773 TEST_c_c (cacos, -1.5L, minus_zero, M_PIl, 0.9624236501192068949955178268487368462704L),
1774 TEST_c_c (cacos, -1.0L, plus_zero, M_PIl, minus_zero),
1775 TEST_c_c (cacos, -1.0L, minus_zero, M_PIl, plus_zero),
1776 TEST_c_c (cacos, -0.5L, plus_zero, 2.094395102393195492308428922186335256131L, minus_zero),
1777 TEST_c_c (cacos, -0.5L, minus_zero, 2.094395102393195492308428922186335256131L, plus_zero),
1778 TEST_c_c (cacos, 0.5L, plus_zero, 1.047197551196597746154214461093167628066L, minus_zero),
1779 TEST_c_c (cacos, 0.5L, minus_zero, 1.047197551196597746154214461093167628066L, plus_zero),
1780 TEST_c_c (cacos, 1.0L, plus_zero, plus_zero, minus_zero),
1781 TEST_c_c (cacos, 1.0L, minus_zero, plus_zero, plus_zero),
1782 TEST_c_c (cacos, 1.5L, plus_zero, plus_zero, -0.9624236501192068949955178268487368462704L),
1783 TEST_c_c (cacos, 1.5L, minus_zero, plus_zero, 0.9624236501192068949955178268487368462704L),
1784
1785 TEST_c_c (cacos, 0x1p50L, 1.0L, 8.881784197001252323389053344727730248720e-16L, -3.535050620855721078027883819436720218708e1L),
1786 TEST_c_c (cacos, 0x1p50L, -1.0L, 8.881784197001252323389053344727730248720e-16L, 3.535050620855721078027883819436720218708e1L),
1787 TEST_c_c (cacos, -0x1p50L, 1.0L, 3.141592653589792350284223683154270545292L, -3.535050620855721078027883819436720218708e1L),
1788 TEST_c_c (cacos, -0x1p50L, -1.0L, 3.141592653589792350284223683154270545292L, 3.535050620855721078027883819436720218708e1L),
1789 TEST_c_c (cacos, 1.0L, 0x1p50L, 1.570796326794895731052901991514519103193L, -3.535050620855721078027883819436759661753e1L),
1790 TEST_c_c (cacos, -1.0L, 0x1p50L, 1.570796326794897507409741391764983781004L, -3.535050620855721078027883819436759661753e1L),
1791 TEST_c_c (cacos, 1.0L, -0x1p50L, 1.570796326794895731052901991514519103193L, 3.535050620855721078027883819436759661753e1L),
1792 TEST_c_c (cacos, -1.0L, -0x1p50L, 1.570796326794897507409741391764983781004L, 3.535050620855721078027883819436759661753e1L),
728d7b43 1793#ifndef TEST_FLOAT
08198877
JM		 1794 TEST_c_c (cacos, 0x1p500L, 1.0L, 3.054936363499604682051979393213617699789e-151L, -3.472667374605326000180332928505464606058e2L),
1795 TEST_c_c (cacos, 0x1p500L, -1.0L, 3.054936363499604682051979393213617699789e-151L, 3.472667374605326000180332928505464606058e2L),
1796 TEST_c_c (cacos, -0x1p500L, 1.0L, 3.141592653589793238462643383279502884197L, -3.472667374605326000180332928505464606058e2L),
1797 TEST_c_c (cacos, -0x1p500L, -1.0L, 3.141592653589793238462643383279502884197L, 3.472667374605326000180332928505464606058e2L),
1798 TEST_c_c (cacos, 1.0L, 0x1p500L, 1.570796326794896619231321691639751442099L, -3.472667374605326000180332928505464606058e2L),
1799 TEST_c_c (cacos, -1.0L, 0x1p500L, 1.570796326794896619231321691639751442099L, -3.472667374605326000180332928505464606058e2L),
1800 TEST_c_c (cacos, 1.0L, -0x1p500L, 1.570796326794896619231321691639751442099L, 3.472667374605326000180332928505464606058e2L),
1801 TEST_c_c (cacos, -1.0L, -0x1p500L, 1.570796326794896619231321691639751442099L, 3.472667374605326000180332928505464606058e2L),
728d7b43
JM		 1802#endif
1803#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 1804 TEST_c_c (cacos, 0x1p5000L, 1.0L, 7.079811261048172892385615158694057552948e-1506L, -3.466429049980286492395577839412341016946e3L),
1805 TEST_c_c (cacos, 0x1p5000L, -1.0L, 7.079811261048172892385615158694057552948e-1506L, 3.466429049980286492395577839412341016946e3L),
1806 TEST_c_c (cacos, -0x1p5000L, 1.0L, 3.141592653589793238462643383279502884197L, -3.466429049980286492395577839412341016946e3L),
1807 TEST_c_c (cacos, -0x1p5000L, -1.0L, 3.141592653589793238462643383279502884197L, 3.466429049980286492395577839412341016946e3L),
1808 TEST_c_c (cacos, 1.0L, 0x1p5000L, 1.570796326794896619231321691639751442099L, -3.466429049980286492395577839412341016946e3L),
1809 TEST_c_c (cacos, -1.0L, 0x1p5000L, 1.570796326794896619231321691639751442099L, -3.466429049980286492395577839412341016946e3L),
1810 TEST_c_c (cacos, 1.0L, -0x1p5000L, 1.570796326794896619231321691639751442099L, 3.466429049980286492395577839412341016946e3L),
1811 TEST_c_c (cacos, -1.0L, -0x1p5000L, 1.570796326794896619231321691639751442099L, 3.466429049980286492395577839412341016946e3L),
728d7b43
JM		 1812#endif
1813
08198877 1814 TEST_c_c (cacos, 0x1.fp127L, 0x1.fp127L, 7.853981633974483096156608458198757210493e-1L, -8.973081118419833726837456344608533993585e1L),
728d7b43 1815#ifndef TEST_FLOAT
08198877 1816 TEST_c_c (cacos, 0x1.fp1023L, 0x1.fp1023L, 7.853981633974483096156608458198757210493e-1L, -7.107906849659093345062145442726115449315e2L),
728d7b43
JM		 1817#endif
1818#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 1819 TEST_c_c (cacos, 0x1.fp16383L, 0x1.fp16383L, 7.853981633974483096156608458198757210493e-1L, -1.135753137836666928715489992987020363057e4L),
728d7b43
JM		 1820#endif
1821
08198877
JM		 1822 TEST_c_c (cacos, 0x1.fp-129L, 1.5L, 1.570796326794896619231321691639751442097L, -1.194763217287109304111930828519090523536L),
1823 TEST_c_c (cacos, 0x1.fp-129L, -1.5L, 1.570796326794896619231321691639751442097L, 1.194763217287109304111930828519090523536L),
1824 TEST_c_c (cacos, -0x1.fp-129L, 1.5L, 1.570796326794896619231321691639751442100L, -1.194763217287109304111930828519090523536L),
1825 TEST_c_c (cacos, -0x1.fp-129L, -1.5L, 1.570796326794896619231321691639751442100L, 1.194763217287109304111930828519090523536L),
1826 TEST_c_c (cacos, 1.5L, 0x1.fp-129L, 2.546345110742945032959687790021055102355e-39L, -9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION_FLOAT),
1827 TEST_c_c (cacos, -1.5L, 0x1.fp-129L, 3.141592653589793238462643383279502884195L, -9.624236501192068949955178268487368462704e-1L),
1828 TEST_c_c (cacos, 1.5L, -0x1.fp-129L, 2.546345110742945032959687790021055102355e-39L, 9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION_FLOAT),
1829 TEST_c_c (cacos, -1.5L, -0x1.fp-129L, 3.141592653589793238462643383279502884195L, 9.624236501192068949955178268487368462704e-1L),
8cf28c5e 1830#ifndef TEST_FLOAT
08198877
JM		 1831 TEST_c_c (cacos, 0x1.fp-1025L, 1.5L, 1.570796326794896619231321691639751442099L, -1.194763217287109304111930828519090523536L),
1832 TEST_c_c (cacos, 0x1.fp-1025L, -1.5L, 1.570796326794896619231321691639751442099L, 1.194763217287109304111930828519090523536L),
1833 TEST_c_c (cacos, -0x1.fp-1025L, 1.5L, 1.570796326794896619231321691639751442099L, -1.194763217287109304111930828519090523536L),
1834 TEST_c_c (cacos, -0x1.fp-1025L, -1.5L, 1.570796326794896619231321691639751442099L, 1.194763217287109304111930828519090523536L),
1835 TEST_c_c (cacos, 1.5L, 0x1.fp-1025L, 4.819934639999230680322935210539402497827e-309L, -9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
1836 TEST_c_c (cacos, -1.5L, 0x1.fp-1025L, 3.141592653589793238462643383279502884197L, -9.624236501192068949955178268487368462704e-1L),
1837 TEST_c_c (cacos, 1.5L, -0x1.fp-1025L, 4.819934639999230680322935210539402497827e-309L, 9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
1838 TEST_c_c (cacos, -1.5L, -0x1.fp-1025L, 3.141592653589793238462643383279502884197L, 9.624236501192068949955178268487368462704e-1L),
8cf28c5e
JM		 1839#endif
1840#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 1841 TEST_c_c (cacos, 0x1.fp-16385L, 1.5L, 1.570796326794896619231321691639751442099L, -1.194763217287109304111930828519090523536L),
1842 TEST_c_c (cacos, 0x1.fp-16385L, -1.5L, 1.570796326794896619231321691639751442099L, 1.194763217287109304111930828519090523536L),
1843 TEST_c_c (cacos, -0x1.fp-16385L, 1.5L, 1.570796326794896619231321691639751442099L, -1.194763217287109304111930828519090523536L),
1844 TEST_c_c (cacos, -0x1.fp-16385L, -1.5L, 1.570796326794896619231321691639751442099L, 1.194763217287109304111930828519090523536L),
1845 TEST_c_c (cacos, 1.5L, 0x1.fp-16385L, 7.282957076134209141226696333885150260319e-4933L, -9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION),
1846 TEST_c_c (cacos, -1.5L, 0x1.fp-16385L, 3.141592653589793238462643383279502884197L, -9.624236501192068949955178268487368462704e-1L),
1847 TEST_c_c (cacos, 1.5L, -0x1.fp-16385L, 7.282957076134209141226696333885150260319e-4933L, 9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION),
1848 TEST_c_c (cacos, -1.5L, -0x1.fp-16385L, 3.141592653589793238462643383279502884197L, 9.624236501192068949955178268487368462704e-1L),
1849#endif
1850
1851 TEST_c_c (cacos, 0.5L, 1.0L, 1.221357263937683325603909865564381489366L, -9.261330313501824245501244453057873152694e-1L),
1852 TEST_c_c (cacos, 0.5L, -1.0L, 1.221357263937683325603909865564381489366L, 9.261330313501824245501244453057873152694e-1L),
1853 TEST_c_c (cacos, -0.5L, 1.0L, 1.920235389652109912858733517715121394831L, -9.261330313501824245501244453057873152694e-1L),
1854 TEST_c_c (cacos, -0.5L, -1.0L, 1.920235389652109912858733517715121394831L, 9.261330313501824245501244453057873152694e-1L),
1855 TEST_c_c (cacos, 1.0L, 0.5L, 6.748888455860063801646649673121744318756e-1L, -7.328576759736452608886724437653071523305e-1L),
1856 TEST_c_c (cacos, -1.0L, 0.5L, 2.466703808003786858297978415967328452322L, -7.328576759736452608886724437653071523305e-1L),
1857 TEST_c_c (cacos, 1.0L, -0.5L, 6.748888455860063801646649673121744318756e-1L, 7.328576759736452608886724437653071523305e-1L),
1858 TEST_c_c (cacos, -1.0L, -0.5L, 2.466703808003786858297978415967328452322L, 7.328576759736452608886724437653071523305e-1L),
1859 TEST_c_c (cacos, 0.25L, 1.0L, 1.394493894017929688812643125003661339452L, -8.924633639033482359562124741744951972772e-1L),
1860 TEST_c_c (cacos, 0.25L, -1.0L, 1.394493894017929688812643125003661339452L, 8.924633639033482359562124741744951972772e-1L),
1861 TEST_c_c (cacos, -0.25L, 1.0L, 1.747098759571863549650000258275841544745L, -8.924633639033482359562124741744951972772e-1L),
1862 TEST_c_c (cacos, -0.25L, -1.0L, 1.747098759571863549650000258275841544745L, 8.924633639033482359562124741744951972772e-1L),
1863 TEST_c_c (cacos, 1.0L, 0.25L, 4.890443302710802929202843732146540079124e-1L, -5.097911466811016354623559941115413499164e-1L),
1864 TEST_c_c (cacos, -1.0L, 0.25L, 2.652548323318712945542359010064848876285L, -5.097911466811016354623559941115413499164e-1L),
1865 TEST_c_c (cacos, 1.0L, -0.25L, 4.890443302710802929202843732146540079124e-1L, 5.097911466811016354623559941115413499164e-1L),
1866 TEST_c_c (cacos, -1.0L, -0.25L, 2.652548323318712945542359010064848876285L, 5.097911466811016354623559941115413499164e-1L),
1867 TEST_c_c (cacos, 0x1.fp-10L, 1.0L, 1.569458417435338878318763342108699202986L, -8.813742198809567991336704287826445879025e-1L),
1868 TEST_c_c (cacos, 0x1.fp-10L, -1.0L, 1.569458417435338878318763342108699202986L, 8.813742198809567991336704287826445879025e-1L),
1869 TEST_c_c (cacos, -0x1.fp-10L, 1.0L, 1.572134236154454360143880041170803681211L, -8.813742198809567991336704287826445879025e-1L),
1870 TEST_c_c (cacos, -0x1.fp-10L, -1.0L, 1.572134236154454360143880041170803681211L, 8.813742198809567991336704287826445879025e-1L),
1871 TEST_c_c (cacos, 1.0L, 0x1.fp-10L, 4.349129763101882771258049954181971959031e-2L, -4.350501469856803800217957402220976497152e-2L),
1872 TEST_c_c (cacos, -1.0L, 0x1.fp-10L, 3.098101355958774410750062883737683164607L, -4.350501469856803800217957402220976497152e-2L),
1873 TEST_c_c (cacos, 1.0L, -0x1.fp-10L, 4.349129763101882771258049954181971959031e-2L, 4.350501469856803800217957402220976497152e-2L),
1874 TEST_c_c (cacos, -1.0L, -0x1.fp-10L, 3.098101355958774410750062883737683164607L, 4.350501469856803800217957402220976497152e-2L),
1875 TEST_c_c (cacos, 0x1.fp-30L, 1.0L, 1.570796325518966635014803151387033957091L, -8.813735870195430258081932989769495326854e-1L),
1876 TEST_c_c (cacos, 0x1.fp-30L, -1.0L, 1.570796325518966635014803151387033957091L, 8.813735870195430258081932989769495326854e-1L),
1877 TEST_c_c (cacos, -0x1.fp-30L, 1.0L, 1.570796328070826603447840231892468927106L, -8.813735870195430258081932989769495326854e-1L),
1878 TEST_c_c (cacos, -0x1.fp-30L, -1.0L, 1.570796328070826603447840231892468927106L, 8.813735870195430258081932989769495326854e-1L),
1879 TEST_c_c (cacos, 1.0L, 0x1.fp-30L, 4.247867097467650115899790787875186617316e-5L, -4.247867098745151888768727039216644758847e-5L),
1880 TEST_c_c (cacos, -1.0L, 0x1.fp-30L, 3.141550174918818561961484385371624132331L, -4.247867098745151888768727039216644758847e-5L),
1881 TEST_c_c (cacos, 1.0L, -0x1.fp-30L, 4.247867097467650115899790787875186617316e-5L, 4.247867098745151888768727039216644758847e-5L),
1882 TEST_c_c (cacos, -1.0L, -0x1.fp-30L, 3.141550174918818561961484385371624132331L, 4.247867098745151888768727039216644758847e-5L),
1883 TEST_c_c (cacos, 0x1.fp-100L, 1.0L, 1.570796326794896619231321691638670687364L, -8.813735870195430252326093249797923090282e-1L),
1884 TEST_c_c (cacos, 0x1.fp-100L, -1.0L, 1.570796326794896619231321691638670687364L, 8.813735870195430252326093249797923090282e-1L),
1885 TEST_c_c (cacos, -0x1.fp-100L, 1.0L, 1.570796326794896619231321691640832196834L, -8.813735870195430252326093249797923090282e-1L),
1886 TEST_c_c (cacos, -0x1.fp-100L, -1.0L, 1.570796326794896619231321691640832196834L, 8.813735870195430252326093249797923090282e-1L),
1887 TEST_c_c (cacos, 1.0L, 0x1.fp-100L, 1.236292038260260888664514866456887257525e-15L, -1.236292038260260888664514866457202186027e-15L),
1888 TEST_c_c (cacos, -1.0L, 0x1.fp-100L, 3.141592653589792002170605123018614219682L, -1.236292038260260888664514866457202186027e-15L),
1889 TEST_c_c (cacos, 1.0L, -0x1.fp-100L, 1.236292038260260888664514866456887257525e-15L, 1.236292038260260888664514866457202186027e-15L),
1890 TEST_c_c (cacos, -1.0L, -0x1.fp-100L, 3.141592653589792002170605123018614219682L, 1.236292038260260888664514866457202186027e-15L),
1891 TEST_c_c (cacos, 0x1.fp-129L, 1.0L, 1.570796326794896619231321691639751442097L, -8.813735870195430252326093249797923090282e-1L),
1892 TEST_c_c (cacos, 0x1.fp-129L, -1.0L, 1.570796326794896619231321691639751442097L, 8.813735870195430252326093249797923090282e-1L),
1893 TEST_c_c (cacos, -0x1.fp-129L, 1.0L, 1.570796326794896619231321691639751442101L, -8.813735870195430252326093249797923090282e-1L),
1894 TEST_c_c (cacos, -0x1.fp-129L, -1.0L, 1.570796326794896619231321691639751442101L, 8.813735870195430252326093249797923090282e-1L),
1895 TEST_c_c (cacos, 1.0L, 0x1.fp-129L, 5.335635276982233498398987585285818977930e-20L, -5.335635276982233498398987585285818977933e-20L),
1896 TEST_c_c (cacos, -1.0L, 0x1.fp-129L, 3.141592653589793238409287030509680549213L, -5.335635276982233498398987585285818977933e-20L),
1897 TEST_c_c (cacos, 1.0L, -0x1.fp-129L, 5.335635276982233498398987585285818977930e-20L, 5.335635276982233498398987585285818977933e-20L),
1898 TEST_c_c (cacos, -1.0L, -0x1.fp-129L, 3.141592653589793238409287030509680549213L, 5.335635276982233498398987585285818977933e-20L),
0a1b2ae6 1899#ifndef TEST_FLOAT
08198877
JM		 1900 TEST_c_c (cacos, 0x1.fp-1000L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1901 TEST_c_c (cacos, 0x1.fp-1000L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1902 TEST_c_c (cacos, -0x1.fp-1000L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1903 TEST_c_c (cacos, -0x1.fp-1000L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1904 TEST_c_c (cacos, 1.0L, 0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, -4.252291453851660175550490409247739011867e-151L),
1905 TEST_c_c (cacos, -1.0L, 0x1.fp-1000L, 3.141592653589793238462643383279502884197L, -4.252291453851660175550490409247739011867e-151L),
1906 TEST_c_c (cacos, 1.0L, -0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, 4.252291453851660175550490409247739011867e-151L),
1907 TEST_c_c (cacos, -1.0L, -0x1.fp-1000L, 3.141592653589793238462643383279502884197L, 4.252291453851660175550490409247739011867e-151L),
1908 TEST_c_c (cacos, 0x1.fp-1025L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1909 TEST_c_c (cacos, 0x1.fp-1025L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1910 TEST_c_c (cacos, -0x1.fp-1025L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1911 TEST_c_c (cacos, -0x1.fp-1025L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1912 TEST_c_c (cacos, 1.0L, 0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, -7.340879205566679497036857179189356754017e-155L),
1913 TEST_c_c (cacos, -1.0L, 0x1.fp-1025L, 3.141592653589793238462643383279502884197L, -7.340879205566679497036857179189356754017e-155L),
1914 TEST_c_c (cacos, 1.0L, -0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, 7.340879205566679497036857179189356754017e-155L),
1915 TEST_c_c (cacos, -1.0L, -0x1.fp-1025L, 3.141592653589793238462643383279502884197L, 7.340879205566679497036857179189356754017e-155L),
0a1b2ae6
JM		 1916#endif
1917#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 1918 TEST_c_c (cacos, 0x1.fp-10000L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1919 TEST_c_c (cacos, 0x1.fp-10000L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1920 TEST_c_c (cacos, -0x1.fp-10000L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1921 TEST_c_c (cacos, -0x1.fp-10000L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1922 TEST_c_c (cacos, 1.0L, 0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, -9.854680208706673586644342922051388714633e-1506L),
1923 TEST_c_c (cacos, -1.0L, 0x1.fp-10000L, 3.141592653589793238462643383279502884197L, -9.854680208706673586644342922051388714633e-1506L),
1924 TEST_c_c (cacos, 1.0L, -0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, 9.854680208706673586644342922051388714633e-1506L),
1925 TEST_c_c (cacos, -1.0L, -0x1.fp-10000L, 3.141592653589793238462643383279502884197L, 9.854680208706673586644342922051388714633e-1506L),
1926 TEST_c_c (cacos, 0x1.fp-16385L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1927 TEST_c_c (cacos, 0x1.fp-16385L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1928 TEST_c_c (cacos, -0x1.fp-16385L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1929 TEST_c_c (cacos, -0x1.fp-16385L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1930 TEST_c_c (cacos, 1.0L, 0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, -9.023632056840860275214893047597614177639e-2467L),
1931 TEST_c_c (cacos, -1.0L, 0x1.fp-16385L, 3.141592653589793238462643383279502884197L, -9.023632056840860275214893047597614177639e-2467L),
1932 TEST_c_c (cacos, 1.0L, -0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, 9.023632056840860275214893047597614177639e-2467L),
1933 TEST_c_c (cacos, -1.0L, -0x1.fp-16385L, 3.141592653589793238462643383279502884197L, 9.023632056840860275214893047597614177639e-2467L),
1934#endif
1935
1936 TEST_c_c (cacos, 0x1p-23L, 0x1.000002p0L, 1.570796242501204621739026081991856762292L, -8.813736713132400470205730751186547909968e-1L),
1937 TEST_c_c (cacos, 0x1p-23L, -0x1.000002p0L, 1.570796242501204621739026081991856762292L, 8.813736713132400470205730751186547909968e-1L),
1938 TEST_c_c (cacos, -0x1p-23L, 0x1.000002p0L, 1.570796411088588616723617301287646121905L, -8.813736713132400470205730751186547909968e-1L),
1939 TEST_c_c (cacos, -0x1p-23L, -0x1.000002p0L, 1.570796411088588616723617301287646121905L, 8.813736713132400470205730751186547909968e-1L),
1940 TEST_c_c (cacos, 0x1.000002p0L, 0x1p-23L, 2.222118384408546368406374049167636760903e-4L, -5.364668491573609633134147164031476452679e-4L),
1941 TEST_c_c (cacos, -0x1.000002p0L, 0x1p-23L, 3.141370441751352383825802745874586120521L, -5.364668491573609633134147164031476452679e-4L),
1942 TEST_c_c (cacos, 0x1.000002p0L, -0x1p-23L, 2.222118384408546368406374049167636760903e-4L, 5.364668491573609633134147164031476452679e-4L),
1943 TEST_c_c (cacos, -0x1.000002p0L, -0x1p-23L, 3.141370441751352383825802745874586120521L, 5.364668491573609633134147164031476452679e-4L),
1944 TEST_c_c (cacos, 0x1.fp-129L, 0x1.000002p0L, 1.570796326794896619231321691639751442097L, -8.813736713132375348727889167749389235161e-1L),
1945 TEST_c_c (cacos, 0x1.fp-129L, -0x1.000002p0L, 1.570796326794896619231321691639751442097L, 8.813736713132375348727889167749389235161e-1L),
1946 TEST_c_c (cacos, -0x1.fp-129L, 0x1.000002p0L, 1.570796326794896619231321691639751442101L, -8.813736713132375348727889167749389235161e-1L),
1947 TEST_c_c (cacos, -0x1.fp-129L, -0x1.000002p0L, 1.570796326794896619231321691639751442101L, 8.813736713132375348727889167749389235161e-1L),
1948 TEST_c_c (cacos, 0x1.000002p0L, 0x1.fp-129L, 5.830451806317544230969669308596361881467e-36L, -4.882812451493617206486388134172712975070e-4L),
1949 TEST_c_c (cacos, -0x1.000002p0L, 0x1.fp-129L, 3.141592653589793238462643383279502878367L, -4.882812451493617206486388134172712975070e-4L),
1950 TEST_c_c (cacos, 0x1.000002p0L, -0x1.fp-129L, 5.830451806317544230969669308596361881467e-36L, 4.882812451493617206486388134172712975070e-4L),
1951 TEST_c_c (cacos, -0x1.000002p0L, -0x1.fp-129L, 3.141592653589793238462643383279502878367L, 4.882812451493617206486388134172712975070e-4L),
1952 TEST_c_c (cacos, 0.0L, 0x1.000002p0L, 1.570796326794896619231321691639751442099L, -8.813736713132375348727889167749389235161e-1L),
1953 TEST_c_c (cacos, 0.0L, -0x1.000002p0L, 1.570796326794896619231321691639751442099L, 8.813736713132375348727889167749389235161e-1L),
1954 TEST_c_c (cacos, -0.0L, 0x1.000002p0L, 1.570796326794896619231321691639751442099L, -8.813736713132375348727889167749389235161e-1L),
1955 TEST_c_c (cacos, -0.0L, -0x1.000002p0L, 1.570796326794896619231321691639751442099L, 8.813736713132375348727889167749389235161e-1L),
1956 TEST_c_c (cacos, 0x1.000002p0L, 0.0L, 0.0L, -4.882812451493617206486388134172712975070e-4L),
1957 TEST_c_c (cacos, -0x1.000002p0L, 0.0L, 3.141592653589793238462643383279502884197L, -4.882812451493617206486388134172712975070e-4L),
1958 TEST_c_c (cacos, 0x1.000002p0L, -0.0L, 0.0L, 4.882812451493617206486388134172712975070e-4L),
1959 TEST_c_c (cacos, -0x1.000002p0L, -0.0L, 3.141592653589793238462643383279502884197L, 4.882812451493617206486388134172712975070e-4L),
3a7182a1 1960#ifndef TEST_FLOAT
08198877
JM		 1961 TEST_c_c (cacos, 0x1p-52L, 0x1.0000000000001p0L, 1.570796326794896462222075823262262934288L, -8.813735870195431822418551933572982483664e-1L),
1962 TEST_c_c (cacos, 0x1p-52L, -0x1.0000000000001p0L, 1.570796326794896462222075823262262934288L, 8.813735870195431822418551933572982483664e-1L),
1963 TEST_c_c (cacos, -0x1p-52L, 0x1.0000000000001p0L, 1.570796326794896776240567560017239949909L, -8.813735870195431822418551933572982483664e-1L),
1964 TEST_c_c (cacos, -0x1p-52L, -0x1.0000000000001p0L, 1.570796326794896776240567560017239949909L, 8.813735870195431822418551933572982483664e-1L),
1965 TEST_c_c (cacos, 0x1.0000000000001p0L, 0x1p-52L, 9.590301705980041385828904092662391018164e-9L, -2.315303644582684770975188768022139415020e-8L),
1966 TEST_c_c (cacos, -0x1.0000000000001p0L, 0x1p-52L, 3.141592643999491532482601997450598791535L, -2.315303644582684770975188768022139415020e-8L),
1967 TEST_c_c (cacos, 0x1.0000000000001p0L, -0x1p-52L, 9.590301705980041385828904092662391018164e-9L, 2.315303644582684770975188768022139415020e-8L),
1968 TEST_c_c (cacos, -0x1.0000000000001p0L, -0x1p-52L, 3.141592643999491532482601997450598791535L, 2.315303644582684770975188768022139415020e-8L),
1969 TEST_c_c (cacos, 0x1.fp-1025L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195431822418551933572895326024e-1L),
1970 TEST_c_c (cacos, 0x1.fp-1025L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195431822418551933572895326024e-1L),
1971 TEST_c_c (cacos, -0x1.fp-1025L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195431822418551933572895326024e-1L),
1972 TEST_c_c (cacos, -0x1.fp-1025L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195431822418551933572895326024e-1L),
1973 TEST_c_c (cacos, 0x1.0000000000001p0L, 0x1.fp-1025L, 2.557178503953494342609835913586108008322e-301L, -2.107342425544701550354780375182800088393e-8L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
1974 TEST_c_c (cacos, -0x1.0000000000001p0L, 0x1.fp-1025L, 3.141592653589793238462643383279502884197L, -2.107342425544701550354780375182800088393e-8L),
1975 TEST_c_c (cacos, 0x1.0000000000001p0L, -0x1.fp-1025L, 2.557178503953494342609835913586108008322e-301L, 2.107342425544701550354780375182800088393e-8L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
1976 TEST_c_c (cacos, -0x1.0000000000001p0L, -0x1.fp-1025L, 3.141592653589793238462643383279502884197L, 2.107342425544701550354780375182800088393e-8L),
1977 TEST_c_c (cacos, 0.0L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195431822418551933572895326024e-1L),
1978 TEST_c_c (cacos, 0.0L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195431822418551933572895326024e-1L),
1979 TEST_c_c (cacos, -0.0L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195431822418551933572895326024e-1L),
1980 TEST_c_c (cacos, -0.0L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195431822418551933572895326024e-1L),
1981 TEST_c_c (cacos, 0x1.0000000000001p0L, 0.0L, 0.0L, -2.107342425544701550354780375182800088393e-8L),
1982 TEST_c_c (cacos, -0x1.0000000000001p0L, 0.0L, 3.141592653589793238462643383279502884197L, -2.107342425544701550354780375182800088393e-8L),
1983 TEST_c_c (cacos, 0x1.0000000000001p0L, -0.0L, 0.0L, 2.107342425544701550354780375182800088393e-8L),
1984 TEST_c_c (cacos, -0x1.0000000000001p0L, -0.0L, 3.141592653589793238462643383279502884197L, 2.107342425544701550354780375182800088393e-8L),
3a7182a1
JM		 1985#endif
1986#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 1987 TEST_c_c (cacos, 0x1p-63L, 0x1.0000000000000002p0L, 1.570796326794896619154657020805582738031L, -8.813735870195430253092739958139610131001e-1L),
1988 TEST_c_c (cacos, 0x1p-63L, -0x1.0000000000000002p0L, 1.570796326794896619154657020805582738031L, 8.813735870195430253092739958139610131001e-1L),
1989 TEST_c_c (cacos, -0x1p-63L, 0x1.0000000000000002p0L, 1.570796326794896619307986362473920146166L, -8.813735870195430253092739958139610131001e-1L),
1990 TEST_c_c (cacos, -0x1p-63L, -0x1.0000000000000002p0L, 1.570796326794896619307986362473920146166L, 8.813735870195430253092739958139610131001e-1L),
1991 TEST_c_c (cacos, 0x1.0000000000000002p0L, 0x1p-63L, 2.119177303101063432592523199680782317447e-10L, -5.116146586219826555037807251857670783420e-10L),
1992 TEST_c_c (cacos, -0x1.0000000000000002p0L, 0x1p-63L, 3.141592653377875508152537040020250564229L, -5.116146586219826555037807251857670783420e-10L),
1993 TEST_c_c (cacos, 0x1.0000000000000002p0L, -0x1p-63L, 2.119177303101063432592523199680782317447e-10L, 5.116146586219826555037807251857670783420e-10L),
1994 TEST_c_c (cacos, -0x1.0000000000000002p0L, -0x1p-63L, 3.141592653377875508152537040020250564229L, 5.116146586219826555037807251857670783420e-10L),
3a7182a1 1995# if LDBL_MIN_EXP <= -16381
08198877
JM		 1996 TEST_c_c (cacos, 0x1.fp-16385L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430253092739958139610130980e-1L),
1997 TEST_c_c (cacos, 0x1.fp-16385L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430253092739958139610130980e-1L),
1998 TEST_c_c (cacos, -0x1.fp-16385L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430253092739958139610130980e-1L),
1999 TEST_c_c (cacos, -0x1.fp-16385L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430253092739958139610130980e-1L),
2000 TEST_c_c (cacos, 0x1.0000000000000002p0L, 0x1.fp-16385L, 1.748608650034385653922359120438227480943e-4923L, -4.656612873077392578082927418388212703712e-10L),
2001 TEST_c_c (cacos, -0x1.0000000000000002p0L, 0x1.fp-16385L, 3.141592653589793238462643383279502884197L, -4.656612873077392578082927418388212703712e-10L),
2002 TEST_c_c (cacos, 0x1.0000000000000002p0L, -0x1.fp-16385L, 1.748608650034385653922359120438227480943e-4923L, 4.656612873077392578082927418388212703712e-10L),
2003 TEST_c_c (cacos, -0x1.0000000000000002p0L, -0x1.fp-16385L, 3.141592653589793238462643383279502884197L, 4.656612873077392578082927418388212703712e-10L),
3a7182a1 2004# endif
08198877
JM		 2005 TEST_c_c (cacos, 0.0L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430253092739958139610130980e-1L),
2006 TEST_c_c (cacos, 0.0L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430253092739958139610130980e-1L),
2007 TEST_c_c (cacos, -0.0L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430253092739958139610130980e-1L),
2008 TEST_c_c (cacos, -0.0L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430253092739958139610130980e-1L),
2009 TEST_c_c (cacos, 0x1.0000000000000002p0L, 0.0L, 0.0L, -4.656612873077392578082927418388212703712e-10L),
2010 TEST_c_c (cacos, -0x1.0000000000000002p0L, 0.0L, 3.141592653589793238462643383279502884197L, -4.656612873077392578082927418388212703712e-10L),
2011 TEST_c_c (cacos, 0x1.0000000000000002p0L, -0.0L, 0.0L, 4.656612873077392578082927418388212703712e-10L),
2012 TEST_c_c (cacos, -0x1.0000000000000002p0L, -0.0L, 3.141592653589793238462643383279502884197L, 4.656612873077392578082927418388212703712e-10L),
3a7182a1
JM		 2013#endif
2014#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 2015 TEST_c_c (cacos, 0x1p-106L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639742726335L, -8.813735870195430252326093249798097405561e-1L),
2016 TEST_c_c (cacos, 0x1p-106L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639742726335L, 8.813735870195430252326093249798097405561e-1L),
2017 TEST_c_c (cacos, -0x1p-106L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639760157863L, -8.813735870195430252326093249798097405561e-1L),
2018 TEST_c_c (cacos, -0x1p-106L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639760157863L, 8.813735870195430252326093249798097405561e-1L),
2019 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, 0x1p-106L, 5.394221422390606848017034778914096659726e-17L, -2.285028863093221674154232933662774454211e-16L),
2020 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, 0x1p-106L, 3.141592653589793184520429159373434404027L, -2.285028863093221674154232933662774454211e-16L),
2021 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, -0x1p-106L, 5.394221422390606848017034778914096659726e-17L, 2.285028863093221674154232933662774454211e-16L),
2022 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, -0x1p-106L, 3.141592653589793184520429159373434404027L, 2.285028863093221674154232933662774454211e-16L),
2023 TEST_c_c (cacos, 0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249798097405561e-1L),
2024 TEST_c_c (cacos, 0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249798097405561e-1L),
2025 TEST_c_c (cacos, -0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249798097405561e-1L),
2026 TEST_c_c (cacos, -0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249798097405561e-1L),
2027 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 2.426922623448365473354662093431821897807e-293L, -2.220446049250313080847263336181636063482e-16L),
2028 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 3.141592653589793238462643383279502884197L, -2.220446049250313080847263336181636063482e-16L),
2029 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 2.426922623448365473354662093431821897807e-293L, 2.220446049250313080847263336181636063482e-16L),
2030 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 3.141592653589793238462643383279502884197L, 2.220446049250313080847263336181636063482e-16L),
2031 TEST_c_c (cacos, 0.0L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249798097405561e-1L),
2032 TEST_c_c (cacos, 0.0L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249798097405561e-1L),
2033 TEST_c_c (cacos, -0.0L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249798097405561e-1L),
2034 TEST_c_c (cacos, -0.0L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249798097405561e-1L),
2035 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, 0.0L, 0.0L, -2.220446049250313080847263336181636063482e-16L),
2036 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, 0.0L, 3.141592653589793238462643383279502884197L, -2.220446049250313080847263336181636063482e-16L),
2037 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, -0.0L, 0.0L, 2.220446049250313080847263336181636063482e-16L),
2038 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, -0.0L, 3.141592653589793238462643383279502884197L, 2.220446049250313080847263336181636063482e-16L),
3a7182a1
JM		 2039#endif
2040#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 2041 TEST_c_c (cacos, 0x1p-113L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751374007L, -8.813735870195430252326093249797924452120e-1L),
2042 TEST_c_c (cacos, 0x1p-113L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751374007L, 8.813735870195430252326093249797924452120e-1L),
2043 TEST_c_c (cacos, -0x1p-113L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751510190L, -8.813735870195430252326093249797924452120e-1L),
2044 TEST_c_c (cacos, -0x1p-113L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751510190L, 8.813735870195430252326093249797924452120e-1L),
2045 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, 0x1p-113L, 4.767863183742677481693563511435642755521e-18L, -2.019699255375255198156433710951064632386e-17L),
2046 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, 0x1p-113L, 3.141592653589793233694780199536825402504L, -2.019699255375255198156433710951064632386e-17L),
2047 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, -0x1p-113L, 4.767863183742677481693563511435642755521e-18L, 2.019699255375255198156433710951064632386e-17L),
2048 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, -0x1p-113L, 3.141592653589793233694780199536825402504L, 2.019699255375255198156433710951064632386e-17L),
2049 TEST_c_c (cacos, 0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797924452120e-1L),
2050 TEST_c_c (cacos, 0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797924452120e-1L),
2051 TEST_c_c (cacos, -0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797924452120e-1L),
2052 TEST_c_c (cacos, -0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797924452120e-1L),
2053 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 4.148847925325683229178506116378864361396e-4916L, -1.962615573354718824241727964954454332780e-17L),
2054 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 3.141592653589793238462643383279502884197L, -1.962615573354718824241727964954454332780e-17L),
2055 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 4.148847925325683229178506116378864361396e-4916L, 1.962615573354718824241727964954454332780e-17L),
2056 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 3.141592653589793238462643383279502884197L, 1.962615573354718824241727964954454332780e-17L),
2057 TEST_c_c (cacos, 0.0L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797924452120e-1L),
2058 TEST_c_c (cacos, 0.0L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797924452120e-1L),
2059 TEST_c_c (cacos, -0.0L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797924452120e-1L),
2060 TEST_c_c (cacos, -0.0L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797924452120e-1L),
2061 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, 0.0L, 0.0L, -1.962615573354718824241727964954454332780e-17L),
2062 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, 0.0L, 3.141592653589793238462643383279502884197L, -1.962615573354718824241727964954454332780e-17L),
2063 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, -0.0L, 0.0L, 1.962615573354718824241727964954454332780e-17L),
2064 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, -0.0L, 3.141592653589793238462643383279502884197L, 1.962615573354718824241727964954454332780e-17L),
2065#endif
2066
2067 TEST_c_c (cacos, 0x1p-23L, 0x0.ffffffp0L, 1.570796242501197085295336701632142060969L, -8.813735448726963984495965873956465777250e-1L),
2068 TEST_c_c (cacos, 0x1p-23L, -0x0.ffffffp0L, 1.570796242501197085295336701632142060969L, 8.813735448726963984495965873956465777250e-1L),
2069 TEST_c_c (cacos, -0x1p-23L, 0x0.ffffffp0L, 1.570796411088596153167306681647360823228L, -8.813735448726963984495965873956465777250e-1L),
2070 TEST_c_c (cacos, -0x1p-23L, -0x0.ffffffp0L, 1.570796411088596153167306681647360823228L, 8.813735448726963984495965873956465777250e-1L),
2071 TEST_c_c (cacos, 0x0.ffffffp0L, 0x1p-23L, 4.391863861910487109445187743978204002614e-4L, -2.714321200917194650737217746780928423385e-4L),
2072 TEST_c_c (cacos, -0x0.ffffffp0L, 0x1p-23L, 3.141153467203602189751698864505105063797L, -2.714321200917194650737217746780928423385e-4L),
2073 TEST_c_c (cacos, 0x0.ffffffp0L, -0x1p-23L, 4.391863861910487109445187743978204002614e-4L, 2.714321200917194650737217746780928423385e-4L),
2074 TEST_c_c (cacos, -0x0.ffffffp0L, -0x1p-23L, 3.141153467203602189751698864505105063797L, 2.714321200917194650737217746780928423385e-4L),
2075 TEST_c_c (cacos, 0x1.fp-129L, 0x0.ffffffp0L, 1.570796326794896619231321691639751442097L, -8.813735448726938863015878255140556727969e-1L),
2076 TEST_c_c (cacos, 0x1.fp-129L, -0x0.ffffffp0L, 1.570796326794896619231321691639751442097L, 8.813735448726938863015878255140556727969e-1L),
2077 TEST_c_c (cacos, -0x1.fp-129L, 0x0.ffffffp0L, 1.570796326794896619231321691639751442101L, -8.813735448726938863015878255140556727969e-1L),
2078 TEST_c_c (cacos, -0x1.fp-129L, -0x0.ffffffp0L, 1.570796326794896619231321691639751442101L, 8.813735448726938863015878255140556727969e-1L),
2079 TEST_c_c (cacos, 0x0.ffffffp0L, 0x1.fp-129L, 3.452669847162035876032494826387364972849e-4L, -8.245504387859737323891843603996428534945e-36L),
2080 TEST_c_c (cacos, -0x0.ffffffp0L, 0x1.fp-129L, 3.141247386605077034875040133796864147700L, -8.245504387859737323891843603996428534945e-36L),
2081 TEST_c_c (cacos, 0x0.ffffffp0L, -0x1.fp-129L, 3.452669847162035876032494826387364972849e-4L, 8.245504387859737323891843603996428534945e-36L),
2082 TEST_c_c (cacos, -0x0.ffffffp0L, -0x1.fp-129L, 3.141247386605077034875040133796864147700L, 8.245504387859737323891843603996428534945e-36L),
2083 TEST_c_c (cacos, 0.0L, 0x0.ffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735448726938863015878255140556727969e-1L),
2084 TEST_c_c (cacos, 0.0L, -0x0.ffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735448726938863015878255140556727969e-1L),
2085 TEST_c_c (cacos, -0.0L, 0x0.ffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735448726938863015878255140556727969e-1L),
2086 TEST_c_c (cacos, -0.0L, -0x0.ffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735448726938863015878255140556727969e-1L),
2087 TEST_c_c (cacos, 0x0.ffffffp0L, 0.0L, 3.452669847162035876032494826387364972849e-4L, -0.0L),
2088 TEST_c_c (cacos, -0x0.ffffffp0L, 0.0L, 3.141247386605077034875040133796864147700L, -0.0L),
2089 TEST_c_c (cacos, 0x0.ffffffp0L, -0.0L, 3.452669847162035876032494826387364972849e-4L, 0.0L),
2090 TEST_c_c (cacos, -0x0.ffffffp0L, -0.0L, 3.141247386605077034875040133796864147700L, 0.0L),
2091 TEST_c_c (cacos, 0x1p-23L, 0.5L, 1.570796220170866625230343643673321150378L, -4.812118250596059896127318386463676808798e-1L),
2092 TEST_c_c (cacos, 0x1p-23L, -0.5L, 1.570796220170866625230343643673321150378L, 4.812118250596059896127318386463676808798e-1L),
2093 TEST_c_c (cacos, -0x1p-23L, 0.5L, 1.570796433418926613232299739606181733819L, -4.812118250596059896127318386463676808798e-1L),
2094 TEST_c_c (cacos, -0x1p-23L, -0.5L, 1.570796433418926613232299739606181733819L, 4.812118250596059896127318386463676808798e-1L),
2095 TEST_c_c (cacos, 0.5L, 0x1p-23L, 1.047197551196603215914744618665204532273L, -1.376510308240943236356088341381173571841e-7L),
2096 TEST_c_c (cacos, -0.5L, 0x1p-23L, 2.094395102393190022547898764614298351924L, -1.376510308240943236356088341381173571841e-7L),
2097 TEST_c_c (cacos, 0.5L, -0x1p-23L, 1.047197551196603215914744618665204532273L, 1.376510308240943236356088341381173571841e-7L),
2098 TEST_c_c (cacos, -0.5L, -0x1p-23L, 2.094395102393190022547898764614298351924L, 1.376510308240943236356088341381173571841e-7L),
2099 TEST_c_c (cacos, 0x1.fp-129L, 0.5L, 1.570796326794896619231321691639751442096L, -4.812118250596034474977589134243684231352e-1L),
2100 TEST_c_c (cacos, 0x1.fp-129L, -0.5L, 1.570796326794896619231321691639751442096L, 4.812118250596034474977589134243684231352e-1L),
2101 TEST_c_c (cacos, -0x1.fp-129L, 0.5L, 1.570796326794896619231321691639751442101L, -4.812118250596034474977589134243684231352e-1L),
2102 TEST_c_c (cacos, -0x1.fp-129L, -0.5L, 1.570796326794896619231321691639751442101L, 4.812118250596034474977589134243684231352e-1L),
2103 TEST_c_c (cacos, 0.5L, 0x1.fp-129L, 1.047197551196597746154214461093167628066L, -3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2104 TEST_c_c (cacos, -0.5L, 0x1.fp-129L, 2.094395102393195492308428922186335256131L, -3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2105 TEST_c_c (cacos, 0.5L, -0x1.fp-129L, 1.047197551196597746154214461093167628066L, 3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2106 TEST_c_c (cacos, -0.5L, -0x1.fp-129L, 2.094395102393195492308428922186335256131L, 3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2107 TEST_c_c (cacos, 0x1p-23L, 0x1p-23L, 1.570796207585607068450636380271254316214L, -1.192092895507818146886315028596704749235e-7L),
2108 TEST_c_c (cacos, 0x1p-23L, -0x1p-23L, 1.570796207585607068450636380271254316214L, 1.192092895507818146886315028596704749235e-7L),
2109 TEST_c_c (cacos, -0x1p-23L, 0x1p-23L, 1.570796446004186170012007003008248567984L, -1.192092895507818146886315028596704749235e-7L),
2110 TEST_c_c (cacos, -0x1p-23L, -0x1p-23L, 1.570796446004186170012007003008248567984L, 1.192092895507818146886315028596704749235e-7L),
2111 TEST_c_c (cacos, 0x1.fp-129L, 0x1p-23L, 1.570796326794896619231321691639751442096L, -1.192092895507809676556842485683592032154e-7L),
2112 TEST_c_c (cacos, 0x1.fp-129L, -0x1p-23L, 1.570796326794896619231321691639751442096L, 1.192092895507809676556842485683592032154e-7L),
2113 TEST_c_c (cacos, -0x1.fp-129L, 0x1p-23L, 1.570796326794896619231321691639751442101L, -1.192092895507809676556842485683592032154e-7L),
2114 TEST_c_c (cacos, -0x1.fp-129L, -0x1p-23L, 1.570796326794896619231321691639751442101L, 1.192092895507809676556842485683592032154e-7L),
2115 TEST_c_c (cacos, 0x1p-23L, 0x1.fp-129L, 1.570796207585607068449789347324000006847L, -2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2116 TEST_c_c (cacos, -0x1p-23L, 0x1.fp-129L, 1.570796446004186170012854035955502877351L, -2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2117 TEST_c_c (cacos, 0x1p-23L, -0x1.fp-129L, 1.570796207585607068449789347324000006847L, 2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2118 TEST_c_c (cacos, -0x1p-23L, -0x1.fp-129L, 1.570796446004186170012854035955502877351L, 2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2119 TEST_c_c (cacos, 0.0L, 0x1p-23L, 1.570796326794896619231321691639751442099L, -1.192092895507809676556842485683592032154e-7L),
2120 TEST_c_c (cacos, 0.0L, -0x1p-23L, 1.570796326794896619231321691639751442099L, 1.192092895507809676556842485683592032154e-7L),
2121 TEST_c_c (cacos, -0.0L, 0x1p-23L, 1.570796326794896619231321691639751442099L, -1.192092895507809676556842485683592032154e-7L),
2122 TEST_c_c (cacos, -0.0L, -0x1p-23L, 1.570796326794896619231321691639751442099L, 1.192092895507809676556842485683592032154e-7L),
2123 TEST_c_c (cacos, 0x1p-23L, 0.0L, 1.570796207585607068449789347324000006847L, -0.0L),
2124 TEST_c_c (cacos, -0x1p-23L, 0.0L, 1.570796446004186170012854035955502877351L, -0.0L),
2125 TEST_c_c (cacos, 0x1p-23L, -0.0L, 1.570796207585607068449789347324000006847L, 0.0L),
2126 TEST_c_c (cacos, -0x1p-23L, -0.0L, 1.570796446004186170012854035955502877351L, 0.0L),
2127 TEST_c_c (cacos, 0x1.fp-129L, 0x1.fp-129L, 1.570796326794896619231321691639751442096L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2128 TEST_c_c (cacos, 0x1.fp-129L, -0x1.fp-129L, 1.570796326794896619231321691639751442096L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2129 TEST_c_c (cacos, -0x1.fp-129L, 0x1.fp-129L, 1.570796326794896619231321691639751442101L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2130 TEST_c_c (cacos, -0x1.fp-129L, -0x1.fp-129L, 1.570796326794896619231321691639751442101L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
ccc8cadf 2131#ifndef TEST_FLOAT
08198877
JM		 2132 TEST_c_c (cacos, 0x1p-52L, 0x0.fffffffffffff8p0L, 1.570796326794896462222075823262236786996L, -8.813735870195429467279863907910458761820e-1L),
2133 TEST_c_c (cacos, 0x1p-52L, -0x0.fffffffffffff8p0L, 1.570796326794896462222075823262236786996L, 8.813735870195429467279863907910458761820e-1L),
2134 TEST_c_c (cacos, -0x1p-52L, 0x0.fffffffffffff8p0L, 1.570796326794896776240567560017266097201L, -8.813735870195429467279863907910458761820e-1L),
2135 TEST_c_c (cacos, -0x1p-52L, -0x0.fffffffffffff8p0L, 1.570796326794896776240567560017266097201L, 8.813735870195429467279863907910458761820e-1L),
2136 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, 0x1p-52L, 1.895456983915074112227925127005564372844e-8L, -1.171456840272878582596796205397918831268e-8L),
2137 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, 0x1p-52L, 3.141592634635223399311902261000251614142L, -1.171456840272878582596796205397918831268e-8L),
2138 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, -0x1p-52L, 1.895456983915074112227925127005564372844e-8L, 1.171456840272878582596796205397918831268e-8L),
2139 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, -0x1p-52L, 3.141592634635223399311902261000251614142L, 1.171456840272878582596796205397918831268e-8L),
2140 TEST_c_c (cacos, 0x1.fp-1025L, 0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195429467279863907910371604180e-1L),
2141 TEST_c_c (cacos, 0x1.fp-1025L, -0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195429467279863907910371604180e-1L),
2142 TEST_c_c (cacos, -0x1.fp-1025L, 0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195429467279863907910371604180e-1L),
2143 TEST_c_c (cacos, -0x1.fp-1025L, -0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195429467279863907910371604180e-1L),
2144 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, 0x1.fp-1025L, 1.490116119384765638786343542550461592240e-8L, -3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2145 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, 0x1.fp-1025L, 3.141592638688632044614986995416067458693L, -3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2146 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, -0x1.fp-1025L, 1.490116119384765638786343542550461592240e-8L, 3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2147 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, -0x1.fp-1025L, 3.141592638688632044614986995416067458693L, 3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2148 TEST_c_c (cacos, 0.0L, 0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195429467279863907910371604180e-1L),
2149 TEST_c_c (cacos, 0.0L, -0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195429467279863907910371604180e-1L),
2150 TEST_c_c (cacos, -0.0L, 0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195429467279863907910371604180e-1L),
2151 TEST_c_c (cacos, -0.0L, -0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195429467279863907910371604180e-1L),
2152 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, 0.0L, 1.490116119384765638786343542550461592240e-8L, -0.0L),
2153 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, 0.0L, 3.141592638688632044614986995416067458693L, -0.0L),
2154 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, -0.0L, 1.490116119384765638786343542550461592240e-8L, 0.0L),
2155 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, -0.0L, 3.141592638688632044614986995416067458693L, 0.0L),
2156#endif
2157 TEST_c_c (cacos, 0x1p-52L, 0.5L, 1.570796326794896420628589431857911675917L, -4.812118250596034474977589134243772428682e-1L),
2158 TEST_c_c (cacos, 0x1p-52L, -0.5L, 1.570796326794896420628589431857911675917L, 4.812118250596034474977589134243772428682e-1L),
2159 TEST_c_c (cacos, -0x1p-52L, 0.5L, 1.570796326794896817834053951421591208280L, -4.812118250596034474977589134243772428682e-1L),
2160 TEST_c_c (cacos, -0x1p-52L, -0.5L, 1.570796326794896817834053951421591208280L, 4.812118250596034474977589134243772428682e-1L),
2161 TEST_c_c (cacos, 0.5L, 0x1p-52L, 1.047197551196597746154214461093186605110L, -2.563950248511418570403591756798643804971e-16L),
2162 TEST_c_c (cacos, -0.5L, 0x1p-52L, 2.094395102393195492308428922186316279087L, -2.563950248511418570403591756798643804971e-16L),
2163 TEST_c_c (cacos, 0.5L, -0x1p-52L, 1.047197551196597746154214461093186605110L, 2.563950248511418570403591756798643804971e-16L),
2164 TEST_c_c (cacos, -0.5L, -0x1p-52L, 2.094395102393195492308428922186316279087L, 2.563950248511418570403591756798643804971e-16L),
ccc8cadf 2165#ifndef TEST_FLOAT
08198877
JM		 2166 TEST_c_c (cacos, 0x1.fp-1025L, 0.5L, 1.570796326794896619231321691639751442099L, -4.812118250596034474977589134243684231352e-1L),
2167 TEST_c_c (cacos, 0x1.fp-1025L, -0.5L, 1.570796326794896619231321691639751442099L, 4.812118250596034474977589134243684231352e-1L),
2168 TEST_c_c (cacos, -0x1.fp-1025L, 0.5L, 1.570796326794896619231321691639751442099L, -4.812118250596034474977589134243684231352e-1L),
2169 TEST_c_c (cacos, -0x1.fp-1025L, -0.5L, 1.570796326794896619231321691639751442099L, 4.812118250596034474977589134243684231352e-1L),
2170 TEST_c_c (cacos, 0.5L, 0x1.fp-1025L, 1.047197551196597746154214461093167628066L, -6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2171 TEST_c_c (cacos, -0.5L, 0x1.fp-1025L, 2.094395102393195492308428922186335256131L, -6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2172 TEST_c_c (cacos, 0.5L, -0x1.fp-1025L, 1.047197551196597746154214461093167628066L, 6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2173 TEST_c_c (cacos, -0.5L, -0x1.fp-1025L, 2.094395102393195492308428922186335256131L, 6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2174#endif
2175 TEST_c_c (cacos, 0x1p-52L, 0x1p-52L, 1.570796326794896397186716766608443357372L, -2.220446049250313080847263336181677117148e-16L),
2176 TEST_c_c (cacos, 0x1p-52L, -0x1p-52L, 1.570796326794896397186716766608443357372L, 2.220446049250313080847263336181677117148e-16L),
2177 TEST_c_c (cacos, -0x1p-52L, 0x1p-52L, 1.570796326794896841275926616671059526825L, -2.220446049250313080847263336181677117148e-16L),
2178 TEST_c_c (cacos, -0x1p-52L, -0x1p-52L, 1.570796326794896841275926616671059526825L, 2.220446049250313080847263336181677117148e-16L),
ccc8cadf 2179#ifndef TEST_FLOAT
08198877
JM		 2180 TEST_c_c (cacos, 0x1.fp-1025L, 0x1p-52L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181622378926e-16L),
2181 TEST_c_c (cacos, 0x1.fp-1025L, -0x1p-52L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181622378926e-16L),
2182 TEST_c_c (cacos, -0x1.fp-1025L, 0x1p-52L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181622378926e-16L),
2183 TEST_c_c (cacos, -0x1.fp-1025L, -0x1p-52L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181622378926e-16L),
2184 TEST_c_c (cacos, 0x1p-52L, 0x1.fp-1025L, 1.570796326794896397186716766608443357372L, -5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2185 TEST_c_c (cacos, -0x1p-52L, 0x1.fp-1025L, 1.570796326794896841275926616671059526825L, -5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2186 TEST_c_c (cacos, 0x1p-52L, -0x1.fp-1025L, 1.570796326794896397186716766608443357372L, 5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2187 TEST_c_c (cacos, -0x1p-52L, -0x1.fp-1025L, 1.570796326794896841275926616671059526825L, 5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2188#endif
2189 TEST_c_c (cacos, 0.0L, 0x1p-52L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181622378926e-16L),
2190 TEST_c_c (cacos, 0.0L, -0x1p-52L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181622378926e-16L),
2191 TEST_c_c (cacos, -0.0L, 0x1p-52L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181622378926e-16L),
2192 TEST_c_c (cacos, -0.0L, -0x1p-52L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181622378926e-16L),
2193 TEST_c_c (cacos, 0x1p-52L, 0.0L, 1.570796326794896397186716766608443357372L, -0.0L),
2194 TEST_c_c (cacos, -0x1p-52L, 0.0L, 1.570796326794896841275926616671059526825L, -0.0L),
2195 TEST_c_c (cacos, 0x1p-52L, -0.0L, 1.570796326794896397186716766608443357372L, 0.0L),
2196 TEST_c_c (cacos, -0x1p-52L, -0.0L, 1.570796326794896841275926616671059526825L, 0.0L),
ccc8cadf 2197#ifndef TEST_FLOAT
08198877
JM		 2198 TEST_c_c (cacos, 0x1.fp-1025L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2199 TEST_c_c (cacos, 0x1.fp-1025L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2200 TEST_c_c (cacos, -0x1.fp-1025L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2201 TEST_c_c (cacos, -0x1.fp-1025L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
ccc8cadf
JM		 2202#endif
2203#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 2204 TEST_c_c (cacos, 0x1p-63L, 0x0.ffffffffffffffffp0L, 1.570796326794896619154657020805582738025L, -8.813735870195430251942769895627079569937e-1L),
2205 TEST_c_c (cacos, 0x1p-63L, -0x0.ffffffffffffffffp0L, 1.570796326794896619154657020805582738025L, 8.813735870195430251942769895627079569937e-1L),
2206 TEST_c_c (cacos, -0x1p-63L, 0x0.ffffffffffffffffp0L, 1.570796326794896619307986362473920146173L, -8.813735870195430251942769895627079569937e-1L),
2207 TEST_c_c (cacos, -0x1p-63L, -0x0.ffffffffffffffffp0L, 1.570796326794896619307986362473920146173L, 8.813735870195430251942769895627079569937e-1L),
2208 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, 0x1p-63L, 4.188407771167967636741951941902992986043e-10L, -2.588578361325995866221775673638805081337e-10L),
2209 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, 0x1p-63L, 3.141592653170952461345846619605307690007L, -2.588578361325995866221775673638805081337e-10L),
2210 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, -0x1p-63L, 4.188407771167967636741951941902992986043e-10L, 2.588578361325995866221775673638805081337e-10L),
2211 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, -0x1p-63L, 3.141592653170952461345846619605307690007L, 2.588578361325995866221775673638805081337e-10L),
ccc8cadf 2212# if LDBL_MIN_EXP <= -16381
08198877
JM		 2213 TEST_c_c (cacos, 0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430251942769895627079569917e-1L),
2214 TEST_c_c (cacos, 0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430251942769895627079569917e-1L),
2215 TEST_c_c (cacos, -0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430251942769895627079569917e-1L),
2216 TEST_c_c (cacos, -0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430251942769895627079569917e-1L),
2217 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 3.292722539913596233371825532007990724506e-10L, -2.472906068161537187835415298076415423459e-4923L),
2218 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 3.141592653260520984471283759942320330996L, -2.472906068161537187835415298076415423459e-4923L),
2219 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 3.292722539913596233371825532007990724506e-10L, 2.472906068161537187835415298076415423459e-4923L),
2220 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 3.141592653260520984471283759942320330996L, 2.472906068161537187835415298076415423459e-4923L),
ccc8cadf 2221# endif
08198877
JM		 2222 TEST_c_c (cacos, 0.0L, 0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430251942769895627079569917e-1L),
2223 TEST_c_c (cacos, 0.0L, -0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430251942769895627079569917e-1L),
2224 TEST_c_c (cacos, -0.0L, 0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430251942769895627079569917e-1L),
2225 TEST_c_c (cacos, -0.0L, -0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430251942769895627079569917e-1L),
2226 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, 0.0L, 3.292722539913596233371825532007990724506e-10L, -0.0L),
2227 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, 0.0L, 3.141592653260520984471283759942320330996L, -0.0L),
2228 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, -0.0L, 3.292722539913596233371825532007990724506e-10L, 0.0L),
2229 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, -0.0L, 3.141592653260520984471283759942320330996L, 0.0L),
2230#endif
2231 TEST_c_c (cacos, 0x1p-63L, 0.5L, 1.570796326794896619134347701278529840650L, -4.812118250596034474977589134243684231373e-1L),
2232 TEST_c_c (cacos, 0x1p-63L, -0.5L, 1.570796326794896619134347701278529840650L, 4.812118250596034474977589134243684231373e-1L),
2233 TEST_c_c (cacos, -0x1p-63L, 0.5L, 1.570796326794896619328295682000973043547L, -4.812118250596034474977589134243684231373e-1L),
2234 TEST_c_c (cacos, -0x1p-63L, -0.5L, 1.570796326794896619328295682000973043547L, 4.812118250596034474977589134243684231373e-1L),
2235 TEST_c_c (cacos, 0.5L, 0x1p-63L, 1.047197551196597746154214461093167628070L, -1.251928832280966098829878787499365228659e-19L),
2236 TEST_c_c (cacos, -0.5L, 0x1p-63L, 2.094395102393195492308428922186335256127L, -1.251928832280966098829878787499365228659e-19L),
2237 TEST_c_c (cacos, 0.5L, -0x1p-63L, 1.047197551196597746154214461093167628070L, 1.251928832280966098829878787499365228659e-19L),
2238 TEST_c_c (cacos, -0.5L, -0x1p-63L, 2.094395102393195492308428922186335256127L, 1.251928832280966098829878787499365228659e-19L),
ccc8cadf 2239#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2240 TEST_c_c (cacos, 0x1.fp-16385L, 0.5L, 1.570796326794896619231321691639751442099L, -4.812118250596034474977589134243684231352e-1L),
2241 TEST_c_c (cacos, 0x1.fp-16385L, -0.5L, 1.570796326794896619231321691639751442099L, 4.812118250596034474977589134243684231352e-1L),
2242 TEST_c_c (cacos, -0x1.fp-16385L, 0.5L, 1.570796326794896619231321691639751442099L, -4.812118250596034474977589134243684231352e-1L),
2243 TEST_c_c (cacos, -0x1.fp-16385L, -0.5L, 1.570796326794896619231321691639751442099L, 4.812118250596034474977589134243684231352e-1L),
2244 TEST_c_c (cacos, 0.5L, 0x1.fp-16385L, 1.047197551196597746154214461093167628066L, -9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
2245 TEST_c_c (cacos, -0.5L, 0x1.fp-16385L, 2.094395102393195492308428922186335256131L, -9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
2246 TEST_c_c (cacos, 0.5L, -0x1.fp-16385L, 1.047197551196597746154214461093167628066L, 9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
2247 TEST_c_c (cacos, -0.5L, -0x1.fp-16385L, 2.094395102393195492308428922186335256131L, 9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
2248#endif
2249 TEST_c_c (cacos, 0x1p-63L, 0x1p-63L, 1.570796326794896619122901474391200998698L, -1.084202172485504434007452800869941711430e-19L),
2250 TEST_c_c (cacos, 0x1p-63L, -0x1p-63L, 1.570796326794896619122901474391200998698L, 1.084202172485504434007452800869941711430e-19L),
2251 TEST_c_c (cacos, -0x1p-63L, 0x1p-63L, 1.570796326794896619339741908888301885499L, -1.084202172485504434007452800869941711430e-19L),
2252 TEST_c_c (cacos, -0x1p-63L, -0x1p-63L, 1.570796326794896619339741908888301885499L, 1.084202172485504434007452800869941711430e-19L),
ccc8cadf 2253#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2254 TEST_c_c (cacos, 0x1.fp-16385L, 0x1p-63L, 1.570796326794896619231321691639751442099L, -1.084202172485504434007452800869941711424e-19L),
2255 TEST_c_c (cacos, 0x1.fp-16385L, -0x1p-63L, 1.570796326794896619231321691639751442099L, 1.084202172485504434007452800869941711424e-19L),
2256 TEST_c_c (cacos, -0x1.fp-16385L, 0x1p-63L, 1.570796326794896619231321691639751442099L, -1.084202172485504434007452800869941711424e-19L),
2257 TEST_c_c (cacos, -0x1.fp-16385L, -0x1p-63L, 1.570796326794896619231321691639751442099L, 1.084202172485504434007452800869941711424e-19L),
2258 TEST_c_c (cacos, 0x1p-63L, 0x1.fp-16385L, 1.570796326794896619122901474391200998698L, -8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
2259 TEST_c_c (cacos, -0x1p-63L, 0x1.fp-16385L, 1.570796326794896619339741908888301885499L, -8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
2260 TEST_c_c (cacos, 0x1p-63L, -0x1.fp-16385L, 1.570796326794896619122901474391200998698L, 8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
2261 TEST_c_c (cacos, -0x1p-63L, -0x1.fp-16385L, 1.570796326794896619339741908888301885499L, 8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
2262#endif
2263 TEST_c_c (cacos, 0.0L, 0x1p-63L, 1.570796326794896619231321691639751442099L, -1.084202172485504434007452800869941711424e-19L),
2264 TEST_c_c (cacos, 0.0L, -0x1p-63L, 1.570796326794896619231321691639751442099L, 1.084202172485504434007452800869941711424e-19L),
2265 TEST_c_c (cacos, -0.0L, 0x1p-63L, 1.570796326794896619231321691639751442099L, -1.084202172485504434007452800869941711424e-19L),
2266 TEST_c_c (cacos, -0.0L, -0x1p-63L, 1.570796326794896619231321691639751442099L, 1.084202172485504434007452800869941711424e-19L),
2267 TEST_c_c (cacos, 0x1p-63L, 0.0L, 1.570796326794896619122901474391200998698L, -0.0L),
2268 TEST_c_c (cacos, -0x1p-63L, 0.0L, 1.570796326794896619339741908888301885499L, -0.0L),
2269 TEST_c_c (cacos, 0x1p-63L, -0.0L, 1.570796326794896619122901474391200998698L, 0.0L),
2270 TEST_c_c (cacos, -0x1p-63L, -0.0L, 1.570796326794896619339741908888301885499L, 0.0L),
ccc8cadf 2271#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2272 TEST_c_c (cacos, 0x1.fp-16385L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2273 TEST_c_c (cacos, 0x1.fp-16385L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2274 TEST_c_c (cacos, -0x1.fp-16385L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2275 TEST_c_c (cacos, -0x1.fp-16385L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
ccc8cadf
JM		 2276#endif
2277#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 2278 TEST_c_c (cacos, 0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639734010571L, -8.813735870195430252326093249797835932642e-1L),
2279 TEST_c_c (cacos, 0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639734010571L, 8.813735870195430252326093249797835932642e-1L),
2280 TEST_c_c (cacos, -0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639768873627L, -8.813735870195430252326093249797835932642e-1L),
2281 TEST_c_c (cacos, -0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639768873627L, 8.813735870195430252326093249797835932642e-1L),
2282 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 1.997188458999618357060632049675702684031e-16L, -1.234330349600789959989661887846005659983e-16L),
2283 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 3.141592653589793038743797483317667178134L, -1.234330349600789959989661887846005659983e-16L),
2284 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 1.997188458999618357060632049675702684031e-16L, 1.234330349600789959989661887846005659983e-16L),
2285 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 3.141592653589793038743797483317667178134L, 1.234330349600789959989661887846005659983e-16L),
2286 TEST_c_c (cacos, 0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797835932642e-1L),
2287 TEST_c_c (cacos, 0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797835932642e-1L),
2288 TEST_c_c (cacos, -0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797835932642e-1L),
2289 TEST_c_c (cacos, -0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797835932642e-1L),
2290 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 1.570092458683775059393382371963565104164e-16L, -3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2291 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 3.141592653589793081453397514901996944859L, -3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2292 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 1.570092458683775059393382371963565104164e-16L, 3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2293 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 3.141592653589793081453397514901996944859L, 3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2294 TEST_c_c (cacos, 0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797835932642e-1L),
2295 TEST_c_c (cacos, 0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797835932642e-1L),
2296 TEST_c_c (cacos, -0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797835932642e-1L),
2297 TEST_c_c (cacos, -0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797835932642e-1L),
2298 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 1.570092458683775059393382371963565104164e-16L, -0.0L),
2299 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 3.141592653589793081453397514901996944859L, -0.0L),
2300 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 1.570092458683775059393382371963565104164e-16L, 0.0L),
2301 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 3.141592653589793081453397514901996944859L, 0.0L),
2302#endif
2303 TEST_c_c (cacos, 0x1p-105L, 0.5L, 1.570796326794896619231321691639729392766L, -4.812118250596034474977589134243684231352e-1L),
2304 TEST_c_c (cacos, 0x1p-105L, -0.5L, 1.570796326794896619231321691639729392766L, 4.812118250596034474977589134243684231352e-1L),
2305 TEST_c_c (cacos, -0x1p-105L, 0.5L, 1.570796326794896619231321691639773491431L, -4.812118250596034474977589134243684231352e-1L),
2306 TEST_c_c (cacos, -0x1p-105L, -0.5L, 1.570796326794896619231321691639773491431L, 4.812118250596034474977589134243684231352e-1L),
2307 TEST_c_c (cacos, 0.5L, 0x1p-105L, 1.047197551196597746154214461093167628066L, -2.846556599890768890940941645338546615370e-32L),
2308 TEST_c_c (cacos, -0.5L, 0x1p-105L, 2.094395102393195492308428922186335256131L, -2.846556599890768890940941645338546615370e-32L),
2309 TEST_c_c (cacos, 0.5L, -0x1p-105L, 1.047197551196597746154214461093167628066L, 2.846556599890768890940941645338546615370e-32L),
2310 TEST_c_c (cacos, -0.5L, -0x1p-105L, 2.094395102393195492308428922186335256131L, 2.846556599890768890940941645338546615370e-32L),
2311 TEST_c_c (cacos, 0x1p-105L, 0x1p-105L, 1.570796326794896619231321691639726790195L, -2.465190328815661891911651766508706967729e-32L),
2312 TEST_c_c (cacos, 0x1p-105L, -0x1p-105L, 1.570796326794896619231321691639726790195L, 2.465190328815661891911651766508706967729e-32L),
2313 TEST_c_c (cacos, -0x1p-105L, 0x1p-105L, 1.570796326794896619231321691639776094002L, -2.465190328815661891911651766508706967729e-32L),
2314 TEST_c_c (cacos, -0x1p-105L, -0x1p-105L, 1.570796326794896619231321691639776094002L, 2.465190328815661891911651766508706967729e-32L),
ccc8cadf 2315#ifndef TEST_FLOAT
08198877
JM		 2316 TEST_c_c (cacos, 0x1.fp-1025L, 0x1p-105L, 1.570796326794896619231321691639751442099L, -2.465190328815661891911651766508706967729e-32L),
2317 TEST_c_c (cacos, 0x1.fp-1025L, -0x1p-105L, 1.570796326794896619231321691639751442099L, 2.465190328815661891911651766508706967729e-32L),
2318 TEST_c_c (cacos, -0x1.fp-1025L, 0x1p-105L, 1.570796326794896619231321691639751442099L, -2.465190328815661891911651766508706967729e-32L),
2319 TEST_c_c (cacos, -0x1.fp-1025L, -0x1p-105L, 1.570796326794896619231321691639751442099L, 2.465190328815661891911651766508706967729e-32L),
2320 TEST_c_c (cacos, 0x1p-105L, 0x1.fp-1025L, 1.570796326794896619231321691639726790195L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2321 TEST_c_c (cacos, -0x1p-105L, 0x1.fp-1025L, 1.570796326794896619231321691639776094002L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2322 TEST_c_c (cacos, 0x1p-105L, -0x1.fp-1025L, 1.570796326794896619231321691639726790195L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2323 TEST_c_c (cacos, -0x1p-105L, -0x1.fp-1025L, 1.570796326794896619231321691639776094002L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2324#endif
2325 TEST_c_c (cacos, 0.0L, 0x1p-105L, 1.570796326794896619231321691639751442099L, -2.465190328815661891911651766508706967729e-32L),
2326 TEST_c_c (cacos, 0.0L, -0x1p-105L, 1.570796326794896619231321691639751442099L, 2.465190328815661891911651766508706967729e-32L),
2327 TEST_c_c (cacos, -0.0L, 0x1p-105L, 1.570796326794896619231321691639751442099L, -2.465190328815661891911651766508706967729e-32L),
2328 TEST_c_c (cacos, -0.0L, -0x1p-105L, 1.570796326794896619231321691639751442099L, 2.465190328815661891911651766508706967729e-32L),
2329 TEST_c_c (cacos, 0x1p-105L, 0.0L, 1.570796326794896619231321691639726790195L, -0.0L),
2330 TEST_c_c (cacos, -0x1p-105L, 0.0L, 1.570796326794896619231321691639776094002L, -0.0L),
2331 TEST_c_c (cacos, 0x1p-105L, -0.0L, 1.570796326794896619231321691639726790195L, 0.0L),
2332 TEST_c_c (cacos, -0x1p-105L, -0.0L, 1.570796326794896619231321691639776094002L, 0.0L),
ccc8cadf 2333#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 2334 TEST_c_c (cacos, 0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751305915L, -8.813735870195430252326093249797922409363e-1L),
2335 TEST_c_c (cacos, 0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751305915L, 8.813735870195430252326093249797922409363e-1L),
2336 TEST_c_c (cacos, -0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751578282L, -8.813735870195430252326093249797922409363e-1L),
2337 TEST_c_c (cacos, -0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751578282L, 8.813735870195430252326093249797922409363e-1L),
2338 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 1.765281878332676474347460257221369818872e-17L, -1.091004200533850618345330909857103457781e-17L),
2339 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 3.141592653589793220809824599952738140723L, -1.091004200533850618345330909857103457781e-17L),
2340 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 1.765281878332676474347460257221369818872e-17L, 1.091004200533850618345330909857103457781e-17L),
2341 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 3.141592653589793220809824599952738140723L, 1.091004200533850618345330909857103457781e-17L),
2342 TEST_c_c (cacos, 0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797922409363e-1L),
2343 TEST_c_c (cacos, 0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797922409363e-1L),
2344 TEST_c_c (cacos, -0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797922409363e-1L),
2345 TEST_c_c (cacos, -0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797922409363e-1L),
2346 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 1.387778780781445675529539585113525401762e-17L, -5.867357004219059108790368268900490184505e-4916L),
2347 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 3.141592653589793224584855575465046128902L, -5.867357004219059108790368268900490184505e-4916L),
2348 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 1.387778780781445675529539585113525401762e-17L, 5.867357004219059108790368268900490184505e-4916L),
2349 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 3.141592653589793224584855575465046128902L, 5.867357004219059108790368268900490184505e-4916L),
2350 TEST_c_c (cacos, 0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797922409363e-1L),
2351 TEST_c_c (cacos, 0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797922409363e-1L),
2352 TEST_c_c (cacos, -0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797922409363e-1L),
2353 TEST_c_c (cacos, -0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797922409363e-1L),
2354 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 1.387778780781445675529539585113525401762e-17L, -0.0L),
2355 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 3.141592653589793224584855575465046128902L, -0.0L),
2356 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 1.387778780781445675529539585113525401762e-17L, 0.0L),
2357 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 3.141592653589793224584855575465046128902L, 0.0L),
2358#endif
2359 TEST_c_c (cacos, 0x1p-112L, 0.5L, 1.570796326794896619231321691639751269838L, -4.812118250596034474977589134243684231352e-1L),
2360 TEST_c_c (cacos, 0x1p-112L, -0.5L, 1.570796326794896619231321691639751269838L, 4.812118250596034474977589134243684231352e-1L),
2361 TEST_c_c (cacos, -0x1p-112L, 0.5L, 1.570796326794896619231321691639751614359L, -4.812118250596034474977589134243684231352e-1L),
2362 TEST_c_c (cacos, -0x1p-112L, -0.5L, 1.570796326794896619231321691639751614359L, 4.812118250596034474977589134243684231352e-1L),
2363 TEST_c_c (cacos, 0.5L, 0x1p-112L, 1.047197551196597746154214461093167628066L, -2.223872343664663196047610660420739543258e-34L),
2364 TEST_c_c (cacos, -0.5L, 0x1p-112L, 2.094395102393195492308428922186335256131L, -2.223872343664663196047610660420739543258e-34L),
2365 TEST_c_c (cacos, 0.5L, -0x1p-112L, 1.047197551196597746154214461093167628066L, 2.223872343664663196047610660420739543258e-34L),
2366 TEST_c_c (cacos, -0.5L, -0x1p-112L, 2.094395102393195492308428922186335256131L, 2.223872343664663196047610660420739543258e-34L),
2367 TEST_c_c (cacos, 0x1p-112L, 0x1p-112L, 1.570796326794896619231321691639751249506L, -1.925929944387235853055977942584927318538e-34L),
2368 TEST_c_c (cacos, 0x1p-112L, -0x1p-112L, 1.570796326794896619231321691639751249506L, 1.925929944387235853055977942584927318538e-34L),
2369 TEST_c_c (cacos, -0x1p-112L, 0x1p-112L, 1.570796326794896619231321691639751634692L, -1.925929944387235853055977942584927318538e-34L),
2370 TEST_c_c (cacos, -0x1p-112L, -0x1p-112L, 1.570796326794896619231321691639751634692L, 1.925929944387235853055977942584927318538e-34L),
ccc8cadf 2371#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2372 TEST_c_c (cacos, 0x1.fp-16385L, 0x1p-112L, 1.570796326794896619231321691639751442099L, -1.925929944387235853055977942584927318538e-34L),
2373 TEST_c_c (cacos, 0x1.fp-16385L, -0x1p-112L, 1.570796326794896619231321691639751442099L, 1.925929944387235853055977942584927318538e-34L),
2374 TEST_c_c (cacos, -0x1.fp-16385L, 0x1p-112L, 1.570796326794896619231321691639751442099L, -1.925929944387235853055977942584927318538e-34L),
2375 TEST_c_c (cacos, -0x1.fp-16385L, -0x1p-112L, 1.570796326794896619231321691639751442099L, 1.925929944387235853055977942584927318538e-34L),
2376 TEST_c_c (cacos, 0x1p-112L, 0x1.fp-16385L, 1.570796326794896619231321691639751249506L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2377 TEST_c_c (cacos, -0x1p-112L, 0x1.fp-16385L, 1.570796326794896619231321691639751634692L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2378 TEST_c_c (cacos, 0x1p-112L, -0x1.fp-16385L, 1.570796326794896619231321691639751249506L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2379 TEST_c_c (cacos, -0x1p-112L, -0x1.fp-16385L, 1.570796326794896619231321691639751634692L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2380#endif
2381 TEST_c_c (cacos, 0.0L, 0x1p-112L, 1.570796326794896619231321691639751442099L, -1.925929944387235853055977942584927318538e-34L),
2382 TEST_c_c (cacos, 0.0L, -0x1p-112L, 1.570796326794896619231321691639751442099L, 1.925929944387235853055977942584927318538e-34L),
2383 TEST_c_c (cacos, -0.0L, 0x1p-112L, 1.570796326794896619231321691639751442099L, -1.925929944387235853055977942584927318538e-34L),
2384 TEST_c_c (cacos, -0.0L, -0x1p-112L, 1.570796326794896619231321691639751442099L, 1.925929944387235853055977942584927318538e-34L),
2385 TEST_c_c (cacos, 0x1p-112L, 0.0L, 1.570796326794896619231321691639751249506L, -0.0L),
2386 TEST_c_c (cacos, -0x1p-112L, 0.0L, 1.570796326794896619231321691639751634692L, -0.0L),
2387 TEST_c_c (cacos, 0x1p-112L, -0.0L, 1.570796326794896619231321691639751249506L, 0.0L),
2388 TEST_c_c (cacos, -0x1p-112L, -0.0L, 1.570796326794896619231321691639751634692L, 0.0L),
2389
2390 TEST_c_c (cacos, 0.75L, 1.25L, 1.11752014915610270578240049553777969L, -1.13239363160530819522266333696834467L),
2391 TEST_c_c (cacos, -2, -3, 2.1414491111159960199416055713254211L, 1.9833870299165354323470769028940395L),
2392 END_DATA (cacos)
2393 };
8847214f 2394
8847214f 2395static void
08198877 2396cacos_test (void)
8847214f 2397{
aaca11d8 2398 errno = 0;
08198877 2399 FUNC(cacos) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD		 2400 if (errno == ENOSYS)
2401 /* Function not implemented. */
2402 return;
2403
08198877
JM		 2404 START (cacos);
2405 RUN_TEST_LOOP_c_c (cacos, cacos_test_data, );
2406 END (cacos, complex);
2407}
8847214f 2408
08198877
JM		 2409static const struct test_c_c_data cacosh_test_data[] =
2410 {
2411 START_DATA (cacosh),
2412 TEST_c_c (cacosh, 0, 0, 0.0, M_PI_2l),
2413 TEST_c_c (cacosh, minus_zero, 0, 0.0, M_PI_2l),
2414 TEST_c_c (cacosh, 0, minus_zero, 0.0, -M_PI_2l),
2415 TEST_c_c (cacosh, minus_zero, minus_zero, 0.0, -M_PI_2l),
2416 TEST_c_c (cacosh, minus_infty, plus_infty, plus_infty, M_PI_34l),
2417 TEST_c_c (cacosh, minus_infty, minus_infty, plus_infty, -M_PI_34l),
2418
2419 TEST_c_c (cacosh, plus_infty, plus_infty, plus_infty, M_PI_4l),
2420 TEST_c_c (cacosh, plus_infty, minus_infty, plus_infty, -M_PI_4l),
2421
2422 TEST_c_c (cacosh, -10.0, plus_infty, plus_infty, M_PI_2l),
2423 TEST_c_c (cacosh, -10.0, minus_infty, plus_infty, -M_PI_2l),
2424 TEST_c_c (cacosh, 0, plus_infty, plus_infty, M_PI_2l),
2425 TEST_c_c (cacosh, 0, minus_infty, plus_infty, -M_PI_2l),
2426 TEST_c_c (cacosh, 0.1L, plus_infty, plus_infty, M_PI_2l),
2427 TEST_c_c (cacosh, 0.1L, minus_infty, plus_infty, -M_PI_2l),
2428
2429 TEST_c_c (cacosh, minus_infty, 0, plus_infty, M_PIl),
2430 TEST_c_c (cacosh, minus_infty, minus_zero, plus_infty, -M_PIl),
2431 TEST_c_c (cacosh, minus_infty, 100, plus_infty, M_PIl),
2432 TEST_c_c (cacosh, minus_infty, -100, plus_infty, -M_PIl),
2433
2434 TEST_c_c (cacosh, plus_infty, 0, plus_infty, 0.0),
2435 TEST_c_c (cacosh, plus_infty, minus_zero, plus_infty, minus_zero),
2436 TEST_c_c (cacosh, plus_infty, 0.5, plus_infty, 0.0),
2437 TEST_c_c (cacosh, plus_infty, -0.5, plus_infty, minus_zero),
2438
2439 TEST_c_c (cacosh, plus_infty, qnan_value, plus_infty, qnan_value),
2440 TEST_c_c (cacosh, minus_infty, qnan_value, plus_infty, qnan_value),
2441
2442 TEST_c_c (cacosh, 0, qnan_value, qnan_value, qnan_value),
2443 TEST_c_c (cacosh, minus_zero, qnan_value, qnan_value, qnan_value),
2444
2445 TEST_c_c (cacosh, qnan_value, plus_infty, plus_infty, qnan_value),
2446 TEST_c_c (cacosh, qnan_value, minus_infty, plus_infty, qnan_value),
2447
2448 TEST_c_c (cacosh, 10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
2449 TEST_c_c (cacosh, -10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
2450
2451 TEST_c_c (cacosh, qnan_value, 0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
2452 TEST_c_c (cacosh, qnan_value, -0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
2453
2454 TEST_c_c (cacosh, qnan_value, qnan_value, qnan_value, qnan_value),
2455
2456 TEST_c_c (cacosh, plus_zero, -1.5L, 1.194763217287109304111930828519090523536L, -M_PI_2l),
2457 TEST_c_c (cacosh, minus_zero, -1.5L, 1.194763217287109304111930828519090523536L, -M_PI_2l),
2458 TEST_c_c (cacosh, plus_zero, -1.0L, 0.8813735870195430252326093249797923090282L, -M_PI_2l),
2459 TEST_c_c (cacosh, minus_zero, -1.0L, 0.8813735870195430252326093249797923090282L, -M_PI_2l),
2460 TEST_c_c (cacosh, plus_zero, -0.5L, 0.4812118250596034474977589134243684231352L, -M_PI_2l),
2461 TEST_c_c (cacosh, minus_zero, -0.5L, 0.4812118250596034474977589134243684231352L, -M_PI_2l),
2462 TEST_c_c (cacosh, plus_zero, 0.5L, 0.4812118250596034474977589134243684231352L, M_PI_2l),
2463 TEST_c_c (cacosh, minus_zero, 0.5L, 0.4812118250596034474977589134243684231352L, M_PI_2l),
2464 TEST_c_c (cacosh, plus_zero, 1.0L, 0.8813735870195430252326093249797923090282L, M_PI_2l),
2465 TEST_c_c (cacosh, minus_zero, 1.0L, 0.8813735870195430252326093249797923090282L, M_PI_2l),
2466 TEST_c_c (cacosh, plus_zero, 1.5L, 1.194763217287109304111930828519090523536L, M_PI_2l),
2467 TEST_c_c (cacosh, minus_zero, 1.5L, 1.194763217287109304111930828519090523536L, M_PI_2l),
2468
2469 TEST_c_c (cacosh, -1.5L, plus_zero, 0.9624236501192068949955178268487368462704L, M_PIl),
2470 TEST_c_c (cacosh, -1.5L, minus_zero, 0.9624236501192068949955178268487368462704L, -M_PIl),
2471 TEST_c_c (cacosh, -1.0L, plus_zero, plus_zero, M_PIl),
2472 TEST_c_c (cacosh, -1.0L, minus_zero, plus_zero, -M_PIl),
2473 TEST_c_c (cacosh, -0.5L, plus_zero, plus_zero, 2.094395102393195492308428922186335256131L),
2474 TEST_c_c (cacosh, -0.5L, minus_zero, plus_zero, -2.094395102393195492308428922186335256131L),
2475 TEST_c_c (cacosh, 0.5L, plus_zero, plus_zero, 1.047197551196597746154214461093167628066L),
2476 TEST_c_c (cacosh, 0.5L, minus_zero, plus_zero, -1.047197551196597746154214461093167628066L),
2477 TEST_c_c (cacosh, 1.0L, plus_zero, plus_zero, plus_zero),
2478 TEST_c_c (cacosh, 1.0L, minus_zero, plus_zero, minus_zero),
2479 TEST_c_c (cacosh, 1.5L, plus_zero, 0.9624236501192068949955178268487368462704L, plus_zero),
2480 TEST_c_c (cacosh, 1.5L, minus_zero, 0.9624236501192068949955178268487368462704L, minus_zero),
2481
2482 TEST_c_c (cacosh, 0x1p50L, 1.0L, 3.535050620855721078027883819436720218708e1L, 8.881784197001252323389053344727730248720e-16L),
2483 TEST_c_c (cacosh, 0x1p50L, -1.0L, 3.535050620855721078027883819436720218708e1L, -8.881784197001252323389053344727730248720e-16L),
2484 TEST_c_c (cacosh, -0x1p50L, 1.0L, 3.535050620855721078027883819436720218708e1L, 3.141592653589792350284223683154270545292L),
2485 TEST_c_c (cacosh, -0x1p50L, -1.0L, 3.535050620855721078027883819436720218708e1L, -3.141592653589792350284223683154270545292L),
2486 TEST_c_c (cacosh, 1.0L, 0x1p50L, 3.535050620855721078027883819436759661753e1L, 1.570796326794895731052901991514519103193L),
2487 TEST_c_c (cacosh, -1.0L, 0x1p50L, 3.535050620855721078027883819436759661753e1L, 1.570796326794897507409741391764983781004L),
2488 TEST_c_c (cacosh, 1.0L, -0x1p50L, 3.535050620855721078027883819436759661753e1L, -1.570796326794895731052901991514519103193L),
2489 TEST_c_c (cacosh, -1.0L, -0x1p50L, 3.535050620855721078027883819436759661753e1L, -1.570796326794897507409741391764983781004L),
52ce4860 2490#ifndef TEST_FLOAT
08198877
JM		 2491 TEST_c_c (cacosh, 0x1p500L, 1.0L, 3.472667374605326000180332928505464606058e2L, 3.054936363499604682051979393213617699789e-151L),
2492 TEST_c_c (cacosh, 0x1p500L, -1.0L, 3.472667374605326000180332928505464606058e2L, -3.054936363499604682051979393213617699789e-151L),
2493 TEST_c_c (cacosh, -0x1p500L, 1.0L, 3.472667374605326000180332928505464606058e2L, 3.141592653589793238462643383279502884197L),
2494 TEST_c_c (cacosh, -0x1p500L, -1.0L, 3.472667374605326000180332928505464606058e2L, -3.141592653589793238462643383279502884197L),
2495 TEST_c_c (cacosh, 1.0L, 0x1p500L, 3.472667374605326000180332928505464606058e2L, 1.570796326794896619231321691639751442099L),
2496 TEST_c_c (cacosh, -1.0L, 0x1p500L, 3.472667374605326000180332928505464606058e2L, 1.570796326794896619231321691639751442099L),
2497 TEST_c_c (cacosh, 1.0L, -0x1p500L, 3.472667374605326000180332928505464606058e2L, -1.570796326794896619231321691639751442099L),
2498 TEST_c_c (cacosh, -1.0L, -0x1p500L, 3.472667374605326000180332928505464606058e2L, -1.570796326794896619231321691639751442099L),
52ce4860
JM		 2499#endif
2500#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 2501 TEST_c_c (cacosh, 0x1p5000L, 1.0L, 3.466429049980286492395577839412341016946e3L, 7.079811261048172892385615158694057552948e-1506L),
2502 TEST_c_c (cacosh, 0x1p5000L, -1.0L, 3.466429049980286492395577839412341016946e3L, -7.079811261048172892385615158694057552948e-1506L),
2503 TEST_c_c (cacosh, -0x1p5000L, 1.0L, 3.466429049980286492395577839412341016946e3L, 3.141592653589793238462643383279502884197L),
2504 TEST_c_c (cacosh, -0x1p5000L, -1.0L, 3.466429049980286492395577839412341016946e3L, -3.141592653589793238462643383279502884197L),
2505 TEST_c_c (cacosh, 1.0L, 0x1p5000L, 3.466429049980286492395577839412341016946e3L, 1.570796326794896619231321691639751442099L),
2506 TEST_c_c (cacosh, -1.0L, 0x1p5000L, 3.466429049980286492395577839412341016946e3L, 1.570796326794896619231321691639751442099L),
2507 TEST_c_c (cacosh, 1.0L, -0x1p5000L, 3.466429049980286492395577839412341016946e3L, -1.570796326794896619231321691639751442099L),
2508 TEST_c_c (cacosh, -1.0L, -0x1p5000L, 3.466429049980286492395577839412341016946e3L, -1.570796326794896619231321691639751442099L),
2509#endif
2510 TEST_c_c (cacosh, 0x1.fp127L, 0x1.fp127L, 8.973081118419833726837456344608533993585e1L, 7.853981633974483096156608458198757210493e-1L),
52ce4860 2511#ifndef TEST_FLOAT
08198877 2512 TEST_c_c (cacosh, 0x1.fp1023L, 0x1.fp1023L, 7.107906849659093345062145442726115449315e2L, 7.853981633974483096156608458198757210493e-1L),
52ce4860
JM		 2513#endif
2514#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 2515 TEST_c_c (cacosh, 0x1.fp16383L, 0x1.fp16383L, 1.135753137836666928715489992987020363057e4L, 7.853981633974483096156608458198757210493e-1L),
2516#endif
2517 TEST_c_c (cacosh, 0x1.fp-129L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442097L),
2518 TEST_c_c (cacosh, 0x1.fp-129L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442097L),
2519 TEST_c_c (cacosh, -0x1.fp-129L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442100L),
2520 TEST_c_c (cacosh, -0x1.fp-129L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442100L),
2521 TEST_c_c (cacosh, 1.5L, 0x1.fp-129L, 9.624236501192068949955178268487368462704e-1L, 2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2522 TEST_c_c (cacosh, -1.5L, 0x1.fp-129L, 9.624236501192068949955178268487368462704e-1L, 3.141592653589793238462643383279502884195L),
2523 TEST_c_c (cacosh, 1.5L, -0x1.fp-129L, 9.624236501192068949955178268487368462704e-1L, -2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2524 TEST_c_c (cacosh, -1.5L, -0x1.fp-129L, 9.624236501192068949955178268487368462704e-1L, -3.141592653589793238462643383279502884195L),
52ce4860 2525#ifndef TEST_FLOAT
08198877
JM		 2526 TEST_c_c (cacosh, 0x1.fp-1025L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442099L),
2527 TEST_c_c (cacosh, 0x1.fp-1025L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442099L),
2528 TEST_c_c (cacosh, -0x1.fp-1025L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442099L),
2529 TEST_c_c (cacosh, -0x1.fp-1025L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442099L),
2530 TEST_c_c (cacosh, 1.5L, 0x1.fp-1025L, 9.624236501192068949955178268487368462704e-1L, 4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2531 TEST_c_c (cacosh, -1.5L, 0x1.fp-1025L, 9.624236501192068949955178268487368462704e-1L, 3.141592653589793238462643383279502884197L),
2532 TEST_c_c (cacosh, 1.5L, -0x1.fp-1025L, 9.624236501192068949955178268487368462704e-1L, -4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2533 TEST_c_c (cacosh, -1.5L, -0x1.fp-1025L, 9.624236501192068949955178268487368462704e-1L, -3.141592653589793238462643383279502884197L),
52ce4860
JM		 2534#endif
2535#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2536 TEST_c_c (cacosh, 0x1.fp-16385L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442099L),
2537 TEST_c_c (cacosh, 0x1.fp-16385L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442099L),
2538 TEST_c_c (cacosh, -0x1.fp-16385L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442099L),
2539 TEST_c_c (cacosh, -0x1.fp-16385L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442099L),
2540 TEST_c_c (cacosh, 1.5L, 0x1.fp-16385L, 9.624236501192068949955178268487368462704e-1L, 7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
2541 TEST_c_c (cacosh, -1.5L, 0x1.fp-16385L, 9.624236501192068949955178268487368462704e-1L, 3.141592653589793238462643383279502884197L),
2542 TEST_c_c (cacosh, 1.5L, -0x1.fp-16385L, 9.624236501192068949955178268487368462704e-1L, -7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
2543 TEST_c_c (cacosh, -1.5L, -0x1.fp-16385L, 9.624236501192068949955178268487368462704e-1L, -3.141592653589793238462643383279502884197L),
2544#endif
2545 TEST_c_c (cacosh, 0.5L, 1.0L, 9.261330313501824245501244453057873152694e-1L, 1.221357263937683325603909865564381489366L),
2546 TEST_c_c (cacosh, 0.5L, -1.0L, 9.261330313501824245501244453057873152694e-1L, -1.221357263937683325603909865564381489366L),
2547 TEST_c_c (cacosh, -0.5L, 1.0L, 9.261330313501824245501244453057873152694e-1L, 1.920235389652109912858733517715121394831L),
2548 TEST_c_c (cacosh, -0.5L, -1.0L, 9.261330313501824245501244453057873152694e-1L, -1.920235389652109912858733517715121394831L),
2549 TEST_c_c (cacosh, 1.0L, 0.5L, 7.328576759736452608886724437653071523305e-1L, 6.748888455860063801646649673121744318756e-1L),
2550 TEST_c_c (cacosh, -1.0L, 0.5L, 7.328576759736452608886724437653071523305e-1L, 2.466703808003786858297978415967328452322L),
2551 TEST_c_c (cacosh, 1.0L, -0.5L, 7.328576759736452608886724437653071523305e-1L, -6.748888455860063801646649673121744318756e-1L),
2552 TEST_c_c (cacosh, -1.0L, -0.5L, 7.328576759736452608886724437653071523305e-1L, -2.466703808003786858297978415967328452322L),
2553 TEST_c_c (cacosh, 0.25L, 1.0L, 8.924633639033482359562124741744951972772e-1L, 1.394493894017929688812643125003661339452L),
2554 TEST_c_c (cacosh, 0.25L, -1.0L, 8.924633639033482359562124741744951972772e-1L, -1.394493894017929688812643125003661339452L),
2555 TEST_c_c (cacosh, -0.25L, 1.0L, 8.924633639033482359562124741744951972772e-1L, 1.747098759571863549650000258275841544745L),
2556 TEST_c_c (cacosh, -0.25L, -1.0L, 8.924633639033482359562124741744951972772e-1L, -1.747098759571863549650000258275841544745L),
2557 TEST_c_c (cacosh, 1.0L, 0.25L, 5.097911466811016354623559941115413499164e-1L, 4.890443302710802929202843732146540079124e-1L),
2558 TEST_c_c (cacosh, -1.0L, 0.25L, 5.097911466811016354623559941115413499164e-1L, 2.652548323318712945542359010064848876285L),
2559 TEST_c_c (cacosh, 1.0L, -0.25L, 5.097911466811016354623559941115413499164e-1L, -4.890443302710802929202843732146540079124e-1L),
2560 TEST_c_c (cacosh, -1.0L, -0.25L, 5.097911466811016354623559941115413499164e-1L, -2.652548323318712945542359010064848876285L),
2561 TEST_c_c (cacosh, 0x1.fp-10L, 1.0L, 8.813742198809567991336704287826445879025e-1L, 1.569458417435338878318763342108699202986L),
2562 TEST_c_c (cacosh, 0x1.fp-10L, -1.0L, 8.813742198809567991336704287826445879025e-1L, -1.569458417435338878318763342108699202986L),
2563 TEST_c_c (cacosh, -0x1.fp-10L, 1.0L, 8.813742198809567991336704287826445879025e-1L, 1.572134236154454360143880041170803681211L),
2564 TEST_c_c (cacosh, -0x1.fp-10L, -1.0L, 8.813742198809567991336704287826445879025e-1L, -1.572134236154454360143880041170803681211L),
2565 TEST_c_c (cacosh, 1.0L, 0x1.fp-10L, 4.350501469856803800217957402220976497152e-2L, 4.349129763101882771258049954181971959031e-2L),
2566 TEST_c_c (cacosh, -1.0L, 0x1.fp-10L, 4.350501469856803800217957402220976497152e-2L, 3.098101355958774410750062883737683164607L),
2567 TEST_c_c (cacosh, 1.0L, -0x1.fp-10L, 4.350501469856803800217957402220976497152e-2L, -4.349129763101882771258049954181971959031e-2L),
2568 TEST_c_c (cacosh, -1.0L, -0x1.fp-10L, 4.350501469856803800217957402220976497152e-2L, -3.098101355958774410750062883737683164607L),
2569 TEST_c_c (cacosh, 0x1.fp-30L, 1.0L, 8.813735870195430258081932989769495326854e-1L, 1.570796325518966635014803151387033957091L),
2570 TEST_c_c (cacosh, 0x1.fp-30L, -1.0L, 8.813735870195430258081932989769495326854e-1L, -1.570796325518966635014803151387033957091L),
2571 TEST_c_c (cacosh, -0x1.fp-30L, 1.0L, 8.813735870195430258081932989769495326854e-1L, 1.570796328070826603447840231892468927106L),
2572 TEST_c_c (cacosh, -0x1.fp-30L, -1.0L, 8.813735870195430258081932989769495326854e-1L, -1.570796328070826603447840231892468927106L),
2573 TEST_c_c (cacosh, 1.0L, 0x1.fp-30L, 4.247867098745151888768727039216644758847e-5L, 4.247867097467650115899790787875186617316e-5L),
2574 TEST_c_c (cacosh, -1.0L, 0x1.fp-30L, 4.247867098745151888768727039216644758847e-5L, 3.141550174918818561961484385371624132331L),
2575 TEST_c_c (cacosh, 1.0L, -0x1.fp-30L, 4.247867098745151888768727039216644758847e-5L, -4.247867097467650115899790787875186617316e-5L),
2576 TEST_c_c (cacosh, -1.0L, -0x1.fp-30L, 4.247867098745151888768727039216644758847e-5L, -3.141550174918818561961484385371624132331L),
2577 TEST_c_c (cacosh, 0x1.fp-100L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691638670687364L),
2578 TEST_c_c (cacosh, 0x1.fp-100L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691638670687364L),
2579 TEST_c_c (cacosh, -0x1.fp-100L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691640832196834L),
2580 TEST_c_c (cacosh, -0x1.fp-100L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691640832196834L),
2581 TEST_c_c (cacosh, 1.0L, 0x1.fp-100L, 1.236292038260260888664514866457202186027e-15L, 1.236292038260260888664514866456887257525e-15L),
2582 TEST_c_c (cacosh, -1.0L, 0x1.fp-100L, 1.236292038260260888664514866457202186027e-15L, 3.141592653589792002170605123018614219682L),
2583 TEST_c_c (cacosh, 1.0L, -0x1.fp-100L, 1.236292038260260888664514866457202186027e-15L, -1.236292038260260888664514866456887257525e-15L),
2584 TEST_c_c (cacosh, -1.0L, -0x1.fp-100L, 1.236292038260260888664514866457202186027e-15L, -3.141592653589792002170605123018614219682L),
2585 TEST_c_c (cacosh, 0x1.fp-129L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442097L),
2586 TEST_c_c (cacosh, 0x1.fp-129L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442097L),
2587 TEST_c_c (cacosh, -0x1.fp-129L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442101L),
2588 TEST_c_c (cacosh, -0x1.fp-129L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442101L),
2589 TEST_c_c (cacosh, 1.0L, 0x1.fp-129L, 5.335635276982233498398987585285818977933e-20L, 5.335635276982233498398987585285818977930e-20L),
2590 TEST_c_c (cacosh, -1.0L, 0x1.fp-129L, 5.335635276982233498398987585285818977933e-20L, 3.141592653589793238409287030509680549213L),
2591 TEST_c_c (cacosh, 1.0L, -0x1.fp-129L, 5.335635276982233498398987585285818977933e-20L, -5.335635276982233498398987585285818977930e-20L),
2592 TEST_c_c (cacosh, -1.0L, -0x1.fp-129L, 5.335635276982233498398987585285818977933e-20L, -3.141592653589793238409287030509680549213L),
52ce4860 2593#ifndef TEST_FLOAT
08198877
JM		 2594 TEST_c_c (cacosh, 0x1.fp-1000L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2595 TEST_c_c (cacosh, 0x1.fp-1000L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2596 TEST_c_c (cacosh, -0x1.fp-1000L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2597 TEST_c_c (cacosh, -0x1.fp-1000L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2598 TEST_c_c (cacosh, 1.0L, 0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, 4.252291453851660175550490409247739011867e-151L),
2599 TEST_c_c (cacosh, -1.0L, 0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, 3.141592653589793238462643383279502884197L),
2600 TEST_c_c (cacosh, 1.0L, -0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, -4.252291453851660175550490409247739011867e-151L),
2601 TEST_c_c (cacosh, -1.0L, -0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, -3.141592653589793238462643383279502884197L),
2602 TEST_c_c (cacosh, 0x1.fp-1025L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2603 TEST_c_c (cacosh, 0x1.fp-1025L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2604 TEST_c_c (cacosh, -0x1.fp-1025L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2605 TEST_c_c (cacosh, -0x1.fp-1025L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2606 TEST_c_c (cacosh, 1.0L, 0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, 7.340879205566679497036857179189356754017e-155L),
2607 TEST_c_c (cacosh, -1.0L, 0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, 3.141592653589793238462643383279502884197L),
2608 TEST_c_c (cacosh, 1.0L, -0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, -7.340879205566679497036857179189356754017e-155L),
2609 TEST_c_c (cacosh, -1.0L, -0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, -3.141592653589793238462643383279502884197L),
52ce4860
JM		 2610#endif
2611#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2612 TEST_c_c (cacosh, 0x1.fp-10000L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2613 TEST_c_c (cacosh, 0x1.fp-10000L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2614 TEST_c_c (cacosh, -0x1.fp-10000L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2615 TEST_c_c (cacosh, -0x1.fp-10000L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2616 TEST_c_c (cacosh, 1.0L, 0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, 9.854680208706673586644342922051388714633e-1506L),
2617 TEST_c_c (cacosh, -1.0L, 0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, 3.141592653589793238462643383279502884197L),
2618 TEST_c_c (cacosh, 1.0L, -0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, -9.854680208706673586644342922051388714633e-1506L),
2619 TEST_c_c (cacosh, -1.0L, -0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, -3.141592653589793238462643383279502884197L),
2620 TEST_c_c (cacosh, 0x1.fp-16385L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2621 TEST_c_c (cacosh, 0x1.fp-16385L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2622 TEST_c_c (cacosh, -0x1.fp-16385L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2623 TEST_c_c (cacosh, -0x1.fp-16385L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2624 TEST_c_c (cacosh, 1.0L, 0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, 9.023632056840860275214893047597614177639e-2467L),
2625 TEST_c_c (cacosh, -1.0L, 0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, 3.141592653589793238462643383279502884197L),
2626 TEST_c_c (cacosh, 1.0L, -0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, -9.023632056840860275214893047597614177639e-2467L),
2627 TEST_c_c (cacosh, -1.0L, -0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, -3.141592653589793238462643383279502884197L),
2628#endif
2629 TEST_c_c (cacosh, 0x1p-23L, 0x1.000002p0L, 8.813736713132400470205730751186547909968e-1L, 1.570796242501204621739026081991856762292L),
2630 TEST_c_c (cacosh, 0x1p-23L, -0x1.000002p0L, 8.813736713132400470205730751186547909968e-1L, -1.570796242501204621739026081991856762292L),
2631 TEST_c_c (cacosh, -0x1p-23L, 0x1.000002p0L, 8.813736713132400470205730751186547909968e-1L, 1.570796411088588616723617301287646121905L),
2632 TEST_c_c (cacosh, -0x1p-23L, -0x1.000002p0L, 8.813736713132400470205730751186547909968e-1L, -1.570796411088588616723617301287646121905L),
2633 TEST_c_c (cacosh, 0x1.000002p0L, 0x1p-23L, 5.364668491573609633134147164031476452679e-4L, 2.222118384408546368406374049167636760903e-4L),
2634 TEST_c_c (cacosh, -0x1.000002p0L, 0x1p-23L, 5.364668491573609633134147164031476452679e-4L, 3.141370441751352383825802745874586120521L),
2635 TEST_c_c (cacosh, 0x1.000002p0L, -0x1p-23L, 5.364668491573609633134147164031476452679e-4L, -2.222118384408546368406374049167636760903e-4L),
2636 TEST_c_c (cacosh, -0x1.000002p0L, -0x1p-23L, 5.364668491573609633134147164031476452679e-4L, -3.141370441751352383825802745874586120521L),
2637 TEST_c_c (cacosh, 0x1.fp-129L, 0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, 1.570796326794896619231321691639751442097L),
2638 TEST_c_c (cacosh, 0x1.fp-129L, -0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, -1.570796326794896619231321691639751442097L),
2639 TEST_c_c (cacosh, -0x1.fp-129L, 0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, 1.570796326794896619231321691639751442101L),
2640 TEST_c_c (cacosh, -0x1.fp-129L, -0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, -1.570796326794896619231321691639751442101L),
2641 TEST_c_c (cacosh, 0x1.000002p0L, 0x1.fp-129L, 4.882812451493617206486388134172712975070e-4L, 5.830451806317544230969669308596361881467e-36L),
2642 TEST_c_c (cacosh, -0x1.000002p0L, 0x1.fp-129L, 4.882812451493617206486388134172712975070e-4L, 3.141592653589793238462643383279502878367L),
2643 TEST_c_c (cacosh, 0x1.000002p0L, -0x1.fp-129L, 4.882812451493617206486388134172712975070e-4L, -5.830451806317544230969669308596361881467e-36L),
2644 TEST_c_c (cacosh, -0x1.000002p0L, -0x1.fp-129L, 4.882812451493617206486388134172712975070e-4L, -3.141592653589793238462643383279502878367L),
2645 TEST_c_c (cacosh, 0.0L, 0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, 1.570796326794896619231321691639751442099L),
2646 TEST_c_c (cacosh, 0.0L, -0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, -1.570796326794896619231321691639751442099L),
2647 TEST_c_c (cacosh, -0.0L, 0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, 1.570796326794896619231321691639751442099L),
2648 TEST_c_c (cacosh, -0.0L, -0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, -1.570796326794896619231321691639751442099L),
2649 TEST_c_c (cacosh, 0x1.000002p0L, 0.0L, 4.882812451493617206486388134172712975070e-4L, 0.0L),
2650 TEST_c_c (cacosh, -0x1.000002p0L, 0.0L, 4.882812451493617206486388134172712975070e-4L, 3.141592653589793238462643383279502884197L),
2651 TEST_c_c (cacosh, 0x1.000002p0L, -0.0L, 4.882812451493617206486388134172712975070e-4L, -0.0L),
2652 TEST_c_c (cacosh, -0x1.000002p0L, -0.0L, 4.882812451493617206486388134172712975070e-4L, -3.141592653589793238462643383279502884197L),
52ce4860 2653#ifndef TEST_FLOAT
08198877
JM		 2654 TEST_c_c (cacosh, 0x1p-52L, 0x1.0000000000001p0L, 8.813735870195431822418551933572982483664e-1L, 1.570796326794896462222075823262262934288L),
2655 TEST_c_c (cacosh, 0x1p-52L, -0x1.0000000000001p0L, 8.813735870195431822418551933572982483664e-1L, -1.570796326794896462222075823262262934288L),
2656 TEST_c_c (cacosh, -0x1p-52L, 0x1.0000000000001p0L, 8.813735870195431822418551933572982483664e-1L, 1.570796326794896776240567560017239949909L),
2657 TEST_c_c (cacosh, -0x1p-52L, -0x1.0000000000001p0L, 8.813735870195431822418551933572982483664e-1L, -1.570796326794896776240567560017239949909L),
2658 TEST_c_c (cacosh, 0x1.0000000000001p0L, 0x1p-52L, 2.315303644582684770975188768022139415020e-8L, 9.590301705980041385828904092662391018164e-9L),
2659 TEST_c_c (cacosh, -0x1.0000000000001p0L, 0x1p-52L, 2.315303644582684770975188768022139415020e-8L, 3.141592643999491532482601997450598791535L),
2660 TEST_c_c (cacosh, 0x1.0000000000001p0L, -0x1p-52L, 2.315303644582684770975188768022139415020e-8L, -9.590301705980041385828904092662391018164e-9L),
2661 TEST_c_c (cacosh, -0x1.0000000000001p0L, -0x1p-52L, 2.315303644582684770975188768022139415020e-8L, -3.141592643999491532482601997450598791535L),
2662 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, 1.570796326794896619231321691639751442099L),
2663 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, -1.570796326794896619231321691639751442099L),
2664 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, 1.570796326794896619231321691639751442099L),
2665 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, -1.570796326794896619231321691639751442099L),
2666 TEST_c_c (cacosh, 0x1.0000000000001p0L, 0x1.fp-1025L, 2.107342425544701550354780375182800088393e-8L, 2.557178503953494342609835913586108008322e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2667 TEST_c_c (cacosh, -0x1.0000000000001p0L, 0x1.fp-1025L, 2.107342425544701550354780375182800088393e-8L, 3.141592653589793238462643383279502884197L),
2668 TEST_c_c (cacosh, 0x1.0000000000001p0L, -0x1.fp-1025L, 2.107342425544701550354780375182800088393e-8L, -2.557178503953494342609835913586108008322e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2669 TEST_c_c (cacosh, -0x1.0000000000001p0L, -0x1.fp-1025L, 2.107342425544701550354780375182800088393e-8L, -3.141592653589793238462643383279502884197L),
2670 TEST_c_c (cacosh, 0.0L, 0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, 1.570796326794896619231321691639751442099L),
2671 TEST_c_c (cacosh, 0.0L, -0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, -1.570796326794896619231321691639751442099L),
2672 TEST_c_c (cacosh, -0.0L, 0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, 1.570796326794896619231321691639751442099L),
2673 TEST_c_c (cacosh, -0.0L, -0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, -1.570796326794896619231321691639751442099L),
2674 TEST_c_c (cacosh, 0x1.0000000000001p0L, 0.0L, 2.107342425544701550354780375182800088393e-8L, 0.0L),
2675 TEST_c_c (cacosh, -0x1.0000000000001p0L, 0.0L, 2.107342425544701550354780375182800088393e-8L, 3.141592653589793238462643383279502884197L),
2676 TEST_c_c (cacosh, 0x1.0000000000001p0L, -0.0L, 2.107342425544701550354780375182800088393e-8L, -0.0L),
2677 TEST_c_c (cacosh, -0x1.0000000000001p0L, -0.0L, 2.107342425544701550354780375182800088393e-8L, -3.141592653589793238462643383279502884197L),
52ce4860
JM		 2678#endif
2679#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 2680 TEST_c_c (cacosh, 0x1p-63L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610131001e-1L, 1.570796326794896619154657020805582738031L),
2681 TEST_c_c (cacosh, 0x1p-63L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610131001e-1L, -1.570796326794896619154657020805582738031L),
2682 TEST_c_c (cacosh, -0x1p-63L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610131001e-1L, 1.570796326794896619307986362473920146166L),
2683 TEST_c_c (cacosh, -0x1p-63L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610131001e-1L, -1.570796326794896619307986362473920146166L),
2684 TEST_c_c (cacosh, 0x1.0000000000000002p0L, 0x1p-63L, 5.116146586219826555037807251857670783420e-10L, 2.119177303101063432592523199680782317447e-10L),
2685 TEST_c_c (cacosh, -0x1.0000000000000002p0L, 0x1p-63L, 5.116146586219826555037807251857670783420e-10L, 3.141592653377875508152537040020250564229L),
2686 TEST_c_c (cacosh, 0x1.0000000000000002p0L, -0x1p-63L, 5.116146586219826555037807251857670783420e-10L, -2.119177303101063432592523199680782317447e-10L),
2687 TEST_c_c (cacosh, -0x1.0000000000000002p0L, -0x1p-63L, 5.116146586219826555037807251857670783420e-10L, -3.141592653377875508152537040020250564229L),
52ce4860 2688# if LDBL_MIN_EXP <= -16381
08198877
JM		 2689 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, 1.570796326794896619231321691639751442099L),
2690 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, -1.570796326794896619231321691639751442099L),
2691 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, 1.570796326794896619231321691639751442099L),
2692 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, -1.570796326794896619231321691639751442099L),
2693 TEST_c_c (cacosh, 0x1.0000000000000002p0L, 0x1.fp-16385L, 4.656612873077392578082927418388212703712e-10L, 1.748608650034385653922359120438227480943e-4923L),
2694 TEST_c_c (cacosh, -0x1.0000000000000002p0L, 0x1.fp-16385L, 4.656612873077392578082927418388212703712e-10L, 3.141592653589793238462643383279502884197L),
2695 TEST_c_c (cacosh, 0x1.0000000000000002p0L, -0x1.fp-16385L, 4.656612873077392578082927418388212703712e-10L, -1.748608650034385653922359120438227480943e-4923L),
2696 TEST_c_c (cacosh, -0x1.0000000000000002p0L, -0x1.fp-16385L, 4.656612873077392578082927418388212703712e-10L, -3.141592653589793238462643383279502884197L),
52ce4860 2697# endif
08198877
JM		 2698 TEST_c_c (cacosh, 0.0L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, 1.570796326794896619231321691639751442099L),
2699 TEST_c_c (cacosh, 0.0L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, -1.570796326794896619231321691639751442099L),
2700 TEST_c_c (cacosh, -0.0L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, 1.570796326794896619231321691639751442099L),
2701 TEST_c_c (cacosh, -0.0L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, -1.570796326794896619231321691639751442099L),
2702 TEST_c_c (cacosh, 0x1.0000000000000002p0L, 0.0L, 4.656612873077392578082927418388212703712e-10L, 0.0L),
2703 TEST_c_c (cacosh, -0x1.0000000000000002p0L, 0.0L, 4.656612873077392578082927418388212703712e-10L, 3.141592653589793238462643383279502884197L),
2704 TEST_c_c (cacosh, 0x1.0000000000000002p0L, -0.0L, 4.656612873077392578082927418388212703712e-10L, -0.0L),
2705 TEST_c_c (cacosh, -0x1.0000000000000002p0L, -0.0L, 4.656612873077392578082927418388212703712e-10L, -3.141592653589793238462643383279502884197L),
52ce4860
JM		 2706#endif
2707#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 2708 TEST_c_c (cacosh, 0x1p-106L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639742726335L),
2709 TEST_c_c (cacosh, 0x1p-106L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639742726335L),
2710 TEST_c_c (cacosh, -0x1p-106L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639760157863L),
2711 TEST_c_c (cacosh, -0x1p-106L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639760157863L),
2712 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, 0x1p-106L, 2.285028863093221674154232933662774454211e-16L, 5.394221422390606848017034778914096659726e-17L),
2713 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, 0x1p-106L, 2.285028863093221674154232933662774454211e-16L, 3.141592653589793184520429159373434404027L),
2714 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, -0x1p-106L, 2.285028863093221674154232933662774454211e-16L, -5.394221422390606848017034778914096659726e-17L),
2715 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, -0x1p-106L, 2.285028863093221674154232933662774454211e-16L, -3.141592653589793184520429159373434404027L),
2716 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639751442099L),
2717 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639751442099L),
2718 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639751442099L),
2719 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639751442099L),
2720 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 2.220446049250313080847263336181636063482e-16L, 2.426922623448365473354662093431821897807e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2721 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 2.220446049250313080847263336181636063482e-16L, 3.141592653589793238462643383279502884197L),
2722 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 2.220446049250313080847263336181636063482e-16L, -2.426922623448365473354662093431821897807e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2723 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 2.220446049250313080847263336181636063482e-16L, -3.141592653589793238462643383279502884197L),
2724 TEST_c_c (cacosh, 0.0L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639751442099L),
2725 TEST_c_c (cacosh, 0.0L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639751442099L),
2726 TEST_c_c (cacosh, -0.0L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639751442099L),
2727 TEST_c_c (cacosh, -0.0L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639751442099L),
2728 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, 0.0L, 2.220446049250313080847263336181636063482e-16L, 0.0L),
2729 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, 0.0L, 2.220446049250313080847263336181636063482e-16L, 3.141592653589793238462643383279502884197L),
2730 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, -0.0L, 2.220446049250313080847263336181636063482e-16L, -0.0L),
2731 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, -0.0L, 2.220446049250313080847263336181636063482e-16L, -3.141592653589793238462643383279502884197L),
52ce4860
JM		 2732#endif
2733#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 2734 TEST_c_c (cacosh, 0x1p-113L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751374007L),
2735 TEST_c_c (cacosh, 0x1p-113L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751374007L),
2736 TEST_c_c (cacosh, -0x1p-113L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751510190L),
2737 TEST_c_c (cacosh, -0x1p-113L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751510190L),
2738 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, 0x1p-113L, 2.019699255375255198156433710951064632386e-17L, 4.767863183742677481693563511435642755521e-18L),
2739 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, 0x1p-113L, 2.019699255375255198156433710951064632386e-17L, 3.141592653589793233694780199536825402504L),
2740 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, -0x1p-113L, 2.019699255375255198156433710951064632386e-17L, -4.767863183742677481693563511435642755521e-18L),
2741 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, -0x1p-113L, 2.019699255375255198156433710951064632386e-17L, -3.141592653589793233694780199536825402504L),
2742 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751442099L),
2743 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751442099L),
2744 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751442099L),
2745 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751442099L),
2746 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 1.962615573354718824241727964954454332780e-17L, 4.148847925325683229178506116378864361396e-4916L),
2747 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 1.962615573354718824241727964954454332780e-17L, 3.141592653589793238462643383279502884197L),
2748 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 1.962615573354718824241727964954454332780e-17L, -4.148847925325683229178506116378864361396e-4916L),
2749 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 1.962615573354718824241727964954454332780e-17L, -3.141592653589793238462643383279502884197L),
2750 TEST_c_c (cacosh, 0.0L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751442099L),
2751 TEST_c_c (cacosh, 0.0L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751442099L),
2752 TEST_c_c (cacosh, -0.0L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751442099L),
2753 TEST_c_c (cacosh, -0.0L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751442099L),
2754 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, 0.0L, 1.962615573354718824241727964954454332780e-17L, 0.0L),
2755 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, 0.0L, 1.962615573354718824241727964954454332780e-17L, 3.141592653589793238462643383279502884197L),
2756 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, -0.0L, 1.962615573354718824241727964954454332780e-17L, -0.0L),
2757 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, -0.0L, 1.962615573354718824241727964954454332780e-17L, -3.141592653589793238462643383279502884197L),
2758#endif
2759 TEST_c_c (cacosh, 0x1p-23L, 0x0.ffffffp0L, 8.813735448726963984495965873956465777250e-1L, 1.570796242501197085295336701632142060969L),
2760 TEST_c_c (cacosh, 0x1p-23L, -0x0.ffffffp0L, 8.813735448726963984495965873956465777250e-1L, -1.570796242501197085295336701632142060969L),
2761 TEST_c_c (cacosh, -0x1p-23L, 0x0.ffffffp0L, 8.813735448726963984495965873956465777250e-1L, 1.570796411088596153167306681647360823228L),
2762 TEST_c_c (cacosh, -0x1p-23L, -0x0.ffffffp0L, 8.813735448726963984495965873956465777250e-1L, -1.570796411088596153167306681647360823228L),
2763 TEST_c_c (cacosh, 0x0.ffffffp0L, 0x1p-23L, 2.714321200917194650737217746780928423385e-4L, 4.391863861910487109445187743978204002614e-4L),
2764 TEST_c_c (cacosh, -0x0.ffffffp0L, 0x1p-23L, 2.714321200917194650737217746780928423385e-4L, 3.141153467203602189751698864505105063797L),
2765 TEST_c_c (cacosh, 0x0.ffffffp0L, -0x1p-23L, 2.714321200917194650737217746780928423385e-4L, -4.391863861910487109445187743978204002614e-4L),
2766 TEST_c_c (cacosh, -0x0.ffffffp0L, -0x1p-23L, 2.714321200917194650737217746780928423385e-4L, -3.141153467203602189751698864505105063797L),
2767 TEST_c_c (cacosh, 0x1.fp-129L, 0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, 1.570796326794896619231321691639751442097L),
2768 TEST_c_c (cacosh, 0x1.fp-129L, -0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, -1.570796326794896619231321691639751442097L),
2769 TEST_c_c (cacosh, -0x1.fp-129L, 0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, 1.570796326794896619231321691639751442101L),
2770 TEST_c_c (cacosh, -0x1.fp-129L, -0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, -1.570796326794896619231321691639751442101L),
2771 TEST_c_c (cacosh, 0x0.ffffffp0L, 0x1.fp-129L, 8.245504387859737323891843603996428534945e-36L, 3.452669847162035876032494826387364972849e-4L),
2772 TEST_c_c (cacosh, -0x0.ffffffp0L, 0x1.fp-129L, 8.245504387859737323891843603996428534945e-36L, 3.141247386605077034875040133796864147700L),
2773 TEST_c_c (cacosh, 0x0.ffffffp0L, -0x1.fp-129L, 8.245504387859737323891843603996428534945e-36L, -3.452669847162035876032494826387364972849e-4L),
2774 TEST_c_c (cacosh, -0x0.ffffffp0L, -0x1.fp-129L, 8.245504387859737323891843603996428534945e-36L, -3.141247386605077034875040133796864147700L),
2775 TEST_c_c (cacosh, 0.0L, 0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, 1.570796326794896619231321691639751442099L),
2776 TEST_c_c (cacosh, 0.0L, -0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, -1.570796326794896619231321691639751442099L),
2777 TEST_c_c (cacosh, -0.0L, 0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, 1.570796326794896619231321691639751442099L),
2778 TEST_c_c (cacosh, -0.0L, -0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, -1.570796326794896619231321691639751442099L),
2779 TEST_c_c (cacosh, 0x0.ffffffp0L, 0.0L, 0.0L, 3.452669847162035876032494826387364972849e-4L),
2780 TEST_c_c (cacosh, -0x0.ffffffp0L, 0.0L, 0.0L, 3.141247386605077034875040133796864147700L),
2781 TEST_c_c (cacosh, 0x0.ffffffp0L, -0.0L, 0.0L, -3.452669847162035876032494826387364972849e-4L),
2782 TEST_c_c (cacosh, -0x0.ffffffp0L, -0.0L, 0.0L, -3.141247386605077034875040133796864147700L),
2783 TEST_c_c (cacosh, 0x1p-23L, 0.5L, 4.812118250596059896127318386463676808798e-1L, 1.570796220170866625230343643673321150378L),
2784 TEST_c_c (cacosh, 0x1p-23L, -0.5L, 4.812118250596059896127318386463676808798e-1L, -1.570796220170866625230343643673321150378L),
2785 TEST_c_c (cacosh, -0x1p-23L, 0.5L, 4.812118250596059896127318386463676808798e-1L, 1.570796433418926613232299739606181733819L),
2786 TEST_c_c (cacosh, -0x1p-23L, -0.5L, 4.812118250596059896127318386463676808798e-1L, -1.570796433418926613232299739606181733819L),
2787 TEST_c_c (cacosh, 0.5L, 0x1p-23L, 1.376510308240943236356088341381173571841e-7L, 1.047197551196603215914744618665204532273L),
2788 TEST_c_c (cacosh, -0.5L, 0x1p-23L, 1.376510308240943236356088341381173571841e-7L, 2.094395102393190022547898764614298351924L),
2789 TEST_c_c (cacosh, 0.5L, -0x1p-23L, 1.376510308240943236356088341381173571841e-7L, -1.047197551196603215914744618665204532273L),
2790 TEST_c_c (cacosh, -0.5L, -0x1p-23L, 1.376510308240943236356088341381173571841e-7L, -2.094395102393190022547898764614298351924L),
2791 TEST_c_c (cacosh, 0x1.fp-129L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442096L),
2792 TEST_c_c (cacosh, 0x1.fp-129L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442096L),
2793 TEST_c_c (cacosh, -0x1.fp-129L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442101L),
2794 TEST_c_c (cacosh, -0x1.fp-129L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442101L),
2795 TEST_c_c (cacosh, 0.5L, 0x1.fp-129L, 3.287317402534702257036015056278368274737e-39L, 1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION_FLOAT),
2796 TEST_c_c (cacosh, -0.5L, 0x1.fp-129L, 3.287317402534702257036015056278368274737e-39L, 2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION_FLOAT),
2797 TEST_c_c (cacosh, 0.5L, -0x1.fp-129L, 3.287317402534702257036015056278368274737e-39L, -1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION_FLOAT),
2798 TEST_c_c (cacosh, -0.5L, -0x1.fp-129L, 3.287317402534702257036015056278368274737e-39L, -2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION_FLOAT),
2799 TEST_c_c (cacosh, 0x1p-23L, 0x1p-23L, 1.192092895507818146886315028596704749235e-7L, 1.570796207585607068450636380271254316214L),
2800 TEST_c_c (cacosh, 0x1p-23L, -0x1p-23L, 1.192092895507818146886315028596704749235e-7L, -1.570796207585607068450636380271254316214L),
2801 TEST_c_c (cacosh, -0x1p-23L, 0x1p-23L, 1.192092895507818146886315028596704749235e-7L, 1.570796446004186170012007003008248567984L),
2802 TEST_c_c (cacosh, -0x1p-23L, -0x1p-23L, 1.192092895507818146886315028596704749235e-7L, -1.570796446004186170012007003008248567984L),
2803 TEST_c_c (cacosh, 0x1.fp-129L, 0x1p-23L, 1.192092895507809676556842485683592032154e-7L, 1.570796326794896619231321691639751442096L),
2804 TEST_c_c (cacosh, 0x1.fp-129L, -0x1p-23L, 1.192092895507809676556842485683592032154e-7L, -1.570796326794896619231321691639751442096L),
2805 TEST_c_c (cacosh, -0x1.fp-129L, 0x1p-23L, 1.192092895507809676556842485683592032154e-7L, 1.570796326794896619231321691639751442101L),
2806 TEST_c_c (cacosh, -0x1.fp-129L, -0x1p-23L, 1.192092895507809676556842485683592032154e-7L, -1.570796326794896619231321691639751442101L),
2807 TEST_c_c (cacosh, 0x1p-23L, 0x1.fp-129L, 2.846900380897747786805634596726756660388e-39L, 1.570796207585607068449789347324000006847L, UNDERFLOW_EXCEPTION_FLOAT),
2808 TEST_c_c (cacosh, -0x1p-23L, 0x1.fp-129L, 2.846900380897747786805634596726756660388e-39L, 1.570796446004186170012854035955502877351L, UNDERFLOW_EXCEPTION_FLOAT),
2809 TEST_c_c (cacosh, 0x1p-23L, -0x1.fp-129L, 2.846900380897747786805634596726756660388e-39L, -1.570796207585607068449789347324000006847L, UNDERFLOW_EXCEPTION_FLOAT),
2810 TEST_c_c (cacosh, -0x1p-23L, -0x1.fp-129L, 2.846900380897747786805634596726756660388e-39L, -1.570796446004186170012854035955502877351L, UNDERFLOW_EXCEPTION_FLOAT),
2811 TEST_c_c (cacosh, 0.0L, 0x1p-23L, 1.192092895507809676556842485683592032154e-7L, 1.570796326794896619231321691639751442099L),
2812 TEST_c_c (cacosh, 0.0L, -0x1p-23L, 1.192092895507809676556842485683592032154e-7L, -1.570796326794896619231321691639751442099L),
2813 TEST_c_c (cacosh, -0.0L, 0x1p-23L, 1.192092895507809676556842485683592032154e-7L, 1.570796326794896619231321691639751442099L),
2814 TEST_c_c (cacosh, -0.0L, -0x1p-23L, 1.192092895507809676556842485683592032154e-7L, -1.570796326794896619231321691639751442099L),
2815 TEST_c_c (cacosh, 0x1p-23L, 0.0L, 0.0L, 1.570796207585607068449789347324000006847L),
2816 TEST_c_c (cacosh, -0x1p-23L, 0.0L, 0.0L, 1.570796446004186170012854035955502877351L),
2817 TEST_c_c (cacosh, 0x1p-23L, -0.0L, 0.0L, -1.570796207585607068449789347324000006847L),
2818 TEST_c_c (cacosh, -0x1p-23L, -0.0L, 0.0L, -1.570796446004186170012854035955502877351L),
2819 TEST_c_c (cacosh, 0x1.fp-129L, 0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, 1.570796326794896619231321691639751442096L, UNDERFLOW_EXCEPTION_FLOAT),
2820 TEST_c_c (cacosh, 0x1.fp-129L, -0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, -1.570796326794896619231321691639751442096L, UNDERFLOW_EXCEPTION_FLOAT),
2821 TEST_c_c (cacosh, -0x1.fp-129L, 0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, 1.570796326794896619231321691639751442101L, UNDERFLOW_EXCEPTION_FLOAT),
2822 TEST_c_c (cacosh, -0x1.fp-129L, -0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, -1.570796326794896619231321691639751442101L, UNDERFLOW_EXCEPTION_FLOAT),
52ce4860 2823#ifndef TEST_FLOAT
08198877
JM		 2824 TEST_c_c (cacosh, 0x1p-52L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910458761820e-1L, 1.570796326794896462222075823262236786996L),
2825 TEST_c_c (cacosh, 0x1p-52L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910458761820e-1L, -1.570796326794896462222075823262236786996L),
2826 TEST_c_c (cacosh, -0x1p-52L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910458761820e-1L, 1.570796326794896776240567560017266097201L),
2827 TEST_c_c (cacosh, -0x1p-52L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910458761820e-1L, -1.570796326794896776240567560017266097201L),
2828 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, 0x1p-52L, 1.171456840272878582596796205397918831268e-8L, 1.895456983915074112227925127005564372844e-8L),
2829 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, 0x1p-52L, 1.171456840272878582596796205397918831268e-8L, 3.141592634635223399311902261000251614142L),
2830 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, -0x1p-52L, 1.171456840272878582596796205397918831268e-8L, -1.895456983915074112227925127005564372844e-8L),
2831 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, -0x1p-52L, 1.171456840272878582596796205397918831268e-8L, -3.141592634635223399311902261000251614142L),
2832 TEST_c_c (cacosh, 0x1.fp-1025L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, 1.570796326794896619231321691639751442099L),
2833 TEST_c_c (cacosh, 0x1.fp-1025L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, -1.570796326794896619231321691639751442099L),
2834 TEST_c_c (cacosh, -0x1.fp-1025L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, 1.570796326794896619231321691639751442099L),
2835 TEST_c_c (cacosh, -0x1.fp-1025L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, -1.570796326794896619231321691639751442099L),
2836 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, 0x1.fp-1025L, 3.616396521699973256461764099945789620604e-301L, 1.490116119384765638786343542550461592240e-8L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2837 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, 0x1.fp-1025L, 3.616396521699973256461764099945789620604e-301L, 3.141592638688632044614986995416067458693L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2838 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, -0x1.fp-1025L, 3.616396521699973256461764099945789620604e-301L, -1.490116119384765638786343542550461592240e-8L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2839 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, -0x1.fp-1025L, 3.616396521699973256461764099945789620604e-301L, -3.141592638688632044614986995416067458693L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2840 TEST_c_c (cacosh, 0.0L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, 1.570796326794896619231321691639751442099L),
2841 TEST_c_c (cacosh, 0.0L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, -1.570796326794896619231321691639751442099L),
2842 TEST_c_c (cacosh, -0.0L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, 1.570796326794896619231321691639751442099L),
2843 TEST_c_c (cacosh, -0.0L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, -1.570796326794896619231321691639751442099L),
2844 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, 0.0L, 0.0L, 1.490116119384765638786343542550461592240e-8L),
2845 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, 0.0L, 0.0L, 3.141592638688632044614986995416067458693L),
2846 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, -0.0L, 0.0L, -1.490116119384765638786343542550461592240e-8L),
2847 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, -0.0L, 0.0L, -3.141592638688632044614986995416067458693L),
2848#endif
2849 TEST_c_c (cacosh, 0x1p-52L, 0.5L, 4.812118250596034474977589134243772428682e-1L, 1.570796326794896420628589431857911675917L),
2850 TEST_c_c (cacosh, 0x1p-52L, -0.5L, 4.812118250596034474977589134243772428682e-1L, -1.570796326794896420628589431857911675917L),
2851 TEST_c_c (cacosh, -0x1p-52L, 0.5L, 4.812118250596034474977589134243772428682e-1L, 1.570796326794896817834053951421591208280L),
2852 TEST_c_c (cacosh, -0x1p-52L, -0.5L, 4.812118250596034474977589134243772428682e-1L, -1.570796326794896817834053951421591208280L),
2853 TEST_c_c (cacosh, 0.5L, 0x1p-52L, 2.563950248511418570403591756798643804971e-16L, 1.047197551196597746154214461093186605110L),
2854 TEST_c_c (cacosh, -0.5L, 0x1p-52L, 2.563950248511418570403591756798643804971e-16L, 2.094395102393195492308428922186316279087L),
2855 TEST_c_c (cacosh, 0.5L, -0x1p-52L, 2.563950248511418570403591756798643804971e-16L, -1.047197551196597746154214461093186605110L),
2856 TEST_c_c (cacosh, -0.5L, -0x1p-52L, 2.563950248511418570403591756798643804971e-16L, -2.094395102393195492308428922186316279087L),
52ce4860 2857#ifndef TEST_FLOAT
08198877
JM		 2858 TEST_c_c (cacosh, 0x1.fp-1025L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442099L),
2859 TEST_c_c (cacosh, 0x1.fp-1025L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442099L),
2860 TEST_c_c (cacosh, -0x1.fp-1025L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442099L),
2861 TEST_c_c (cacosh, -0x1.fp-1025L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442099L),
2862 TEST_c_c (cacosh, 0.5L, 0x1.fp-1025L, 6.222508863508420569166420770843207333493e-309L, 1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION_DOUBLE),
2863 TEST_c_c (cacosh, -0.5L, 0x1.fp-1025L, 6.222508863508420569166420770843207333493e-309L, 2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION_DOUBLE),
2864 TEST_c_c (cacosh, 0.5L, -0x1.fp-1025L, 6.222508863508420569166420770843207333493e-309L, -1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION_DOUBLE),
2865 TEST_c_c (cacosh, -0.5L, -0x1.fp-1025L, 6.222508863508420569166420770843207333493e-309L, -2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION_DOUBLE),
2866#endif
2867 TEST_c_c (cacosh, 0x1p-52L, 0x1p-52L, 2.220446049250313080847263336181677117148e-16L, 1.570796326794896397186716766608443357372L),
2868 TEST_c_c (cacosh, 0x1p-52L, -0x1p-52L, 2.220446049250313080847263336181677117148e-16L, -1.570796326794896397186716766608443357372L),
2869 TEST_c_c (cacosh, -0x1p-52L, 0x1p-52L, 2.220446049250313080847263336181677117148e-16L, 1.570796326794896841275926616671059526825L),
2870 TEST_c_c (cacosh, -0x1p-52L, -0x1p-52L, 2.220446049250313080847263336181677117148e-16L, -1.570796326794896841275926616671059526825L),
52ce4860 2871#ifndef TEST_FLOAT
08198877
JM		 2872 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1p-52L, 2.220446049250313080847263336181622378926e-16L, 1.570796326794896619231321691639751442099L),
2873 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1p-52L, 2.220446049250313080847263336181622378926e-16L, -1.570796326794896619231321691639751442099L),
2874 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1p-52L, 2.220446049250313080847263336181622378926e-16L, 1.570796326794896619231321691639751442099L),
2875 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1p-52L, 2.220446049250313080847263336181622378926e-16L, -1.570796326794896619231321691639751442099L),
2876 TEST_c_c (cacosh, 0x1p-52L, 0x1.fp-1025L, 5.388850751072128349671657362289548938458e-309L, 1.570796326794896397186716766608443357372L, UNDERFLOW_EXCEPTION_DOUBLE),
2877 TEST_c_c (cacosh, -0x1p-52L, 0x1.fp-1025L, 5.388850751072128349671657362289548938458e-309L, 1.570796326794896841275926616671059526825L, UNDERFLOW_EXCEPTION_DOUBLE),
2878 TEST_c_c (cacosh, 0x1p-52L, -0x1.fp-1025L, 5.388850751072128349671657362289548938458e-309L, -1.570796326794896397186716766608443357372L, UNDERFLOW_EXCEPTION_DOUBLE),
2879 TEST_c_c (cacosh, -0x1p-52L, -0x1.fp-1025L, 5.388850751072128349671657362289548938458e-309L, -1.570796326794896841275926616671059526825L, UNDERFLOW_EXCEPTION_DOUBLE),
2880#endif
2881 TEST_c_c (cacosh, 0.0L, 0x1p-52L, 2.220446049250313080847263336181622378926e-16L, 1.570796326794896619231321691639751442099L),
2882 TEST_c_c (cacosh, 0.0L, -0x1p-52L, 2.220446049250313080847263336181622378926e-16L, -1.570796326794896619231321691639751442099L),
2883 TEST_c_c (cacosh, -0.0L, 0x1p-52L, 2.220446049250313080847263336181622378926e-16L, 1.570796326794896619231321691639751442099L),
2884 TEST_c_c (cacosh, -0.0L, -0x1p-52L, 2.220446049250313080847263336181622378926e-16L, -1.570796326794896619231321691639751442099L),
2885 TEST_c_c (cacosh, 0x1p-52L, 0.0L, 0.0L, 1.570796326794896397186716766608443357372L),
2886 TEST_c_c (cacosh, -0x1p-52L, 0.0L, 0.0L, 1.570796326794896841275926616671059526825L),
2887 TEST_c_c (cacosh, 0x1p-52L, -0.0L, 0.0L, -1.570796326794896397186716766608443357372L),
2888 TEST_c_c (cacosh, -0x1p-52L, -0.0L, 0.0L, -1.570796326794896841275926616671059526825L),
52ce4860 2889#ifndef TEST_FLOAT
08198877
JM		 2890 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
2891 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
2892 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
2893 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
52ce4860
JM		 2894#endif
2895#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 2896 TEST_c_c (cacosh, 0x1p-63L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569937e-1L, 1.570796326794896619154657020805582738025L),
2897 TEST_c_c (cacosh, 0x1p-63L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569937e-1L, -1.570796326794896619154657020805582738025L),
2898 TEST_c_c (cacosh, -0x1p-63L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569937e-1L, 1.570796326794896619307986362473920146173L),
2899 TEST_c_c (cacosh, -0x1p-63L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569937e-1L, -1.570796326794896619307986362473920146173L),
2900 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, 0x1p-63L, 2.588578361325995866221775673638805081337e-10L, 4.188407771167967636741951941902992986043e-10L),
2901 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, 0x1p-63L, 2.588578361325995866221775673638805081337e-10L, 3.141592653170952461345846619605307690007L),
2902 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, -0x1p-63L, 2.588578361325995866221775673638805081337e-10L, -4.188407771167967636741951941902992986043e-10L),
2903 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, -0x1p-63L, 2.588578361325995866221775673638805081337e-10L, -3.141592653170952461345846619605307690007L),
52ce4860 2904# if LDBL_MIN_EXP <= -16381
08198877
JM		 2905 TEST_c_c (cacosh, 0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, 1.570796326794896619231321691639751442099L),
2906 TEST_c_c (cacosh, 0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, -1.570796326794896619231321691639751442099L),
2907 TEST_c_c (cacosh, -0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, 1.570796326794896619231321691639751442099L),
2908 TEST_c_c (cacosh, -0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, -1.570796326794896619231321691639751442099L),
2909 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 2.472906068161537187835415298076415423459e-4923L, 3.292722539913596233371825532007990724506e-10L),
2910 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 2.472906068161537187835415298076415423459e-4923L, 3.141592653260520984471283759942320330996L),
2911 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 2.472906068161537187835415298076415423459e-4923L, -3.292722539913596233371825532007990724506e-10L),
2912 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 2.472906068161537187835415298076415423459e-4923L, -3.141592653260520984471283759942320330996L),
52ce4860 2913# endif
08198877
JM		 2914 TEST_c_c (cacosh, 0.0L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, 1.570796326794896619231321691639751442099L),
2915 TEST_c_c (cacosh, 0.0L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, -1.570796326794896619231321691639751442099L),
2916 TEST_c_c (cacosh, -0.0L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, 1.570796326794896619231321691639751442099L),
2917 TEST_c_c (cacosh, -0.0L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, -1.570796326794896619231321691639751442099L),
2918 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, 0.0L, 0.0L, 3.292722539913596233371825532007990724506e-10L),
2919 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, 0.0L, 0.0L, 3.141592653260520984471283759942320330996L),
2920 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, -0.0L, 0.0L, -3.292722539913596233371825532007990724506e-10L),
2921 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, -0.0L, 0.0L, -3.141592653260520984471283759942320330996L),
2922#endif
2923 TEST_c_c (cacosh, 0x1p-63L, 0.5L, 4.812118250596034474977589134243684231373e-1L, 1.570796326794896619134347701278529840650L),
2924 TEST_c_c (cacosh, 0x1p-63L, -0.5L, 4.812118250596034474977589134243684231373e-1L, -1.570796326794896619134347701278529840650L),
2925 TEST_c_c (cacosh, -0x1p-63L, 0.5L, 4.812118250596034474977589134243684231373e-1L, 1.570796326794896619328295682000973043547L),
2926 TEST_c_c (cacosh, -0x1p-63L, -0.5L, 4.812118250596034474977589134243684231373e-1L, -1.570796326794896619328295682000973043547L),
2927 TEST_c_c (cacosh, 0.5L, 0x1p-63L, 1.251928832280966098829878787499365228659e-19L, 1.047197551196597746154214461093167628070L),
2928 TEST_c_c (cacosh, -0.5L, 0x1p-63L, 1.251928832280966098829878787499365228659e-19L, 2.094395102393195492308428922186335256127L),
2929 TEST_c_c (cacosh, 0.5L, -0x1p-63L, 1.251928832280966098829878787499365228659e-19L, -1.047197551196597746154214461093167628070L),
2930 TEST_c_c (cacosh, -0.5L, -0x1p-63L, 1.251928832280966098829878787499365228659e-19L, -2.094395102393195492308428922186335256127L),
52ce4860 2931#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2932 TEST_c_c (cacosh, 0x1.fp-16385L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442099L),
2933 TEST_c_c (cacosh, 0x1.fp-16385L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442099L),
2934 TEST_c_c (cacosh, -0x1.fp-16385L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442099L),
2935 TEST_c_c (cacosh, -0x1.fp-16385L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442099L),
2936 TEST_c_c (cacosh, 0.5L, 0x1.fp-16385L, 9.402257155670418112159334875199821342890e-4933L, 1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION),
2937 TEST_c_c (cacosh, -0.5L, 0x1.fp-16385L, 9.402257155670418112159334875199821342890e-4933L, 2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION),
2938 TEST_c_c (cacosh, 0.5L, -0x1.fp-16385L, 9.402257155670418112159334875199821342890e-4933L, -1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION),
2939 TEST_c_c (cacosh, -0.5L, -0x1.fp-16385L, 9.402257155670418112159334875199821342890e-4933L, -2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION),
2940#endif
2941 TEST_c_c (cacosh, 0x1p-63L, 0x1p-63L, 1.084202172485504434007452800869941711430e-19L, 1.570796326794896619122901474391200998698L),
2942 TEST_c_c (cacosh, 0x1p-63L, -0x1p-63L, 1.084202172485504434007452800869941711430e-19L, -1.570796326794896619122901474391200998698L),
2943 TEST_c_c (cacosh, -0x1p-63L, 0x1p-63L, 1.084202172485504434007452800869941711430e-19L, 1.570796326794896619339741908888301885499L),
2944 TEST_c_c (cacosh, -0x1p-63L, -0x1p-63L, 1.084202172485504434007452800869941711430e-19L, -1.570796326794896619339741908888301885499L),
52ce4860 2945#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2946 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1p-63L, 1.084202172485504434007452800869941711424e-19L, 1.570796326794896619231321691639751442099L),
2947 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1p-63L, 1.084202172485504434007452800869941711424e-19L, -1.570796326794896619231321691639751442099L),
2948 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1p-63L, 1.084202172485504434007452800869941711424e-19L, 1.570796326794896619231321691639751442099L),
2949 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1p-63L, 1.084202172485504434007452800869941711424e-19L, -1.570796326794896619231321691639751442099L),
2950 TEST_c_c (cacosh, 0x1p-63L, 0x1.fp-16385L, 8.142593549724601460479922838826119584465e-4933L, 1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION),
2951 TEST_c_c (cacosh, -0x1p-63L, 0x1.fp-16385L, 8.142593549724601460479922838826119584465e-4933L, 1.570796326794896619339741908888301885499L, UNDERFLOW_EXCEPTION),
2952 TEST_c_c (cacosh, 0x1p-63L, -0x1.fp-16385L, 8.142593549724601460479922838826119584465e-4933L, -1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION),
2953 TEST_c_c (cacosh, -0x1p-63L, -0x1.fp-16385L, 8.142593549724601460479922838826119584465e-4933L, -1.570796326794896619339741908888301885499L, UNDERFLOW_EXCEPTION),
2954#endif
2955 TEST_c_c (cacosh, 0.0L, 0x1p-63L, 1.084202172485504434007452800869941711424e-19L, 1.570796326794896619231321691639751442099L),
2956 TEST_c_c (cacosh, 0.0L, -0x1p-63L, 1.084202172485504434007452800869941711424e-19L, -1.570796326794896619231321691639751442099L),
2957 TEST_c_c (cacosh, -0.0L, 0x1p-63L, 1.084202172485504434007452800869941711424e-19L, 1.570796326794896619231321691639751442099L),
2958 TEST_c_c (cacosh, -0.0L, -0x1p-63L, 1.084202172485504434007452800869941711424e-19L, -1.570796326794896619231321691639751442099L),
2959 TEST_c_c (cacosh, 0x1p-63L, 0.0L, 0.0L, 1.570796326794896619122901474391200998698L),
2960 TEST_c_c (cacosh, -0x1p-63L, 0.0L, 0.0L, 1.570796326794896619339741908888301885499L),
2961 TEST_c_c (cacosh, 0x1p-63L, -0.0L, 0.0L, -1.570796326794896619122901474391200998698L),
2962 TEST_c_c (cacosh, -0x1p-63L, -0.0L, 0.0L, -1.570796326794896619339741908888301885499L),
52ce4860 2963#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2964 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
2965 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
2966 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
2967 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
52ce4860
JM		 2968#endif
2969#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 2970 TEST_c_c (cacosh, 0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639734010571L),
2971 TEST_c_c (cacosh, 0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639734010571L),
2972 TEST_c_c (cacosh, -0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639768873627L),
2973 TEST_c_c (cacosh, -0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639768873627L),
2974 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 1.234330349600789959989661887846005659983e-16L, 1.997188458999618357060632049675702684031e-16L),
2975 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 1.234330349600789959989661887846005659983e-16L, 3.141592653589793038743797483317667178134L),
2976 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 1.234330349600789959989661887846005659983e-16L, -1.997188458999618357060632049675702684031e-16L),
2977 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 1.234330349600789959989661887846005659983e-16L, -3.141592653589793038743797483317667178134L),
2978 TEST_c_c (cacosh, 0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639751442099L),
2979 TEST_c_c (cacosh, 0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639751442099L),
2980 TEST_c_c (cacosh, -0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639751442099L),
2981 TEST_c_c (cacosh, -0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639751442099L),
2982 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 3.432186888910770473784103112009399360940e-293L, 1.570092458683775059393382371963565104164e-16L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2983 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 3.432186888910770473784103112009399360940e-293L, 3.141592653589793081453397514901996944859L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2984 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 3.432186888910770473784103112009399360940e-293L, -1.570092458683775059393382371963565104164e-16L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2985 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 3.432186888910770473784103112009399360940e-293L, -3.141592653589793081453397514901996944859L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2986 TEST_c_c (cacosh, 0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639751442099L),
2987 TEST_c_c (cacosh, 0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639751442099L),
2988 TEST_c_c (cacosh, -0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639751442099L),
2989 TEST_c_c (cacosh, -0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639751442099L),
2990 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 0.0L, 1.570092458683775059393382371963565104164e-16L),
2991 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 0.0L, 3.141592653589793081453397514901996944859L),
2992 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 0.0L, -1.570092458683775059393382371963565104164e-16L),
2993 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 0.0L, -3.141592653589793081453397514901996944859L),
2994#endif
2995 TEST_c_c (cacosh, 0x1p-105L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639729392766L),
2996 TEST_c_c (cacosh, 0x1p-105L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639729392766L),
2997 TEST_c_c (cacosh, -0x1p-105L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639773491431L),
2998 TEST_c_c (cacosh, -0x1p-105L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639773491431L),
2999 TEST_c_c (cacosh, 0.5L, 0x1p-105L, 2.846556599890768890940941645338546615370e-32L, 1.047197551196597746154214461093167628066L),
3000 TEST_c_c (cacosh, -0.5L, 0x1p-105L, 2.846556599890768890940941645338546615370e-32L, 2.094395102393195492308428922186335256131L),
3001 TEST_c_c (cacosh, 0.5L, -0x1p-105L, 2.846556599890768890940941645338546615370e-32L, -1.047197551196597746154214461093167628066L),
3002 TEST_c_c (cacosh, -0.5L, -0x1p-105L, 2.846556599890768890940941645338546615370e-32L, -2.094395102393195492308428922186335256131L),
3003 TEST_c_c (cacosh, 0x1p-105L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639726790195L),
3004 TEST_c_c (cacosh, 0x1p-105L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639726790195L),
3005 TEST_c_c (cacosh, -0x1p-105L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639776094002L),
3006 TEST_c_c (cacosh, -0x1p-105L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639776094002L),
52ce4860 3007#ifndef TEST_FLOAT
08198877
JM		 3008 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639751442099L),
3009 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639751442099L),
3010 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639751442099L),
3011 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639751442099L),
3012 TEST_c_c (cacosh, 0x1p-105L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 1.570796326794896619231321691639726790195L, UNDERFLOW_EXCEPTION_DOUBLE),
3013 TEST_c_c (cacosh, -0x1p-105L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 1.570796326794896619231321691639776094002L, UNDERFLOW_EXCEPTION_DOUBLE),
3014 TEST_c_c (cacosh, 0x1p-105L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -1.570796326794896619231321691639726790195L, UNDERFLOW_EXCEPTION_DOUBLE),
3015 TEST_c_c (cacosh, -0x1p-105L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -1.570796326794896619231321691639776094002L, UNDERFLOW_EXCEPTION_DOUBLE),
3016#endif
3017 TEST_c_c (cacosh, 0.0L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639751442099L),
3018 TEST_c_c (cacosh, 0.0L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639751442099L),
3019 TEST_c_c (cacosh, -0.0L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639751442099L),
3020 TEST_c_c (cacosh, -0.0L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639751442099L),
3021 TEST_c_c (cacosh, 0x1p-105L, 0.0L, 0.0L, 1.570796326794896619231321691639726790195L),
3022 TEST_c_c (cacosh, -0x1p-105L, 0.0L, 0.0L, 1.570796326794896619231321691639776094002L),
3023 TEST_c_c (cacosh, 0x1p-105L, -0.0L, 0.0L, -1.570796326794896619231321691639726790195L),
3024 TEST_c_c (cacosh, -0x1p-105L, -0.0L, 0.0L, -1.570796326794896619231321691639776094002L),
52ce4860 3025#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 3026 TEST_c_c (cacosh, 0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751305915L),
3027 TEST_c_c (cacosh, 0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751305915L),
3028 TEST_c_c (cacosh, -0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751578282L),
3029 TEST_c_c (cacosh, -0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751578282L),
3030 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 1.091004200533850618345330909857103457781e-17L, 1.765281878332676474347460257221369818872e-17L),
3031 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 1.091004200533850618345330909857103457781e-17L, 3.141592653589793220809824599952738140723L),
3032 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 1.091004200533850618345330909857103457781e-17L, -1.765281878332676474347460257221369818872e-17L),
3033 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 1.091004200533850618345330909857103457781e-17L, -3.141592653589793220809824599952738140723L),
3034 TEST_c_c (cacosh, 0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751442099L),
3035 TEST_c_c (cacosh, 0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751442099L),
3036 TEST_c_c (cacosh, -0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751442099L),
3037 TEST_c_c (cacosh, -0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751442099L),
3038 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 5.867357004219059108790368268900490184505e-4916L, 1.387778780781445675529539585113525401762e-17L),
3039 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 5.867357004219059108790368268900490184505e-4916L, 3.141592653589793224584855575465046128902L),
3040 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 5.867357004219059108790368268900490184505e-4916L, -1.387778780781445675529539585113525401762e-17L),
3041 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 5.867357004219059108790368268900490184505e-4916L, -3.141592653589793224584855575465046128902L),
3042 TEST_c_c (cacosh, 0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751442099L),
3043 TEST_c_c (cacosh, 0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751442099L),
3044 TEST_c_c (cacosh, -0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751442099L),
3045 TEST_c_c (cacosh, -0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751442099L),
3046 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 0.0L, 1.387778780781445675529539585113525401762e-17L),
3047 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 0.0L, 3.141592653589793224584855575465046128902L),
3048 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 0.0L, -1.387778780781445675529539585113525401762e-17L),
3049 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 0.0L, -3.141592653589793224584855575465046128902L),
3050#endif
3051 TEST_c_c (cacosh, 0x1p-112L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751269838L),
3052 TEST_c_c (cacosh, 0x1p-112L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751269838L),
3053 TEST_c_c (cacosh, -0x1p-112L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751614359L),
3054 TEST_c_c (cacosh, -0x1p-112L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751614359L),
3055 TEST_c_c (cacosh, 0.5L, 0x1p-112L, 2.223872343664663196047610660420739543258e-34L, 1.047197551196597746154214461093167628066L),
3056 TEST_c_c (cacosh, -0.5L, 0x1p-112L, 2.223872343664663196047610660420739543258e-34L, 2.094395102393195492308428922186335256131L),
3057 TEST_c_c (cacosh, 0.5L, -0x1p-112L, 2.223872343664663196047610660420739543258e-34L, -1.047197551196597746154214461093167628066L),
3058 TEST_c_c (cacosh, -0.5L, -0x1p-112L, 2.223872343664663196047610660420739543258e-34L, -2.094395102393195492308428922186335256131L),
3059 TEST_c_c (cacosh, 0x1p-112L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751249506L),
3060 TEST_c_c (cacosh, 0x1p-112L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751249506L),
3061 TEST_c_c (cacosh, -0x1p-112L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751634692L),
3062 TEST_c_c (cacosh, -0x1p-112L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751634692L),
52ce4860 3063#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3064 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751442099L),
3065 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751442099L),
3066 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751442099L),
3067 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751442099L),
3068 TEST_c_c (cacosh, 0x1p-112L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 1.570796326794896619231321691639751249506L, UNDERFLOW_EXCEPTION),
3069 TEST_c_c (cacosh, -0x1p-112L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 1.570796326794896619231321691639751634692L, UNDERFLOW_EXCEPTION),
3070 TEST_c_c (cacosh, 0x1p-112L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -1.570796326794896619231321691639751249506L, UNDERFLOW_EXCEPTION),
3071 TEST_c_c (cacosh, -0x1p-112L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -1.570796326794896619231321691639751634692L, UNDERFLOW_EXCEPTION),
3072#endif
3073 TEST_c_c (cacosh, 0.0L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751442099L),
3074 TEST_c_c (cacosh, 0.0L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751442099L),
3075 TEST_c_c (cacosh, -0.0L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751442099L),
3076 TEST_c_c (cacosh, -0.0L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751442099L),
3077 TEST_c_c (cacosh, 0x1p-112L, 0.0L, 0.0L, 1.570796326794896619231321691639751249506L),
3078 TEST_c_c (cacosh, -0x1p-112L, 0.0L, 0.0L, 1.570796326794896619231321691639751634692L),
3079 TEST_c_c (cacosh, 0x1p-112L, -0.0L, 0.0L, -1.570796326794896619231321691639751249506L),
3080 TEST_c_c (cacosh, -0x1p-112L, -0.0L, 0.0L, -1.570796326794896619231321691639751634692L),
3081
3082 TEST_c_c (cacosh, 0.75L, 1.25L, 1.13239363160530819522266333696834467L, 1.11752014915610270578240049553777969L),
3083 TEST_c_c (cacosh, -2, -3, 1.9833870299165354323470769028940395L, -2.1414491111159960199416055713254211L),
3084 END_DATA (cacosh)
3085 };
3086
3087static void
3088cacosh_test (void)
3089{
3090 errno = 0;
3091 FUNC(cacosh) (BUILD_COMPLEX (0.7L, 1.2L));
3092 if (errno == ENOSYS)
3093 /* Function not implemented. */
3094 return;
8847214f 3095
08198877
JM		 3096 START (cacosh);
3097 RUN_TEST_LOOP_c_c (cacosh, cacosh_test_data, );
6815fabc 3098 END (cacosh, complex);
8847214f
UD		 3099}
3100
2550dfe9 3101
8847214f
UD		 3102static void
3103carg_test (void)
3104{
3105 START (carg);
3106
3107 /* carg (x + iy) is specified as atan2 (y, x) */
3108
3109 /* carg (x + i 0) == 0 for x > 0. */
3110 TEST_c_f (carg, 2.0, 0, 0);
3111 /* carg (x - i 0) == -0 for x > 0. */
3112 TEST_c_f (carg, 2.0, minus_zero, minus_zero);
3113
3114 TEST_c_f (carg, 0, 0, 0);
3115 TEST_c_f (carg, 0, minus_zero, minus_zero);
3116
3117 /* carg (x + i 0) == +pi for x < 0. */
3118 TEST_c_f (carg, -2.0, 0, M_PIl);
3119
3120 /* carg (x - i 0) == -pi for x < 0. */
3121 TEST_c_f (carg, -2.0, minus_zero, -M_PIl);
3122
3123 TEST_c_f (carg, minus_zero, 0, M_PIl);
3124 TEST_c_f (carg, minus_zero, minus_zero, -M_PIl);
3125
3126 /* carg (+0 + i y) == pi/2 for y > 0. */
3127 TEST_c_f (carg, 0, 2.0, M_PI_2l);
3128
3129 /* carg (-0 + i y) == pi/2 for y > 0. */
3130 TEST_c_f (carg, minus_zero, 2.0, M_PI_2l);
3131
3132 /* carg (+0 + i y) == -pi/2 for y < 0. */
3133 TEST_c_f (carg, 0, -2.0, -M_PI_2l);
3134
3135 /* carg (-0 + i y) == -pi/2 for y < 0. */
3136 TEST_c_f (carg, minus_zero, -2.0, -M_PI_2l);
3137
3138 /* carg (inf + i y) == +0 for finite y > 0. */
3139 TEST_c_f (carg, plus_infty, 2.0, 0);
3140
3141 /* carg (inf + i y) == -0 for finite y < 0. */
3142 TEST_c_f (carg, plus_infty, -2.0, minus_zero);
3143
3144 /* carg(x + i inf) == pi/2 for finite x. */
3145 TEST_c_f (carg, 10.0, plus_infty, M_PI_2l);
3146
3147 /* carg(x - i inf) == -pi/2 for finite x. */
3148 TEST_c_f (carg, 10.0, minus_infty, -M_PI_2l);
3149
3150 /* carg (-inf + i y) == +pi for finite y > 0. */
3151 TEST_c_f (carg, minus_infty, 10.0, M_PIl);
3152
3153 /* carg (-inf + i y) == -pi for finite y < 0. */
3154 TEST_c_f (carg, minus_infty, -10.0, -M_PIl);
3155
3156 TEST_c_f (carg, plus_infty, plus_infty, M_PI_4l);
3157
3158 TEST_c_f (carg, plus_infty, minus_infty, -M_PI_4l);
3159
24f56066 3160 TEST_c_f (carg, minus_infty, plus_infty, M_PI_34l);
8847214f 3161
24f56066 3162 TEST_c_f (carg, minus_infty, minus_infty, -M_PI_34l);
8847214f 3163
67e971f1 3164 TEST_c_f (carg, qnan_value, qnan_value, qnan_value);
15daa639 3165
8847214f
UD		 3166 END (carg);
3167}
3168
08198877
JM		 3169static const struct test_c_c_data casin_test_data[] =
3170 {
3171 START_DATA (casin),
3172 TEST_c_c (casin, 0, 0, 0.0, 0.0),
3173 TEST_c_c (casin, minus_zero, 0, minus_zero, 0.0),
3174 TEST_c_c (casin, 0, minus_zero, 0.0, minus_zero),
3175 TEST_c_c (casin, minus_zero, minus_zero, minus_zero, minus_zero),
3176
3177 TEST_c_c (casin, plus_infty, plus_infty, M_PI_4l, plus_infty),
3178 TEST_c_c (casin, plus_infty, minus_infty, M_PI_4l, minus_infty),
3179 TEST_c_c (casin, minus_infty, plus_infty, -M_PI_4l, plus_infty),
3180 TEST_c_c (casin, minus_infty, minus_infty, -M_PI_4l, minus_infty),
3181
3182 TEST_c_c (casin, -10.0, plus_infty, minus_zero, plus_infty),
3183 TEST_c_c (casin, -10.0, minus_infty, minus_zero, minus_infty),
3184 TEST_c_c (casin, 0, plus_infty, 0.0, plus_infty),
3185 TEST_c_c (casin, 0, minus_infty, 0.0, minus_infty),
3186 TEST_c_c (casin, minus_zero, plus_infty, minus_zero, plus_infty),
3187 TEST_c_c (casin, minus_zero, minus_infty, minus_zero, minus_infty),
3188 TEST_c_c (casin, 0.1L, plus_infty, 0.0, plus_infty),
3189 TEST_c_c (casin, 0.1L, minus_infty, 0.0, minus_infty),
3190
3191 TEST_c_c (casin, minus_infty, 0, -M_PI_2l, plus_infty),
3192 TEST_c_c (casin, minus_infty, minus_zero, -M_PI_2l, minus_infty),
3193 TEST_c_c (casin, minus_infty, 100, -M_PI_2l, plus_infty),
3194 TEST_c_c (casin, minus_infty, -100, -M_PI_2l, minus_infty),
3195
3196 TEST_c_c (casin, plus_infty, 0, M_PI_2l, plus_infty),
3197 TEST_c_c (casin, plus_infty, minus_zero, M_PI_2l, minus_infty),
3198 TEST_c_c (casin, plus_infty, 0.5, M_PI_2l, plus_infty),
3199 TEST_c_c (casin, plus_infty, -0.5, M_PI_2l, minus_infty),
3200
3201 TEST_c_c (casin, qnan_value, plus_infty, qnan_value, plus_infty),
3202 TEST_c_c (casin, qnan_value, minus_infty, qnan_value, minus_infty),
3203
3204 TEST_c_c (casin, 0.0, qnan_value, 0.0, qnan_value),
3205 TEST_c_c (casin, minus_zero, qnan_value, minus_zero, qnan_value),
3206
3207 TEST_c_c (casin, plus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
3208 TEST_c_c (casin, minus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
3209
3210 TEST_c_c (casin, qnan_value, 10.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3211 TEST_c_c (casin, qnan_value, -10.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3212
3213 TEST_c_c (casin, 0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3214 TEST_c_c (casin, -0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3215
3216 TEST_c_c (casin, qnan_value, qnan_value, qnan_value, qnan_value),
3217
3218 TEST_c_c (casin, plus_zero, -1.5L, plus_zero, -1.194763217287109304111930828519090523536L),
3219 TEST_c_c (casin, minus_zero, -1.5L, minus_zero, -1.194763217287109304111930828519090523536L),
3220 TEST_c_c (casin, plus_zero, -1.0L, plus_zero, -0.8813735870195430252326093249797923090282L),
3221 TEST_c_c (casin, minus_zero, -1.0L, minus_zero, -0.8813735870195430252326093249797923090282L),
3222 TEST_c_c (casin, plus_zero, -0.5L, plus_zero, -0.4812118250596034474977589134243684231352L),
3223 TEST_c_c (casin, minus_zero, -0.5L, minus_zero, -0.4812118250596034474977589134243684231352L),
3224 TEST_c_c (casin, plus_zero, 0.5L, plus_zero, 0.4812118250596034474977589134243684231352L),
3225 TEST_c_c (casin, minus_zero, 0.5L, minus_zero, 0.4812118250596034474977589134243684231352L),
3226 TEST_c_c (casin, plus_zero, 1.0L, plus_zero, 0.8813735870195430252326093249797923090282L),
3227 TEST_c_c (casin, minus_zero, 1.0L, minus_zero, 0.8813735870195430252326093249797923090282L),
3228 TEST_c_c (casin, plus_zero, 1.5L, plus_zero, 1.194763217287109304111930828519090523536L),
3229 TEST_c_c (casin, minus_zero, 1.5L, minus_zero, 1.194763217287109304111930828519090523536L),
3230
3231 TEST_c_c (casin, -1.5L, plus_zero, -M_PI_2l, 0.9624236501192068949955178268487368462704L),
3232 TEST_c_c (casin, -1.5L, minus_zero, -M_PI_2l, -0.9624236501192068949955178268487368462704L),
3233 TEST_c_c (casin, -1.0L, plus_zero, -M_PI_2l, plus_zero),
3234 TEST_c_c (casin, -1.0L, minus_zero, -M_PI_2l, minus_zero),
3235 TEST_c_c (casin, -0.5L, plus_zero, -0.5235987755982988730771072305465838140329L, plus_zero),
3236 TEST_c_c (casin, -0.5L, minus_zero, -0.5235987755982988730771072305465838140329L, minus_zero),
3237 TEST_c_c (casin, 0.5L, plus_zero, 0.5235987755982988730771072305465838140329L, plus_zero),
3238 TEST_c_c (casin, 0.5L, minus_zero, 0.5235987755982988730771072305465838140329L, minus_zero),
3239 TEST_c_c (casin, 1.0L, plus_zero, M_PI_2l, plus_zero),
3240 TEST_c_c (casin, 1.0L, minus_zero, M_PI_2l, minus_zero),
3241 TEST_c_c (casin, 1.5L, plus_zero, M_PI_2l, 0.9624236501192068949955178268487368462704L),
3242 TEST_c_c (casin, 1.5L, minus_zero, M_PI_2l, -0.9624236501192068949955178268487368462704L),
3243
3244 TEST_c_c (casin, 0x1p50L, 1.0L, 1.570796326794895731052901991514519103193L, 3.535050620855721078027883819436720218708e1L),
3245 TEST_c_c (casin, 0x1p50L, -1.0L, 1.570796326794895731052901991514519103193L, -3.535050620855721078027883819436720218708e1L),
3246 TEST_c_c (casin, -0x1p50L, 1.0L, -1.570796326794895731052901991514519103193L, 3.535050620855721078027883819436720218708e1L),
3247 TEST_c_c (casin, -0x1p50L, -1.0L, -1.570796326794895731052901991514519103193L, -3.535050620855721078027883819436720218708e1L),
3248 TEST_c_c (casin, 1.0L, 0x1p50L, 8.881784197001252323389053344720723756399e-16L, 3.535050620855721078027883819436759661753e1L),
3249 TEST_c_c (casin, -1.0L, 0x1p50L, -8.881784197001252323389053344720723756399e-16L, 3.535050620855721078027883819436759661753e1L),
3250 TEST_c_c (casin, 1.0L, -0x1p50L, 8.881784197001252323389053344720723756399e-16L, -3.535050620855721078027883819436759661753e1L),
3251 TEST_c_c (casin, -1.0L, -0x1p50L, -8.881784197001252323389053344720723756399e-16L, -3.535050620855721078027883819436759661753e1L),
cdc1c96f 3252#ifndef TEST_FLOAT
08198877
JM		 3253 TEST_c_c (casin, 0x1p500L, 1.0L, 1.570796326794896619231321691639751442099L, 3.472667374605326000180332928505464606058e2L),
3254 TEST_c_c (casin, 0x1p500L, -1.0L, 1.570796326794896619231321691639751442099L, -3.472667374605326000180332928505464606058e2L),
3255 TEST_c_c (casin, -0x1p500L, 1.0L, -1.570796326794896619231321691639751442099L, 3.472667374605326000180332928505464606058e2L),
3256 TEST_c_c (casin, -0x1p500L, -1.0L, -1.570796326794896619231321691639751442099L, -3.472667374605326000180332928505464606058e2L),
3257 TEST_c_c (casin, 1.0L, 0x1p500L, 3.054936363499604682051979393213617699789e-151L, 3.472667374605326000180332928505464606058e2L),
3258 TEST_c_c (casin, -1.0L, 0x1p500L, -3.054936363499604682051979393213617699789e-151L, 3.472667374605326000180332928505464606058e2L),
3259 TEST_c_c (casin, 1.0L, -0x1p500L, 3.054936363499604682051979393213617699789e-151L, -3.472667374605326000180332928505464606058e2L),
3260 TEST_c_c (casin, -1.0L, -0x1p500L, -3.054936363499604682051979393213617699789e-151L, -3.472667374605326000180332928505464606058e2L),
cdc1c96f
JM		 3261#endif
3262#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 3263 TEST_c_c (casin, 0x1p5000L, 1.0L, 1.570796326794896619231321691639751442099L, 3.466429049980286492395577839412341016946e3L),
3264 TEST_c_c (casin, 0x1p5000L, -1.0L, 1.570796326794896619231321691639751442099L, -3.466429049980286492395577839412341016946e3L),
3265 TEST_c_c (casin, -0x1p5000L, 1.0L, -1.570796326794896619231321691639751442099L, 3.466429049980286492395577839412341016946e3L),
3266 TEST_c_c (casin, -0x1p5000L, -1.0L, -1.570796326794896619231321691639751442099L, -3.466429049980286492395577839412341016946e3L),
3267 TEST_c_c (casin, 1.0L, 0x1p5000L, 7.079811261048172892385615158694057552948e-1506L, 3.466429049980286492395577839412341016946e3L),
3268 TEST_c_c (casin, -1.0L, 0x1p5000L, -7.079811261048172892385615158694057552948e-1506L, 3.466429049980286492395577839412341016946e3L),
3269 TEST_c_c (casin, 1.0L, -0x1p5000L, 7.079811261048172892385615158694057552948e-1506L, -3.466429049980286492395577839412341016946e3L),
3270 TEST_c_c (casin, -1.0L, -0x1p5000L, -7.079811261048172892385615158694057552948e-1506L, -3.466429049980286492395577839412341016946e3L),
cdc1c96f
JM		 3271#endif
3272
08198877 3273 TEST_c_c (casin, 0x1.fp127L, 0x1.fp127L, 7.853981633974483096156608458198757210493e-1L, 8.973081118419833726837456344608533993585e1L),
a9708fed 3274#ifndef TEST_FLOAT
08198877 3275 TEST_c_c (casin, 0x1.fp1023L, 0x1.fp1023L, 7.853981633974483096156608458198757210493e-1L, 7.107906849659093345062145442726115449315e2L),
a9708fed
JM		 3276#endif
3277#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 3278 TEST_c_c (casin, 0x1.fp16383L, 0x1.fp16383L, 7.853981633974483096156608458198757210493e-1L, 1.135753137836666928715489992987020363057e4L),
a9708fed
JM		 3279#endif
3280
08198877
JM		 3281 TEST_c_c (casin, 0x1.fp-129L, 1.5L, 1.579176199917649005841160751101628985741e-39L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_FLOAT),
3282 TEST_c_c (casin, 0x1.fp-129L, -1.5L, 1.579176199917649005841160751101628985741e-39L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_FLOAT),
3283 TEST_c_c (casin, -0x1.fp-129L, 1.5L, -1.579176199917649005841160751101628985741e-39L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_FLOAT),
3284 TEST_c_c (casin, -0x1.fp-129L, -1.5L, -1.579176199917649005841160751101628985741e-39L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_FLOAT),
3285 TEST_c_c (casin, 1.5L, 0x1.fp-129L, 1.570796326794896619231321691639751442096L, 9.624236501192068949955178268487368462704e-1L),
3286 TEST_c_c (casin, -1.5L, 0x1.fp-129L, -1.570796326794896619231321691639751442096L, 9.624236501192068949955178268487368462704e-1L),
3287 TEST_c_c (casin, 1.5L, -0x1.fp-129L, 1.570796326794896619231321691639751442096L, -9.624236501192068949955178268487368462704e-1L),
3288 TEST_c_c (casin, -1.5L, -0x1.fp-129L, -1.570796326794896619231321691639751442096L, -9.624236501192068949955178268487368462704e-1L),
8cf28c5e 3289#ifndef TEST_FLOAT
08198877
JM		 3290 TEST_c_c (casin, 0x1.fp-1025L, 1.5L, 2.989196569048182929051881765490354365918e-309L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_DOUBLE),
3291 TEST_c_c (casin, 0x1.fp-1025L, -1.5L, 2.989196569048182929051881765490354365918e-309L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_DOUBLE),
3292 TEST_c_c (casin, -0x1.fp-1025L, 1.5L, -2.989196569048182929051881765490354365918e-309L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_DOUBLE),
3293 TEST_c_c (casin, -0x1.fp-1025L, -1.5L, -2.989196569048182929051881765490354365918e-309L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_DOUBLE),
3294 TEST_c_c (casin, 1.5L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 9.624236501192068949955178268487368462704e-1L),
3295 TEST_c_c (casin, -1.5L, 0x1.fp-1025L, -1.570796326794896619231321691639751442099L, 9.624236501192068949955178268487368462704e-1L),
3296 TEST_c_c (casin, 1.5L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -9.624236501192068949955178268487368462704e-1L),
3297 TEST_c_c (casin, -1.5L, -0x1.fp-1025L, -1.570796326794896619231321691639751442099L, -9.624236501192068949955178268487368462704e-1L),
8cf28c5e
JM		 3298#endif
3299#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3300 TEST_c_c (casin, 0x1.fp-16385L, 1.5L, 4.516698239814521372306784062043266700598e-4933L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION),
3301 TEST_c_c (casin, 0x1.fp-16385L, -1.5L, 4.516698239814521372306784062043266700598e-4933L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION),
3302 TEST_c_c (casin, -0x1.fp-16385L, 1.5L, -4.516698239814521372306784062043266700598e-4933L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION),
3303 TEST_c_c (casin, -0x1.fp-16385L, -1.5L, -4.516698239814521372306784062043266700598e-4933L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION),
3304 TEST_c_c (casin, 1.5L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 9.624236501192068949955178268487368462704e-1L),
3305 TEST_c_c (casin, -1.5L, 0x1.fp-16385L, -1.570796326794896619231321691639751442099L, 9.624236501192068949955178268487368462704e-1L),
3306 TEST_c_c (casin, 1.5L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -9.624236501192068949955178268487368462704e-1L),
3307 TEST_c_c (casin, -1.5L, -0x1.fp-16385L, -1.570796326794896619231321691639751442099L, -9.624236501192068949955178268487368462704e-1L),
3308#endif
3309
3310 TEST_c_c (casin, 0.5L, 1.0L, 3.494390628572132936274118260753699527325e-1L, 9.261330313501824245501244453057873152694e-1L),
3311 TEST_c_c (casin, 0.5L, -1.0L, 3.494390628572132936274118260753699527325e-1L, -9.261330313501824245501244453057873152694e-1L),
3312 TEST_c_c (casin, -0.5L, 1.0L, -3.494390628572132936274118260753699527325e-1L, 9.261330313501824245501244453057873152694e-1L),
3313 TEST_c_c (casin, -0.5L, -1.0L, -3.494390628572132936274118260753699527325e-1L, -9.261330313501824245501244453057873152694e-1L),
3314 TEST_c_c (casin, 1.0L, 0.5L, 8.959074812088902390666567243275770102229e-1L, 7.328576759736452608886724437653071523305e-1L),
3315 TEST_c_c (casin, -1.0L, 0.5L, -8.959074812088902390666567243275770102229e-1L, 7.328576759736452608886724437653071523305e-1L),
3316 TEST_c_c (casin, 1.0L, -0.5L, 8.959074812088902390666567243275770102229e-1L, -7.328576759736452608886724437653071523305e-1L),
3317 TEST_c_c (casin, -1.0L, -0.5L, -8.959074812088902390666567243275770102229e-1L, -7.328576759736452608886724437653071523305e-1L),
3318 TEST_c_c (casin, 0.25L, 1.0L, 1.763024327769669304186785666360901026468e-1L, 8.924633639033482359562124741744951972772e-1L),
3319 TEST_c_c (casin, 0.25L, -1.0L, 1.763024327769669304186785666360901026468e-1L, -8.924633639033482359562124741744951972772e-1L),
3320 TEST_c_c (casin, -0.25L, 1.0L, -1.763024327769669304186785666360901026468e-1L, 8.924633639033482359562124741744951972772e-1L),
3321 TEST_c_c (casin, -0.25L, -1.0L, -1.763024327769669304186785666360901026468e-1L, -8.924633639033482359562124741744951972772e-1L),
3322 TEST_c_c (casin, 1.0L, 0.25L, 1.081751996523816326311037318425097434186L, 5.097911466811016354623559941115413499164e-1L),
3323 TEST_c_c (casin, -1.0L, 0.25L, -1.081751996523816326311037318425097434186L, 5.097911466811016354623559941115413499164e-1L),
3324 TEST_c_c (casin, 1.0L, -0.25L, 1.081751996523816326311037318425097434186L, -5.097911466811016354623559941115413499164e-1L),
3325 TEST_c_c (casin, -1.0L, -0.25L, -1.081751996523816326311037318425097434186L, -5.097911466811016354623559941115413499164e-1L),
3326 TEST_c_c (casin, 0x1.fp-10L, 1.0L, 1.337909359557740912558349531052239112857e-3L, 8.813742198809567991336704287826445879025e-1L),
3327 TEST_c_c (casin, 0x1.fp-10L, -1.0L, 1.337909359557740912558349531052239112857e-3L, -8.813742198809567991336704287826445879025e-1L),
3328 TEST_c_c (casin, -0x1.fp-10L, 1.0L, -1.337909359557740912558349531052239112857e-3L, 8.813742198809567991336704287826445879025e-1L),
3329 TEST_c_c (casin, -0x1.fp-10L, -1.0L, -1.337909359557740912558349531052239112857e-3L, -8.813742198809567991336704287826445879025e-1L),
3330 TEST_c_c (casin, 1.0L, 0x1.fp-10L, 1.527305029163877791518741192097931722508L, 4.350501469856803800217957402220976497152e-2L),
3331 TEST_c_c (casin, -1.0L, 0x1.fp-10L, -1.527305029163877791518741192097931722508L, 4.350501469856803800217957402220976497152e-2L),
3332 TEST_c_c (casin, 1.0L, -0x1.fp-10L, 1.527305029163877791518741192097931722508L, -4.350501469856803800217957402220976497152e-2L),
3333 TEST_c_c (casin, -1.0L, -0x1.fp-10L, -1.527305029163877791518741192097931722508L, -4.350501469856803800217957402220976497152e-2L),
3334 TEST_c_c (casin, 0x1.fp-30L, 1.0L, 1.275929984216518540252717485007112529021e-9L, 8.813735870195430258081932989769495326854e-1L),
3335 TEST_c_c (casin, 0x1.fp-30L, -1.0L, 1.275929984216518540252717485007112529021e-9L, -8.813735870195430258081932989769495326854e-1L),
3336 TEST_c_c (casin, -0x1.fp-30L, 1.0L, -1.275929984216518540252717485007112529021e-9L, 8.813735870195430258081932989769495326854e-1L),
3337 TEST_c_c (casin, -0x1.fp-30L, -1.0L, -1.275929984216518540252717485007112529021e-9L, -8.813735870195430258081932989769495326854e-1L),
3338 TEST_c_c (casin, 1.0L, 0x1.fp-30L, 1.570753848123921942730162693731872690232L, 4.247867098745151888768727039216644758847e-5L),
3339 TEST_c_c (casin, -1.0L, 0x1.fp-30L, -1.570753848123921942730162693731872690232L, 4.247867098745151888768727039216644758847e-5L),
3340 TEST_c_c (casin, 1.0L, -0x1.fp-30L, 1.570753848123921942730162693731872690232L, -4.247867098745151888768727039216644758847e-5L),
3341 TEST_c_c (casin, -1.0L, -0x1.fp-30L, -1.570753848123921942730162693731872690232L, -4.247867098745151888768727039216644758847e-5L),
3342 TEST_c_c (casin, 0x1.fp-100L, 1.0L, 1.080754735021050612990719608916167354321e-30L, 8.813735870195430252326093249797923090282e-1L),
3343 TEST_c_c (casin, 0x1.fp-100L, -1.0L, 1.080754735021050612990719608916167354321e-30L, -8.813735870195430252326093249797923090282e-1L),
3344 TEST_c_c (casin, -0x1.fp-100L, 1.0L, -1.080754735021050612990719608916167354321e-30L, 8.813735870195430252326093249797923090282e-1L),
3345 TEST_c_c (casin, -0x1.fp-100L, -1.0L, -1.080754735021050612990719608916167354321e-30L, -8.813735870195430252326093249797923090282e-1L),
3346 TEST_c_c (casin, 1.0L, 0x1.fp-100L, 1.570796326794895382939283431378862777584L, 1.236292038260260888664514866457202186027e-15L),
3347 TEST_c_c (casin, -1.0L, 0x1.fp-100L, -1.570796326794895382939283431378862777584L, 1.236292038260260888664514866457202186027e-15L),
3348 TEST_c_c (casin, 1.0L, -0x1.fp-100L, 1.570796326794895382939283431378862777584L, -1.236292038260260888664514866457202186027e-15L),
3349 TEST_c_c (casin, -1.0L, -0x1.fp-100L, -1.570796326794895382939283431378862777584L, -1.236292038260260888664514866457202186027e-15L),
3350 TEST_c_c (casin, 0x1.fp-129L, 1.0L, 2.013062564695348242280482517399205554874e-39L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3351 TEST_c_c (casin, 0x1.fp-129L, -1.0L, 2.013062564695348242280482517399205554874e-39L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3352 TEST_c_c (casin, -0x1.fp-129L, 1.0L, -2.013062564695348242280482517399205554874e-39L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3353 TEST_c_c (casin, -0x1.fp-129L, -1.0L, -2.013062564695348242280482517399205554874e-39L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3354 TEST_c_c (casin, 1.0L, 0x1.fp-129L, 1.570796326794896619177965338869929107115L, 5.335635276982233498398987585285818977933e-20L),
3355 TEST_c_c (casin, -1.0L, 0x1.fp-129L, -1.570796326794896619177965338869929107115L, 5.335635276982233498398987585285818977933e-20L),
3356 TEST_c_c (casin, 1.0L, -0x1.fp-129L, 1.570796326794896619177965338869929107115L, -5.335635276982233498398987585285818977933e-20L),
3357 TEST_c_c (casin, -1.0L, -0x1.fp-129L, -1.570796326794896619177965338869929107115L, -5.335635276982233498398987585285818977933e-20L),
0a1b2ae6 3358#ifndef TEST_FLOAT
08198877
JM		 3359 TEST_c_c (casin, 0x1.fp-1000L, 1.0L, 1.278589251976747242280879285935084814093e-301L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3360 TEST_c_c (casin, 0x1.fp-1000L, -1.0L, 1.278589251976747242280879285935084814093e-301L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3361 TEST_c_c (casin, -0x1.fp-1000L, 1.0L, -1.278589251976747242280879285935084814093e-301L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3362 TEST_c_c (casin, -0x1.fp-1000L, -1.0L, -1.278589251976747242280879285935084814093e-301L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3363 TEST_c_c (casin, 1.0L, 0x1.fp-1000L, 1.570796326794896619231321691639751442099L, 4.252291453851660175550490409247739011867e-151L),
3364 TEST_c_c (casin, -1.0L, 0x1.fp-1000L, -1.570796326794896619231321691639751442099L, 4.252291453851660175550490409247739011867e-151L),
3365 TEST_c_c (casin, 1.0L, -0x1.fp-1000L, 1.570796326794896619231321691639751442099L, -4.252291453851660175550490409247739011867e-151L),
3366 TEST_c_c (casin, -1.0L, -0x1.fp-1000L, -1.570796326794896619231321691639751442099L, -4.252291453851660175550490409247739011867e-151L),
3367 TEST_c_c (casin, 0x1.fp-1025L, 1.0L, 3.810492908885321743133304375216617626230e-309L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3368 TEST_c_c (casin, 0x1.fp-1025L, -1.0L, 3.810492908885321743133304375216617626230e-309L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3369 TEST_c_c (casin, -0x1.fp-1025L, 1.0L, -3.810492908885321743133304375216617626230e-309L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3370 TEST_c_c (casin, -0x1.fp-1025L, -1.0L, -3.810492908885321743133304375216617626230e-309L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3371 TEST_c_c (casin, 1.0L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 7.340879205566679497036857179189356754017e-155L),
3372 TEST_c_c (casin, -1.0L, 0x1.fp-1025L, -1.570796326794896619231321691639751442099L, 7.340879205566679497036857179189356754017e-155L),
3373 TEST_c_c (casin, 1.0L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -7.340879205566679497036857179189356754017e-155L),
3374 TEST_c_c (casin, -1.0L, -0x1.fp-1025L, -1.570796326794896619231321691639751442099L, -7.340879205566679497036857179189356754017e-155L),
0a1b2ae6
JM		 3375#endif
3376#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3377 TEST_c_c (casin, 0x1.fp-10000L, 1.0L, 6.867047849047171855399183659351043150871e-3011L, 8.813735870195430252326093249797923090282e-1L),
3378 TEST_c_c (casin, 0x1.fp-10000L, -1.0L, 6.867047849047171855399183659351043150871e-3011L, -8.813735870195430252326093249797923090282e-1L),
3379 TEST_c_c (casin, -0x1.fp-10000L, 1.0L, -6.867047849047171855399183659351043150871e-3011L, 8.813735870195430252326093249797923090282e-1L),
3380 TEST_c_c (casin, -0x1.fp-10000L, -1.0L, -6.867047849047171855399183659351043150871e-3011L, -8.813735870195430252326093249797923090282e-1L),
3381 TEST_c_c (casin, 1.0L, 0x1.fp-10000L, 1.570796326794896619231321691639751442099L, 9.854680208706673586644342922051388714633e-1506L),
3382 TEST_c_c (casin, -1.0L, 0x1.fp-10000L, -1.570796326794896619231321691639751442099L, 9.854680208706673586644342922051388714633e-1506L),
3383 TEST_c_c (casin, 1.0L, -0x1.fp-10000L, 1.570796326794896619231321691639751442099L, -9.854680208706673586644342922051388714633e-1506L),
3384 TEST_c_c (casin, -1.0L, -0x1.fp-10000L, -1.570796326794896619231321691639751442099L, -9.854680208706673586644342922051388714633e-1506L),
3385 TEST_c_c (casin, 0x1.fp-16385L, 1.0L, 5.757683115456107044131264955348448954458e-4933L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION),
3386 TEST_c_c (casin, 0x1.fp-16385L, -1.0L, 5.757683115456107044131264955348448954458e-4933L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION),
3387 TEST_c_c (casin, -0x1.fp-16385L, 1.0L, -5.757683115456107044131264955348448954458e-4933L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION),
3388 TEST_c_c (casin, -0x1.fp-16385L, -1.0L, -5.757683115456107044131264955348448954458e-4933L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION),
3389 TEST_c_c (casin, 1.0L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 9.023632056840860275214893047597614177639e-2467L),
3390 TEST_c_c (casin, -1.0L, 0x1.fp-16385L, -1.570796326794896619231321691639751442099L, 9.023632056840860275214893047597614177639e-2467L),
3391 TEST_c_c (casin, 1.0L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -9.023632056840860275214893047597614177639e-2467L),
3392 TEST_c_c (casin, -1.0L, -0x1.fp-16385L, -1.570796326794896619231321691639751442099L, -9.023632056840860275214893047597614177639e-2467L),
3393#endif
3394
3395 TEST_c_c (casin, 0x1p-23L, 0x1.000002p0L, 8.429369199749229560964789467980644296420e-8L, 8.813736713132400470205730751186547909968e-1L),
3396 TEST_c_c (casin, 0x1p-23L, -0x1.000002p0L, 8.429369199749229560964789467980644296420e-8L, -8.813736713132400470205730751186547909968e-1L),
3397 TEST_c_c (casin, -0x1p-23L, 0x1.000002p0L, -8.429369199749229560964789467980644296420e-8L, 8.813736713132400470205730751186547909968e-1L),
3398 TEST_c_c (casin, -0x1p-23L, -0x1.000002p0L, -8.429369199749229560964789467980644296420e-8L, -8.813736713132400470205730751186547909968e-1L),
3399 TEST_c_c (casin, 0x1.000002p0L, 0x1p-23L, 1.570574114956455764594481054234834678422L, 5.364668491573609633134147164031476452679e-4L),
3400 TEST_c_c (casin, -0x1.000002p0L, 0x1p-23L, -1.570574114956455764594481054234834678422L, 5.364668491573609633134147164031476452679e-4L),
3401 TEST_c_c (casin, 0x1.000002p0L, -0x1p-23L, 1.570574114956455764594481054234834678422L, -5.364668491573609633134147164031476452679e-4L),
3402 TEST_c_c (casin, -0x1.000002p0L, -0x1p-23L, -1.570574114956455764594481054234834678422L, -5.364668491573609633134147164031476452679e-4L),
3403 TEST_c_c (casin, 0x1.fp-129L, 0x1.000002p0L, 2.013062444707472738895109955455676357057e-39L, 8.813736713132375348727889167749389235161e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3404 TEST_c_c (casin, 0x1.fp-129L, -0x1.000002p0L, 2.013062444707472738895109955455676357057e-39L, -8.813736713132375348727889167749389235161e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3405 TEST_c_c (casin, -0x1.fp-129L, 0x1.000002p0L, -2.013062444707472738895109955455676357057e-39L, 8.813736713132375348727889167749389235161e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3406 TEST_c_c (casin, -0x1.fp-129L, -0x1.000002p0L, -2.013062444707472738895109955455676357057e-39L, -8.813736713132375348727889167749389235161e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3407 TEST_c_c (casin, 0x1.000002p0L, 0x1.fp-129L, 1.570796326794896619231321691639751436268L, 4.882812451493617206486388134172712975070e-4L),
3408 TEST_c_c (casin, -0x1.000002p0L, 0x1.fp-129L, -1.570796326794896619231321691639751436268L, 4.882812451493617206486388134172712975070e-4L),
3409 TEST_c_c (casin, 0x1.000002p0L, -0x1.fp-129L, 1.570796326794896619231321691639751436268L, -4.882812451493617206486388134172712975070e-4L),
3410 TEST_c_c (casin, -0x1.000002p0L, -0x1.fp-129L, -1.570796326794896619231321691639751436268L, -4.882812451493617206486388134172712975070e-4L),
3411 TEST_c_c (casin, 0.0L, 0x1.000002p0L, 0.0L, 8.813736713132375348727889167749389235161e-1L),
3412 TEST_c_c (casin, 0.0L, -0x1.000002p0L, 0.0L, -8.813736713132375348727889167749389235161e-1L),
3413 TEST_c_c (casin, -0.0L, 0x1.000002p0L, -0.0L, 8.813736713132375348727889167749389235161e-1L),
3414 TEST_c_c (casin, -0.0L, -0x1.000002p0L, -0.0L, -8.813736713132375348727889167749389235161e-1L),
3415 TEST_c_c (casin, 0x1.000002p0L, 0.0L, 1.570796326794896619231321691639751442099L, 4.882812451493617206486388134172712975070e-4L),
3416 TEST_c_c (casin, -0x1.000002p0L, 0.0L, -1.570796326794896619231321691639751442099L, 4.882812451493617206486388134172712975070e-4L),
3417 TEST_c_c (casin, 0x1.000002p0L, -0.0L, 1.570796326794896619231321691639751442099L, -4.882812451493617206486388134172712975070e-4L),
3418 TEST_c_c (casin, -0x1.000002p0L, -0.0L, -1.570796326794896619231321691639751442099L, -4.882812451493617206486388134172712975070e-4L),
3a7182a1 3419#ifndef TEST_FLOAT
08198877
JM		 3420 TEST_c_c (casin, 0x1p-52L, 0x1.0000000000001p0L, 1.570092458683774885078102529858632363236e-16L, 8.813735870195431822418551933572982483664e-1L),
3421 TEST_c_c (casin, 0x1p-52L, -0x1.0000000000001p0L, 1.570092458683774885078102529858632363236e-16L, -8.813735870195431822418551933572982483664e-1L),
3422 TEST_c_c (casin, -0x1p-52L, 0x1.0000000000001p0L, -1.570092458683774885078102529858632363236e-16L, 8.813735870195431822418551933572982483664e-1L),
3423 TEST_c_c (casin, -0x1p-52L, -0x1.0000000000001p0L, -1.570092458683774885078102529858632363236e-16L, -8.813735870195431822418551933572982483664e-1L),
3424 TEST_c_c (casin, 0x1.0000000000001p0L, 0x1p-52L, 1.570796317204594913251280305810847349436L, 2.315303644582684770975188768022139415020e-8L),
3425 TEST_c_c (casin, -0x1.0000000000001p0L, 0x1p-52L, -1.570796317204594913251280305810847349436L, 2.315303644582684770975188768022139415020e-8L),
3426 TEST_c_c (casin, 0x1.0000000000001p0L, -0x1p-52L, 1.570796317204594913251280305810847349436L, -2.315303644582684770975188768022139415020e-8L),
3427 TEST_c_c (casin, -0x1.0000000000001p0L, -0x1p-52L, -1.570796317204594913251280305810847349436L, -2.315303644582684770975188768022139415020e-8L),
3428 TEST_c_c (casin, 0x1.fp-1025L, 0x1.0000000000001p0L, 3.810492908885321320083608113679347200012e-309L, 8.813735870195431822418551933572895326024e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3429 TEST_c_c (casin, 0x1.fp-1025L, -0x1.0000000000001p0L, 3.810492908885321320083608113679347200012e-309L, -8.813735870195431822418551933572895326024e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3430 TEST_c_c (casin, -0x1.fp-1025L, 0x1.0000000000001p0L, -3.810492908885321320083608113679347200012e-309L, 8.813735870195431822418551933572895326024e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3431 TEST_c_c (casin, -0x1.fp-1025L, -0x1.0000000000001p0L, -3.810492908885321320083608113679347200012e-309L, -8.813735870195431822418551933572895326024e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3432 TEST_c_c (casin, 0x1.0000000000001p0L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 2.107342425544701550354780375182800088393e-8L),
3433 TEST_c_c (casin, -0x1.0000000000001p0L, 0x1.fp-1025L, -1.570796326794896619231321691639751442099L, 2.107342425544701550354780375182800088393e-8L),
3434 TEST_c_c (casin, 0x1.0000000000001p0L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -2.107342425544701550354780375182800088393e-8L),
3435 TEST_c_c (casin, -0x1.0000000000001p0L, -0x1.fp-1025L, -1.570796326794896619231321691639751442099L, -2.107342425544701550354780375182800088393e-8L),
3436 TEST_c_c (casin, 0.0L, 0x1.0000000000001p0L, 0.0L, 8.813735870195431822418551933572895326024e-1L),
3437 TEST_c_c (casin, 0.0L, -0x1.0000000000001p0L, 0.0L, -8.813735870195431822418551933572895326024e-1L),
3438 TEST_c_c (casin, -0.0L, 0x1.0000000000001p0L, -0.0L, 8.813735870195431822418551933572895326024e-1L),
3439 TEST_c_c (casin, -0.0L, -0x1.0000000000001p0L, -0.0L, -8.813735870195431822418551933572895326024e-1L),
3440 TEST_c_c (casin, 0x1.0000000000001p0L, 0.0L, 1.570796326794896619231321691639751442099L, 2.107342425544701550354780375182800088393e-8L),
3441 TEST_c_c (casin, -0x1.0000000000001p0L, 0.0L, -1.570796326794896619231321691639751442099L, 2.107342425544701550354780375182800088393e-8L),
3442 TEST_c_c (casin, 0x1.0000000000001p0L, -0.0L, 1.570796326794896619231321691639751442099L, -2.107342425544701550354780375182800088393e-8L),
3443 TEST_c_c (casin, -0x1.0000000000001p0L, -0.0L, -1.570796326794896619231321691639751442099L, -2.107342425544701550354780375182800088393e-8L),
3a7182a1
JM		 3444#endif
3445#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 3446 TEST_c_c (casin, 0x1p-63L, 0x1.0000000000000002p0L, 7.666467083416870406778649849746878368519e-20L, 8.813735870195430253092739958139610131001e-1L),
3447 TEST_c_c (casin, 0x1p-63L, -0x1.0000000000000002p0L, 7.666467083416870406778649849746878368519e-20L, -8.813735870195430253092739958139610131001e-1L),
3448 TEST_c_c (casin, -0x1p-63L, 0x1.0000000000000002p0L, -7.666467083416870406778649849746878368519e-20L, 8.813735870195430253092739958139610131001e-1L),
3449 TEST_c_c (casin, -0x1p-63L, -0x1.0000000000000002p0L, -7.666467083416870406778649849746878368519e-20L, -8.813735870195430253092739958139610131001e-1L),
3450 TEST_c_c (casin, 0x1.0000000000000002p0L, 0x1p-63L, 1.570796326582978888921215348380499122131L, 5.116146586219826555037807251857670783420e-10L),
3451 TEST_c_c (casin, -0x1.0000000000000002p0L, 0x1p-63L, -1.570796326582978888921215348380499122131L, 5.116146586219826555037807251857670783420e-10L),
3452 TEST_c_c (casin, 0x1.0000000000000002p0L, -0x1p-63L, 1.570796326582978888921215348380499122131L, -5.116146586219826555037807251857670783420e-10L),
3453 TEST_c_c (casin, -0x1.0000000000000002p0L, -0x1p-63L, -1.570796326582978888921215348380499122131L, -5.116146586219826555037807251857670783420e-10L),
3a7182a1 3454# if LDBL_MIN_EXP <= -16381
08198877
JM		 3455 TEST_c_c (casin, 0x1.fp-16385L, 0x1.0000000000000002p0L, 5.757683115456107043819140328235418018963e-4933L, 8.813735870195430253092739958139610130980e-1L, UNDERFLOW_EXCEPTION),
3456 TEST_c_c (casin, 0x1.fp-16385L, -0x1.0000000000000002p0L, 5.757683115456107043819140328235418018963e-4933L, -8.813735870195430253092739958139610130980e-1L, UNDERFLOW_EXCEPTION),
3457 TEST_c_c (casin, -0x1.fp-16385L, 0x1.0000000000000002p0L, -5.757683115456107043819140328235418018963e-4933L, 8.813735870195430253092739958139610130980e-1L, UNDERFLOW_EXCEPTION),
3458 TEST_c_c (casin, -0x1.fp-16385L, -0x1.0000000000000002p0L, -5.757683115456107043819140328235418018963e-4933L, -8.813735870195430253092739958139610130980e-1L, UNDERFLOW_EXCEPTION),
3459 TEST_c_c (casin, 0x1.0000000000000002p0L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 4.656612873077392578082927418388212703712e-10L),
3460 TEST_c_c (casin, -0x1.0000000000000002p0L, 0x1.fp-16385L, -1.570796326794896619231321691639751442099L, 4.656612873077392578082927418388212703712e-10L),
3461 TEST_c_c (casin, 0x1.0000000000000002p0L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -4.656612873077392578082927418388212703712e-10L),
3462 TEST_c_c (casin, -0x1.0000000000000002p0L, -0x1.fp-16385L, -1.570796326794896619231321691639751442099L, -4.656612873077392578082927418388212703712e-10L),
3a7182a1 3463# endif
08198877
JM		 3464 TEST_c_c (casin, 0.0L, 0x1.0000000000000002p0L, 0.0L, 8.813735870195430253092739958139610130980e-1L),
3465 TEST_c_c (casin, 0.0L, -0x1.0000000000000002p0L, 0.0L, -8.813735870195430253092739958139610130980e-1L),
3466 TEST_c_c (casin, -0.0L, 0x1.0000000000000002p0L, -0.0L, 8.813735870195430253092739958139610130980e-1L),
3467 TEST_c_c (casin, -0.0L, -0x1.0000000000000002p0L, -0.0L, -8.813735870195430253092739958139610130980e-1L),
3468 TEST_c_c (casin, 0x1.0000000000000002p0L, 0.0L, 1.570796326794896619231321691639751442099L, 4.656612873077392578082927418388212703712e-10L),
3469 TEST_c_c (casin, -0x1.0000000000000002p0L, 0.0L, -1.570796326794896619231321691639751442099L, 4.656612873077392578082927418388212703712e-10L),
3470 TEST_c_c (casin, 0x1.0000000000000002p0L, -0.0L, 1.570796326794896619231321691639751442099L, -4.656612873077392578082927418388212703712e-10L),
3471 TEST_c_c (casin, -0x1.0000000000000002p0L, -0.0L, -1.570796326794896619231321691639751442099L, -4.656612873077392578082927418388212703712e-10L),
3a7182a1
JM		 3472#endif
3473#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 3474 TEST_c_c (casin, 0x1p-106L, 0x1.000000000000000000000000008p0L, 8.715763992105246878957416200936726072500e-33L, 8.813735870195430252326093249798097405561e-1L),
3475 TEST_c_c (casin, 0x1p-106L, -0x1.000000000000000000000000008p0L, 8.715763992105246878957416200936726072500e-33L, -8.813735870195430252326093249798097405561e-1L),
3476 TEST_c_c (casin, -0x1p-106L, 0x1.000000000000000000000000008p0L, -8.715763992105246878957416200936726072500e-33L, 8.813735870195430252326093249798097405561e-1L),
3477 TEST_c_c (casin, -0x1p-106L, -0x1.000000000000000000000000008p0L, -8.715763992105246878957416200936726072500e-33L, -8.813735870195430252326093249798097405561e-1L),
3478 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, 0x1p-106L, 1.570796326794896565289107467733682961928L, 2.285028863093221674154232933662774454211e-16L),
3479 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, 0x1p-106L, -1.570796326794896565289107467733682961928L, 2.285028863093221674154232933662774454211e-16L),
3480 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, -0x1p-106L, 1.570796326794896565289107467733682961928L, -2.285028863093221674154232933662774454211e-16L),
3481 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, -0x1p-106L, -1.570796326794896565289107467733682961928L, -2.285028863093221674154232933662774454211e-16L),
3482 TEST_c_c (casin, 0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 3.810492908885321743133304375216570658278e-309L, 8.813735870195430252326093249798097405561e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3483 TEST_c_c (casin, 0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 3.810492908885321743133304375216570658278e-309L, -8.813735870195430252326093249798097405561e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3484 TEST_c_c (casin, -0x1.fp-1025L, 0x1.000000000000000000000000008p0L, -3.810492908885321743133304375216570658278e-309L, 8.813735870195430252326093249798097405561e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3485 TEST_c_c (casin, -0x1.fp-1025L, -0x1.000000000000000000000000008p0L, -3.810492908885321743133304375216570658278e-309L, -8.813735870195430252326093249798097405561e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3486 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181636063482e-16L),
3487 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, 0x1.fp-1025L, -1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181636063482e-16L),
3488 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181636063482e-16L),
3489 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, -0x1.fp-1025L, -1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181636063482e-16L),
3490 TEST_c_c (casin, 0.0L, 0x1.000000000000000000000000008p0L, 0.0L, 8.813735870195430252326093249798097405561e-1L),
3491 TEST_c_c (casin, 0.0L, -0x1.000000000000000000000000008p0L, 0.0L, -8.813735870195430252326093249798097405561e-1L),
3492 TEST_c_c (casin, -0.0L, 0x1.000000000000000000000000008p0L, -0.0L, 8.813735870195430252326093249798097405561e-1L),
3493 TEST_c_c (casin, -0.0L, -0x1.000000000000000000000000008p0L, -0.0L, -8.813735870195430252326093249798097405561e-1L),
3494 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, 0.0L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181636063482e-16L),
3495 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, 0.0L, -1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181636063482e-16L),
3496 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, -0.0L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181636063482e-16L),
3497 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, -0.0L, -1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181636063482e-16L),
3a7182a1
JM		 3498#endif
3499#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 3500 TEST_c_c (casin, 0x1p-113L, 0x1.0000000000000000000000000001p0L, 6.809190618832224124185481406981900518193e-35L, 8.813735870195430252326093249797924452120e-1L),
3501 TEST_c_c (casin, 0x1p-113L, -0x1.0000000000000000000000000001p0L, 6.809190618832224124185481406981900518193e-35L, -8.813735870195430252326093249797924452120e-1L),
3502 TEST_c_c (casin, -0x1p-113L, 0x1.0000000000000000000000000001p0L, -6.809190618832224124185481406981900518193e-35L, 8.813735870195430252326093249797924452120e-1L),
3503 TEST_c_c (casin, -0x1p-113L, -0x1.0000000000000000000000000001p0L, -6.809190618832224124185481406981900518193e-35L, -8.813735870195430252326093249797924452120e-1L),
3504 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, 0x1p-113L, 1.570796326794896614463458507897073960405L, 2.019699255375255198156433710951064632386e-17L),
3505 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, 0x1p-113L, -1.570796326794896614463458507897073960405L, 2.019699255375255198156433710951064632386e-17L),
3506 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, -0x1p-113L, 1.570796326794896614463458507897073960405L, -2.019699255375255198156433710951064632386e-17L),
3507 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, -0x1p-113L, -1.570796326794896614463458507897073960405L, -2.019699255375255198156433710951064632386e-17L),
3508 TEST_c_c (casin, 0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 5.757683115456107044131264955348448400014e-4933L, 8.813735870195430252326093249797924452120e-1L, UNDERFLOW_EXCEPTION),
3509 TEST_c_c (casin, 0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 5.757683115456107044131264955348448400014e-4933L, -8.813735870195430252326093249797924452120e-1L, UNDERFLOW_EXCEPTION),
3510 TEST_c_c (casin, -0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, -5.757683115456107044131264955348448400014e-4933L, 8.813735870195430252326093249797924452120e-1L, UNDERFLOW_EXCEPTION),
3511 TEST_c_c (casin, -0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, -5.757683115456107044131264955348448400014e-4933L, -8.813735870195430252326093249797924452120e-1L, UNDERFLOW_EXCEPTION),
3512 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 1.962615573354718824241727964954454332780e-17L),
3513 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, -1.570796326794896619231321691639751442099L, 1.962615573354718824241727964954454332780e-17L),
3514 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -1.962615573354718824241727964954454332780e-17L),
3515 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, -1.570796326794896619231321691639751442099L, -1.962615573354718824241727964954454332780e-17L),
3516 TEST_c_c (casin, 0.0L, 0x1.0000000000000000000000000001p0L, 0.0L, 8.813735870195430252326093249797924452120e-1L),
3517 TEST_c_c (casin, 0.0L, -0x1.0000000000000000000000000001p0L, 0.0L, -8.813735870195430252326093249797924452120e-1L),
3518 TEST_c_c (casin, -0.0L, 0x1.0000000000000000000000000001p0L, -0.0L, 8.813735870195430252326093249797924452120e-1L),
3519 TEST_c_c (casin, -0.0L, -0x1.0000000000000000000000000001p0L, -0.0L, -8.813735870195430252326093249797924452120e-1L),
3520 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, 0.0L, 1.570796326794896619231321691639751442099L, 1.962615573354718824241727964954454332780e-17L),
3521 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, 0.0L, -1.570796326794896619231321691639751442099L, 1.962615573354718824241727964954454332780e-17L),
3522 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, -0.0L, 1.570796326794896619231321691639751442099L, -1.962615573354718824241727964954454332780e-17L),
3523 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, -0.0L, -1.570796326794896619231321691639751442099L, -1.962615573354718824241727964954454332780e-17L),
3524#endif
3525
3526 TEST_c_c (casin, 0x1p-23L, 0x0.ffffffp0L, 8.429369953393598499000760938112968755257e-8L, 8.813735448726963984495965873956465777250e-1L),
3527 TEST_c_c (casin, 0x1p-23L, -0x0.ffffffp0L, 8.429369953393598499000760938112968755257e-8L, -8.813735448726963984495965873956465777250e-1L),
3528 TEST_c_c (casin, -0x1p-23L, 0x0.ffffffp0L, -8.429369953393598499000760938112968755257e-8L, 8.813735448726963984495965873956465777250e-1L),
3529 TEST_c_c (casin, -0x1p-23L, -0x0.ffffffp0L, -8.429369953393598499000760938112968755257e-8L, -8.813735448726963984495965873956465777250e-1L),
3530 TEST_c_c (casin, 0x0.ffffffp0L, 0x1p-23L, 1.570357140408705570520377172865353621698L, 2.714321200917194650737217746780928423385e-4L),
3531 TEST_c_c (casin, -0x0.ffffffp0L, 0x1p-23L, -1.570357140408705570520377172865353621698L, 2.714321200917194650737217746780928423385e-4L),
3532 TEST_c_c (casin, 0x0.ffffffp0L, -0x1p-23L, 1.570357140408705570520377172865353621698L, -2.714321200917194650737217746780928423385e-4L),
3533 TEST_c_c (casin, -0x0.ffffffp0L, -0x1p-23L, -1.570357140408705570520377172865353621698L, -2.714321200917194650737217746780928423385e-4L),
3534 TEST_c_c (casin, 0x1.fp-129L, 0x0.ffffffp0L, 2.013062624689288675911339929224634593425e-39L, 8.813735448726938863015878255140556727969e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3535 TEST_c_c (casin, 0x1.fp-129L, -0x0.ffffffp0L, 2.013062624689288675911339929224634593425e-39L, -8.813735448726938863015878255140556727969e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3536 TEST_c_c (casin, -0x1.fp-129L, 0x0.ffffffp0L, -2.013062624689288675911339929224634593425e-39L, 8.813735448726938863015878255140556727969e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3537 TEST_c_c (casin, -0x1.fp-129L, -0x0.ffffffp0L, -2.013062624689288675911339929224634593425e-39L, -8.813735448726938863015878255140556727969e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3538 TEST_c_c (casin, 0x0.ffffffp0L, 0x1.fp-129L, 1.570451059810180415643718442157112705601L, 8.245504387859737323891843603996428534945e-36L),
3539 TEST_c_c (casin, -0x0.ffffffp0L, 0x1.fp-129L, -1.570451059810180415643718442157112705601L, 8.245504387859737323891843603996428534945e-36L),
3540 TEST_c_c (casin, 0x0.ffffffp0L, -0x1.fp-129L, 1.570451059810180415643718442157112705601L, -8.245504387859737323891843603996428534945e-36L),
3541 TEST_c_c (casin, -0x0.ffffffp0L, -0x1.fp-129L, -1.570451059810180415643718442157112705601L, -8.245504387859737323891843603996428534945e-36L),
3542 TEST_c_c (casin, 0.0L, 0x0.ffffffp0L, 0.0L, 8.813735448726938863015878255140556727969e-1L),
3543 TEST_c_c (casin, 0.0L, -0x0.ffffffp0L, 0.0L, -8.813735448726938863015878255140556727969e-1L),
3544 TEST_c_c (casin, -0.0L, 0x0.ffffffp0L, -0.0L, 8.813735448726938863015878255140556727969e-1L),
3545 TEST_c_c (casin, -0.0L, -0x0.ffffffp0L, -0.0L, -8.813735448726938863015878255140556727969e-1L),
3546 TEST_c_c (casin, 0x0.ffffffp0L, 0.0L, 1.570451059810180415643718442157112705601L, 0.0L),
3547 TEST_c_c (casin, -0x0.ffffffp0L, 0.0L, -1.570451059810180415643718442157112705601L, 0.0L),
3548 TEST_c_c (casin, 0x0.ffffffp0L, -0.0L, 1.570451059810180415643718442157112705601L, -0.0L),
3549 TEST_c_c (casin, -0x0.ffffffp0L, -0.0L, -1.570451059810180415643718442157112705601L, -0.0L),
3550 TEST_c_c (casin, 0x1p-23L, 0.5L, 1.066240299940009780479664302917201696886e-7L, 4.812118250596059896127318386463676808798e-1L),
3551 TEST_c_c (casin, 0x1p-23L, -0.5L, 1.066240299940009780479664302917201696886e-7L, -4.812118250596059896127318386463676808798e-1L),
3552 TEST_c_c (casin, -0x1p-23L, 0.5L, -1.066240299940009780479664302917201696886e-7L, 4.812118250596059896127318386463676808798e-1L),
3553 TEST_c_c (casin, -0x1p-23L, -0.5L, -1.066240299940009780479664302917201696886e-7L, -4.812118250596059896127318386463676808798e-1L),
3554 TEST_c_c (casin, 0.5L, 0x1p-23L, 5.235987755982934033165770729745469098254e-1L, 1.376510308240943236356088341381173571841e-7L),
3555 TEST_c_c (casin, -0.5L, 0x1p-23L, -5.235987755982934033165770729745469098254e-1L, 1.376510308240943236356088341381173571841e-7L),
3556 TEST_c_c (casin, 0.5L, -0x1p-23L, 5.235987755982934033165770729745469098254e-1L, -1.376510308240943236356088341381173571841e-7L),
3557 TEST_c_c (casin, -0.5L, -0x1p-23L, -5.235987755982934033165770729745469098254e-1L, -1.376510308240943236356088341381173571841e-7L),
3558 TEST_c_c (casin, 0x1.fp-129L, 0.5L, 2.546345110742945032959687790021055102355e-39L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3559 TEST_c_c (casin, 0x1.fp-129L, -0.5L, 2.546345110742945032959687790021055102355e-39L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3560 TEST_c_c (casin, -0x1.fp-129L, 0.5L, -2.546345110742945032959687790021055102355e-39L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3561 TEST_c_c (casin, -0x1.fp-129L, -0.5L, -2.546345110742945032959687790021055102355e-39L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3562 TEST_c_c (casin, 0.5L, 0x1.fp-129L, 5.235987755982988730771072305465838140329e-1L, 3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3563 TEST_c_c (casin, -0.5L, 0x1.fp-129L, -5.235987755982988730771072305465838140329e-1L, 3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3564 TEST_c_c (casin, 0.5L, -0x1.fp-129L, 5.235987755982988730771072305465838140329e-1L, -3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3565 TEST_c_c (casin, -0.5L, -0x1.fp-129L, -5.235987755982988730771072305465838140329e-1L, -3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3566 TEST_c_c (casin, 0x1p-23L, 0x1p-23L, 1.192092895507806853113684971258850504935e-7L, 1.192092895507818146886315028596704749235e-7L),
3567 TEST_c_c (casin, 0x1p-23L, -0x1p-23L, 1.192092895507806853113684971258850504935e-7L, -1.192092895507818146886315028596704749235e-7L),
3568 TEST_c_c (casin, -0x1p-23L, 0x1p-23L, -1.192092895507806853113684971258850504935e-7L, 1.192092895507818146886315028596704749235e-7L),
3569 TEST_c_c (casin, -0x1p-23L, -0x1p-23L, -1.192092895507806853113684971258850504935e-7L, -1.192092895507818146886315028596704749235e-7L),
3570 /* Bug 15319: underflow exception may be missing. */
3571 TEST_c_c (casin, 0x1.fp-129L, 0x1p-23L, 2.846900380897707329917933005874691056564e-39L, 1.192092895507809676556842485683592032154e-7L, UNDERFLOW_EXCEPTION_OK_FLOAT),
3572 TEST_c_c (casin, 0x1.fp-129L, -0x1p-23L, 2.846900380897707329917933005874691056564e-39L, -1.192092895507809676556842485683592032154e-7L, UNDERFLOW_EXCEPTION_OK_FLOAT),
3573 TEST_c_c (casin, -0x1.fp-129L, 0x1p-23L, -2.846900380897707329917933005874691056564e-39L, 1.192092895507809676556842485683592032154e-7L, UNDERFLOW_EXCEPTION_OK_FLOAT),
3574 TEST_c_c (casin, -0x1.fp-129L, -0x1p-23L, -2.846900380897707329917933005874691056564e-39L, -1.192092895507809676556842485683592032154e-7L, UNDERFLOW_EXCEPTION_OK_FLOAT),
3575 TEST_c_c (casin, 0x1p-23L, 0x1.fp-129L, 1.192092895507815323443157514352519154304e-7L, 2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3576 TEST_c_c (casin, -0x1p-23L, 0x1.fp-129L, -1.192092895507815323443157514352519154304e-7L, 2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3577 TEST_c_c (casin, 0x1p-23L, -0x1.fp-129L, 1.192092895507815323443157514352519154304e-7L, -2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3578 TEST_c_c (casin, -0x1p-23L, -0x1.fp-129L, -1.192092895507815323443157514352519154304e-7L, -2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3579 TEST_c_c (casin, 0.0L, 0x1p-23L, 0.0L, 1.192092895507809676556842485683592032154e-7L),
3580 TEST_c_c (casin, 0.0L, -0x1p-23L, 0.0L, -1.192092895507809676556842485683592032154e-7L),
3581 TEST_c_c (casin, -0.0L, 0x1p-23L, -0.0L, 1.192092895507809676556842485683592032154e-7L),
3582 TEST_c_c (casin, -0.0L, -0x1p-23L, -0.0L, -1.192092895507809676556842485683592032154e-7L),
3583 TEST_c_c (casin, 0x1p-23L, 0.0L, 1.192092895507815323443157514352519154304e-7L, 0.0L),
3584 TEST_c_c (casin, -0x1p-23L, 0.0L, -1.192092895507815323443157514352519154304e-7L, 0.0L),
3585 TEST_c_c (casin, 0x1p-23L, -0.0L, 1.192092895507815323443157514352519154304e-7L, -0.0L),
3586 TEST_c_c (casin, -0x1p-23L, -0.0L, -1.192092895507815323443157514352519154304e-7L, -0.0L),
3587 TEST_c_c (casin, 0x1.fp-129L, 0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3588 TEST_c_c (casin, 0x1.fp-129L, -0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3589 TEST_c_c (casin, -0x1.fp-129L, 0x1.fp-129L, -2.846900380897727558361783801085126250967e-39L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3590 TEST_c_c (casin, -0x1.fp-129L, -0x1.fp-129L, -2.846900380897727558361783801085126250967e-39L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
ccc8cadf 3591#ifndef TEST_FLOAT
08198877
JM		 3592 TEST_c_c (casin, 0x1p-52L, 0x0.fffffffffffff8p0L, 1.570092458683775146551022293016031474627e-16L, 8.813735870195429467279863907910458761820e-1L),
3593 TEST_c_c (casin, 0x1p-52L, -0x0.fffffffffffff8p0L, 1.570092458683775146551022293016031474627e-16L, -8.813735870195429467279863907910458761820e-1L),
3594 TEST_c_c (casin, -0x1p-52L, 0x0.fffffffffffff8p0L, -1.570092458683775146551022293016031474627e-16L, 8.813735870195429467279863907910458761820e-1L),
3595 TEST_c_c (casin, -0x1p-52L, -0x0.fffffffffffff8p0L, -1.570092458683775146551022293016031474627e-16L, -8.813735870195429467279863907910458761820e-1L),
3596 TEST_c_c (casin, 0x0.fffffffffffff8p0L, 0x1p-52L, 1.570796307840326780080580569360500172043L, 1.171456840272878582596796205397918831268e-8L),
3597 TEST_c_c (casin, -0x0.fffffffffffff8p0L, 0x1p-52L, -1.570796307840326780080580569360500172043L, 1.171456840272878582596796205397918831268e-8L),
3598 TEST_c_c (casin, 0x0.fffffffffffff8p0L, -0x1p-52L, 1.570796307840326780080580569360500172043L, -1.171456840272878582596796205397918831268e-8L),
3599 TEST_c_c (casin, -0x0.fffffffffffff8p0L, -0x1p-52L, -1.570796307840326780080580569360500172043L, -1.171456840272878582596796205397918831268e-8L),
3600 TEST_c_c (casin, 0x1.fp-1025L, 0x0.fffffffffffff8p0L, 3.810492908885321954658152505985270452320e-309L, 8.813735870195429467279863907910371604180e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3601 TEST_c_c (casin, 0x1.fp-1025L, -0x0.fffffffffffff8p0L, 3.810492908885321954658152505985270452320e-309L, -8.813735870195429467279863907910371604180e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3602 TEST_c_c (casin, -0x1.fp-1025L, 0x0.fffffffffffff8p0L, -3.810492908885321954658152505985270452320e-309L, 8.813735870195429467279863907910371604180e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3603 TEST_c_c (casin, -0x1.fp-1025L, -0x0.fffffffffffff8p0L, -3.810492908885321954658152505985270452320e-309L, -8.813735870195429467279863907910371604180e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3604 TEST_c_c (casin, 0x0.fffffffffffff8p0L, 0x1.fp-1025L, 1.570796311893735425383665303776316016594L, 3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3605 TEST_c_c (casin, -0x0.fffffffffffff8p0L, 0x1.fp-1025L, -1.570796311893735425383665303776316016594L, 3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3606 TEST_c_c (casin, 0x0.fffffffffffff8p0L, -0x1.fp-1025L, 1.570796311893735425383665303776316016594L, -3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3607 TEST_c_c (casin, -0x0.fffffffffffff8p0L, -0x1.fp-1025L, -1.570796311893735425383665303776316016594L, -3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3608 TEST_c_c (casin, 0.0L, 0x0.fffffffffffff8p0L, 0.0L, 8.813735870195429467279863907910371604180e-1L),
3609 TEST_c_c (casin, 0.0L, -0x0.fffffffffffff8p0L, 0.0L, -8.813735870195429467279863907910371604180e-1L),
3610 TEST_c_c (casin, -0.0L, 0x0.fffffffffffff8p0L, -0.0L, 8.813735870195429467279863907910371604180e-1L),
3611 TEST_c_c (casin, -0.0L, -0x0.fffffffffffff8p0L, -0.0L, -8.813735870195429467279863907910371604180e-1L),
3612 TEST_c_c (casin, 0x0.fffffffffffff8p0L, 0.0L, 1.570796311893735425383665303776316016594L, 0.0L),
3613 TEST_c_c (casin, -0x0.fffffffffffff8p0L, 0.0L, -1.570796311893735425383665303776316016594L, 0.0L),
3614 TEST_c_c (casin, 0x0.fffffffffffff8p0L, -0.0L, 1.570796311893735425383665303776316016594L, -0.0L),
3615 TEST_c_c (casin, -0x0.fffffffffffff8p0L, -0.0L, -1.570796311893735425383665303776316016594L, -0.0L),
3616#endif
3617 TEST_c_c (casin, 0x1p-52L, 0.5L, 1.986027322597818397661816253158024383707e-16L, 4.812118250596034474977589134243772428682e-1L),
3618 TEST_c_c (casin, 0x1p-52L, -0.5L, 1.986027322597818397661816253158024383707e-16L, -4.812118250596034474977589134243772428682e-1L),
3619 TEST_c_c (casin, -0x1p-52L, 0.5L, -1.986027322597818397661816253158024383707e-16L, 4.812118250596034474977589134243772428682e-1L),
3620 TEST_c_c (casin, -0x1p-52L, -0.5L, -1.986027322597818397661816253158024383707e-16L, -4.812118250596034474977589134243772428682e-1L),
3621 TEST_c_c (casin, 0.5L, 0x1p-52L, 5.235987755982988730771072305465648369889e-1L, 2.563950248511418570403591756798643804971e-16L),
3622 TEST_c_c (casin, -0.5L, 0x1p-52L, -5.235987755982988730771072305465648369889e-1L, 2.563950248511418570403591756798643804971e-16L),
3623 TEST_c_c (casin, 0.5L, -0x1p-52L, 5.235987755982988730771072305465648369889e-1L, -2.563950248511418570403591756798643804971e-16L),
3624 TEST_c_c (casin, -0.5L, -0x1p-52L, -5.235987755982988730771072305465648369889e-1L, -2.563950248511418570403591756798643804971e-16L),
ccc8cadf 3625#ifndef TEST_FLOAT
08198877
JM		 3626 TEST_c_c (casin, 0x1.fp-1025L, 0.5L, 4.819934639999230680322935210539402497827e-309L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3627 TEST_c_c (casin, 0x1.fp-1025L, -0.5L, 4.819934639999230680322935210539402497827e-309L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3628 TEST_c_c (casin, -0x1.fp-1025L, 0.5L, -4.819934639999230680322935210539402497827e-309L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3629 TEST_c_c (casin, -0x1.fp-1025L, -0.5L, -4.819934639999230680322935210539402497827e-309L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3630 TEST_c_c (casin, 0.5L, 0x1.fp-1025L, 5.235987755982988730771072305465838140329e-1L, 6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3631 TEST_c_c (casin, -0.5L, 0x1.fp-1025L, -5.235987755982988730771072305465838140329e-1L, 6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3632 TEST_c_c (casin, 0.5L, -0x1.fp-1025L, 5.235987755982988730771072305465838140329e-1L, -6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3633 TEST_c_c (casin, -0.5L, -0x1.fp-1025L, -5.235987755982988730771072305465838140329e-1L, -6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3634#endif
3635 TEST_c_c (casin, 0x1p-52L, 0x1p-52L, 2.220446049250313080847263336181604132852e-16L, 2.220446049250313080847263336181677117148e-16L),
3636 TEST_c_c (casin, 0x1p-52L, -0x1p-52L, 2.220446049250313080847263336181604132852e-16L, -2.220446049250313080847263336181677117148e-16L),
3637 TEST_c_c (casin, -0x1p-52L, 0x1p-52L, -2.220446049250313080847263336181604132852e-16L, 2.220446049250313080847263336181677117148e-16L),
3638 TEST_c_c (casin, -0x1p-52L, -0x1p-52L, -2.220446049250313080847263336181604132852e-16L, -2.220446049250313080847263336181677117148e-16L),
ccc8cadf 3639#ifndef TEST_FLOAT
08198877
JM		 3640 /* Bug 15319: underflow exception may be missing. */
3641 TEST_c_c (casin, 0x1.fp-1025L, 0x1p-52L, 5.388850751072128349671657362289283247603e-309L, 2.220446049250313080847263336181622378926e-16L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3642 TEST_c_c (casin, 0x1.fp-1025L, -0x1p-52L, 5.388850751072128349671657362289283247603e-309L, -2.220446049250313080847263336181622378926e-16L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3643 TEST_c_c (casin, -0x1.fp-1025L, 0x1p-52L, -5.388850751072128349671657362289283247603e-309L, 2.220446049250313080847263336181622378926e-16L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3644 TEST_c_c (casin, -0x1.fp-1025L, -0x1p-52L, -5.388850751072128349671657362289283247603e-309L, -2.220446049250313080847263336181622378926e-16L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3645 TEST_c_c (casin, 0x1p-52L, 0x1.fp-1025L, 2.220446049250313080847263336181658871074e-16L, 5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3646 TEST_c_c (casin, -0x1p-52L, 0x1.fp-1025L, -2.220446049250313080847263336181658871074e-16L, 5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3647 TEST_c_c (casin, 0x1p-52L, -0x1.fp-1025L, 2.220446049250313080847263336181658871074e-16L, -5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3648 TEST_c_c (casin, -0x1p-52L, -0x1.fp-1025L, -2.220446049250313080847263336181658871074e-16L, -5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3649#endif
3650 TEST_c_c (casin, 0.0L, 0x1p-52L, 0.0L, 2.220446049250313080847263336181622378926e-16L),
3651 TEST_c_c (casin, 0.0L, -0x1p-52L, 0.0L, -2.220446049250313080847263336181622378926e-16L),
3652 TEST_c_c (casin, -0.0L, 0x1p-52L, -0.0L, 2.220446049250313080847263336181622378926e-16L),
3653 TEST_c_c (casin, -0.0L, -0x1p-52L, -0.0L, -2.220446049250313080847263336181622378926e-16L),
3654 TEST_c_c (casin, 0x1p-52L, 0.0L, 2.220446049250313080847263336181658871074e-16L, 0.0L),
3655 TEST_c_c (casin, -0x1p-52L, 0.0L, -2.220446049250313080847263336181658871074e-16L, 0.0L),
3656 TEST_c_c (casin, 0x1p-52L, -0.0L, 2.220446049250313080847263336181658871074e-16L, -0.0L),
3657 TEST_c_c (casin, -0x1p-52L, -0.0L, -2.220446049250313080847263336181658871074e-16L, -0.0L),
ccc8cadf 3658#ifndef TEST_FLOAT
08198877
JM		 3659 TEST_c_c (casin, 0x1.fp-1025L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3660 TEST_c_c (casin, 0x1.fp-1025L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3661 TEST_c_c (casin, -0x1.fp-1025L, 0x1.fp-1025L, -5.388850751072128349671657362289416093031e-309L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3662 TEST_c_c (casin, -0x1.fp-1025L, -0x1.fp-1025L, -5.388850751072128349671657362289416093031e-309L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
ccc8cadf
JM		 3663#endif
3664#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 3665 TEST_c_c (casin, 0x1p-63L, 0x0.ffffffffffffffffp0L, 7.666467083416870407402049869781566856442e-20L, 8.813735870195430251942769895627079569937e-1L),
3666 TEST_c_c (casin, 0x1p-63L, -0x0.ffffffffffffffffp0L, 7.666467083416870407402049869781566856442e-20L, -8.813735870195430251942769895627079569937e-1L),
3667 TEST_c_c (casin, -0x1p-63L, 0x0.ffffffffffffffffp0L, -7.666467083416870407402049869781566856442e-20L, 8.813735870195430251942769895627079569937e-1L),
3668 TEST_c_c (casin, -0x1p-63L, -0x0.ffffffffffffffffp0L, -7.666467083416870407402049869781566856442e-20L, -8.813735870195430251942769895627079569937e-1L),
3669 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, 0x1p-63L, 1.570796326376055842114524927965556247908L, 2.588578361325995866221775673638805081337e-10L),
3670 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, 0x1p-63L, -1.570796326376055842114524927965556247908L, 2.588578361325995866221775673638805081337e-10L),
3671 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, -0x1p-63L, 1.570796326376055842114524927965556247908L, -2.588578361325995866221775673638805081337e-10L),
3672 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, -0x1p-63L, -1.570796326376055842114524927965556247908L, -2.588578361325995866221775673638805081337e-10L),
ccc8cadf 3673# if LDBL_MIN_EXP <= -16381
08198877
JM		 3674 TEST_c_c (casin, 0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 5.757683115456107044287327268904964422212e-4933L, 8.813735870195430251942769895627079569917e-1L, UNDERFLOW_EXCEPTION),
3675 TEST_c_c (casin, 0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 5.757683115456107044287327268904964422212e-4933L, -8.813735870195430251942769895627079569917e-1L, UNDERFLOW_EXCEPTION),
3676 TEST_c_c (casin, -0x1.fp-16385L, 0x0.ffffffffffffffffp0L, -5.757683115456107044287327268904964422212e-4933L, 8.813735870195430251942769895627079569917e-1L, UNDERFLOW_EXCEPTION),
3677 TEST_c_c (casin, -0x1.fp-16385L, -0x0.ffffffffffffffffp0L, -5.757683115456107044287327268904964422212e-4933L, -8.813735870195430251942769895627079569917e-1L, UNDERFLOW_EXCEPTION),
3678 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 1.570796326465624365239962068302568888898L, 2.472906068161537187835415298076415423459e-4923L),
3679 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, 0x1.fp-16385L, -1.570796326465624365239962068302568888898L, 2.472906068161537187835415298076415423459e-4923L),
3680 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 1.570796326465624365239962068302568888898L, -2.472906068161537187835415298076415423459e-4923L),
3681 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, -0x1.fp-16385L, -1.570796326465624365239962068302568888898L, -2.472906068161537187835415298076415423459e-4923L),
ccc8cadf 3682# endif
08198877
JM		 3683 TEST_c_c (casin, 0.0L, 0x0.ffffffffffffffffp0L, 0.0L, 8.813735870195430251942769895627079569917e-1L),
3684 TEST_c_c (casin, 0.0L, -0x0.ffffffffffffffffp0L, 0.0L, -8.813735870195430251942769895627079569917e-1L),
3685 TEST_c_c (casin, -0.0L, 0x0.ffffffffffffffffp0L, -0.0L, 8.813735870195430251942769895627079569917e-1L),
3686 TEST_c_c (casin, -0.0L, -0x0.ffffffffffffffffp0L, -0.0L, -8.813735870195430251942769895627079569917e-1L),
3687 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, 0.0L, 1.570796326465624365239962068302568888898L, 0.0L),
3688 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, 0.0L, -1.570796326465624365239962068302568888898L, 0.0L),
3689 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, -0.0L, 1.570796326465624365239962068302568888898L, -0.0L),
3690 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, -0.0L, -1.570796326465624365239962068302568888898L, -0.0L),
3691#endif
3692 TEST_c_c (casin, 0x1p-63L, 0.5L, 9.697399036122160144833087173623140436413e-20L, 4.812118250596034474977589134243684231373e-1L),
3693 TEST_c_c (casin, 0x1p-63L, -0.5L, 9.697399036122160144833087173623140436413e-20L, -4.812118250596034474977589134243684231373e-1L),
3694 TEST_c_c (casin, -0x1p-63L, 0.5L, -9.697399036122160144833087173623140436413e-20L, 4.812118250596034474977589134243684231373e-1L),
3695 TEST_c_c (casin, -0x1p-63L, -0.5L, -9.697399036122160144833087173623140436413e-20L, -4.812118250596034474977589134243684231373e-1L),
3696 TEST_c_c (casin, 0.5L, 0x1p-63L, 5.235987755982988730771072305465838140283e-1L, 1.251928832280966098829878787499365228659e-19L),
3697 TEST_c_c (casin, -0.5L, 0x1p-63L, -5.235987755982988730771072305465838140283e-1L, 1.251928832280966098829878787499365228659e-19L),
3698 TEST_c_c (casin, 0.5L, -0x1p-63L, 5.235987755982988730771072305465838140283e-1L, -1.251928832280966098829878787499365228659e-19L),
3699 TEST_c_c (casin, -0.5L, -0x1p-63L, -5.235987755982988730771072305465838140283e-1L, -1.251928832280966098829878787499365228659e-19L),
ccc8cadf 3700#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3701 TEST_c_c (casin, 0x1.fp-16385L, 0.5L, 7.282957076134209141226696333885150260319e-4933L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION),
3702 TEST_c_c (casin, 0x1.fp-16385L, -0.5L, 7.282957076134209141226696333885150260319e-4933L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION),
3703 TEST_c_c (casin, -0x1.fp-16385L, 0.5L, -7.282957076134209141226696333885150260319e-4933L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION),
3704 TEST_c_c (casin, -0x1.fp-16385L, -0.5L, -7.282957076134209141226696333885150260319e-4933L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION),
3705 TEST_c_c (casin, 0.5L, 0x1.fp-16385L, 5.235987755982988730771072305465838140329e-1L, 9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
3706 TEST_c_c (casin, -0.5L, 0x1.fp-16385L, -5.235987755982988730771072305465838140329e-1L, 9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
3707 TEST_c_c (casin, 0.5L, -0x1.fp-16385L, 5.235987755982988730771072305465838140329e-1L, -9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
3708 TEST_c_c (casin, -0.5L, -0x1.fp-16385L, -5.235987755982988730771072305465838140329e-1L, -9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
3709#endif
3710 TEST_c_c (casin, 0x1p-63L, 0x1p-63L, 1.084202172485504434007452800869941711422e-19L, 1.084202172485504434007452800869941711430e-19L),
3711 TEST_c_c (casin, 0x1p-63L, -0x1p-63L, 1.084202172485504434007452800869941711422e-19L, -1.084202172485504434007452800869941711430e-19L),
3712 TEST_c_c (casin, -0x1p-63L, 0x1p-63L, -1.084202172485504434007452800869941711422e-19L, 1.084202172485504434007452800869941711430e-19L),
3713 TEST_c_c (casin, -0x1p-63L, -0x1p-63L, -1.084202172485504434007452800869941711422e-19L, -1.084202172485504434007452800869941711430e-19L),
ccc8cadf 3714#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3715 TEST_c_c (casin, 0x1.fp-16385L, 0x1p-63L, 8.142593549724601460479922838826119584369e-4933L, 1.084202172485504434007452800869941711424e-19L, UNDERFLOW_EXCEPTION),
3716 TEST_c_c (casin, 0x1.fp-16385L, -0x1p-63L, 8.142593549724601460479922838826119584369e-4933L, -1.084202172485504434007452800869941711424e-19L, UNDERFLOW_EXCEPTION),
3717 TEST_c_c (casin, -0x1.fp-16385L, 0x1p-63L, -8.142593549724601460479922838826119584369e-4933L, 1.084202172485504434007452800869941711424e-19L, UNDERFLOW_EXCEPTION),
3718 TEST_c_c (casin, -0x1.fp-16385L, -0x1p-63L, -8.142593549724601460479922838826119584369e-4933L, -1.084202172485504434007452800869941711424e-19L, UNDERFLOW_EXCEPTION),
3719 TEST_c_c (casin, 0x1p-63L, 0x1.fp-16385L, 1.084202172485504434007452800869941711428e-19L, 8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
3720 TEST_c_c (casin, -0x1p-63L, 0x1.fp-16385L, -1.084202172485504434007452800869941711428e-19L, 8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
3721 TEST_c_c (casin, 0x1p-63L, -0x1.fp-16385L, 1.084202172485504434007452800869941711428e-19L, -8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
3722 TEST_c_c (casin, -0x1p-63L, -0x1.fp-16385L, -1.084202172485504434007452800869941711428e-19L, -8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
3723#endif
3724 TEST_c_c (casin, 0.0L, 0x1p-63L, 0.0L, 1.084202172485504434007452800869941711424e-19L),
3725 TEST_c_c (casin, 0.0L, -0x1p-63L, 0.0L, -1.084202172485504434007452800869941711424e-19L),
3726 TEST_c_c (casin, -0.0L, 0x1p-63L, -0.0L, 1.084202172485504434007452800869941711424e-19L),
3727 TEST_c_c (casin, -0.0L, -0x1p-63L, -0.0L, -1.084202172485504434007452800869941711424e-19L),
3728 TEST_c_c (casin, 0x1p-63L, 0.0L, 1.084202172485504434007452800869941711428e-19L, 0.0L),
3729 TEST_c_c (casin, -0x1p-63L, 0.0L, -1.084202172485504434007452800869941711428e-19L, 0.0L),
3730 TEST_c_c (casin, 0x1p-63L, -0.0L, 1.084202172485504434007452800869941711428e-19L, -0.0L),
3731 TEST_c_c (casin, -0x1p-63L, -0.0L, -1.084202172485504434007452800869941711428e-19L, -0.0L),
ccc8cadf 3732#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3733 TEST_c_c (casin, 0x1.fp-16385L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3734 TEST_c_c (casin, 0x1.fp-16385L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3735 TEST_c_c (casin, -0x1.fp-16385L, 0x1.fp-16385L, -8.142593549724601460479922838826119584417e-4933L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3736 TEST_c_c (casin, -0x1.fp-16385L, -0x1.fp-16385L, -8.142593549724601460479922838826119584417e-4933L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
ccc8cadf
JM		 3737#endif
3738#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 3739 TEST_c_c (casin, 0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 1.743152798421049375791483240187377443526e-32L, 8.813735870195430252326093249797835932642e-1L),
3740 TEST_c_c (casin, 0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 1.743152798421049375791483240187377443526e-32L, -8.813735870195430252326093249797835932642e-1L),
3741 TEST_c_c (casin, -0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, -1.743152798421049375791483240187377443526e-32L, 8.813735870195430252326093249797835932642e-1L),
3742 TEST_c_c (casin, -0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, -1.743152798421049375791483240187377443526e-32L, -8.813735870195430252326093249797835932642e-1L),
3743 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 1.570796326794896419512475791677915736035L, 1.234330349600789959989661887846005659983e-16L),
3744 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, -1.570796326794896419512475791677915736035L, 1.234330349600789959989661887846005659983e-16L),
3745 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 1.570796326794896419512475791677915736035L, -1.234330349600789959989661887846005659983e-16L),
3746 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, -1.570796326794896419512475791677915736035L, -1.234330349600789959989661887846005659983e-16L),
3747 TEST_c_c (casin, 0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 3.810492908885321743133304375216641110205e-309L, 8.813735870195430252326093249797835932642e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3748 TEST_c_c (casin, 0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 3.810492908885321743133304375216641110205e-309L, -8.813735870195430252326093249797835932642e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3749 TEST_c_c (casin, -0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, -3.810492908885321743133304375216641110205e-309L, 8.813735870195430252326093249797835932642e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3750 TEST_c_c (casin, -0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, -3.810492908885321743133304375216641110205e-309L, -8.813735870195430252326093249797835932642e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3751 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 1.570796326794896462222075823262245502760L, 3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3752 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, -1.570796326794896462222075823262245502760L, 3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3753 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 1.570796326794896462222075823262245502760L, -3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3754 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, -1.570796326794896462222075823262245502760L, -3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3755 TEST_c_c (casin, 0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 8.813735870195430252326093249797835932642e-1L),
3756 TEST_c_c (casin, 0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, -8.813735870195430252326093249797835932642e-1L),
3757 TEST_c_c (casin, -0.0L, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 8.813735870195430252326093249797835932642e-1L),
3758 TEST_c_c (casin, -0.0L, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, -8.813735870195430252326093249797835932642e-1L),
3759 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 1.570796326794896462222075823262245502760L, 0.0L),
3760 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, -1.570796326794896462222075823262245502760L, 0.0L),
3761 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 1.570796326794896462222075823262245502760L, -0.0L),
3762 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, -1.570796326794896462222075823262245502760L, -0.0L),
3763#endif
3764 TEST_c_c (casin, 0x1p-105L, 0.5L, 2.204933261082751447436996198490110245167e-32L, 4.812118250596034474977589134243684231352e-1L),
3765 TEST_c_c (casin, 0x1p-105L, -0.5L, 2.204933261082751447436996198490110245167e-32L, -4.812118250596034474977589134243684231352e-1L),
3766 TEST_c_c (casin, -0x1p-105L, 0.5L, -2.204933261082751447436996198490110245167e-32L, 4.812118250596034474977589134243684231352e-1L),
3767 TEST_c_c (casin, -0x1p-105L, -0.5L, -2.204933261082751447436996198490110245167e-32L, -4.812118250596034474977589134243684231352e-1L),
3768 TEST_c_c (casin, 0.5L, 0x1p-105L, 5.235987755982988730771072305465838140329e-1L, 2.846556599890768890940941645338546615370e-32L),
3769 TEST_c_c (casin, -0.5L, 0x1p-105L, -5.235987755982988730771072305465838140329e-1L, 2.846556599890768890940941645338546615370e-32L),
3770 TEST_c_c (casin, 0.5L, -0x1p-105L, 5.235987755982988730771072305465838140329e-1L, -2.846556599890768890940941645338546615370e-32L),
3771 TEST_c_c (casin, -0.5L, -0x1p-105L, -5.235987755982988730771072305465838140329e-1L, -2.846556599890768890940941645338546615370e-32L),
3772 TEST_c_c (casin, 0x1p-105L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 2.465190328815661891911651766508706967729e-32L),
3773 TEST_c_c (casin, 0x1p-105L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -2.465190328815661891911651766508706967729e-32L),
3774 TEST_c_c (casin, -0x1p-105L, 0x1p-105L, -2.465190328815661891911651766508706967729e-32L, 2.465190328815661891911651766508706967729e-32L),
3775 TEST_c_c (casin, -0x1p-105L, -0x1p-105L, -2.465190328815661891911651766508706967729e-32L, -2.465190328815661891911651766508706967729e-32L),
ccc8cadf 3776#ifndef TEST_FLOAT
08198877
JM		 3777 /* Bug 15319: underflow exception may be missing. */
3778 TEST_c_c (casin, 0x1.fp-1025L, 0x1p-105L, 5.388850751072128349671657362289416093031e-309L, 2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3779 TEST_c_c (casin, 0x1.fp-1025L, -0x1p-105L, 5.388850751072128349671657362289416093031e-309L, -2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3780 TEST_c_c (casin, -0x1.fp-1025L, 0x1p-105L, -5.388850751072128349671657362289416093031e-309L, 2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3781 TEST_c_c (casin, -0x1.fp-1025L, -0x1p-105L, -5.388850751072128349671657362289416093031e-309L, -2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3782 TEST_c_c (casin, 0x1p-105L, 0x1.fp-1025L, 2.465190328815661891911651766508706967729e-32L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3783 TEST_c_c (casin, -0x1p-105L, 0x1.fp-1025L, -2.465190328815661891911651766508706967729e-32L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3784 TEST_c_c (casin, 0x1p-105L, -0x1.fp-1025L, 2.465190328815661891911651766508706967729e-32L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3785 TEST_c_c (casin, -0x1p-105L, -0x1.fp-1025L, -2.465190328815661891911651766508706967729e-32L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3786#endif
3787 TEST_c_c (casin, 0.0L, 0x1p-105L, 0.0L, 2.465190328815661891911651766508706967729e-32L),
3788 TEST_c_c (casin, 0.0L, -0x1p-105L, 0.0L, -2.465190328815661891911651766508706967729e-32L),
3789 TEST_c_c (casin, -0.0L, 0x1p-105L, -0.0L, 2.465190328815661891911651766508706967729e-32L),
3790 TEST_c_c (casin, -0.0L, -0x1p-105L, -0.0L, -2.465190328815661891911651766508706967729e-32L),
3791 TEST_c_c (casin, 0x1p-105L, 0.0L, 2.465190328815661891911651766508706967729e-32L, 0.0L),
3792 TEST_c_c (casin, -0x1p-105L, 0.0L, -2.465190328815661891911651766508706967729e-32L, 0.0L),
3793 TEST_c_c (casin, 0x1p-105L, -0.0L, 2.465190328815661891911651766508706967729e-32L, -0.0L),
3794 TEST_c_c (casin, -0x1p-105L, -0.0L, -2.465190328815661891911651766508706967729e-32L, -0.0L),
ccc8cadf 3795#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 3796 TEST_c_c (casin, 0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.361838123766444824837096281396380300349e-34L, 8.813735870195430252326093249797922409363e-1L),
3797 TEST_c_c (casin, 0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.361838123766444824837096281396380300349e-34L, -8.813735870195430252326093249797922409363e-1L),
3798 TEST_c_c (casin, -0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, -1.361838123766444824837096281396380300349e-34L, 8.813735870195430252326093249797922409363e-1L),
3799 TEST_c_c (casin, -0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, -1.361838123766444824837096281396380300349e-34L, -8.813735870195430252326093249797922409363e-1L),
3800 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 1.570796326794896601578502908312986698624L, 1.091004200533850618345330909857103457781e-17L),
3801 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, -1.570796326794896601578502908312986698624L, 1.091004200533850618345330909857103457781e-17L),
3802 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 1.570796326794896601578502908312986698624L, -1.091004200533850618345330909857103457781e-17L),
3803 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, -1.570796326794896601578502908312986698624L, -1.091004200533850618345330909857103457781e-17L),
3804 TEST_c_c (casin, 0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 5.757683115456107044131264955348449231681e-4933L, 8.813735870195430252326093249797922409363e-1L, UNDERFLOW_EXCEPTION),
3805 TEST_c_c (casin, 0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 5.757683115456107044131264955348449231681e-4933L, -8.813735870195430252326093249797922409363e-1L, UNDERFLOW_EXCEPTION),
3806 TEST_c_c (casin, -0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, -5.757683115456107044131264955348449231681e-4933L, 8.813735870195430252326093249797922409363e-1L, UNDERFLOW_EXCEPTION),
3807 TEST_c_c (casin, -0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, -5.757683115456107044131264955348449231681e-4933L, -8.813735870195430252326093249797922409363e-1L, UNDERFLOW_EXCEPTION),
3808 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 1.570796326794896605353533883825294686803L, 5.867357004219059108790368268900490184505e-4916L),
3809 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, -1.570796326794896605353533883825294686803L, 5.867357004219059108790368268900490184505e-4916L),
3810 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 1.570796326794896605353533883825294686803L, -5.867357004219059108790368268900490184505e-4916L),
3811 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, -1.570796326794896605353533883825294686803L, -5.867357004219059108790368268900490184505e-4916L),
3812 TEST_c_c (casin, 0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 8.813735870195430252326093249797922409363e-1L),
3813 TEST_c_c (casin, 0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, -8.813735870195430252326093249797922409363e-1L),
3814 TEST_c_c (casin, -0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 8.813735870195430252326093249797922409363e-1L),
3815 TEST_c_c (casin, -0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, -8.813735870195430252326093249797922409363e-1L),
3816 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 1.570796326794896605353533883825294686803L, 0.0L),
3817 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, -1.570796326794896605353533883825294686803L, 0.0L),
3818 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 1.570796326794896605353533883825294686803L, -0.0L),
3819 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, -1.570796326794896605353533883825294686803L, -0.0L),
3820#endif
3821 TEST_c_c (casin, 0x1p-112L, 0.5L, 1.722604110220899568310153280070398629037e-34L, 4.812118250596034474977589134243684231352e-1L),
3822 TEST_c_c (casin, 0x1p-112L, -0.5L, 1.722604110220899568310153280070398629037e-34L, -4.812118250596034474977589134243684231352e-1L),
3823 TEST_c_c (casin, -0x1p-112L, 0.5L, -1.722604110220899568310153280070398629037e-34L, 4.812118250596034474977589134243684231352e-1L),
3824 TEST_c_c (casin, -0x1p-112L, -0.5L, -1.722604110220899568310153280070398629037e-34L, -4.812118250596034474977589134243684231352e-1L),
3825 TEST_c_c (casin, 0.5L, 0x1p-112L, 5.235987755982988730771072305465838140329e-1L, 2.223872343664663196047610660420739543258e-34L),
3826 TEST_c_c (casin, -0.5L, 0x1p-112L, -5.235987755982988730771072305465838140329e-1L, 2.223872343664663196047610660420739543258e-34L),
3827 TEST_c_c (casin, 0.5L, -0x1p-112L, 5.235987755982988730771072305465838140329e-1L, -2.223872343664663196047610660420739543258e-34L),
3828 TEST_c_c (casin, -0.5L, -0x1p-112L, -5.235987755982988730771072305465838140329e-1L, -2.223872343664663196047610660420739543258e-34L),
3829 TEST_c_c (casin, 0x1p-112L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.925929944387235853055977942584927318538e-34L),
3830 TEST_c_c (casin, 0x1p-112L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.925929944387235853055977942584927318538e-34L),
3831 TEST_c_c (casin, -0x1p-112L, 0x1p-112L, -1.925929944387235853055977942584927318538e-34L, 1.925929944387235853055977942584927318538e-34L),
3832 TEST_c_c (casin, -0x1p-112L, -0x1p-112L, -1.925929944387235853055977942584927318538e-34L, -1.925929944387235853055977942584927318538e-34L),
ccc8cadf 3833#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3834 TEST_c_c (casin, 0x1.fp-16385L, 0x1p-112L, 8.142593549724601460479922838826119584417e-4933L, 1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
3835 TEST_c_c (casin, 0x1.fp-16385L, -0x1p-112L, 8.142593549724601460479922838826119584417e-4933L, -1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
3836 TEST_c_c (casin, -0x1.fp-16385L, 0x1p-112L, -8.142593549724601460479922838826119584417e-4933L, 1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
3837 TEST_c_c (casin, -0x1.fp-16385L, -0x1p-112L, -8.142593549724601460479922838826119584417e-4933L, -1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
3838 TEST_c_c (casin, 0x1p-112L, 0x1.fp-16385L, 1.925929944387235853055977942584927318538e-34L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3839 TEST_c_c (casin, -0x1p-112L, 0x1.fp-16385L, -1.925929944387235853055977942584927318538e-34L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3840 TEST_c_c (casin, 0x1p-112L, -0x1.fp-16385L, 1.925929944387235853055977942584927318538e-34L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3841 TEST_c_c (casin, -0x1p-112L, -0x1.fp-16385L, -1.925929944387235853055977942584927318538e-34L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3842#endif
3843 TEST_c_c (casin, 0.0L, 0x1p-112L, 0.0L, 1.925929944387235853055977942584927318538e-34L),
3844 TEST_c_c (casin, 0.0L, -0x1p-112L, 0.0L, -1.925929944387235853055977942584927318538e-34L),
3845 TEST_c_c (casin, -0.0L, 0x1p-112L, -0.0L, 1.925929944387235853055977942584927318538e-34L),
3846 TEST_c_c (casin, -0.0L, -0x1p-112L, -0.0L, -1.925929944387235853055977942584927318538e-34L),
3847 TEST_c_c (casin, 0x1p-112L, 0.0L, 1.925929944387235853055977942584927318538e-34L, 0.0L),
3848 TEST_c_c (casin, -0x1p-112L, 0.0L, -1.925929944387235853055977942584927318538e-34L, 0.0L),
3849 TEST_c_c (casin, 0x1p-112L, -0.0L, 1.925929944387235853055977942584927318538e-34L, -0.0L),
3850 TEST_c_c (casin, -0x1p-112L, -0.0L, -1.925929944387235853055977942584927318538e-34L, -0.0L),
3851
3852 TEST_c_c (casin, 0.75L, 1.25L, 0.453276177638793913448921196101971749L, 1.13239363160530819522266333696834467L),
3853 TEST_c_c (casin, -2, -3, -0.57065278432109940071028387968566963L, -1.9833870299165354323470769028940395L),
3854 END_DATA (casin)
3855 };
8847214f
UD		 3856
3857static void
08198877 3858casin_test (void)
8847214f 3859{
aaca11d8 3860 errno = 0;
08198877 3861 FUNC(casin) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD		 3862 if (errno == ENOSYS)
3863 /* Function not implemented. */
3864 return;
3865
08198877
JM		 3866 START (casin);
3867 RUN_TEST_LOOP_c_c (casin, casin_test_data, );
3868 END (casin, complex);
3869}
8847214f 3870
08198877
JM		 3871
3872static const struct test_c_c_data casinh_test_data[] =
3873 {
3874 START_DATA (casinh),
3875 TEST_c_c (casinh, 0, 0, 0.0, 0.0),
3876 TEST_c_c (casinh, minus_zero, 0, minus_zero, 0),
3877 TEST_c_c (casinh, 0, minus_zero, 0.0, minus_zero),
3878 TEST_c_c (casinh, minus_zero, minus_zero, minus_zero, minus_zero),
3879
3880 TEST_c_c (casinh, plus_infty, plus_infty, plus_infty, M_PI_4l),
3881 TEST_c_c (casinh, plus_infty, minus_infty, plus_infty, -M_PI_4l),
3882 TEST_c_c (casinh, minus_infty, plus_infty, minus_infty, M_PI_4l),
3883 TEST_c_c (casinh, minus_infty, minus_infty, minus_infty, -M_PI_4l),
3884
3885 TEST_c_c (casinh, -10.0, plus_infty, minus_infty, M_PI_2l),
3886 TEST_c_c (casinh, -10.0, minus_infty, minus_infty, -M_PI_2l),
3887 TEST_c_c (casinh, 0, plus_infty, plus_infty, M_PI_2l),
3888 TEST_c_c (casinh, 0, minus_infty, plus_infty, -M_PI_2l),
3889 TEST_c_c (casinh, minus_zero, plus_infty, minus_infty, M_PI_2l),
3890 TEST_c_c (casinh, minus_zero, minus_infty, minus_infty, -M_PI_2l),
3891 TEST_c_c (casinh, 0.1L, plus_infty, plus_infty, M_PI_2l),
3892 TEST_c_c (casinh, 0.1L, minus_infty, plus_infty, -M_PI_2l),
3893
3894 TEST_c_c (casinh, minus_infty, 0, minus_infty, 0.0),
3895 TEST_c_c (casinh, minus_infty, minus_zero, minus_infty, minus_zero),
3896 TEST_c_c (casinh, minus_infty, 100, minus_infty, 0.0),
3897 TEST_c_c (casinh, minus_infty, -100, minus_infty, minus_zero),
3898
3899 TEST_c_c (casinh, plus_infty, 0, plus_infty, 0.0),
3900 TEST_c_c (casinh, plus_infty, minus_zero, plus_infty, minus_zero),
3901 TEST_c_c (casinh, plus_infty, 0.5, plus_infty, 0.0),
3902 TEST_c_c (casinh, plus_infty, -0.5, plus_infty, minus_zero),
3903
3904 TEST_c_c (casinh, plus_infty, qnan_value, plus_infty, qnan_value),
3905 TEST_c_c (casinh, minus_infty, qnan_value, minus_infty, qnan_value),
3906
3907 TEST_c_c (casinh, qnan_value, 0, qnan_value, 0.0),
3908 TEST_c_c (casinh, qnan_value, minus_zero, qnan_value, minus_zero),
3909
3910 TEST_c_c (casinh, qnan_value, plus_infty, plus_infty, qnan_value, IGNORE_ZERO_INF_SIGN),
3911 TEST_c_c (casinh, qnan_value, minus_infty, plus_infty, qnan_value, IGNORE_ZERO_INF_SIGN),
3912
3913 TEST_c_c (casinh, 10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3914 TEST_c_c (casinh, -10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3915
3916 TEST_c_c (casinh, qnan_value, 0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3917 TEST_c_c (casinh, -0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3918
3919 TEST_c_c (casinh, qnan_value, qnan_value, qnan_value, qnan_value),
3920
3921 TEST_c_c (casinh, plus_zero, -1.5L, 0.9624236501192068949955178268487368462704L, -M_PI_2l),
3922 TEST_c_c (casinh, minus_zero, -1.5L, -0.9624236501192068949955178268487368462704L, -M_PI_2l),
3923 TEST_c_c (casinh, plus_zero, -1.0L, plus_zero, -M_PI_2l),
3924 TEST_c_c (casinh, minus_zero, -1.0L, minus_zero, -M_PI_2l),
3925 TEST_c_c (casinh, plus_zero, -0.5L, plus_zero, -0.5235987755982988730771072305465838140329L),
3926 TEST_c_c (casinh, minus_zero, -0.5L, minus_zero, -0.5235987755982988730771072305465838140329L),
3927 TEST_c_c (casinh, plus_zero, 0.5L, plus_zero, 0.5235987755982988730771072305465838140329L),
3928 TEST_c_c (casinh, minus_zero, 0.5L, minus_zero, 0.5235987755982988730771072305465838140329L),
3929 TEST_c_c (casinh, plus_zero, 1.0L, plus_zero, M_PI_2l),
3930 TEST_c_c (casinh, minus_zero, 1.0L, minus_zero, M_PI_2l),
3931 TEST_c_c (casinh, plus_zero, 1.5L, 0.9624236501192068949955178268487368462704L, M_PI_2l),
3932 TEST_c_c (casinh, minus_zero, 1.5L, -0.9624236501192068949955178268487368462704L, M_PI_2l),
3933
3934 TEST_c_c (casinh, -1.5L, plus_zero, -1.194763217287109304111930828519090523536L, plus_zero),
3935 TEST_c_c (casinh, -1.5L, minus_zero, -1.194763217287109304111930828519090523536L, minus_zero),
3936 TEST_c_c (casinh, -1.0L, plus_zero, -0.8813735870195430252326093249797923090282L, plus_zero),
3937 TEST_c_c (casinh, -1.0L, minus_zero, -0.8813735870195430252326093249797923090282L, minus_zero),
3938 TEST_c_c (casinh, -0.5L, plus_zero, -0.4812118250596034474977589134243684231352L, plus_zero),
3939 TEST_c_c (casinh, -0.5L, minus_zero, -0.4812118250596034474977589134243684231352L, minus_zero),
3940 TEST_c_c (casinh, 0.5L, plus_zero, 0.4812118250596034474977589134243684231352L, plus_zero),
3941 TEST_c_c (casinh, 0.5L, minus_zero, 0.4812118250596034474977589134243684231352L, minus_zero),
3942 TEST_c_c (casinh, 1.0L, plus_zero, 0.8813735870195430252326093249797923090282L, plus_zero),
3943 TEST_c_c (casinh, 1.0L, minus_zero, 0.8813735870195430252326093249797923090282L, minus_zero),
3944 TEST_c_c (casinh, 1.5L, plus_zero, 1.194763217287109304111930828519090523536L, plus_zero),
3945 TEST_c_c (casinh, 1.5L, minus_zero, 1.194763217287109304111930828519090523536L, minus_zero),
3946
3947 TEST_c_c (casinh, 0x1p50L, 1.0L, 3.535050620855721078027883819436759661753e1L, 8.881784197001252323389053344720723756399e-16L),
3948 TEST_c_c (casinh, 0x1p50L, -1.0L, 3.535050620855721078027883819436759661753e1L, -8.881784197001252323389053344720723756399e-16L),
3949 TEST_c_c (casinh, -0x1p50L, 1.0L, -3.535050620855721078027883819436759661753e1L, 8.881784197001252323389053344720723756399e-16L),
3950 TEST_c_c (casinh, -0x1p50L, -1.0L, -3.535050620855721078027883819436759661753e1L, -8.881784197001252323389053344720723756399e-16L),
3951 TEST_c_c (casinh, 1.0L, 0x1p50L, 3.535050620855721078027883819436720218708e1L, 1.570796326794895731052901991514519103193L),
3952 TEST_c_c (casinh, -1.0L, 0x1p50L, -3.535050620855721078027883819436720218708e1L, 1.570796326794895731052901991514519103193L),
3953 TEST_c_c (casinh, 1.0L, -0x1p50L, 3.535050620855721078027883819436720218708e1L, -1.570796326794895731052901991514519103193L),
3954 TEST_c_c (casinh, -1.0L, -0x1p50L, -3.535050620855721078027883819436720218708e1L, -1.570796326794895731052901991514519103193L),
cdc1c96f 3955#ifndef TEST_FLOAT
08198877
JM		 3956 TEST_c_c (casinh, 0x1p500L, 1.0L, 3.472667374605326000180332928505464606058e2L, 3.054936363499604682051979393213617699789e-151L),
3957 TEST_c_c (casinh, 0x1p500L, -1.0L, 3.472667374605326000180332928505464606058e2L, -3.054936363499604682051979393213617699789e-151L),
3958 TEST_c_c (casinh, -0x1p500L, 1.0L, -3.472667374605326000180332928505464606058e2L, 3.054936363499604682051979393213617699789e-151L),
3959 TEST_c_c (casinh, -0x1p500L, -1.0L, -3.472667374605326000180332928505464606058e2L, -3.054936363499604682051979393213617699789e-151L),
3960 TEST_c_c (casinh, 1.0L, 0x1p500L, 3.472667374605326000180332928505464606058e2L, 1.570796326794896619231321691639751442099L),
3961 TEST_c_c (casinh, -1.0L, 0x1p500L, -3.472667374605326000180332928505464606058e2L, 1.570796326794896619231321691639751442099L),
3962 TEST_c_c (casinh, 1.0L, -0x1p500L, 3.472667374605326000180332928505464606058e2L, -1.570796326794896619231321691639751442099L),
3963 TEST_c_c (casinh, -1.0L, -0x1p500L, -3.472667374605326000180332928505464606058e2L, -1.570796326794896619231321691639751442099L),
cdc1c96f
JM		 3964#endif
3965#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 3966 TEST_c_c (casinh, 0x1p5000L, 1.0L, 3.466429049980286492395577839412341016946e3L, 7.079811261048172892385615158694057552948e-1506L),
3967 TEST_c_c (casinh, 0x1p5000L, -1.0L, 3.466429049980286492395577839412341016946e3L, -7.079811261048172892385615158694057552948e-1506L),
3968 TEST_c_c (casinh, -0x1p5000L, 1.0L, -3.466429049980286492395577839412341016946e3L, 7.079811261048172892385615158694057552948e-1506L),
3969 TEST_c_c (casinh, -0x1p5000L, -1.0L, -3.466429049980286492395577839412341016946e3L, -7.079811261048172892385615158694057552948e-1506L),
3970 TEST_c_c (casinh, 1.0L, 0x1p5000L, 3.466429049980286492395577839412341016946e3L, 1.570796326794896619231321691639751442099L),
3971 TEST_c_c (casinh, -1.0L, 0x1p5000L, -3.466429049980286492395577839412341016946e3L, 1.570796326794896619231321691639751442099L),
3972 TEST_c_c (casinh, 1.0L, -0x1p5000L, 3.466429049980286492395577839412341016946e3L, -1.570796326794896619231321691639751442099L),
3973 TEST_c_c (casinh, -1.0L, -0x1p5000L, -3.466429049980286492395577839412341016946e3L, -1.570796326794896619231321691639751442099L),
cdc1c96f
JM		 3974#endif
3975
08198877 3976 TEST_c_c (casinh, 0x1.fp127L, 0x1.fp127L, 8.973081118419833726837456344608533993585e1L, 7.853981633974483096156608458198757210493e-1L),
a9708fed 3977#ifndef TEST_FLOAT
08198877 3978 TEST_c_c (casinh, 0x1.fp1023L, 0x1.fp1023L, 7.107906849659093345062145442726115449315e2L, 7.853981633974483096156608458198757210493e-1L),
a9708fed
JM		 3979#endif
3980#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 3981 TEST_c_c (casinh, 0x1.fp16383L, 0x1.fp16383L, 1.135753137836666928715489992987020363057e4L, 7.853981633974483096156608458198757210493e-1L),
a9708fed
JM		 3982#endif
3983
08198877
JM		 3984 TEST_c_c (casinh, 0x1.fp-129L, 1.5L, 9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442096L),
3985 TEST_c_c (casinh, 0x1.fp-129L, -1.5L, 9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442096L),
3986 TEST_c_c (casinh, -0x1.fp-129L, 1.5L, -9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442096L),
3987 TEST_c_c (casinh, -0x1.fp-129L, -1.5L, -9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442096L),
3988 TEST_c_c (casinh, 1.5L, 0x1.fp-129L, 1.194763217287109304111930828519090523536L, 1.579176199917649005841160751101628985741e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3989 TEST_c_c (casinh, -1.5L, 0x1.fp-129L, -1.194763217287109304111930828519090523536L, 1.579176199917649005841160751101628985741e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3990 TEST_c_c (casinh, 1.5L, -0x1.fp-129L, 1.194763217287109304111930828519090523536L, -1.579176199917649005841160751101628985741e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3991 TEST_c_c (casinh, -1.5L, -0x1.fp-129L, -1.194763217287109304111930828519090523536L, -1.579176199917649005841160751101628985741e-39L, UNDERFLOW_EXCEPTION_FLOAT),
8cf28c5e 3992#ifndef TEST_FLOAT
08198877
JM		 3993 TEST_c_c (casinh, 0x1.fp-1025L, 1.5L, 9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442099L),
3994 TEST_c_c (casinh, 0x1.fp-1025L, -1.5L, 9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442099L),
3995 TEST_c_c (casinh, -0x1.fp-1025L, 1.5L, -9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442099L),
3996 TEST_c_c (casinh, -0x1.fp-1025L, -1.5L, -9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442099L),
3997 TEST_c_c (casinh, 1.5L, 0x1.fp-1025L, 1.194763217287109304111930828519090523536L, 2.989196569048182929051881765490354365918e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3998 TEST_c_c (casinh, -1.5L, 0x1.fp-1025L, -1.194763217287109304111930828519090523536L, 2.989196569048182929051881765490354365918e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3999 TEST_c_c (casinh, 1.5L, -0x1.fp-1025L, 1.194763217287109304111930828519090523536L, -2.989196569048182929051881765490354365918e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4000 TEST_c_c (casinh, -1.5L, -0x1.fp-1025L, -1.194763217287109304111930828519090523536L, -2.989196569048182929051881765490354365918e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
8cf28c5e
JM		 4001#endif
4002#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 4003 TEST_c_c (casinh, 0x1.fp-16385L, 1.5L, 9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442099L),
4004 TEST_c_c (casinh, 0x1.fp-16385L, -1.5L, 9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442099L),
4005 TEST_c_c (casinh, -0x1.fp-16385L, 1.5L, -9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442099L),
4006 TEST_c_c (casinh, -0x1.fp-16385L, -1.5L, -9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442099L),
4007 TEST_c_c (casinh, 1.5L, 0x1.fp-16385L, 1.194763217287109304111930828519090523536L, 4.516698239814521372306784062043266700598e-4933L, UNDERFLOW_EXCEPTION),
4008 TEST_c_c (casinh, -1.5L, 0x1.fp-16385L, -1.194763217287109304111930828519090523536L, 4.516698239814521372306784062043266700598e-4933L, UNDERFLOW_EXCEPTION),
4009 TEST_c_c (casinh, 1.5L, -0x1.fp-16385L, 1.194763217287109304111930828519090523536L, -4.516698239814521372306784062043266700598e-4933L, UNDERFLOW_EXCEPTION),
4010 TEST_c_c (casinh, -1.5L, -0x1.fp-16385L, -1.194763217287109304111930828519090523536L, -4.516698239814521372306784062043266700598e-4933L, UNDERFLOW_EXCEPTION),
4011#endif
4012
4013 TEST_c_c (casinh, 0.5L, 1.0L, 7.328576759736452608886724437653071523305e-1L, 8.959074812088902390666567243275770102229e-1L),
4014 TEST_c_c (casinh, 0.5L, -1.0L, 7.328576759736452608886724437653071523305e-1L, -8.959074812088902390666567243275770102229e-1L),
4015 TEST_c_c (casinh, -0.5L, 1.0L, -7.328576759736452608886724437653071523305e-1L, 8.959074812088902390666567243275770102229e-1L),
4016 TEST_c_c (casinh, -0.5L, -1.0L, -7.328576759736452608886724437653071523305e-1L, -8.959074812088902390666567243275770102229e-1L),
4017 TEST_c_c (casinh, 1.0L, 0.5L, 9.261330313501824245501244453057873152694e-1L, 3.494390628572132936274118260753699527325e-1L),
4018 TEST_c_c (casinh, -1.0L, 0.5L, -9.261330313501824245501244453057873152694e-1L, 3.494390628572132936274118260753699527325e-1L),
4019 TEST_c_c (casinh, 1.0L, -0.5L, 9.261330313501824245501244453057873152694e-1L, -3.494390628572132936274118260753699527325e-1L),
4020 TEST_c_c (casinh, -1.0L, -0.5L, -9.261330313501824245501244453057873152694e-1L, -3.494390628572132936274118260753699527325e-1L),
4021 TEST_c_c (casinh, 0.25L, 1.0L, 5.097911466811016354623559941115413499164e-1L, 1.081751996523816326311037318425097434186L),
4022 TEST_c_c (casinh, 0.25L, -1.0L, 5.097911466811016354623559941115413499164e-1L, -1.081751996523816326311037318425097434186L),
4023 TEST_c_c (casinh, -0.25L, 1.0L, -5.097911466811016354623559941115413499164e-1L, 1.081751996523816326311037318425097434186L),
4024 TEST_c_c (casinh, -0.25L, -1.0L, -5.097911466811016354623559941115413499164e-1L, -1.081751996523816326311037318425097434186L),
4025 TEST_c_c (casinh, 1.0L, 0.25L, 8.924633639033482359562124741744951972772e-1L, 1.763024327769669304186785666360901026468e-1L),
4026 TEST_c_c (casinh, -1.0L, 0.25L, -8.924633639033482359562124741744951972772e-1L, 1.763024327769669304186785666360901026468e-1L),
4027 TEST_c_c (casinh, 1.0L, -0.25L, 8.924633639033482359562124741744951972772e-1L, -1.763024327769669304186785666360901026468e-1L),
4028 TEST_c_c (casinh, -1.0L, -0.25L, -8.924633639033482359562124741744951972772e-1L, -1.763024327769669304186785666360901026468e-1L),
4029 TEST_c_c (casinh, 0x1.fp-10L, 1.0L, 4.350501469856803800217957402220976497152e-2L, 1.527305029163877791518741192097931722508L),
4030 TEST_c_c (casinh, 0x1.fp-10L, -1.0L, 4.350501469856803800217957402220976497152e-2L, -1.527305029163877791518741192097931722508L),
4031 TEST_c_c (casinh, -0x1.fp-10L, 1.0L, -4.350501469856803800217957402220976497152e-2L, 1.527305029163877791518741192097931722508L),
4032 TEST_c_c (casinh, -0x1.fp-10L, -1.0L, -4.350501469856803800217957402220976497152e-2L, -1.527305029163877791518741192097931722508L),
4033 TEST_c_c (casinh, 1.0L, 0x1.fp-10L, 8.813742198809567991336704287826445879025e-1L, 1.337909359557740912558349531052239112857e-3L),
4034 TEST_c_c (casinh, -1.0L, 0x1.fp-10L, -8.813742198809567991336704287826445879025e-1L, 1.337909359557740912558349531052239112857e-3L),
4035 TEST_c_c (casinh, 1.0L, -0x1.fp-10L, 8.813742198809567991336704287826445879025e-1L, -1.337909359557740912558349531052239112857e-3L),
4036 TEST_c_c (casinh, -1.0L, -0x1.fp-10L, -8.813742198809567991336704287826445879025e-1L, -1.337909359557740912558349531052239112857e-3L),
4037 TEST_c_c (casinh, 0x1.fp-30L, 1.0L, 4.247867098745151888768727039216644758847e-5L, 1.570753848123921942730162693731872690232L),
4038 TEST_c_c (casinh, 0x1.fp-30L, -1.0L, 4.247867098745151888768727039216644758847e-5L, -1.570753848123921942730162693731872690232L),
4039 TEST_c_c (casinh, -0x1.fp-30L, 1.0L, -4.247867098745151888768727039216644758847e-5L, 1.570753848123921942730162693731872690232L),
4040 TEST_c_c (casinh, -0x1.fp-30L, -1.0L, -4.247867098745151888768727039216644758847e-5L, -1.570753848123921942730162693731872690232L),
4041 TEST_c_c (casinh, 1.0L, 0x1.fp-30L, 8.813735870195430258081932989769495326854e-1L, 1.275929984216518540252717485007112529021e-9L),
4042 TEST_c_c (casinh, -1.0L, 0x1.fp-30L, -8.813735870195430258081932989769495326854e-1L, 1.275929984216518540252717485007112529021e-9L),
4043 TEST_c_c (casinh, 1.0L, -0x1.fp-30L, 8.813735870195430258081932989769495326854e-1L, -1.275929984216518540252717485007112529021e-9L),
4044 TEST_c_c (casinh, -1.0L, -0x1.fp-30L, -8.813735870195430258081932989769495326854e-1L, -1.275929984216518540252717485007112529021e-9L),
4045 TEST_c_c (casinh, 0x1.fp-100L, 1.0L, 1.236292038260260888664514866457202186027e-15L, 1.570796326794895382939283431378862777584L),
4046 TEST_c_c (casinh, 0x1.fp-100L, -1.0L, 1.236292038260260888664514866457202186027e-15L, -1.570796326794895382939283431378862777584L),
4047 TEST_c_c (casinh, -0x1.fp-100L, 1.0L, -1.236292038260260888664514866457202186027e-15L, 1.570796326794895382939283431378862777584L),
4048 TEST_c_c (casinh, -0x1.fp-100L, -1.0L, -1.236292038260260888664514866457202186027e-15L, -1.570796326794895382939283431378862777584L),
4049 TEST_c_c (casinh, 1.0L, 0x1.fp-100L, 8.813735870195430252326093249797923090282e-1L, 1.080754735021050612990719608916167354321e-30L),
4050 TEST_c_c (casinh, -1.0L, 0x1.fp-100L, -8.813735870195430252326093249797923090282e-1L, 1.080754735021050612990719608916167354321e-30L),
4051 TEST_c_c (casinh, 1.0L, -0x1.fp-100L, 8.813735870195430252326093249797923090282e-1L, -1.080754735021050612990719608916167354321e-30L),
4052 TEST_c_c (casinh, -1.0L, -0x1.fp-100L, -8.813735870195430252326093249797923090282e-1L, -1.080754735021050612990719608916167354321e-30L),
4053 TEST_c_c (casinh, 0x1.fp-129L, 1.0L, 5.335635276982233498398987585285818977933e-20L, 1.570796326794896619177965338869929107115L),
4054 TEST_c_c (casinh, 0x1.fp-129L, -1.0L, 5.335635276982233498398987585285818977933e-20L, -1.570796326794896619177965338869929107115L),
4055 TEST_c_c (casinh, -0x1.fp-129L, 1.0L, -5.335635276982233498398987585285818977933e-20L, 1.570796326794896619177965338869929107115L),
4056 TEST_c_c (casinh, -0x1.fp-129L, -1.0L, -5.335635276982233498398987585285818977933e-20L, -1.570796326794896619177965338869929107115L),
4057 TEST_c_c (casinh, 1.0L, 0x1.fp-129L, 8.813735870195430252326093249797923090282e-1L, 2.013062564695348242280482517399205554874e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4058 TEST_c_c (casinh, -1.0L, 0x1.fp-129L, -8.813735870195430252326093249797923090282e-1L, 2.013062564695348242280482517399205554874e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4059 TEST_c_c (casinh, 1.0L, -0x1.fp-129L, 8.813735870195430252326093249797923090282e-1L, -2.013062564695348242280482517399205554874e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4060 TEST_c_c (casinh, -1.0L, -0x1.fp-129L, -8.813735870195430252326093249797923090282e-1L, -2.013062564695348242280482517399205554874e-39L, UNDERFLOW_EXCEPTION_FLOAT),
0a1b2ae6 4061#ifndef TEST_FLOAT
08198877
JM		 4062 TEST_c_c (casinh, 0x1.fp-1000L, 1.0L, 4.252291453851660175550490409247739011867e-151L, 1.570796326794896619231321691639751442099L),
4063 TEST_c_c (casinh, 0x1.fp-1000L, -1.0L, 4.252291453851660175550490409247739011867e-151L, -1.570796326794896619231321691639751442099L),
4064 TEST_c_c (casinh, -0x1.fp-1000L, 1.0L, -4.252291453851660175550490409247739011867e-151L, 1.570796326794896619231321691639751442099L),
4065 TEST_c_c (casinh, -0x1.fp-1000L, -1.0L, -4.252291453851660175550490409247739011867e-151L, -1.570796326794896619231321691639751442099L),
4066 TEST_c_c (casinh, 1.0L, 0x1.fp-1000L, 8.813735870195430252326093249797923090282e-1L, 1.278589251976747242280879285935084814093e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4067 TEST_c_c (casinh, -1.0L, 0x1.fp-1000L, -8.813735870195430252326093249797923090282e-1L, 1.278589251976747242280879285935084814093e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4068 TEST_c_c (casinh, 1.0L, -0x1.fp-1000L, 8.813735870195430252326093249797923090282e-1L, -1.278589251976747242280879285935084814093e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4069 TEST_c_c (casinh, -1.0L, -0x1.fp-1000L, -8.813735870195430252326093249797923090282e-1L, -1.278589251976747242280879285935084814093e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4070 TEST_c_c (casinh, 0x1.fp-1025L, 1.0L, 7.340879205566679497036857179189356754017e-155L, 1.570796326794896619231321691639751442099L),
4071 TEST_c_c (casinh, 0x1.fp-1025L, -1.0L, 7.340879205566679497036857179189356754017e-155L, -1.570796326794896619231321691639751442099L),
4072 TEST_c_c (casinh, -0x1.fp-1025L, 1.0L, -7.340879205566679497036857179189356754017e-155L, 1.570796326794896619231321691639751442099L),
4073 TEST_c_c (casinh, -0x1.fp-1025L, -1.0L, -7.340879205566679497036857179189356754017e-155L, -1.570796326794896619231321691639751442099L),
4074 TEST_c_c (casinh, 1.0L, 0x1.fp-1025L, 8.813735870195430252326093249797923090282e-1L, 3.810492908885321743133304375216617626230e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4075 TEST_c_c (casinh, -1.0L, 0x1.fp-1025L, -8.813735870195430252326093249797923090282e-1L, 3.810492908885321743133304375216617626230e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4076 TEST_c_c (casinh, 1.0L, -0x1.fp-1025L, 8.813735870195430252326093249797923090282e-1L, -3.810492908885321743133304375216617626230e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4077 TEST_c_c (casinh, -1.0L, -0x1.fp-1025L, -8.813735870195430252326093249797923090282e-1L, -3.810492908885321743133304375216617626230e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
0a1b2ae6
JM		 4078#endif
4079#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 4080 TEST_c_c (casinh, 0x1.fp-10000L, 1.0L, 9.854680208706673586644342922051388714633e-1506L, 1.570796326794896619231321691639751442099L),
4081 TEST_c_c (casinh, 0x1.fp-10000L, -1.0L, 9.854680208706673586644342922051388714633e-1506L, -1.570796326794896619231321691639751442099L),
4082 TEST_c_c (casinh, -0x1.fp-10000L, 1.0L, -9.854680208706673586644342922051388714633e-1506L, 1.570796326794896619231321691639751442099L),
4083 TEST_c_c (casinh, -0x1.fp-10000L, -1.0L, -9.854680208706673586644342922051388714633e-1506L, -1.570796326794896619231321691639751442099L),
4084 TEST_c_c (casinh, 1.0L, 0x1.fp-10000L, 8.813735870195430252326093249797923090282e-1L, 6.867047849047171855399183659351043150871e-3011L),
4085 TEST_c_c (casinh, -1.0L, 0x1.fp-10000L, -8.813735870195430252326093249797923090282e-1L, 6.867047849047171855399183659351043150871e-3011L),
4086 TEST_c_c (casinh, 1.0L, -0x1.fp-10000L, 8.813735870195430252326093249797923090282e-1L, -6.867047849047171855399183659351043150871e-3011L),
4087 TEST_c_c (casinh, -1.0L, -0x1.fp-10000L, -8.813735870195430252326093249797923090282e-1L, -6.867047849047171855399183659351043150871e-3011L),
4088 TEST_c_c (casinh, 0x1.fp-16385L, 1.0L, 9.023632056840860275214893047597614177639e-2467L, 1.570796326794896619231321691639751442099L),
4089 TEST_c_c (casinh, 0x1.fp-16385L, -1.0L, 9.023632056840860275214893047597614177639e-2467L, -1.570796326794896619231321691639751442099L),
4090 TEST_c_c (casinh, -0x1.fp-16385L, 1.0L, -9.023632056840860275214893047597614177639e-2467L, 1.570796326794896619231321691639751442099L),
4091 TEST_c_c (casinh, -0x1.fp-16385L, -1.0L, -9.023632056840860275214893047597614177639e-2467L, -1.570796326794896619231321691639751442099L),
4092 TEST_c_c (casinh, 1.0L, 0x1.fp-16385L, 8.813735870195430252326093249797923090282e-1L, 5.757683115456107044131264955348448954458e-4933L, UNDERFLOW_EXCEPTION),
4093 TEST_c_c (casinh, -1.0L, 0x1.fp-16385L, -8.813735870195430252326093249797923090282e-1L, 5.757683115456107044131264955348448954458e-4933L, UNDERFLOW_EXCEPTION),
4094 TEST_c_c (casinh, 1.0L, -0x1.fp-16385L, 8.813735870195430252326093249797923090282e-1L, -5.757683115456107044131264955348448954458e-4933L, UNDERFLOW_EXCEPTION),
4095 TEST_c_c (casinh, -1.0L, -0x1.fp-16385L, -8.813735870195430252326093249797923090282e-1L, -5.757683115456107044131264955348448954458e-4933L, UNDERFLOW_EXCEPTION),
4096#endif
4097
4098 TEST_c_c (casinh, 0x1p-23L, 0x1.000002p0L, 5.364668491573609633134147164031476452679e-4L, 1.570574114956455764594481054234834678422L),
4099 TEST_c_c (casinh, 0x1p-23L, -0x1.000002p0L, 5.364668491573609633134147164031476452679e-4L, -1.570574114956455764594481054234834678422L),
4100 TEST_c_c (casinh, -0x1p-23L, 0x1.000002p0L, -5.364668491573609633134147164031476452679e-4L, 1.570574114956455764594481054234834678422L),
4101 TEST_c_c (casinh, -0x1p-23L, -0x1.000002p0L, -5.364668491573609633134147164031476452679e-4L, -1.570574114956455764594481054234834678422L),
4102 TEST_c_c (casinh, 0x1.000002p0L, 0x1p-23L, 8.813736713132400470205730751186547909968e-1L, 8.429369199749229560964789467980644296420e-8L),
4103 TEST_c_c (casinh, -0x1.000002p0L, 0x1p-23L, -8.813736713132400470205730751186547909968e-1L, 8.429369199749229560964789467980644296420e-8L),
4104 TEST_c_c (casinh, 0x1.000002p0L, -0x1p-23L, 8.813736713132400470205730751186547909968e-1L, -8.429369199749229560964789467980644296420e-8L),
4105 TEST_c_c (casinh, -0x1.000002p0L, -0x1p-23L, -8.813736713132400470205730751186547909968e-1L, -8.429369199749229560964789467980644296420e-8L),
4106 TEST_c_c (casinh, 0x1.fp-129L, 0x1.000002p0L, 4.882812451493617206486388134172712975070e-4L, 1.570796326794896619231321691639751436268L),
4107 TEST_c_c (casinh, 0x1.fp-129L, -0x1.000002p0L, 4.882812451493617206486388134172712975070e-4L, -1.570796326794896619231321691639751436268L),
4108 TEST_c_c (casinh, -0x1.fp-129L, 0x1.000002p0L, -4.882812451493617206486388134172712975070e-4L, 1.570796326794896619231321691639751436268L),
4109 TEST_c_c (casinh, -0x1.fp-129L, -0x1.000002p0L, -4.882812451493617206486388134172712975070e-4L, -1.570796326794896619231321691639751436268L),
4110 TEST_c_c (casinh, 0x1.000002p0L, 0x1.fp-129L, 8.813736713132375348727889167749389235161e-1L, 2.013062444707472738895109955455676357057e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4111 TEST_c_c (casinh, -0x1.000002p0L, 0x1.fp-129L, -8.813736713132375348727889167749389235161e-1L, 2.013062444707472738895109955455676357057e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4112 TEST_c_c (casinh, 0x1.000002p0L, -0x1.fp-129L, 8.813736713132375348727889167749389235161e-1L, -2.013062444707472738895109955455676357057e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4113 TEST_c_c (casinh, -0x1.000002p0L, -0x1.fp-129L, -8.813736713132375348727889167749389235161e-1L, -2.013062444707472738895109955455676357057e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4114 TEST_c_c (casinh, 0.0L, 0x1.000002p0L, 4.882812451493617206486388134172712975070e-4L, 1.570796326794896619231321691639751442099L),
4115 TEST_c_c (casinh, 0.0L, -0x1.000002p0L, 4.882812451493617206486388134172712975070e-4L, -1.570796326794896619231321691639751442099L),
4116 TEST_c_c (casinh, -0.0L, 0x1.000002p0L, -4.882812451493617206486388134172712975070e-4L, 1.570796326794896619231321691639751442099L),
4117 TEST_c_c (casinh, -0.0L, -0x1.000002p0L, -4.882812451493617206486388134172712975070e-4L, -1.570796326794896619231321691639751442099L),
4118 TEST_c_c (casinh, 0x1.000002p0L, 0.0L, 8.813736713132375348727889167749389235161e-1L, 0.0L),
4119 TEST_c_c (casinh, -0x1.000002p0L, 0.0L, -8.813736713132375348727889167749389235161e-1L, 0.0L),
4120 TEST_c_c (casinh, 0x1.000002p0L, -0.0L, 8.813736713132375348727889167749389235161e-1L, -0.0L),
4121 TEST_c_c (casinh, -0x1.000002p0L, -0.0L, -8.813736713132375348727889167749389235161e-1L, -0.0L),
3a7182a1 4122#ifndef TEST_FLOAT
08198877
JM		 4123 TEST_c_c (casinh, 0x1p-52L, 0x1.0000000000001p0L, 2.315303644582684770975188768022139415020e-8L, 1.570796317204594913251280305810847349436L),
4124 TEST_c_c (casinh, 0x1p-52L, -0x1.0000000000001p0L, 2.315303644582684770975188768022139415020e-8L, -1.570796317204594913251280305810847349436L),
4125 TEST_c_c (casinh, -0x1p-52L, 0x1.0000000000001p0L, -2.315303644582684770975188768022139415020e-8L, 1.570796317204594913251280305810847349436L),
4126 TEST_c_c (casinh, -0x1p-52L, -0x1.0000000000001p0L, -2.315303644582684770975188768022139415020e-8L, -1.570796317204594913251280305810847349436L),
4127 TEST_c_c (casinh, 0x1.0000000000001p0L, 0x1p-52L, 8.813735870195431822418551933572982483664e-1L, 1.570092458683774885078102529858632363236e-16L),
4128 TEST_c_c (casinh, -0x1.0000000000001p0L, 0x1p-52L, -8.813735870195431822418551933572982483664e-1L, 1.570092458683774885078102529858632363236e-16L),
4129 TEST_c_c (casinh, 0x1.0000000000001p0L, -0x1p-52L, 8.813735870195431822418551933572982483664e-1L, -1.570092458683774885078102529858632363236e-16L),
4130 TEST_c_c (casinh, -0x1.0000000000001p0L, -0x1p-52L, -8.813735870195431822418551933572982483664e-1L, -1.570092458683774885078102529858632363236e-16L),
4131 TEST_c_c (casinh, 0x1.fp-1025L, 0x1.0000000000001p0L, 2.107342425544701550354780375182800088393e-8L, 1.570796326794896619231321691639751442099L),
4132 TEST_c_c (casinh, 0x1.fp-1025L, -0x1.0000000000001p0L, 2.107342425544701550354780375182800088393e-8L, -1.570796326794896619231321691639751442099L),
4133 TEST_c_c (casinh, -0x1.fp-1025L, 0x1.0000000000001p0L, -2.107342425544701550354780375182800088393e-8L, 1.570796326794896619231321691639751442099L),
4134 TEST_c_c (casinh, -0x1.fp-1025L, -0x1.0000000000001p0L, -2.107342425544701550354780375182800088393e-8L, -1.570796326794896619231321691639751442099L),
4135 TEST_c_c (casinh, 0x1.0000000000001p0L, 0x1.fp-1025L, 8.813735870195431822418551933572895326024e-1L, 3.810492908885321320083608113679347200012e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4136 TEST_c_c (casinh, -0x1.0000000000001p0L, 0x1.fp-1025L, -8.813735870195431822418551933572895326024e-1L, 3.810492908885321320083608113679347200012e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4137 TEST_c_c (casinh, 0x1.0000000000001p0L, -0x1.fp-1025L, 8.813735870195431822418551933572895326024e-1L, -3.810492908885321320083608113679347200012e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4138 TEST_c_c (casinh, -0x1.0000000000001p0L, -0x1.fp-1025L, -8.813735870195431822418551933572895326024e-1L, -3.810492908885321320083608113679347200012e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4139 TEST_c_c (casinh, 0.0L, 0x1.0000000000001p0L, 2.107342425544701550354780375182800088393e-8L, 1.570796326794896619231321691639751442099L),
4140 TEST_c_c (casinh, 0.0L, -0x1.0000000000001p0L, 2.107342425544701550354780375182800088393e-8L, -1.570796326794896619231321691639751442099L),
4141 TEST_c_c (casinh, -0.0L, 0x1.0000000000001p0L, -2.107342425544701550354780375182800088393e-8L, 1.570796326794896619231321691639751442099L),
4142 TEST_c_c (casinh, -0.0L, -0x1.0000000000001p0L, -2.107342425544701550354780375182800088393e-8L, -1.570796326794896619231321691639751442099L),
4143 TEST_c_c (casinh, 0x1.0000000000001p0L, 0.0L, 8.813735870195431822418551933572895326024e-1L, 0.0L),
4144 TEST_c_c (casinh, -0x1.0000000000001p0L, 0.0L, -8.813735870195431822418551933572895326024e-1L, 0.0L),
4145 TEST_c_c (casinh, 0x1.0000000000001p0L, -0.0L, 8.813735870195431822418551933572895326024e-1L, -0.0L),
4146 TEST_c_c (casinh, -0x1.0000000000001p0L, -0.0L, -8.813735870195431822418551933572895326024e-1L, -0.0L),
3a7182a1
JM		 4147#endif
4148#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 4149 TEST_c_c (casinh, 0x1p-63L, 0x1.0000000000000002p0L, 5.116146586219826555037807251857670783420e-10L, 1.570796326582978888921215348380499122131L),
4150 TEST_c_c (casinh, 0x1p-63L, -0x1.0000000000000002p0L, 5.116146586219826555037807251857670783420e-10L, -1.570796326582978888921215348380499122131L),
4151 TEST_c_c (casinh, -0x1p-63L, 0x1.0000000000000002p0L, -5.116146586219826555037807251857670783420e-10L, 1.570796326582978888921215348380499122131L),
4152 TEST_c_c (casinh, -0x1p-63L, -0x1.0000000000000002p0L, -5.116146586219826555037807251857670783420e-10L, -1.570796326582978888921215348380499122131L),
4153 TEST_c_c (casinh, 0x1.0000000000000002p0L, 0x1p-63L, 8.813735870195430253092739958139610131001e-1L, 7.666467083416870406778649849746878368519e-20L),
4154 TEST_c_c (casinh, -0x1.0000000000000002p0L, 0x1p-63L, -8.813735870195430253092739958139610131001e-1L, 7.666467083416870406778649849746878368519e-20L),
4155 TEST_c_c (casinh, 0x1.0000000000000002p0L, -0x1p-63L, 8.813735870195430253092739958139610131001e-1L, -7.666467083416870406778649849746878368519e-20L),
4156 TEST_c_c (casinh, -0x1.0000000000000002p0L, -0x1p-63L, -8.813735870195430253092739958139610131001e-1L, -7.666467083416870406778649849746878368519e-20L),
3a7182a1 4157# if LDBL_MIN_EXP <= -16381
08198877
JM		 4158 TEST_c_c (casinh, 0x1.fp-16385L, 0x1.0000000000000002p0L, 4.656612873077392578082927418388212703712e-10L, 1.570796326794896619231321691639751442099L),
4159 TEST_c_c (casinh, 0x1.fp-16385L, -0x1.0000000000000002p0L, 4.656612873077392578082927418388212703712e-10L, -1.570796326794896619231321691639751442099L),
4160 TEST_c_c (casinh, -0x1.fp-16385L, 0x1.0000000000000002p0L, -4.656612873077392578082927418388212703712e-10L, 1.570796326794896619231321691639751442099L),
4161 TEST_c_c (casinh, -0x1.fp-16385L, -0x1.0000000000000002p0L, -4.656612873077392578082927418388212703712e-10L, -1.570796326794896619231321691639751442099L),
4162 TEST_c_c (casinh, 0x1.0000000000000002p0L, 0x1.fp-16385L, 8.813735870195430253092739958139610130980e-1L, 5.757683115456107043819140328235418018963e-4933L, UNDERFLOW_EXCEPTION),
4163 TEST_c_c (casinh, -0x1.0000000000000002p0L, 0x1.fp-16385L, -8.813735870195430253092739958139610130980e-1L, 5.757683115456107043819140328235418018963e-4933L, UNDERFLOW_EXCEPTION),
4164 TEST_c_c (casinh, 0x1.0000000000000002p0L, -0x1.fp-16385L, 8.813735870195430253092739958139610130980e-1L, -5.757683115456107043819140328235418018963e-4933L, UNDERFLOW_EXCEPTION),
4165 TEST_c_c (casinh, -0x1.0000000000000002p0L, -0x1.fp-16385L, -8.813735870195430253092739958139610130980e-1L, -5.757683115456107043819140328235418018963e-4933L, UNDERFLOW_EXCEPTION),
3a7182a1 4166# endif
08198877
JM		 4167 TEST_c_c (casinh, 0.0L, 0x1.0000000000000002p0L, 4.656612873077392578082927418388212703712e-10L, 1.570796326794896619231321691639751442099L),
4168 TEST_c_c (casinh, 0.0L, -0x1.0000000000000002p0L, 4.656612873077392578082927418388212703712e-10L, -1.570796326794896619231321691639751442099L),
4169 TEST_c_c (casinh, -0.0L, 0x1.0000000000000002p0L, -4.656612873077392578082927418388212703712e-10L, 1.570796326794896619231321691639751442099L),
4170 TEST_c_c (casinh, -0.0L, -0x1.0000000000000002p0L, -4.656612873077392578082927418388212703712e-10L, -1.570796326794896619231321691639751442099L),
4171 TEST_c_c (casinh, 0x1.0000000000000002p0L, 0.0L, 8.813735870195430253092739958139610130980e-1L, 0.0L),
4172 TEST_c_c (casinh, -0x1.0000000000000002p0L, 0.0L, -8.813735870195430253092739958139610130980e-1L, 0.0L),
4173 TEST_c_c (casinh, 0x1.0000000000000002p0L, -0.0L, 8.813735870195430253092739958139610130980e-1L, -0.0L),
4174 TEST_c_c (casinh, -0x1.0000000000000002p0L, -0.0L, -8.813735870195430253092739958139610130980e-1L, -0.0L),
3a7182a1
JM		 4175#endif
4176#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 4177 TEST_c_c (casinh, 0x1p-106L, 0x1.000000000000000000000000008p0L, 2.285028863093221674154232933662774454211e-16L, 1.570796326794896565289107467733682961928L),
4178 TEST_c_c (casinh, 0x1p-106L, -0x1.000000000000000000000000008p0L, 2.285028863093221674154232933662774454211e-16L, -1.570796326794896565289107467733682961928L),
4179 TEST_c_c (casinh, -0x1p-106L, 0x1.000000000000000000000000008p0L, -2.285028863093221674154232933662774454211e-16L, 1.570796326794896565289107467733682961928L),
4180 TEST_c_c (casinh, -0x1p-106L, -0x1.000000000000000000000000008p0L, -2.285028863093221674154232933662774454211e-16L, -1.570796326794896565289107467733682961928L),
4181 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, 0x1p-106L, 8.813735870195430252326093249798097405561e-1L, 8.715763992105246878957416200936726072500e-33L),
4182 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, 0x1p-106L, -8.813735870195430252326093249798097405561e-1L, 8.715763992105246878957416200936726072500e-33L),
4183 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, -0x1p-106L, 8.813735870195430252326093249798097405561e-1L, -8.715763992105246878957416200936726072500e-33L),
4184 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, -0x1p-106L, -8.813735870195430252326093249798097405561e-1L, -8.715763992105246878957416200936726072500e-33L),
4185 TEST_c_c (casinh, 0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 2.220446049250313080847263336181636063482e-16L, 1.570796326794896619231321691639751442099L),
4186 TEST_c_c (casinh, 0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 2.220446049250313080847263336181636063482e-16L, -1.570796326794896619231321691639751442099L),
4187 TEST_c_c (casinh, -0x1.fp-1025L, 0x1.000000000000000000000000008p0L, -2.220446049250313080847263336181636063482e-16L, 1.570796326794896619231321691639751442099L),
4188 TEST_c_c (casinh, -0x1.fp-1025L, -0x1.000000000000000000000000008p0L, -2.220446049250313080847263336181636063482e-16L, -1.570796326794896619231321691639751442099L),
4189 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 8.813735870195430252326093249798097405561e-1L, 3.810492908885321743133304375216570658278e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4190 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, 0x1.fp-1025L, -8.813735870195430252326093249798097405561e-1L, 3.810492908885321743133304375216570658278e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4191 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 8.813735870195430252326093249798097405561e-1L, -3.810492908885321743133304375216570658278e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4192 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, -0x1.fp-1025L, -8.813735870195430252326093249798097405561e-1L, -3.810492908885321743133304375216570658278e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4193 TEST_c_c (casinh, 0.0L, 0x1.000000000000000000000000008p0L, 2.220446049250313080847263336181636063482e-16L, 1.570796326794896619231321691639751442099L),
4194 TEST_c_c (casinh, 0.0L, -0x1.000000000000000000000000008p0L, 2.220446049250313080847263336181636063482e-16L, -1.570796326794896619231321691639751442099L),
4195 TEST_c_c (casinh, -0.0L, 0x1.000000000000000000000000008p0L, -2.220446049250313080847263336181636063482e-16L, 1.570796326794896619231321691639751442099L),
4196 TEST_c_c (casinh, -0.0L, -0x1.000000000000000000000000008p0L, -2.220446049250313080847263336181636063482e-16L, -1.570796326794896619231321691639751442099L),
4197 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, 0.0L, 8.813735870195430252326093249798097405561e-1L, 0.0L),
4198 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, 0.0L, -8.813735870195430252326093249798097405561e-1L, 0.0L),
4199 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, -0.0L, 8.813735870195430252326093249798097405561e-1L, -0.0L),
4200 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, -0.0L, -8.813735870195430252326093249798097405561e-1L, -0.0L),
3a7182a1
JM		 4201#endif
4202#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 4203 TEST_c_c (casinh, 0x1p-113L, 0x1.0000000000000000000000000001p0L, 2.019699255375255198156433710951064632386e-17L, 1.570796326794896614463458507897073960405L),
4204 TEST_c_c (casinh, 0x1p-113L, -0x1.0000000000000000000000000001p0L, 2.019699255375255198156433710951064632386e-17L, -1.570796326794896614463458507897073960405L),
4205 TEST_c_c (casinh, -0x1p-113L, 0x1.0000000000000000000000000001p0L, -2.019699255375255198156433710951064632386e-17L, 1.570796326794896614463458507897073960405L),
4206 TEST_c_c (casinh, -0x1p-113L, -0x1.0000000000000000000000000001p0L, -2.019699255375255198156433710951064632386e-17L, -1.570796326794896614463458507897073960405L),
4207 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, 0x1p-113L, 8.813735870195430252326093249797924452120e-1L, 6.809190618832224124185481406981900518193e-35L),
4208 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, 0x1p-113L, -8.813735870195430252326093249797924452120e-1L, 6.809190618832224124185481406981900518193e-35L),
4209 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, -0x1p-113L, 8.813735870195430252326093249797924452120e-1L, -6.809190618832224124185481406981900518193e-35L),
4210 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, -0x1p-113L, -8.813735870195430252326093249797924452120e-1L, -6.809190618832224124185481406981900518193e-35L),
4211 TEST_c_c (casinh, 0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 1.962615573354718824241727964954454332780e-17L, 1.570796326794896619231321691639751442099L),
4212 TEST_c_c (casinh, 0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 1.962615573354718824241727964954454332780e-17L, -1.570796326794896619231321691639751442099L),
4213 TEST_c_c (casinh, -0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, -1.962615573354718824241727964954454332780e-17L, 1.570796326794896619231321691639751442099L),
4214 TEST_c_c (casinh, -0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, -1.962615573354718824241727964954454332780e-17L, -1.570796326794896619231321691639751442099L),
4215 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 8.813735870195430252326093249797924452120e-1L, 5.757683115456107044131264955348448400014e-4933L, UNDERFLOW_EXCEPTION),
4216 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, -8.813735870195430252326093249797924452120e-1L, 5.757683115456107044131264955348448400014e-4933L, UNDERFLOW_EXCEPTION),
4217 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 8.813735870195430252326093249797924452120e-1L, -5.757683115456107044131264955348448400014e-4933L, UNDERFLOW_EXCEPTION),
4218 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, -8.813735870195430252326093249797924452120e-1L, -5.757683115456107044131264955348448400014e-4933L, UNDERFLOW_EXCEPTION),
4219 TEST_c_c (casinh, 0.0L, 0x1.0000000000000000000000000001p0L, 1.962615573354718824241727964954454332780e-17L, 1.570796326794896619231321691639751442099L),
4220 TEST_c_c (casinh, 0.0L, -0x1.0000000000000000000000000001p0L, 1.962615573354718824241727964954454332780e-17L, -1.570796326794896619231321691639751442099L),
4221 TEST_c_c (casinh, -0.0L, 0x1.0000000000000000000000000001p0L, -1.962615573354718824241727964954454332780e-17L, 1.570796326794896619231321691639751442099L),
4222 TEST_c_c (casinh, -0.0L, -0x1.0000000000000000000000000001p0L, -1.962615573354718824241727964954454332780e-17L, -1.570796326794896619231321691639751442099L),
4223 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, 0.0L, 8.813735870195430252326093249797924452120e-1L, 0.0L),
4224 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, 0.0L, -8.813735870195430252326093249797924452120e-1L, 0.0L),
4225 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, -0.0L, 8.813735870195430252326093249797924452120e-1L, -0.0L),
4226 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, -0.0L, -8.813735870195430252326093249797924452120e-1L, -0.0L),
4227#endif
4228
4229 TEST_c_c (casinh, 0x1p-23L, 0x0.ffffffp0L, 2.714321200917194650737217746780928423385e-4L, 1.570357140408705570520377172865353621698L),
4230 TEST_c_c (casinh, 0x1p-23L, -0x0.ffffffp0L, 2.714321200917194650737217746780928423385e-4L, -1.570357140408705570520377172865353621698L),
4231 TEST_c_c (casinh, -0x1p-23L, 0x0.ffffffp0L, -2.714321200917194650737217746780928423385e-4L, 1.570357140408705570520377172865353621698L),
4232 TEST_c_c (casinh, -0x1p-23L, -0x0.ffffffp0L, -2.714321200917194650737217746780928423385e-4L, -1.570357140408705570520377172865353621698L),
4233 TEST_c_c (casinh, 0x0.ffffffp0L, 0x1p-23L, 8.813735448726963984495965873956465777250e-1L, 8.429369953393598499000760938112968755257e-8L),
4234 TEST_c_c (casinh, -0x0.ffffffp0L, 0x1p-23L, -8.813735448726963984495965873956465777250e-1L, 8.429369953393598499000760938112968755257e-8L),
4235 TEST_c_c (casinh, 0x0.ffffffp0L, -0x1p-23L, 8.813735448726963984495965873956465777250e-1L, -8.429369953393598499000760938112968755257e-8L),
4236 TEST_c_c (casinh, -0x0.ffffffp0L, -0x1p-23L, -8.813735448726963984495965873956465777250e-1L, -8.429369953393598499000760938112968755257e-8L),
4237 TEST_c_c (casinh, 0x1.fp-129L, 0x0.ffffffp0L, 8.245504387859737323891843603996428534945e-36L, 1.570451059810180415643718442157112705601L),
4238 TEST_c_c (casinh, 0x1.fp-129L, -0x0.ffffffp0L, 8.245504387859737323891843603996428534945e-36L, -1.570451059810180415643718442157112705601L),
4239 TEST_c_c (casinh, -0x1.fp-129L, 0x0.ffffffp0L, -8.245504387859737323891843603996428534945e-36L, 1.570451059810180415643718442157112705601L),
4240 TEST_c_c (casinh, -0x1.fp-129L, -0x0.ffffffp0L, -8.245504387859737323891843603996428534945e-36L, -1.570451059810180415643718442157112705601L),
4241 TEST_c_c (casinh, 0x0.ffffffp0L, 0x1.fp-129L, 8.813735448726938863015878255140556727969e-1L, 2.013062624689288675911339929224634593425e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4242 TEST_c_c (casinh, -0x0.ffffffp0L, 0x1.fp-129L, -8.813735448726938863015878255140556727969e-1L, 2.013062624689288675911339929224634593425e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4243 TEST_c_c (casinh, 0x0.ffffffp0L, -0x1.fp-129L, 8.813735448726938863015878255140556727969e-1L, -2.013062624689288675911339929224634593425e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4244 TEST_c_c (casinh, -0x0.ffffffp0L, -0x1.fp-129L, -8.813735448726938863015878255140556727969e-1L, -2.013062624689288675911339929224634593425e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4245 TEST_c_c (casinh, 0.0L, 0x0.ffffffp0L, 0.0L, 1.570451059810180415643718442157112705601L),
4246 TEST_c_c (casinh, 0.0L, -0x0.ffffffp0L, 0.0L, -1.570451059810180415643718442157112705601L),
4247 TEST_c_c (casinh, -0.0L, 0x0.ffffffp0L, -0.0L, 1.570451059810180415643718442157112705601L),
4248 TEST_c_c (casinh, -0.0L, -0x0.ffffffp0L, -0.0L, -1.570451059810180415643718442157112705601L),
4249 TEST_c_c (casinh, 0x0.ffffffp0L, 0.0L, 8.813735448726938863015878255140556727969e-1L, 0.0L),
4250 TEST_c_c (casinh, -0x0.ffffffp0L, 0.0L, -8.813735448726938863015878255140556727969e-1L, 0.0L),
4251 TEST_c_c (casinh, 0x0.ffffffp0L, -0.0L, 8.813735448726938863015878255140556727969e-1L, -0.0L),
4252 TEST_c_c (casinh, -0x0.ffffffp0L, -0.0L, -8.813735448726938863015878255140556727969e-1L, -0.0L),
4253 TEST_c_c (casinh, 0x1p-23L, 0.5L, 1.376510308240943236356088341381173571841e-7L, 5.235987755982934033165770729745469098254e-1L),
4254 TEST_c_c (casinh, 0x1p-23L, -0.5L, 1.376510308240943236356088341381173571841e-7L, -5.235987755982934033165770729745469098254e-1L),
4255 TEST_c_c (casinh, -0x1p-23L, 0.5L, -1.376510308240943236356088341381173571841e-7L, 5.235987755982934033165770729745469098254e-1L),
4256 TEST_c_c (casinh, -0x1p-23L, -0.5L, -1.376510308240943236356088341381173571841e-7L, -5.235987755982934033165770729745469098254e-1L),
4257 TEST_c_c (casinh, 0.5L, 0x1p-23L, 4.812118250596059896127318386463676808798e-1L, 1.066240299940009780479664302917201696886e-7L),
4258 TEST_c_c (casinh, -0.5L, 0x1p-23L, -4.812118250596059896127318386463676808798e-1L, 1.066240299940009780479664302917201696886e-7L),
4259 TEST_c_c (casinh, 0.5L, -0x1p-23L, 4.812118250596059896127318386463676808798e-1L, -1.066240299940009780479664302917201696886e-7L),
4260 TEST_c_c (casinh, -0.5L, -0x1p-23L, -4.812118250596059896127318386463676808798e-1L, -1.066240299940009780479664302917201696886e-7L),
4261 TEST_c_c (casinh, 0x1.fp-129L, 0.5L, 3.287317402534702257036015056278368274737e-39L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_FLOAT),
4262 TEST_c_c (casinh, 0x1.fp-129L, -0.5L, 3.287317402534702257036015056278368274737e-39L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_FLOAT),
4263 TEST_c_c (casinh, -0x1.fp-129L, 0.5L, -3.287317402534702257036015056278368274737e-39L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_FLOAT),
4264 TEST_c_c (casinh, -0x1.fp-129L, -0.5L, -3.287317402534702257036015056278368274737e-39L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_FLOAT),
4265 TEST_c_c (casinh, 0.5L, 0x1.fp-129L, 4.812118250596034474977589134243684231352e-1L, 2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4266 TEST_c_c (casinh, -0.5L, 0x1.fp-129L, -4.812118250596034474977589134243684231352e-1L, 2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4267 TEST_c_c (casinh, 0.5L, -0x1.fp-129L, 4.812118250596034474977589134243684231352e-1L, -2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4268 TEST_c_c (casinh, -0.5L, -0x1.fp-129L, -4.812118250596034474977589134243684231352e-1L, -2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4269 TEST_c_c (casinh, 0x1p-23L, 0x1p-23L, 1.192092895507818146886315028596704749235e-7L, 1.192092895507806853113684971258850504935e-7L),
4270 TEST_c_c (casinh, 0x1p-23L, -0x1p-23L, 1.192092895507818146886315028596704749235e-7L, -1.192092895507806853113684971258850504935e-7L),
4271 TEST_c_c (casinh, -0x1p-23L, 0x1p-23L, -1.192092895507818146886315028596704749235e-7L, 1.192092895507806853113684971258850504935e-7L),
4272 TEST_c_c (casinh, -0x1p-23L, -0x1p-23L, -1.192092895507818146886315028596704749235e-7L, -1.192092895507806853113684971258850504935e-7L),
4273 TEST_c_c (casinh, 0x1.fp-129L, 0x1p-23L, 2.846900380897747786805634596726756660388e-39L, 1.192092895507815323443157514352519154304e-7L, UNDERFLOW_EXCEPTION_FLOAT),
4274 TEST_c_c (casinh, 0x1.fp-129L, -0x1p-23L, 2.846900380897747786805634596726756660388e-39L, -1.192092895507815323443157514352519154304e-7L, UNDERFLOW_EXCEPTION_FLOAT),
4275 TEST_c_c (casinh, -0x1.fp-129L, 0x1p-23L, -2.846900380897747786805634596726756660388e-39L, 1.192092895507815323443157514352519154304e-7L, UNDERFLOW_EXCEPTION_FLOAT),
4276 TEST_c_c (casinh, -0x1.fp-129L, -0x1p-23L, -2.846900380897747786805634596726756660388e-39L, -1.192092895507815323443157514352519154304e-7L, UNDERFLOW_EXCEPTION_FLOAT),
4277 /* Bug 15319: underflow exception may be missing. */
4278 TEST_c_c (casinh, 0x1p-23L, 0x1.fp-129L, 1.192092895507809676556842485683592032154e-7L, 2.846900380897707329917933005874691056564e-39L, UNDERFLOW_EXCEPTION_OK_FLOAT),
4279 TEST_c_c (casinh, -0x1p-23L, 0x1.fp-129L, -1.192092895507809676556842485683592032154e-7L, 2.846900380897707329917933005874691056564e-39L, UNDERFLOW_EXCEPTION_OK_FLOAT),
4280 TEST_c_c (casinh, 0x1p-23L, -0x1.fp-129L, 1.192092895507809676556842485683592032154e-7L, -2.846900380897707329917933005874691056564e-39L, UNDERFLOW_EXCEPTION_OK_FLOAT),
4281 TEST_c_c (casinh, -0x1p-23L, -0x1.fp-129L, -1.192092895507809676556842485683592032154e-7L, -2.846900380897707329917933005874691056564e-39L, UNDERFLOW_EXCEPTION_OK_FLOAT),
4282 TEST_c_c (casinh, 0.0L, 0x1p-23L, 0.0L, 1.192092895507815323443157514352519154304e-7L),
4283 TEST_c_c (casinh, 0.0L, -0x1p-23L, 0.0L, -1.192092895507815323443157514352519154304e-7L),
4284 TEST_c_c (casinh, -0.0L, 0x1p-23L, -0.0L, 1.192092895507815323443157514352519154304e-7L),
4285 TEST_c_c (casinh, -0.0L, -0x1p-23L, -0.0L, -1.192092895507815323443157514352519154304e-7L),
4286 TEST_c_c (casinh, 0x1p-23L, 0.0L, 1.192092895507809676556842485683592032154e-7L, 0.0L),
4287 TEST_c_c (casinh, -0x1p-23L, 0.0L, -1.192092895507809676556842485683592032154e-7L, 0.0L),
4288 TEST_c_c (casinh, 0x1p-23L, -0.0L, 1.192092895507809676556842485683592032154e-7L, -0.0L),
4289 TEST_c_c (casinh, -0x1p-23L, -0.0L, -1.192092895507809676556842485683592032154e-7L, -0.0L),
4290 TEST_c_c (casinh, 0x1.fp-129L, 0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4291 TEST_c_c (casinh, 0x1.fp-129L, -0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4292 TEST_c_c (casinh, -0x1.fp-129L, 0x1.fp-129L, -2.846900380897727558361783801085126250967e-39L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4293 TEST_c_c (casinh, -0x1.fp-129L, -0x1.fp-129L, -2.846900380897727558361783801085126250967e-39L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
ccc8cadf 4294#ifndef TEST_FLOAT
08198877
JM		 4295 TEST_c_c (casinh, 0x1p-52L, 0x0.fffffffffffff8p0L, 1.171456840272878582596796205397918831268e-8L, 1.570796307840326780080580569360500172043L),
4296 TEST_c_c (casinh, 0x1p-52L, -0x0.fffffffffffff8p0L, 1.171456840272878582596796205397918831268e-8L, -1.570796307840326780080580569360500172043L),
4297 TEST_c_c (casinh, -0x1p-52L, 0x0.fffffffffffff8p0L, -1.171456840272878582596796205397918831268e-8L, 1.570796307840326780080580569360500172043L),
4298 TEST_c_c (casinh, -0x1p-52L, -0x0.fffffffffffff8p0L, -1.171456840272878582596796205397918831268e-8L, -1.570796307840326780080580569360500172043L),
4299 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, 0x1p-52L, 8.813735870195429467279863907910458761820e-1L, 1.570092458683775146551022293016031474627e-16L),
4300 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, 0x1p-52L, -8.813735870195429467279863907910458761820e-1L, 1.570092458683775146551022293016031474627e-16L),
4301 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, -0x1p-52L, 8.813735870195429467279863907910458761820e-1L, -1.570092458683775146551022293016031474627e-16L),
4302 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, -0x1p-52L, -8.813735870195429467279863907910458761820e-1L, -1.570092458683775146551022293016031474627e-16L),
4303 TEST_c_c (casinh, 0x1.fp-1025L, 0x0.fffffffffffff8p0L, 3.616396521699973256461764099945789620604e-301L, 1.570796311893735425383665303776316016594L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4304 TEST_c_c (casinh, 0x1.fp-1025L, -0x0.fffffffffffff8p0L, 3.616396521699973256461764099945789620604e-301L, -1.570796311893735425383665303776316016594L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4305 TEST_c_c (casinh, -0x1.fp-1025L, 0x0.fffffffffffff8p0L, -3.616396521699973256461764099945789620604e-301L, 1.570796311893735425383665303776316016594L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4306 TEST_c_c (casinh, -0x1.fp-1025L, -0x0.fffffffffffff8p0L, -3.616396521699973256461764099945789620604e-301L, -1.570796311893735425383665303776316016594L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4307 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, 0x1.fp-1025L, 8.813735870195429467279863907910371604180e-1L, 3.810492908885321954658152505985270452320e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4308 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, 0x1.fp-1025L, -8.813735870195429467279863907910371604180e-1L, 3.810492908885321954658152505985270452320e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4309 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, -0x1.fp-1025L, 8.813735870195429467279863907910371604180e-1L, -3.810492908885321954658152505985270452320e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4310 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, -0x1.fp-1025L, -8.813735870195429467279863907910371604180e-1L, -3.810492908885321954658152505985270452320e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4311 TEST_c_c (casinh, 0.0L, 0x0.fffffffffffff8p0L, 0.0L, 1.570796311893735425383665303776316016594L),
4312 TEST_c_c (casinh, 0.0L, -0x0.fffffffffffff8p0L, 0.0L, -1.570796311893735425383665303776316016594L),
4313 TEST_c_c (casinh, -0.0L, 0x0.fffffffffffff8p0L, -0.0L, 1.570796311893735425383665303776316016594L),
4314 TEST_c_c (casinh, -0.0L, -0x0.fffffffffffff8p0L, -0.0L, -1.570796311893735425383665303776316016594L),
4315 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, 0.0L, 8.813735870195429467279863907910371604180e-1L, 0.0L),
4316 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, 0.0L, -8.813735870195429467279863907910371604180e-1L, 0.0L),
4317 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, -0.0L, 8.813735870195429467279863907910371604180e-1L, -0.0L),
4318 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, -0.0L, -8.813735870195429467279863907910371604180e-1L, -0.0L),
4319#endif
4320 TEST_c_c (casinh, 0x1p-52L, 0.5L, 2.563950248511418570403591756798643804971e-16L, 5.235987755982988730771072305465648369889e-1L),
4321 TEST_c_c (casinh, 0x1p-52L, -0.5L, 2.563950248511418570403591756798643804971e-16L, -5.235987755982988730771072305465648369889e-1L),
4322 TEST_c_c (casinh, -0x1p-52L, 0.5L, -2.563950248511418570403591756798643804971e-16L, 5.235987755982988730771072305465648369889e-1L),
4323 TEST_c_c (casinh, -0x1p-52L, -0.5L, -2.563950248511418570403591756798643804971e-16L, -5.235987755982988730771072305465648369889e-1L),
4324 TEST_c_c (casinh, 0.5L, 0x1p-52L, 4.812118250596034474977589134243772428682e-1L, 1.986027322597818397661816253158024383707e-16L),
4325 TEST_c_c (casinh, -0.5L, 0x1p-52L, -4.812118250596034474977589134243772428682e-1L, 1.986027322597818397661816253158024383707e-16L),
4326 TEST_c_c (casinh, 0.5L, -0x1p-52L, 4.812118250596034474977589134243772428682e-1L, -1.986027322597818397661816253158024383707e-16L),
4327 TEST_c_c (casinh, -0.5L, -0x1p-52L, -4.812118250596034474977589134243772428682e-1L, -1.986027322597818397661816253158024383707e-16L),
ccc8cadf 4328#ifndef TEST_FLOAT
08198877
JM		 4329 TEST_c_c (casinh, 0x1.fp-1025L, 0.5L, 6.222508863508420569166420770843207333493e-309L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
4330 TEST_c_c (casinh, 0x1.fp-1025L, -0.5L, 6.222508863508420569166420770843207333493e-309L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
4331 TEST_c_c (casinh, -0x1.fp-1025L, 0.5L, -6.222508863508420569166420770843207333493e-309L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
4332 TEST_c_c (casinh, -0x1.fp-1025L, -0.5L, -6.222508863508420569166420770843207333493e-309L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
4333 TEST_c_c (casinh, 0.5L, 0x1.fp-1025L, 4.812118250596034474977589134243684231352e-1L, 4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4334 TEST_c_c (casinh, -0.5L, 0x1.fp-1025L, -4.812118250596034474977589134243684231352e-1L, 4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4335 TEST_c_c (casinh, 0.5L, -0x1.fp-1025L, 4.812118250596034474977589134243684231352e-1L, -4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4336 TEST_c_c (casinh, -0.5L, -0x1.fp-1025L, -4.812118250596034474977589134243684231352e-1L, -4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4337#endif
4338 TEST_c_c (casinh, 0x1p-52L, 0x1p-52L, 2.220446049250313080847263336181677117148e-16L, 2.220446049250313080847263336181604132852e-16L),
4339 TEST_c_c (casinh, 0x1p-52L, -0x1p-52L, 2.220446049250313080847263336181677117148e-16L, -2.220446049250313080847263336181604132852e-16L),
4340 TEST_c_c (casinh, -0x1p-52L, 0x1p-52L, -2.220446049250313080847263336181677117148e-16L, 2.220446049250313080847263336181604132852e-16L),
4341 TEST_c_c (casinh, -0x1p-52L, -0x1p-52L, -2.220446049250313080847263336181677117148e-16L, -2.220446049250313080847263336181604132852e-16L),
ccc8cadf 4342#ifndef TEST_FLOAT
08198877
JM		 4343 TEST_c_c (casinh, 0x1.fp-1025L, 0x1p-52L, 5.388850751072128349671657362289548938458e-309L, 2.220446049250313080847263336181658871074e-16L, UNDERFLOW_EXCEPTION_DOUBLE),
4344 TEST_c_c (casinh, 0x1.fp-1025L, -0x1p-52L, 5.388850751072128349671657362289548938458e-309L, -2.220446049250313080847263336181658871074e-16L, UNDERFLOW_EXCEPTION_DOUBLE),
4345 TEST_c_c (casinh, -0x1.fp-1025L, 0x1p-52L, -5.388850751072128349671657362289548938458e-309L, 2.220446049250313080847263336181658871074e-16L, UNDERFLOW_EXCEPTION_DOUBLE),
4346 TEST_c_c (casinh, -0x1.fp-1025L, -0x1p-52L, -5.388850751072128349671657362289548938458e-309L, -2.220446049250313080847263336181658871074e-16L, UNDERFLOW_EXCEPTION_DOUBLE),
4347 /* Bug 15319: underflow exception may be missing. */
4348 TEST_c_c (casinh, 0x1p-52L, 0x1.fp-1025L, 2.220446049250313080847263336181622378926e-16L, 5.388850751072128349671657362289283247603e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4349 TEST_c_c (casinh, -0x1p-52L, 0x1.fp-1025L, -2.220446049250313080847263336181622378926e-16L, 5.388850751072128349671657362289283247603e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4350 TEST_c_c (casinh, 0x1p-52L, -0x1.fp-1025L, 2.220446049250313080847263336181622378926e-16L, -5.388850751072128349671657362289283247603e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4351 TEST_c_c (casinh, -0x1p-52L, -0x1.fp-1025L, -2.220446049250313080847263336181622378926e-16L, -5.388850751072128349671657362289283247603e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4352#endif
4353 TEST_c_c (casinh, 0.0L, 0x1p-52L, 0.0L, 2.220446049250313080847263336181658871074e-16L),
4354 TEST_c_c (casinh, 0.0L, -0x1p-52L, 0.0L, -2.220446049250313080847263336181658871074e-16L),
4355 TEST_c_c (casinh, -0.0L, 0x1p-52L, -0.0L, 2.220446049250313080847263336181658871074e-16L),
4356 TEST_c_c (casinh, -0.0L, -0x1p-52L, -0.0L, -2.220446049250313080847263336181658871074e-16L),
4357 TEST_c_c (casinh, 0x1p-52L, 0.0L, 2.220446049250313080847263336181622378926e-16L, 0.0L),
4358 TEST_c_c (casinh, -0x1p-52L, 0.0L, -2.220446049250313080847263336181622378926e-16L, 0.0L),
4359 TEST_c_c (casinh, 0x1p-52L, -0.0L, 2.220446049250313080847263336181622378926e-16L, -0.0L),
4360 TEST_c_c (casinh, -0x1p-52L, -0.0L, -2.220446049250313080847263336181622378926e-16L, -0.0L),
ccc8cadf 4361#ifndef TEST_FLOAT
08198877
JM		 4362 TEST_c_c (casinh, 0x1.fp-1025L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4363 TEST_c_c (casinh, 0x1.fp-1025L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4364 TEST_c_c (casinh, -0x1.fp-1025L, 0x1.fp-1025L, -5.388850751072128349671657362289416093031e-309L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4365 TEST_c_c (casinh, -0x1.fp-1025L, -0x1.fp-1025L, -5.388850751072128349671657362289416093031e-309L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
ccc8cadf
JM		 4366#endif
4367#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 4368 TEST_c_c (casinh, 0x1p-63L, 0x0.ffffffffffffffffp0L, 2.588578361325995866221775673638805081337e-10L, 1.570796326376055842114524927965556247908L),
4369 TEST_c_c (casinh, 0x1p-63L, -0x0.ffffffffffffffffp0L, 2.588578361325995866221775673638805081337e-10L, -1.570796326376055842114524927965556247908L),
4370 TEST_c_c (casinh, -0x1p-63L, 0x0.ffffffffffffffffp0L, -2.588578361325995866221775673638805081337e-10L, 1.570796326376055842114524927965556247908L),
4371 TEST_c_c (casinh, -0x1p-63L, -0x0.ffffffffffffffffp0L, -2.588578361325995866221775673638805081337e-10L, -1.570796326376055842114524927965556247908L),
4372 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, 0x1p-63L, 8.813735870195430251942769895627079569937e-1L, 7.666467083416870407402049869781566856442e-20L),
4373 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, 0x1p-63L, -8.813735870195430251942769895627079569937e-1L, 7.666467083416870407402049869781566856442e-20L),
4374 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, -0x1p-63L, 8.813735870195430251942769895627079569937e-1L, -7.666467083416870407402049869781566856442e-20L),
4375 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, -0x1p-63L, -8.813735870195430251942769895627079569937e-1L, -7.666467083416870407402049869781566856442e-20L),
ccc8cadf 4376# if LDBL_MIN_EXP <= -16381
08198877
JM		 4377 TEST_c_c (casinh, 0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 2.472906068161537187835415298076415423459e-4923L, 1.570796326465624365239962068302568888898L),
4378 TEST_c_c (casinh, 0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 2.472906068161537187835415298076415423459e-4923L, -1.570796326465624365239962068302568888898L),
4379 TEST_c_c (casinh, -0x1.fp-16385L, 0x0.ffffffffffffffffp0L, -2.472906068161537187835415298076415423459e-4923L, 1.570796326465624365239962068302568888898L),
4380 TEST_c_c (casinh, -0x1.fp-16385L, -0x0.ffffffffffffffffp0L, -2.472906068161537187835415298076415423459e-4923L, -1.570796326465624365239962068302568888898L),
4381 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 8.813735870195430251942769895627079569917e-1L, 5.757683115456107044287327268904964422212e-4933L, UNDERFLOW_EXCEPTION),
4382 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, 0x1.fp-16385L, -8.813735870195430251942769895627079569917e-1L, 5.757683115456107044287327268904964422212e-4933L, UNDERFLOW_EXCEPTION),
4383 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 8.813735870195430251942769895627079569917e-1L, -5.757683115456107044287327268904964422212e-4933L, UNDERFLOW_EXCEPTION),
4384 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, -0x1.fp-16385L, -8.813735870195430251942769895627079569917e-1L, -5.757683115456107044287327268904964422212e-4933L, UNDERFLOW_EXCEPTION),
ccc8cadf 4385# endif
08198877
JM		 4386 TEST_c_c (casinh, 0.0L, 0x0.ffffffffffffffffp0L, 0.0L, 1.570796326465624365239962068302568888898L),
4387 TEST_c_c (casinh, 0.0L, -0x0.ffffffffffffffffp0L, 0.0L, -1.570796326465624365239962068302568888898L),
4388 TEST_c_c (casinh, -0.0L, 0x0.ffffffffffffffffp0L, -0.0L, 1.570796326465624365239962068302568888898L),
4389 TEST_c_c (casinh, -0.0L, -0x0.ffffffffffffffffp0L, -0.0L, -1.570796326465624365239962068302568888898L),
4390 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, 0.0L, 8.813735870195430251942769895627079569917e-1L, 0.0L),
4391 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, 0.0L, -8.813735870195430251942769895627079569917e-1L, 0.0L),
4392 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, -0.0L, 8.813735870195430251942769895627079569917e-1L, -0.0L),
4393 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, -0.0L, -8.813735870195430251942769895627079569917e-1L, -0.0L),
4394#endif
4395 TEST_c_c (casinh, 0x1p-63L, 0.5L, 1.251928832280966098829878787499365228659e-19L, 5.235987755982988730771072305465838140283e-1L),
4396 TEST_c_c (casinh, 0x1p-63L, -0.5L, 1.251928832280966098829878787499365228659e-19L, -5.235987755982988730771072305465838140283e-1L),
4397 TEST_c_c (casinh, -0x1p-63L, 0.5L, -1.251928832280966098829878787499365228659e-19L, 5.235987755982988730771072305465838140283e-1L),
4398 TEST_c_c (casinh, -0x1p-63L, -0.5L, -1.251928832280966098829878787499365228659e-19L, -5.235987755982988730771072305465838140283e-1L),
4399 TEST_c_c (casinh, 0.5L, 0x1p-63L, 4.812118250596034474977589134243684231373e-1L, 9.697399036122160144833087173623140436413e-20L),
4400 TEST_c_c (casinh, -0.5L, 0x1p-63L, -4.812118250596034474977589134243684231373e-1L, 9.697399036122160144833087173623140436413e-20L),
4401 TEST_c_c (casinh, 0.5L, -0x1p-63L, 4.812118250596034474977589134243684231373e-1L, -9.697399036122160144833087173623140436413e-20L),
4402 TEST_c_c (casinh, -0.5L, -0x1p-63L, -4.812118250596034474977589134243684231373e-1L, -9.697399036122160144833087173623140436413e-20L),
ccc8cadf 4403#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 4404 TEST_c_c (casinh, 0x1.fp-16385L, 0.5L, 9.402257155670418112159334875199821342890e-4933L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION),
4405 TEST_c_c (casinh, 0x1.fp-16385L, -0.5L, 9.402257155670418112159334875199821342890e-4933L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION),
4406 TEST_c_c (casinh, -0x1.fp-16385L, 0.5L, -9.402257155670418112159334875199821342890e-4933L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION),
4407 TEST_c_c (casinh, -0x1.fp-16385L, -0.5L, -9.402257155670418112159334875199821342890e-4933L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION),
4408 TEST_c_c (casinh, 0.5L, 0x1.fp-16385L, 4.812118250596034474977589134243684231352e-1L, 7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
4409 TEST_c_c (casinh, -0.5L, 0x1.fp-16385L, -4.812118250596034474977589134243684231352e-1L, 7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
4410 TEST_c_c (casinh, 0.5L, -0x1.fp-16385L, 4.812118250596034474977589134243684231352e-1L, -7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
4411 TEST_c_c (casinh, -0.5L, -0x1.fp-16385L, -4.812118250596034474977589134243684231352e-1L, -7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
4412#endif
4413 TEST_c_c (casinh, 0x1p-63L, 0x1p-63L, 1.084202172485504434007452800869941711430e-19L, 1.084202172485504434007452800869941711422e-19L),
4414 TEST_c_c (casinh, 0x1p-63L, -0x1p-63L, 1.084202172485504434007452800869941711430e-19L, -1.084202172485504434007452800869941711422e-19L),
4415 TEST_c_c (casinh, -0x1p-63L, 0x1p-63L, -1.084202172485504434007452800869941711430e-19L, 1.084202172485504434007452800869941711422e-19L),
4416 TEST_c_c (casinh, -0x1p-63L, -0x1p-63L, -1.084202172485504434007452800869941711430e-19L, -1.084202172485504434007452800869941711422e-19L),
ccc8cadf 4417#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 4418 TEST_c_c (casinh, 0x1.fp-16385L, 0x1p-63L, 8.142593549724601460479922838826119584465e-4933L, 1.084202172485504434007452800869941711428e-19L, UNDERFLOW_EXCEPTION),
4419 TEST_c_c (casinh, 0x1.fp-16385L, -0x1p-63L, 8.142593549724601460479922838826119584465e-4933L, -1.084202172485504434007452800869941711428e-19L, UNDERFLOW_EXCEPTION),
4420 TEST_c_c (casinh, -0x1.fp-16385L, 0x1p-63L, -8.142593549724601460479922838826119584465e-4933L, 1.084202172485504434007452800869941711428e-19L, UNDERFLOW_EXCEPTION),
4421 TEST_c_c (casinh, -0x1.fp-16385L, -0x1p-63L, -8.142593549724601460479922838826119584465e-4933L, -1.084202172485504434007452800869941711428e-19L, UNDERFLOW_EXCEPTION),
4422 TEST_c_c (casinh, 0x1p-63L, 0x1.fp-16385L, 1.084202172485504434007452800869941711424e-19L, 8.142593549724601460479922838826119584369e-4933L, UNDERFLOW_EXCEPTION),
4423 TEST_c_c (casinh, -0x1p-63L, 0x1.fp-16385L, -1.084202172485504434007452800869941711424e-19L, 8.142593549724601460479922838826119584369e-4933L, UNDERFLOW_EXCEPTION),
4424 TEST_c_c (casinh, 0x1p-63L, -0x1.fp-16385L, 1.084202172485504434007452800869941711424e-19L, -8.142593549724601460479922838826119584369e-4933L, UNDERFLOW_EXCEPTION),
4425 TEST_c_c (casinh, -0x1p-63L, -0x1.fp-16385L, -1.084202172485504434007452800869941711424e-19L, -8.142593549724601460479922838826119584369e-4933L, UNDERFLOW_EXCEPTION),
4426#endif
4427 TEST_c_c (casinh, 0.0L, 0x1p-63L, 0.0L, 1.084202172485504434007452800869941711428e-19L),
4428 TEST_c_c (casinh, 0.0L, -0x1p-63L, 0.0L, -1.084202172485504434007452800869941711428e-19L),
4429 TEST_c_c (casinh, -0.0L, 0x1p-63L, -0.0L, 1.084202172485504434007452800869941711428e-19L),
4430 TEST_c_c (casinh, -0.0L, -0x1p-63L, -0.0L, -1.084202172485504434007452800869941711428e-19L),
4431 TEST_c_c (casinh, 0x1p-63L, 0.0L, 1.084202172485504434007452800869941711424e-19L, 0.0L),
4432 TEST_c_c (casinh, -0x1p-63L, 0.0L, -1.084202172485504434007452800869941711424e-19L, 0.0L),
4433 TEST_c_c (casinh, 0x1p-63L, -0.0L, 1.084202172485504434007452800869941711424e-19L, -0.0L),
4434 TEST_c_c (casinh, -0x1p-63L, -0.0L, -1.084202172485504434007452800869941711424e-19L, -0.0L),
ccc8cadf 4435#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 4436 TEST_c_c (casinh, 0x1.fp-16385L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4437 TEST_c_c (casinh, 0x1.fp-16385L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4438 TEST_c_c (casinh, -0x1.fp-16385L, 0x1.fp-16385L, -8.142593549724601460479922838826119584417e-4933L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4439 TEST_c_c (casinh, -0x1.fp-16385L, -0x1.fp-16385L, -8.142593549724601460479922838826119584417e-4933L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
ccc8cadf
JM		 4440#endif
4441#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 4442 TEST_c_c (casinh, 0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 1.234330349600789959989661887846005659983e-16L, 1.570796326794896419512475791677915736035L),
4443 TEST_c_c (casinh, 0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 1.234330349600789959989661887846005659983e-16L, -1.570796326794896419512475791677915736035L),
4444 TEST_c_c (casinh, -0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, -1.234330349600789959989661887846005659983e-16L, 1.570796326794896419512475791677915736035L),
4445 TEST_c_c (casinh, -0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, -1.234330349600789959989661887846005659983e-16L, -1.570796326794896419512475791677915736035L),
4446 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 8.813735870195430252326093249797835932642e-1L, 1.743152798421049375791483240187377443526e-32L),
4447 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, -8.813735870195430252326093249797835932642e-1L, 1.743152798421049375791483240187377443526e-32L),
4448 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 8.813735870195430252326093249797835932642e-1L, -1.743152798421049375791483240187377443526e-32L),
4449 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, -8.813735870195430252326093249797835932642e-1L, -1.743152798421049375791483240187377443526e-32L),
4450 TEST_c_c (casinh, 0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 3.432186888910770473784103112009399360940e-293L, 1.570796326794896462222075823262245502760L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4451 TEST_c_c (casinh, 0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 3.432186888910770473784103112009399360940e-293L, -1.570796326794896462222075823262245502760L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4452 TEST_c_c (casinh, -0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, -3.432186888910770473784103112009399360940e-293L, 1.570796326794896462222075823262245502760L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4453 TEST_c_c (casinh, -0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, -3.432186888910770473784103112009399360940e-293L, -1.570796326794896462222075823262245502760L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4454 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 8.813735870195430252326093249797835932642e-1L, 3.810492908885321743133304375216641110205e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4455 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, -8.813735870195430252326093249797835932642e-1L, 3.810492908885321743133304375216641110205e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4456 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 8.813735870195430252326093249797835932642e-1L, -3.810492908885321743133304375216641110205e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4457 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, -8.813735870195430252326093249797835932642e-1L, -3.810492908885321743133304375216641110205e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4458 TEST_c_c (casinh, 0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 1.570796326794896462222075823262245502760L),
4459 TEST_c_c (casinh, 0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, -1.570796326794896462222075823262245502760L),
4460 TEST_c_c (casinh, -0.0L, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 1.570796326794896462222075823262245502760L),
4461 TEST_c_c (casinh, -0.0L, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, -1.570796326794896462222075823262245502760L),
4462 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 8.813735870195430252326093249797835932642e-1L, 0.0L),
4463 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, -8.813735870195430252326093249797835932642e-1L, 0.0L),
4464 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 8.813735870195430252326093249797835932642e-1L, -0.0L),
4465 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, -8.813735870195430252326093249797835932642e-1L, -0.0L),
4466#endif
4467 TEST_c_c (casinh, 0x1p-105L, 0.5L, 2.846556599890768890940941645338546615370e-32L, 5.235987755982988730771072305465838140329e-1L),
4468 TEST_c_c (casinh, 0x1p-105L, -0.5L, 2.846556599890768890940941645338546615370e-32L, -5.235987755982988730771072305465838140329e-1L),
4469 TEST_c_c (casinh, -0x1p-105L, 0.5L, -2.846556599890768890940941645338546615370e-32L, 5.235987755982988730771072305465838140329e-1L),
4470 TEST_c_c (casinh, -0x1p-105L, -0.5L, -2.846556599890768890940941645338546615370e-32L, -5.235987755982988730771072305465838140329e-1L),
4471 TEST_c_c (casinh, 0.5L, 0x1p-105L, 4.812118250596034474977589134243684231352e-1L, 2.204933261082751447436996198490110245167e-32L),
4472 TEST_c_c (casinh, -0.5L, 0x1p-105L, -4.812118250596034474977589134243684231352e-1L, 2.204933261082751447436996198490110245167e-32L),
4473 TEST_c_c (casinh, 0.5L, -0x1p-105L, 4.812118250596034474977589134243684231352e-1L, -2.204933261082751447436996198490110245167e-32L),
4474 TEST_c_c (casinh, -0.5L, -0x1p-105L, -4.812118250596034474977589134243684231352e-1L, -2.204933261082751447436996198490110245167e-32L),
4475 TEST_c_c (casinh, 0x1p-105L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 2.465190328815661891911651766508706967729e-32L),
4476 TEST_c_c (casinh, 0x1p-105L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -2.465190328815661891911651766508706967729e-32L),
4477 TEST_c_c (casinh, -0x1p-105L, 0x1p-105L, -2.465190328815661891911651766508706967729e-32L, 2.465190328815661891911651766508706967729e-32L),
4478 TEST_c_c (casinh, -0x1p-105L, -0x1p-105L, -2.465190328815661891911651766508706967729e-32L, -2.465190328815661891911651766508706967729e-32L),
ccc8cadf 4479#ifndef TEST_FLOAT
08198877
JM		 4480 TEST_c_c (casinh, 0x1.fp-1025L, 0x1p-105L, 5.388850751072128349671657362289416093031e-309L, 2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_DOUBLE),
4481 TEST_c_c (casinh, 0x1.fp-1025L, -0x1p-105L, 5.388850751072128349671657362289416093031e-309L, -2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_DOUBLE),
4482 TEST_c_c (casinh, -0x1.fp-1025L, 0x1p-105L, -5.388850751072128349671657362289416093031e-309L, 2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_DOUBLE),
4483 TEST_c_c (casinh, -0x1.fp-1025L, -0x1p-105L, -5.388850751072128349671657362289416093031e-309L, -2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_DOUBLE),
4484 /* Bug 15319: underflow exception may be missing. */
4485 TEST_c_c (casinh, 0x1p-105L, 0x1.fp-1025L, 2.465190328815661891911651766508706967729e-32L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4486 TEST_c_c (casinh, -0x1p-105L, 0x1.fp-1025L, -2.465190328815661891911651766508706967729e-32L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4487 TEST_c_c (casinh, 0x1p-105L, -0x1.fp-1025L, 2.465190328815661891911651766508706967729e-32L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4488 TEST_c_c (casinh, -0x1p-105L, -0x1.fp-1025L, -2.465190328815661891911651766508706967729e-32L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4489#endif
4490 TEST_c_c (casinh, 0.0L, 0x1p-105L, 0.0L, 2.465190328815661891911651766508706967729e-32L),
4491 TEST_c_c (casinh, 0.0L, -0x1p-105L, 0.0L, -2.465190328815661891911651766508706967729e-32L),
4492 TEST_c_c (casinh, -0.0L, 0x1p-105L, -0.0L, 2.465190328815661891911651766508706967729e-32L),
4493 TEST_c_c (casinh, -0.0L, -0x1p-105L, -0.0L, -2.465190328815661891911651766508706967729e-32L),
4494 TEST_c_c (casinh, 0x1p-105L, 0.0L, 2.465190328815661891911651766508706967729e-32L, 0.0L),
4495 TEST_c_c (casinh, -0x1p-105L, 0.0L, -2.465190328815661891911651766508706967729e-32L, 0.0L),
4496 TEST_c_c (casinh, 0x1p-105L, -0.0L, 2.465190328815661891911651766508706967729e-32L, -0.0L),
4497 TEST_c_c (casinh, -0x1p-105L, -0.0L, -2.465190328815661891911651766508706967729e-32L, -0.0L),
ccc8cadf 4498#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 4499 TEST_c_c (casinh, 0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.091004200533850618345330909857103457781e-17L, 1.570796326794896601578502908312986698624L),
4500 TEST_c_c (casinh, 0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.091004200533850618345330909857103457781e-17L, -1.570796326794896601578502908312986698624L),
4501 TEST_c_c (casinh, -0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, -1.091004200533850618345330909857103457781e-17L, 1.570796326794896601578502908312986698624L),
4502 TEST_c_c (casinh, -0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, -1.091004200533850618345330909857103457781e-17L, -1.570796326794896601578502908312986698624L),
4503 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 8.813735870195430252326093249797922409363e-1L, 1.361838123766444824837096281396380300349e-34L),
4504 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, -8.813735870195430252326093249797922409363e-1L, 1.361838123766444824837096281396380300349e-34L),
4505 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 8.813735870195430252326093249797922409363e-1L, -1.361838123766444824837096281396380300349e-34L),
4506 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, -8.813735870195430252326093249797922409363e-1L, -1.361838123766444824837096281396380300349e-34L),
4507 TEST_c_c (casinh, 0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 5.867357004219059108790368268900490184505e-4916L, 1.570796326794896605353533883825294686803L),
4508 TEST_c_c (casinh, 0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 5.867357004219059108790368268900490184505e-4916L, -1.570796326794896605353533883825294686803L),
4509 TEST_c_c (casinh, -0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, -5.867357004219059108790368268900490184505e-4916L, 1.570796326794896605353533883825294686803L),
4510 TEST_c_c (casinh, -0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, -5.867357004219059108790368268900490184505e-4916L, -1.570796326794896605353533883825294686803L),
4511 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 8.813735870195430252326093249797922409363e-1L, 5.757683115456107044131264955348449231681e-4933L, UNDERFLOW_EXCEPTION),
4512 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, -8.813735870195430252326093249797922409363e-1L, 5.757683115456107044131264955348449231681e-4933L, UNDERFLOW_EXCEPTION),
4513 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 8.813735870195430252326093249797922409363e-1L, -5.757683115456107044131264955348449231681e-4933L, UNDERFLOW_EXCEPTION),
4514 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, -8.813735870195430252326093249797922409363e-1L, -5.757683115456107044131264955348449231681e-4933L, UNDERFLOW_EXCEPTION),
4515 TEST_c_c (casinh, 0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 1.570796326794896605353533883825294686803L),
4516 TEST_c_c (casinh, 0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, -1.570796326794896605353533883825294686803L),
4517 TEST_c_c (casinh, -0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 1.570796326794896605353533883825294686803L),
4518 TEST_c_c (casinh, -0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, -1.570796326794896605353533883825294686803L),
4519 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 8.813735870195430252326093249797922409363e-1L, 0.0L),
4520 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, -8.813735870195430252326093249797922409363e-1L, 0.0L),
4521 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 8.813735870195430252326093249797922409363e-1L, -0.0L),
4522 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, -8.813735870195430252326093249797922409363e-1L, -0.0L),
4523#endif
4524 TEST_c_c (casinh, 0x1p-112L, 0.5L, 2.223872343664663196047610660420739543258e-34L, 5.235987755982988730771072305465838140329e-1L),
4525 TEST_c_c (casinh, 0x1p-112L, -0.5L, 2.223872343664663196047610660420739543258e-34L, -5.235987755982988730771072305465838140329e-1L),
4526 TEST_c_c (casinh, -0x1p-112L, 0.5L, -2.223872343664663196047610660420739543258e-34L, 5.235987755982988730771072305465838140329e-1L),
4527 TEST_c_c (casinh, -0x1p-112L, -0.5L, -2.223872343664663196047610660420739543258e-34L, -5.235987755982988730771072305465838140329e-1L),
4528 TEST_c_c (casinh, 0.5L, 0x1p-112L, 4.812118250596034474977589134243684231352e-1L, 1.722604110220899568310153280070398629037e-34L),
4529 TEST_c_c (casinh, -0.5L, 0x1p-112L, -4.812118250596034474977589134243684231352e-1L, 1.722604110220899568310153280070398629037e-34L),
4530 TEST_c_c (casinh, 0.5L, -0x1p-112L, 4.812118250596034474977589134243684231352e-1L, -1.722604110220899568310153280070398629037e-34L),
4531 TEST_c_c (casinh, -0.5L, -0x1p-112L, -4.812118250596034474977589134243684231352e-1L, -1.722604110220899568310153280070398629037e-34L),
4532 TEST_c_c (casinh, 0x1p-112L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.925929944387235853055977942584927318538e-34L),
4533 TEST_c_c (casinh, 0x1p-112L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.925929944387235853055977942584927318538e-34L),
4534 TEST_c_c (casinh, -0x1p-112L, 0x1p-112L, -1.925929944387235853055977942584927318538e-34L, 1.925929944387235853055977942584927318538e-34L),
4535 TEST_c_c (casinh, -0x1p-112L, -0x1p-112L, -1.925929944387235853055977942584927318538e-34L, -1.925929944387235853055977942584927318538e-34L),
ccc8cadf 4536#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 4537 TEST_c_c (casinh, 0x1.fp-16385L, 0x1p-112L, 8.142593549724601460479922838826119584417e-4933L, 1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4538 TEST_c_c (casinh, 0x1.fp-16385L, -0x1p-112L, 8.142593549724601460479922838826119584417e-4933L, -1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4539 TEST_c_c (casinh, -0x1.fp-16385L, 0x1p-112L, -8.142593549724601460479922838826119584417e-4933L, 1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4540 TEST_c_c (casinh, -0x1.fp-16385L, -0x1p-112L, -8.142593549724601460479922838826119584417e-4933L, -1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4541 TEST_c_c (casinh, 0x1p-112L, 0x1.fp-16385L, 1.925929944387235853055977942584927318538e-34L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4542 TEST_c_c (casinh, -0x1p-112L, 0x1.fp-16385L, -1.925929944387235853055977942584927318538e-34L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4543 TEST_c_c (casinh, 0x1p-112L, -0x1.fp-16385L, 1.925929944387235853055977942584927318538e-34L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4544 TEST_c_c (casinh, -0x1p-112L, -0x1.fp-16385L, -1.925929944387235853055977942584927318538e-34L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4545#endif
4546 TEST_c_c (casinh, 0.0L, 0x1p-112L, 0.0L, 1.925929944387235853055977942584927318538e-34L),
4547 TEST_c_c (casinh, 0.0L, -0x1p-112L, 0.0L, -1.925929944387235853055977942584927318538e-34L),
4548 TEST_c_c (casinh, -0.0L, 0x1p-112L, -0.0L, 1.925929944387235853055977942584927318538e-34L),
4549 TEST_c_c (casinh, -0.0L, -0x1p-112L, -0.0L, -1.925929944387235853055977942584927318538e-34L),
4550 TEST_c_c (casinh, 0x1p-112L, 0.0L, 1.925929944387235853055977942584927318538e-34L, 0.0L),
4551 TEST_c_c (casinh, -0x1p-112L, 0.0L, -1.925929944387235853055977942584927318538e-34L, 0.0L),
4552 TEST_c_c (casinh, 0x1p-112L, -0.0L, 1.925929944387235853055977942584927318538e-34L, -0.0L),
4553 TEST_c_c (casinh, -0x1p-112L, -0.0L, -1.925929944387235853055977942584927318538e-34L, -0.0L),
4554
4555 TEST_c_c (casinh, 0.75L, 1.25L, 1.03171853444778027336364058631006594L, 0.911738290968487636358489564316731207L),
4556 TEST_c_c (casinh, -2, -3, -1.9686379257930962917886650952454982L, -0.96465850440760279204541105949953237L),
4557 END_DATA (casinh)
4558 };
8847214f
UD		 4559
4560static void
08198877 4561casinh_test (void)
8847214f 4562{
aaca11d8 4563 errno = 0;
08198877 4564 FUNC(casinh) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD		 4565 if (errno == ENOSYS)
4566 /* Function not implemented. */
4567 return;
4568
08198877
JM		 4569 START (casinh);
4570 RUN_TEST_LOOP_c_c (casinh, casinh_test_data, );
4571 END (casinh, complex);
4572}
4573
8847214f 4574
08198877
JM		 4575static const struct test_c_c_data catan_test_data[] =
4576 {
4577 START_DATA (catan),
4578 TEST_c_c (catan, 0, 0, 0, 0),
4579 TEST_c_c (catan, minus_zero, 0, minus_zero, 0),
4580 TEST_c_c (catan, 0, minus_zero, 0, minus_zero),
4581 TEST_c_c (catan, minus_zero, minus_zero, minus_zero, minus_zero),
4582
4583 TEST_c_c (catan, 1.0L, plus_zero, M_PI_4l, plus_zero),
4584 TEST_c_c (catan, 1.0L, minus_zero, M_PI_4l, minus_zero),
4585 TEST_c_c (catan, -1.0L, plus_zero, -M_PI_4l, plus_zero),
4586 TEST_c_c (catan, -1.0L, minus_zero, -M_PI_4l, minus_zero),
4587 TEST_c_c (catan, plus_zero, 1.0L, plus_zero, plus_infty, DIVIDE_BY_ZERO_EXCEPTION),
4588 TEST_c_c (catan, minus_zero, 1.0L, minus_zero, plus_infty, DIVIDE_BY_ZERO_EXCEPTION),
4589 TEST_c_c (catan, plus_zero, -1.0L, plus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
4590 TEST_c_c (catan, minus_zero, -1.0L, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
4591
4592 TEST_c_c (catan, plus_infty, plus_infty, M_PI_2l, 0),
4593 TEST_c_c (catan, plus_infty, minus_infty, M_PI_2l, minus_zero),
4594 TEST_c_c (catan, minus_infty, plus_infty, -M_PI_2l, 0),
4595 TEST_c_c (catan, minus_infty, minus_infty, -M_PI_2l, minus_zero),
4596
4597
4598 TEST_c_c (catan, plus_infty, -10.0, M_PI_2l, minus_zero),
4599 TEST_c_c (catan, minus_infty, -10.0, -M_PI_2l, minus_zero),
4600 TEST_c_c (catan, plus_infty, minus_zero, M_PI_2l, minus_zero),
4601 TEST_c_c (catan, minus_infty, minus_zero, -M_PI_2l, minus_zero),
4602 TEST_c_c (catan, plus_infty, 0.0, M_PI_2l, 0),
4603 TEST_c_c (catan, minus_infty, 0.0, -M_PI_2l, 0),
4604 TEST_c_c (catan, plus_infty, 0.1L, M_PI_2l, 0),
4605 TEST_c_c (catan, minus_infty, 0.1L, -M_PI_2l, 0),
4606
4607 TEST_c_c (catan, 0.0, minus_infty, M_PI_2l, minus_zero),
4608 TEST_c_c (catan, minus_zero, minus_infty, -M_PI_2l, minus_zero),
4609 TEST_c_c (catan, 100.0, minus_infty, M_PI_2l, minus_zero),
4610 TEST_c_c (catan, -100.0, minus_infty, -M_PI_2l, minus_zero),
4611
4612 TEST_c_c (catan, 0.0, plus_infty, M_PI_2l, 0),
4613 TEST_c_c (catan, minus_zero, plus_infty, -M_PI_2l, 0),
4614 TEST_c_c (catan, 0.5, plus_infty, M_PI_2l, 0),
4615 TEST_c_c (catan, -0.5, plus_infty, -M_PI_2l, 0),
4616
4617 TEST_c_c (catan, qnan_value, 0.0, qnan_value, 0),
4618 TEST_c_c (catan, qnan_value, minus_zero, qnan_value, minus_zero),
4619
4620 TEST_c_c (catan, qnan_value, plus_infty, qnan_value, 0),
4621 TEST_c_c (catan, qnan_value, minus_infty, qnan_value, minus_zero),
4622
4623 TEST_c_c (catan, 0.0, qnan_value, qnan_value, qnan_value),
4624 TEST_c_c (catan, minus_zero, qnan_value, qnan_value, qnan_value),
4625
4626 TEST_c_c (catan, plus_infty, qnan_value, M_PI_2l, 0, IGNORE_ZERO_INF_SIGN),
4627 TEST_c_c (catan, minus_infty, qnan_value, -M_PI_2l, 0, IGNORE_ZERO_INF_SIGN),
4628
4629 TEST_c_c (catan, qnan_value, 10.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4630 TEST_c_c (catan, qnan_value, -10.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4631
4632 TEST_c_c (catan, 0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4633 TEST_c_c (catan, -0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4634
4635 TEST_c_c (catan, qnan_value, qnan_value, qnan_value, qnan_value),
4636
4637 TEST_c_c (catan, 0x1p50L, 0.0L, 1.570796326794895731052901991514519103193L, 0.0L),
4638 TEST_c_c (catan, 0x1p50L, -0.0L, 1.570796326794895731052901991514519103193L, -0.0L),
4639 TEST_c_c (catan, -0x1p50L, 0.0L, -1.570796326794895731052901991514519103193L, 0.0L),
4640 TEST_c_c (catan, -0x1p50L, -0.0L, -1.570796326794895731052901991514519103193L, -0.0L),
4641 TEST_c_c (catan, 0.0L, 0x1p50L, 1.570796326794896619231321691639751442099L, 8.881784197001252323389053344728897997441e-16L),
4642 TEST_c_c (catan, -0.0L, 0x1p50L, -1.570796326794896619231321691639751442099L, 8.881784197001252323389053344728897997441e-16L),
4643 TEST_c_c (catan, 0.0L, -0x1p50L, 1.570796326794896619231321691639751442099L, -8.881784197001252323389053344728897997441e-16L),
4644 TEST_c_c (catan, -0.0L, -0x1p50L, -1.570796326794896619231321691639751442099L, -8.881784197001252323389053344728897997441e-16L),
2f38fbfe 4645#ifndef TEST_FLOAT
08198877
JM		 4646 TEST_c_c (catan, 0x1p500L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4647 TEST_c_c (catan, 0x1p500L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4648 TEST_c_c (catan, -0x1p500L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4649 TEST_c_c (catan, -0x1p500L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4650 TEST_c_c (catan, 0.0L, 0x1p500L, 1.570796326794896619231321691639751442099L, 3.054936363499604682051979393213617699789e-151L),
4651 TEST_c_c (catan, -0.0L, 0x1p500L, -1.570796326794896619231321691639751442099L, 3.054936363499604682051979393213617699789e-151L),
4652 TEST_c_c (catan, 0.0L, -0x1p500L, 1.570796326794896619231321691639751442099L, -3.054936363499604682051979393213617699789e-151L),
4653 TEST_c_c (catan, -0.0L, -0x1p500L, -1.570796326794896619231321691639751442099L, -3.054936363499604682051979393213617699789e-151L),
2f38fbfe
JM		 4654#endif
4655#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 4656 TEST_c_c (catan, 0x1p5000L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4657 TEST_c_c (catan, 0x1p5000L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4658 TEST_c_c (catan, -0x1p5000L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4659 TEST_c_c (catan, -0x1p5000L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4660 TEST_c_c (catan, 0.0L, 0x1p5000L, 1.570796326794896619231321691639751442099L, 7.079811261048172892385615158694057552948e-1506L),
4661 TEST_c_c (catan, -0.0L, 0x1p5000L, -1.570796326794896619231321691639751442099L, 7.079811261048172892385615158694057552948e-1506L),
4662 TEST_c_c (catan, 0.0L, -0x1p5000L, 1.570796326794896619231321691639751442099L, -7.079811261048172892385615158694057552948e-1506L),
4663 TEST_c_c (catan, -0.0L, -0x1p5000L, -1.570796326794896619231321691639751442099L, -7.079811261048172892385615158694057552948e-1506L),
4664#endif
4665 TEST_c_c (catan, 0x1p63L, 0.5L, 1.570796326794896619122901474391200998698L, 5.877471754111437539843682686111228389007e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4666 TEST_c_c (catan, 0x1p63L, -0.5L, 1.570796326794896619122901474391200998698L, -5.877471754111437539843682686111228389007e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4667 TEST_c_c (catan, -0x1p63L, 0.5L, -1.570796326794896619122901474391200998698L, 5.877471754111437539843682686111228389007e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4668 TEST_c_c (catan, -0x1p63L, -0.5L, -1.570796326794896619122901474391200998698L, -5.877471754111437539843682686111228389007e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4669 TEST_c_c (catan, 0.5L, 0x1p63L, 1.570796326794896619231321691639751442093L, 1.084202172485504434007452800869941711427e-19L),
4670 TEST_c_c (catan, -0.5L, 0x1p63L, -1.570796326794896619231321691639751442093L, 1.084202172485504434007452800869941711427e-19L),
4671 TEST_c_c (catan, 0.5L, -0x1p63L, 1.570796326794896619231321691639751442093L, -1.084202172485504434007452800869941711427e-19L),
4672 TEST_c_c (catan, -0.5L, -0x1p63L, -1.570796326794896619231321691639751442093L, -1.084202172485504434007452800869941711427e-19L),
9457fd95 4673#ifndef TEST_FLOAT
08198877
JM		 4674 TEST_c_c (catan, 0x1p511L, 0.5L, 1.570796326794896619231321691639751442099L, 1.112536929253600691545116358666202032110e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4675 TEST_c_c (catan, 0x1p511L, -0.5L, 1.570796326794896619231321691639751442099L, -1.112536929253600691545116358666202032110e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4676 TEST_c_c (catan, -0x1p511L, 0.5L, -1.570796326794896619231321691639751442099L, 1.112536929253600691545116358666202032110e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4677 TEST_c_c (catan, -0x1p511L, -0.5L, -1.570796326794896619231321691639751442099L, -1.112536929253600691545116358666202032110e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4678 TEST_c_c (catan, 0.5L, 0x1p511L, 1.570796326794896619231321691639751442099L, 1.491668146240041348658193063092586767475e-154L),
4679 TEST_c_c (catan, -0.5L, 0x1p511L, -1.570796326794896619231321691639751442099L, 1.491668146240041348658193063092586767475e-154L),
4680 TEST_c_c (catan, 0.5L, -0x1p511L, 1.570796326794896619231321691639751442099L, -1.491668146240041348658193063092586767475e-154L),
4681 TEST_c_c (catan, -0.5L, -0x1p511L, -1.570796326794896619231321691639751442099L, -1.491668146240041348658193063092586767475e-154L),
9457fd95
JM		 4682#endif
4683#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 4684 TEST_c_c (catan, 0x1p8191L, 0.5L, 1.570796326794896619231321691639751442099L, 1.681051571556046753131338908660876301299e-4932L, UNDERFLOW_EXCEPTION),
4685 TEST_c_c (catan, 0x1p8191L, -0.5L, 1.570796326794896619231321691639751442099L, -1.681051571556046753131338908660876301299e-4932L, UNDERFLOW_EXCEPTION),
4686 TEST_c_c (catan, -0x1p8191L, 0.5L, -1.570796326794896619231321691639751442099L, 1.681051571556046753131338908660876301299e-4932L, UNDERFLOW_EXCEPTION),
4687 TEST_c_c (catan, -0x1p8191L, -0.5L, -1.570796326794896619231321691639751442099L, -1.681051571556046753131338908660876301299e-4932L, UNDERFLOW_EXCEPTION),
4688 TEST_c_c (catan, 0.5L, 0x1p8191L, 1.570796326794896619231321691639751442099L, 1.833603867554847165621412392048483165956e-2466L),
4689 TEST_c_c (catan, -0.5L, 0x1p8191L, -1.570796326794896619231321691639751442099L, 1.833603867554847165621412392048483165956e-2466L),
4690 TEST_c_c (catan, 0.5L, -0x1p8191L, 1.570796326794896619231321691639751442099L, -1.833603867554847165621412392048483165956e-2466L),
4691 TEST_c_c (catan, -0.5L, -0x1p8191L, -1.570796326794896619231321691639751442099L, -1.833603867554847165621412392048483165956e-2466L),
4692#endif
4693 TEST_c_c (catan, 0x1p100L, 0.0L, 1.570796326794896619231321691638962581193L, 0.0L),
4694 TEST_c_c (catan, 0x1p100L, -0.0L, 1.570796326794896619231321691638962581193L, -0.0L),
4695 TEST_c_c (catan, -0x1p100L, 0.0L, -1.570796326794896619231321691638962581193L, 0.0L),
4696 TEST_c_c (catan, -0x1p100L, -0.0L, -1.570796326794896619231321691638962581193L, -0.0L),
4697 TEST_c_c (catan, 0.0L, 0x1p100L, 1.570796326794896619231321691639751442099L, 7.888609052210118054117285652827862296732e-31L),
4698 TEST_c_c (catan, -0.0L, 0x1p100L, -1.570796326794896619231321691639751442099L, 7.888609052210118054117285652827862296732e-31L),
4699 TEST_c_c (catan, 0.0L, -0x1p100L, 1.570796326794896619231321691639751442099L, -7.888609052210118054117285652827862296732e-31L),
4700 TEST_c_c (catan, -0.0L, -0x1p100L, -1.570796326794896619231321691639751442099L, -7.888609052210118054117285652827862296732e-31L),
4701 TEST_c_c (catan, 0x1.fp127L, 0.0L, 1.570796326794896619231321691639751442096L, 0.0L),
4702 TEST_c_c (catan, 0x1.fp127L, -0.0L, 1.570796326794896619231321691639751442096L, -0.0L),
4703 TEST_c_c (catan, -0x1.fp127L, 0.0L, -1.570796326794896619231321691639751442096L, 0.0L),
4704 TEST_c_c (catan, -0x1.fp127L, -0.0L, -1.570796326794896619231321691639751442096L, -0.0L),
4705 TEST_c_c (catan, 0.0L, 0x1.fp127L, 1.570796326794896619231321691639751442099L, 3.033533808573645181854803967025150136306e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4706 TEST_c_c (catan, -0.0L, 0x1.fp127L, -1.570796326794896619231321691639751442099L, 3.033533808573645181854803967025150136306e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4707 TEST_c_c (catan, 0.0L, -0x1.fp127L, 1.570796326794896619231321691639751442099L, -3.033533808573645181854803967025150136306e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4708 TEST_c_c (catan, -0.0L, -0x1.fp127L, -1.570796326794896619231321691639751442099L, -3.033533808573645181854803967025150136306e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4709 TEST_c_c (catan, 0x1.fp127L, 0x1.fp127L, 1.570796326794896619231321691639751442097L, 1.516766904286822590927401983512575068153e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4710 TEST_c_c (catan, 0x1.fp127L, -0x1.fp127L, 1.570796326794896619231321691639751442097L, -1.516766904286822590927401983512575068153e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4711 TEST_c_c (catan, -0x1.fp127L, 0x1.fp127L, -1.570796326794896619231321691639751442097L, 1.516766904286822590927401983512575068153e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4712 TEST_c_c (catan, -0x1.fp127L, -0x1.fp127L, -1.570796326794896619231321691639751442097L, -1.516766904286822590927401983512575068153e-39L, UNDERFLOW_EXCEPTION_FLOAT),
5b4217d7 4713#ifndef TEST_FLOAT
08198877
JM		 4714 TEST_c_c (catan, 0x1p900L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4715 TEST_c_c (catan, 0x1p900L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4716 TEST_c_c (catan, -0x1p900L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4717 TEST_c_c (catan, -0x1p900L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4718 TEST_c_c (catan, 0.0L, 0x1p900L, 1.570796326794896619231321691639751442099L, 1.183052186166774710972751597518026531652e-271L),
4719 TEST_c_c (catan, -0.0L, 0x1p900L, -1.570796326794896619231321691639751442099L, 1.183052186166774710972751597518026531652e-271L),
4720 TEST_c_c (catan, 0.0L, -0x1p900L, 1.570796326794896619231321691639751442099L, -1.183052186166774710972751597518026531652e-271L),
4721 TEST_c_c (catan, -0.0L, -0x1p900L, -1.570796326794896619231321691639751442099L, -1.183052186166774710972751597518026531652e-271L),
4722 TEST_c_c (catan, 0x1.fp1023L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4723 TEST_c_c (catan, 0x1.fp1023L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4724 TEST_c_c (catan, -0x1.fp1023L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4725 TEST_c_c (catan, -0x1.fp1023L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4726 TEST_c_c (catan, 0.0L, 0x1.fp1023L, 1.570796326794896619231321691639751442099L, 5.742126086470197117652213464083623391533e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4727 TEST_c_c (catan, -0.0L, 0x1.fp1023L, -1.570796326794896619231321691639751442099L, 5.742126086470197117652213464083623391533e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4728 TEST_c_c (catan, 0.0L, -0x1.fp1023L, 1.570796326794896619231321691639751442099L, -5.742126086470197117652213464083623391533e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4729 TEST_c_c (catan, -0.0L, -0x1.fp1023L, -1.570796326794896619231321691639751442099L, -5.742126086470197117652213464083623391533e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4730 TEST_c_c (catan, 0x1.fp1023L, 0x1.fp1023L, 1.570796326794896619231321691639751442099L, 2.871063043235098558826106732041811695767e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4731 TEST_c_c (catan, 0x1.fp1023L, -0x1.fp1023L, 1.570796326794896619231321691639751442099L, -2.871063043235098558826106732041811695767e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4732 TEST_c_c (catan, -0x1.fp1023L, 0x1.fp1023L, -1.570796326794896619231321691639751442099L, 2.871063043235098558826106732041811695767e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4733 TEST_c_c (catan, -0x1.fp1023L, -0x1.fp1023L, -1.570796326794896619231321691639751442099L, -2.871063043235098558826106732041811695767e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
5b4217d7
JM		 4734#endif
4735#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 4736 TEST_c_c (catan, 0x1p10000L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4737 TEST_c_c (catan, 0x1p10000L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4738 TEST_c_c (catan, -0x1p10000L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4739 TEST_c_c (catan, -0x1p10000L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4740 TEST_c_c (catan, 0.0L, 0x1p10000L, 1.570796326794896619231321691639751442099L, 5.012372749206452009297555933742977749322e-3011L),
4741 TEST_c_c (catan, -0.0L, 0x1p10000L, -1.570796326794896619231321691639751442099L, 5.012372749206452009297555933742977749322e-3011L),
4742 TEST_c_c (catan, 0.0L, -0x1p10000L, 1.570796326794896619231321691639751442099L, -5.012372749206452009297555933742977749322e-3011L),
4743 TEST_c_c (catan, -0.0L, -0x1p10000L, -1.570796326794896619231321691639751442099L, -5.012372749206452009297555933742977749322e-3011L),
4744 TEST_c_c (catan, 0x1.fp16383L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4745 TEST_c_c (catan, 0x1.fp16383L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4746 TEST_c_c (catan, -0x1.fp16383L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4747 TEST_c_c (catan, -0x1.fp16383L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4748 TEST_c_c (catan, 0.0L, 0x1.fp16383L, 1.570796326794896619231321691639751442099L, 8.676395208031209048419813722120651877672e-4933L, UNDERFLOW_EXCEPTION),
4749 TEST_c_c (catan, -0.0L, 0x1.fp16383L, -1.570796326794896619231321691639751442099L, 8.676395208031209048419813722120651877672e-4933L, UNDERFLOW_EXCEPTION),
4750 TEST_c_c (catan, 0.0L, -0x1.fp16383L, 1.570796326794896619231321691639751442099L, -8.676395208031209048419813722120651877672e-4933L, UNDERFLOW_EXCEPTION),
4751 TEST_c_c (catan, -0.0L, -0x1.fp16383L, -1.570796326794896619231321691639751442099L, -8.676395208031209048419813722120651877672e-4933L, UNDERFLOW_EXCEPTION),
4752 TEST_c_c (catan, 0x1.fp16383L, 0x1.fp16383L, 1.570796326794896619231321691639751442099L, 4.338197604015604524209906861060325938836e-4933L, UNDERFLOW_EXCEPTION),
4753 TEST_c_c (catan, 0x1.fp16383L, -0x1.fp16383L, 1.570796326794896619231321691639751442099L, -4.338197604015604524209906861060325938836e-4933L, UNDERFLOW_EXCEPTION),
4754 TEST_c_c (catan, -0x1.fp16383L, 0x1.fp16383L, -1.570796326794896619231321691639751442099L, 4.338197604015604524209906861060325938836e-4933L, UNDERFLOW_EXCEPTION),
4755 TEST_c_c (catan, -0x1.fp16383L, -0x1.fp16383L, -1.570796326794896619231321691639751442099L, -4.338197604015604524209906861060325938836e-4933L, UNDERFLOW_EXCEPTION),
4756#endif
4757 TEST_c_c (catan, 0x1p-13L, 1.0L, 7.854286809755354140031716771044626356262e-1L, 4.852030264850939738801379894163661227127L),
4758 TEST_c_c (catan, 0x1p-13L, -1.0L, 7.854286809755354140031716771044626356262e-1L, -4.852030264850939738801379894163661227127L),
4759 TEST_c_c (catan, -0x1p-13L, 1.0L, -7.854286809755354140031716771044626356262e-1L, 4.852030264850939738801379894163661227127L),
4760 TEST_c_c (catan, -0x1p-13L, -1.0L, -7.854286809755354140031716771044626356262e-1L, -4.852030264850939738801379894163661227127L),
4761 TEST_c_c (catan, 1.0L, 0x1p-13L, 7.853981671227386080775748393881580082970e-1L, 6.103515609841754902688560615027452023669e-5L),
4762 TEST_c_c (catan, -1.0L, 0x1p-13L, -7.853981671227386080775748393881580082970e-1L, 6.103515609841754902688560615027452023669e-5L),
4763 TEST_c_c (catan, 1.0L, -0x1p-13L, 7.853981671227386080775748393881580082970e-1L, -6.103515609841754902688560615027452023669e-5L),
4764 TEST_c_c (catan, -1.0L, -0x1p-13L, -7.853981671227386080775748393881580082970e-1L, -6.103515609841754902688560615027452023669e-5L),
4765 TEST_c_c (catan, 0x1p-27L, 1.0L, 7.853981652600934588466178684534110069553e-1L, 9.704060527839234335310696652368086117807L),
4766 TEST_c_c (catan, 0x1p-27L, -1.0L, 7.853981652600934588466178684534110069553e-1L, -9.704060527839234335310696652368086117807L),
4767 TEST_c_c (catan, -0x1p-27L, 1.0L, -7.853981652600934588466178684534110069553e-1L, 9.704060527839234335310696652368086117807L),
4768 TEST_c_c (catan, -0x1p-27L, -1.0L, -7.853981652600934588466178684534110069553e-1L, -9.704060527839234335310696652368086117807L),
4769 TEST_c_c (catan, 1.0L, 0x1p-27L, 7.853981633974483234934486536343324763447e-1L, 3.725290298461914028034141143623846306386e-9L),
4770 TEST_c_c (catan, -1.0L, 0x1p-27L, -7.853981633974483234934486536343324763447e-1L, 3.725290298461914028034141143623846306386e-9L),
4771 TEST_c_c (catan, 1.0L, -0x1p-27L, 7.853981633974483234934486536343324763447e-1L, -3.725290298461914028034141143623846306386e-9L),
4772 TEST_c_c (catan, -1.0L, -0x1p-27L, -7.853981633974483234934486536343324763447e-1L, -3.725290298461914028034141143623846306386e-9L),
4773 TEST_c_c (catan, 0x1p-33L, 1.0L, 7.853981634265521400723945494331241018449e-1L, 1.178350206951907026009379309773625595762e1L),
4774 TEST_c_c (catan, 0x1p-33L, -1.0L, 7.853981634265521400723945494331241018449e-1L, -1.178350206951907026009379309773625595762e1L),
4775 TEST_c_c (catan, -0x1p-33L, 1.0L, -7.853981634265521400723945494331241018449e-1L, 1.178350206951907026009379309773625595762e1L),
4776 TEST_c_c (catan, -0x1p-33L, -1.0L, -7.853981634265521400723945494331241018449e-1L, -1.178350206951907026009379309773625595762e1L),
4777 TEST_c_c (catan, 1.0L, 0x1p-33L, 7.853981633974483096190489776088929224056e-1L, 5.820766091346740722643102318246316469910e-11L),
4778 TEST_c_c (catan, -1.0L, 0x1p-33L, -7.853981633974483096190489776088929224056e-1L, 5.820766091346740722643102318246316469910e-11L),
4779 TEST_c_c (catan, 1.0L, -0x1p-33L, 7.853981633974483096190489776088929224056e-1L, -5.820766091346740722643102318246316469910e-11L),
4780 TEST_c_c (catan, -1.0L, -0x1p-33L, -7.853981633974483096190489776088929224056e-1L, -5.820766091346740722643102318246316469910e-11L),
4781 TEST_c_c (catan, 0x1p-54L, 1.0L, 7.853981633974483234934486536343324763447e-1L, 1.906154746539849600897388334009985581467e1L),
4782 TEST_c_c (catan, 0x1p-54L, -1.0L, 7.853981633974483234934486536343324763447e-1L, -1.906154746539849600897388334009985581467e1L),
4783 TEST_c_c (catan, -0x1p-54L, 1.0L, -7.853981633974483234934486536343324763447e-1L, 1.906154746539849600897388334009985581467e1L),
4784 TEST_c_c (catan, -0x1p-54L, -1.0L, -7.853981633974483234934486536343324763447e-1L, -1.906154746539849600897388334009985581467e1L),
4785 TEST_c_c (catan, 1.0L, 0x1p-54L, 7.853981633974483096156608458198764914213e-1L, 2.775557561562891351059079170227049355775e-17L),
4786 TEST_c_c (catan, -1.0L, 0x1p-54L, -7.853981633974483096156608458198764914213e-1L, 2.775557561562891351059079170227049355775e-17L),
4787 TEST_c_c (catan, 1.0L, -0x1p-54L, 7.853981633974483096156608458198764914213e-1L, -2.775557561562891351059079170227049355775e-17L),
4788 TEST_c_c (catan, -1.0L, -0x1p-54L, -7.853981633974483096156608458198764914213e-1L, -2.775557561562891351059079170227049355775e-17L),
4789 TEST_c_c (catan, 0x1p-57L, 1.0L, 7.853981633974483113503843217966828154612e-1L, 2.010126823623841397309973152228712047720e1L),
4790 TEST_c_c (catan, 0x1p-57L, -1.0L, 7.853981633974483113503843217966828154612e-1L, -2.010126823623841397309973152228712047720e1L),
4791 TEST_c_c (catan, -0x1p-57L, 1.0L, -7.853981633974483113503843217966828154612e-1L, 2.010126823623841397309973152228712047720e1L),
4792 TEST_c_c (catan, -0x1p-57L, -1.0L, -7.853981633974483113503843217966828154612e-1L, -2.010126823623841397309973152228712047720e1L),
4793 TEST_c_c (catan, 1.0L, 0x1p-57L, 7.853981633974483096156608458198757330864e-1L, 3.469446951953614188823848962783813448721e-18L),
4794 TEST_c_c (catan, -1.0L, 0x1p-57L, -7.853981633974483096156608458198757330864e-1L, 3.469446951953614188823848962783813448721e-18L),
4795 TEST_c_c (catan, 1.0L, -0x1p-57L, 7.853981633974483096156608458198757330864e-1L, -3.469446951953614188823848962783813448721e-18L),
4796 TEST_c_c (catan, -1.0L, -0x1p-57L, -7.853981633974483096156608458198757330864e-1L, -3.469446951953614188823848962783813448721e-18L),
4797 TEST_c_c (catan, 0x1p-13L, 0x1.000002p0L, 7.859169620684960844300240092596908675974e-1L, 4.852030056234795712498957387213592193975L),
4798 TEST_c_c (catan, 0x1p-13L, -0x1.000002p0L, 7.859169620684960844300240092596908675974e-1L, -4.852030056234795712498957387213592193975L),
4799 TEST_c_c (catan, -0x1p-13L, 0x1.000002p0L, -7.859169620684960844300240092596908675974e-1L, 4.852030056234795712498957387213592193975L),
4800 TEST_c_c (catan, -0x1p-13L, -0x1.000002p0L, -7.859169620684960844300240092596908675974e-1L, -4.852030056234795712498957387213592193975L),
4801 TEST_c_c (catan, 0x1.000002p0L, 0x1p-13L, 7.853982267273793866654490522673596014524e-1L, 6.103514882246036852433556327261700380577e-5L),
4802 TEST_c_c (catan, -0x1.000002p0L, 0x1p-13L, -7.853982267273793866654490522673596014524e-1L, 6.103514882246036852433556327261700380577e-5L),
4803 TEST_c_c (catan, 0x1.000002p0L, -0x1p-13L, 7.853982267273793866654490522673596014524e-1L, -6.103514882246036852433556327261700380577e-5L),
4804 TEST_c_c (catan, -0x1.000002p0L, -0x1p-13L, -7.853982267273793866654490522673596014524e-1L, -6.103514882246036852433556327261700380577e-5L),
4805 TEST_c_c (catan, 0x1p-13L, 0x0.ffffffp0L, 7.851845403708474595909269086711426246675e-1L, 4.852030190345140708455871037447717761868L),
4806 TEST_c_c (catan, 0x1p-13L, -0x0.ffffffp0L, 7.851845403708474595909269086711426246675e-1L, -4.852030190345140708455871037447717761868L),
4807 TEST_c_c (catan, -0x1p-13L, 0x0.ffffffp0L, -7.851845403708474595909269086711426246675e-1L, 4.852030190345140708455871037447717761868L),
4808 TEST_c_c (catan, -0x1p-13L, -0x0.ffffffp0L, -7.851845403708474595909269086711426246675e-1L, -4.852030190345140708455871037447717761868L),
4809 TEST_c_c (catan, 0x0.ffffffp0L, 0x1p-13L, 7.853981373204155542484315721351697277336e-1L, 6.103515973639646453881721999956617260502e-5L),
4810 TEST_c_c (catan, -0x0.ffffffp0L, 0x1p-13L, -7.853981373204155542484315721351697277336e-1L, 6.103515973639646453881721999956617260502e-5L),
4811 TEST_c_c (catan, 0x0.ffffffp0L, -0x1p-13L, 7.853981373204155542484315721351697277336e-1L, -6.103515973639646453881721999956617260502e-5L),
4812 TEST_c_c (catan, -0x0.ffffffp0L, -0x1p-13L, -7.853981373204155542484315721351697277336e-1L, -6.103515973639646453881721999956617260502e-5L),
caf84319 4813#ifndef TEST_FLOAT
08198877
JM		 4814 TEST_c_c (catan, 0x1p-27L, 0x1.0000000000001p0L, 7.853981801612546526942695000283242525531e-1L, 9.704060527839234168777242958594699810015L),
4815 TEST_c_c (catan, 0x1p-27L, -0x1.0000000000001p0L, 7.853981801612546526942695000283242525531e-1L, -9.704060527839234168777242958594699810015L),
4816 TEST_c_c (catan, -0x1p-27L, 0x1.0000000000001p0L, -7.853981801612546526942695000283242525531e-1L, 9.704060527839234168777242958594699810015L),
4817 TEST_c_c (catan, -0x1p-27L, -0x1.0000000000001p0L, -7.853981801612546526942695000283242525531e-1L, -9.704060527839234168777242958594699810015L),
4818 TEST_c_c (catan, 0x1.0000000000001p0L, 0x1p-27L, 7.853981633974484345157511161499711112683e-1L, 3.725290298461913200853528590596263270474e-9L),
4819 TEST_c_c (catan, -0x1.0000000000001p0L, 0x1p-27L, -7.853981633974484345157511161499711112683e-1L, 3.725290298461913200853528590596263270474e-9L),
4820 TEST_c_c (catan, 0x1.0000000000001p0L, -0x1p-27L, 7.853981633974484345157511161499711112683e-1L, -3.725290298461913200853528590596263270474e-9L),
4821 TEST_c_c (catan, -0x1.0000000000001p0L, -0x1p-27L, -7.853981633974484345157511161499711112683e-1L, -3.725290298461913200853528590596263270474e-9L),
4822 TEST_c_c (catan, 0x1p-27L, 0x0.fffffffffffff8p0L, 7.853981578095128619227903983047292781021e-1L, 9.704060527839234252043969805481351363824L),
4823 TEST_c_c (catan, 0x1p-27L, -0x0.fffffffffffff8p0L, 7.853981578095128619227903983047292781021e-1L, -9.704060527839234252043969805481351363824L),
4824 TEST_c_c (catan, -0x1p-27L, 0x0.fffffffffffff8p0L, -7.853981578095128619227903983047292781021e-1L, 9.704060527839234252043969805481351363824L),
4825 TEST_c_c (catan, -0x1p-27L, -0x0.fffffffffffff8p0L, -7.853981578095128619227903983047292781021e-1L, -9.704060527839234252043969805481351363824L),
4826 TEST_c_c (catan, 0x0.fffffffffffff8p0L, 0x1p-27L, 7.853981633974482679822974223765039144191e-1L, 3.725290298461914441624447420137706700965e-9L),
4827 TEST_c_c (catan, -0x0.fffffffffffff8p0L, 0x1p-27L, -7.853981633974482679822974223765039144191e-1L, 3.725290298461914441624447420137706700965e-9L),
4828 TEST_c_c (catan, 0x0.fffffffffffff8p0L, -0x1p-27L, 7.853981633974482679822974223765039144191e-1L, -3.725290298461914441624447420137706700965e-9L),
4829 TEST_c_c (catan, -0x0.fffffffffffff8p0L, -0x1p-27L, -7.853981633974482679822974223765039144191e-1L, -3.725290298461914441624447420137706700965e-9L),
caf84319
JM		 4830#endif
4831#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 4832 TEST_c_c (catan, 0x1p-33L, 0x1.0000000000000002p0L, 7.853981638922134273801338071094141188767e-1L, 1.178350206951907025990405771755129268176e1L),
4833 TEST_c_c (catan, 0x1p-33L, -0x1.0000000000000002p0L, 7.853981638922134273801338071094141188767e-1L, -1.178350206951907025990405771755129268176e1L),
4834 TEST_c_c (catan, -0x1p-33L, 0x1.0000000000000002p0L, -7.853981638922134273801338071094141188767e-1L, 1.178350206951907025990405771755129268176e1L),
4835 TEST_c_c (catan, -0x1p-33L, -0x1.0000000000000002p0L, -7.853981638922134273801338071094141188767e-1L, -1.178350206951907025990405771755129268176e1L),
4836 TEST_c_c (catan, 0x1.0000000000000002p0L, 0x1p-33L, 7.853981633974483096732590862331681441026e-1L, 5.820766091346740722012013594069507025615e-11L),
4837 TEST_c_c (catan, -0x1.0000000000000002p0L, 0x1p-33L, -7.853981633974483096732590862331681441026e-1L, 5.820766091346740722012013594069507025615e-11L),
4838 TEST_c_c (catan, 0x1.0000000000000002p0L, -0x1p-33L, 7.853981633974483096732590862331681441026e-1L, -5.820766091346740722012013594069507025615e-11L),
4839 TEST_c_c (catan, -0x1.0000000000000002p0L, -0x1p-33L, -7.853981633974483096732590862331681441026e-1L, -5.820766091346740722012013594069507025615e-11L),
4840 TEST_c_c (catan, 0x1p-33L, 0x0.ffffffffffffffffp0L, 7.853981631937214964185249205444919953948e-1L, 1.178350206951907026002603046195591193050e1L),
4841 TEST_c_c (catan, 0x1p-33L, -0x0.ffffffffffffffffp0L, 7.853981631937214964185249205444919953948e-1L, -1.178350206951907026002603046195591193050e1L),
4842 TEST_c_c (catan, -0x1p-33L, 0x0.ffffffffffffffffp0L, -7.853981631937214964185249205444919953948e-1L, 1.178350206951907026002603046195591193050e1L),
4843 TEST_c_c (catan, -0x1p-33L, -0x0.ffffffffffffffffp0L, -7.853981631937214964185249205444919953948e-1L, -1.178350206951907026002603046195591193050e1L),
4844 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, 0x1p-33L, 7.853981633974483095919439232967553115548e-1L, 5.820766091346740722958646680334721192083e-11L),
4845 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, 0x1p-33L, -7.853981633974483095919439232967553115548e-1L, 5.820766091346740722958646680334721192083e-11L),
4846 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, -0x1p-33L, 7.853981633974483095919439232967553115548e-1L, -5.820766091346740722958646680334721192083e-11L),
4847 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, -0x1p-33L, -7.853981633974483095919439232967553115548e-1L, -5.820766091346740722958646680334721192083e-11L),
caf84319
JM		 4848#endif
4849#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 4850 TEST_c_c (catan, 0x1p-54L, 0x1.000000000000000000000000008p0L, 7.853981633974485455380535786656405610710e-1L, 1.906154746539849600897388334009981267384e1L),
4851 TEST_c_c (catan, 0x1p-54L, -0x1.000000000000000000000000008p0L, 7.853981633974485455380535786656405610710e-1L, -1.906154746539849600897388334009981267384e1L),
4852 TEST_c_c (catan, -0x1p-54L, 0x1.000000000000000000000000008p0L, -7.853981633974485455380535786656405610710e-1L, 1.906154746539849600897388334009981267384e1L),
4853 TEST_c_c (catan, -0x1p-54L, -0x1.000000000000000000000000008p0L, -7.853981633974485455380535786656405610710e-1L, -1.906154746539849600897388334009981267384e1L),
4854 TEST_c_c (catan, 0x1.000000000000000000000000008p0L, 0x1p-54L, 7.853981633974483096156608458198888173729e-1L, 2.775557561562891351059079170226980932999e-17L),
4855 TEST_c_c (catan, -0x1.000000000000000000000000008p0L, 0x1p-54L, -7.853981633974483096156608458198888173729e-1L, 2.775557561562891351059079170226980932999e-17L),
4856 TEST_c_c (catan, 0x1.000000000000000000000000008p0L, -0x1p-54L, 7.853981633974483096156608458198888173729e-1L, -2.775557561562891351059079170226980932999e-17L),
4857 TEST_c_c (catan, -0x1.000000000000000000000000008p0L, -0x1p-54L, -7.853981633974483096156608458198888173729e-1L, -2.775557561562891351059079170226980932999e-17L),
4858 TEST_c_c (catan, 0x1p-54L, 0x0.ffffffffffffffffffffffffffcp0L, 7.853981633974482124711461911186784339815e-1L, 1.906154746539849600897388334009984040723e1L),
4859 TEST_c_c (catan, 0x1p-54L, -0x0.ffffffffffffffffffffffffffcp0L, 7.853981633974482124711461911186784339815e-1L, -1.906154746539849600897388334009984040723e1L),
4860 TEST_c_c (catan, -0x1p-54L, 0x0.ffffffffffffffffffffffffffcp0L, -7.853981633974482124711461911186784339815e-1L, 1.906154746539849600897388334009984040723e1L),
4861 TEST_c_c (catan, -0x1p-54L, -0x0.ffffffffffffffffffffffffffcp0L, -7.853981633974482124711461911186784339815e-1L, -1.906154746539849600897388334009984040723e1L),
4862 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-54L, 7.853981633974483096156608458198703284454e-1L, 2.775557561562891351059079170227083567164e-17L),
4863 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-54L, -7.853981633974483096156608458198703284454e-1L, 2.775557561562891351059079170227083567164e-17L),
4864 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-54L, 7.853981633974483096156608458198703284454e-1L, -2.775557561562891351059079170227083567164e-17L),
4865 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-54L, -7.853981633974483096156608458198703284454e-1L, -2.775557561562891351059079170227083567164e-17L),
caf84319
JM		 4866#endif
4867#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 4868 TEST_c_c (catan, 0x1p-57L, 0x1.0000000000000000000000000001p0L, 7.853981633974483252281721296111395707566e-1L, 2.010126823623841397309973152228712033275e1L),
4869 TEST_c_c (catan, 0x1p-57L, -0x1.0000000000000000000000000001p0L, 7.853981633974483252281721296111395707566e-1L, -2.010126823623841397309973152228712033275e1L),
4870 TEST_c_c (catan, -0x1p-57L, 0x1.0000000000000000000000000001p0L, -7.853981633974483252281721296111395707566e-1L, 2.010126823623841397309973152228712033275e1L),
4871 TEST_c_c (catan, -0x1p-57L, -0x1.0000000000000000000000000001p0L, -7.853981633974483252281721296111395707566e-1L, -2.010126823623841397309973152228712033275e1L),
4872 TEST_c_c (catan, 0x1.0000000000000000000000000001p0L, 0x1p-57L, 7.853981633974483096156608458198758293829e-1L, 3.469446951953614188823848962783812780530e-18L),
4873 TEST_c_c (catan, -0x1.0000000000000000000000000001p0L, 0x1p-57L, -7.853981633974483096156608458198758293829e-1L, 3.469446951953614188823848962783812780530e-18L),
4874 TEST_c_c (catan, 0x1.0000000000000000000000000001p0L, -0x1p-57L, 7.853981633974483096156608458198758293829e-1L, -3.469446951953614188823848962783812780530e-18L),
4875 TEST_c_c (catan, -0x1.0000000000000000000000000001p0L, -0x1p-57L, -7.853981633974483096156608458198758293829e-1L, -3.469446951953614188823848962783812780530e-18L),
4876 TEST_c_c (catan, 0x1p-57L, 0x0.ffffffffffffffffffffffffffff8p0L, 7.853981633974483044114904178894544378135e-1L, 2.010126823623841397309973152228712040498e1L),
4877 TEST_c_c (catan, 0x1p-57L, -0x0.ffffffffffffffffffffffffffff8p0L, 7.853981633974483044114904178894544378135e-1L, -2.010126823623841397309973152228712040498e1L),
4878 TEST_c_c (catan, -0x1p-57L, 0x0.ffffffffffffffffffffffffffff8p0L, -7.853981633974483044114904178894544378135e-1L, 2.010126823623841397309973152228712040498e1L),
4879 TEST_c_c (catan, -0x1p-57L, -0x0.ffffffffffffffffffffffffffff8p0L, -7.853981633974483044114904178894544378135e-1L, -2.010126823623841397309973152228712040498e1L),
4880 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-57L, 7.853981633974483096156608458198756849381e-1L, 3.469446951953614188823848962783813782817e-18L),
4881 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-57L, -7.853981633974483096156608458198756849381e-1L, 3.469446951953614188823848962783813782817e-18L),
4882 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-57L, 7.853981633974483096156608458198756849381e-1L, -3.469446951953614188823848962783813782817e-18L),
4883 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-57L, -7.853981633974483096156608458198756849381e-1L, -3.469446951953614188823848962783813782817e-18L),
4884#endif
4885 TEST_c_c (catan, 1.0L, 0x1p-64L, 7.853981633974483096156608458198757210500e-1L, 2.710505431213761085018632002174854278563e-20L),
4886 TEST_c_c (catan, 1.0L, -0x1p-64L, 7.853981633974483096156608458198757210500e-1L, -2.710505431213761085018632002174854278563e-20L),
4887 TEST_c_c (catan, -1.0L, 0x1p-64L, -7.853981633974483096156608458198757210500e-1L, 2.710505431213761085018632002174854278563e-20L),
4888 TEST_c_c (catan, -1.0L, -0x1p-64L, -7.853981633974483096156608458198757210500e-1L, -2.710505431213761085018632002174854278563e-20L),
4889 TEST_c_c (catan, 0x1p-64L, 1.0L, 7.853981633974483096292133729759445264744e-1L, 2.252728336819822255606004394739073846245e1L),
4890 TEST_c_c (catan, -0x1p-64L, 1.0L, -7.853981633974483096292133729759445264744e-1L, 2.252728336819822255606004394739073846245e1L),
4891 TEST_c_c (catan, 0x1p-64L, -1.0L, 7.853981633974483096292133729759445264744e-1L, -2.252728336819822255606004394739073846245e1L),
4892 TEST_c_c (catan, -0x1p-64L, -1.0L, -7.853981633974483096292133729759445264744e-1L, -2.252728336819822255606004394739073846245e1L),
4893 TEST_c_c (catan, 1.0L, 0x1.3p-73L, 7.853981633974483096156608458198757210493e-1L, 6.286572655403010329022706059731717687100e-23L),
4894 TEST_c_c (catan, 1.0L, -0x1.3p-73L, 7.853981633974483096156608458198757210493e-1L, -6.286572655403010329022706059731717687100e-23L),
4895 TEST_c_c (catan, -1.0L, 0x1.3p-73L, -7.853981633974483096156608458198757210493e-1L, 6.286572655403010329022706059731717687100e-23L),
4896 TEST_c_c (catan, -1.0L, -0x1.3p-73L, -7.853981633974483096156608458198757210493e-1L, -6.286572655403010329022706059731717687100e-23L),
4897 TEST_c_c (catan, 0x1.3p-73L, 1.0L, 7.853981633974483096156922786831527361009e-1L, 2.556052055225464683726753902092495938633e1L),
4898 TEST_c_c (catan, -0x1.3p-73L, 1.0L, -7.853981633974483096156922786831527361009e-1L, 2.556052055225464683726753902092495938633e1L),
4899 TEST_c_c (catan, 0x1.3p-73L, -1.0L, 7.853981633974483096156922786831527361009e-1L, -2.556052055225464683726753902092495938633e1L),
4900 TEST_c_c (catan, -0x1.3p-73L, -1.0L, -7.853981633974483096156922786831527361009e-1L, -2.556052055225464683726753902092495938633e1L),
4901 TEST_c_c (catan, 1.0L, 0x1p-124L, 7.853981633974483096156608458198757210493e-1L, 2.350988701644575015937473074444491355637e-38L),
4902 TEST_c_c (catan, 1.0L, -0x1p-124L, 7.853981633974483096156608458198757210493e-1L, -2.350988701644575015937473074444491355637e-38L),
4903 TEST_c_c (catan, -1.0L, 0x1p-124L, -7.853981633974483096156608458198757210493e-1L, 2.350988701644575015937473074444491355637e-38L),
4904 TEST_c_c (catan, -1.0L, -0x1p-124L, -7.853981633974483096156608458198757210493e-1L, -2.350988701644575015937473074444491355637e-38L),
4905 TEST_c_c (catan, 0x1p-124L, 1.0L, 7.853981633974483096156608458198757210610e-1L, 4.332169878499658183857700759113603550472e1L),
4906 TEST_c_c (catan, -0x1p-124L, 1.0L, -7.853981633974483096156608458198757210610e-1L, 4.332169878499658183857700759113603550472e1L),
4907 TEST_c_c (catan, 0x1p-124L, -1.0L, 7.853981633974483096156608458198757210610e-1L, -4.332169878499658183857700759113603550472e1L),
4908 TEST_c_c (catan, -0x1p-124L, -1.0L, -7.853981633974483096156608458198757210610e-1L, -4.332169878499658183857700759113603550472e1L),
4909 TEST_c_c (catan, 0x1.000002p0L, 0x1p-126L, 7.853982230020895322927482174768220815493e-1L, 5.877471053462247139383742414506671233336e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4910 TEST_c_c (catan, 0x1.000002p0L, -0x1p-126L, 7.853982230020895322927482174768220815493e-1L, -5.877471053462247139383742414506671233336e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4911 TEST_c_c (catan, -0x1.000002p0L, 0x1p-126L, -7.853982230020895322927482174768220815493e-1L, 5.877471053462247139383742414506671233336e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4912 TEST_c_c (catan, -0x1.000002p0L, -0x1p-126L, -7.853982230020895322927482174768220815493e-1L, -5.877471053462247139383742414506671233336e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4913 TEST_c_c (catan, 0x1p-126L, 0x1.000002p0L, 1.570796326794896619231321691639702138295L, 8.317766196521665212523713550410777685446L),
4914 TEST_c_c (catan, -0x1p-126L, 0x1.000002p0L, -1.570796326794896619231321691639702138295L, 8.317766196521665212523713550410777685446L),
4915 TEST_c_c (catan, 0x1p-126L, -0x1.000002p0L, 1.570796326794896619231321691639702138295L, -8.317766196521665212523713550410777685446L),
4916 TEST_c_c (catan, -0x1p-126L, -0x1.000002p0L, -1.570796326794896619231321691639702138295L, -8.317766196521665212523713550410777685446L),
4917 TEST_c_c (catan, 0x0.ffffffp0L, 0x1p-126L, 7.853981335951250337419109991749089175724e-1L, 5.877472104436064061535099214664320916184e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4918 TEST_c_c (catan, 0x0.ffffffp0L, -0x1p-126L, 7.853981335951250337419109991749089175724e-1L, -5.877472104436064061535099214664320916184e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4919 TEST_c_c (catan, -0x0.ffffffp0L, 0x1p-126L, -7.853981335951250337419109991749089175724e-1L, 5.877472104436064061535099214664320916184e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4920 TEST_c_c (catan, -0x0.ffffffp0L, -0x1p-126L, -7.853981335951250337419109991749089175724e-1L, -5.877472104436064061535099214664320916184e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4921 TEST_c_c (catan, 0x1p-126L, 0x0.ffffffp0L, 9.860761609136244031334147100512154160097e-32L, 8.664339742098154951823135931565866792454L),
4922 TEST_c_c (catan, -0x1p-126L, 0x0.ffffffp0L, -9.860761609136244031334147100512154160097e-32L, 8.664339742098154951823135931565866792454L),
4923 TEST_c_c (catan, 0x1p-126L, -0x0.ffffffp0L, 9.860761609136244031334147100512154160097e-32L, -8.664339742098154951823135931565866792454L),
4924 TEST_c_c (catan, -0x1p-126L, -0x0.ffffffp0L, -9.860761609136244031334147100512154160097e-32L, -8.664339742098154951823135931565866792454L),
10de07f5 4925#ifndef TEST_FLOAT
08198877
JM		 4926 TEST_c_c (catan, 1.0L, 0x1p-512L, 7.853981633974483096156608458198757210493e-1L, 3.729170365600103371645482657731466918688e-155L),
4927 TEST_c_c (catan, 1.0L, -0x1p-512L, 7.853981633974483096156608458198757210493e-1L, -3.729170365600103371645482657731466918688e-155L),
4928 TEST_c_c (catan, -1.0L, 0x1p-512L, -7.853981633974483096156608458198757210493e-1L, 3.729170365600103371645482657731466918688e-155L),
4929 TEST_c_c (catan, -1.0L, -0x1p-512L, -7.853981633974483096156608458198757210493e-1L, -3.729170365600103371645482657731466918688e-155L),
4930 TEST_c_c (catan, 0x1p-512L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 1.777922518136259718655200391540222897114e2L),
4931 TEST_c_c (catan, -0x1p-512L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 1.777922518136259718655200391540222897114e2L),
4932 TEST_c_c (catan, 0x1p-512L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -1.777922518136259718655200391540222897114e2L),
4933 TEST_c_c (catan, -0x1p-512L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -1.777922518136259718655200391540222897114e2L),
4934 TEST_c_c (catan, 1.0L, 0x1.3p-536L, 7.853981633974483096156608458198757210493e-1L, 2.639526015013529511588222179446290115084e-162L),
4935 TEST_c_c (catan, 1.0L, -0x1.3p-536L, 7.853981633974483096156608458198757210493e-1L, -2.639526015013529511588222179446290115084e-162L),
4936 TEST_c_c (catan, -1.0L, 0x1.3p-536L, -7.853981633974483096156608458198757210493e-1L, 2.639526015013529511588222179446290115084e-162L),
4937 TEST_c_c (catan, -1.0L, -0x1.3p-536L, -7.853981633974483096156608458198757210493e-1L, -2.639526015013529511588222179446290115084e-162L),
4938 TEST_c_c (catan, 0x1.3p-536L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 1.860240928518819859673567751384928348958e2L),
4939 TEST_c_c (catan, -0x1.3p-536L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 1.860240928518819859673567751384928348958e2L),
4940 TEST_c_c (catan, 0x1.3p-536L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -1.860240928518819859673567751384928348958e2L),
4941 TEST_c_c (catan, -0x1.3p-536L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -1.860240928518819859673567751384928348958e2L),
4942 TEST_c_c (catan, 1.0L, 0x1p-1020L, 7.853981633974483096156608458198757210493e-1L, 4.450147717014402766180465434664808128438e-308L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4943 TEST_c_c (catan, 1.0L, -0x1p-1020L, 7.853981633974483096156608458198757210493e-1L, -4.450147717014402766180465434664808128438e-308L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4944 TEST_c_c (catan, -1.0L, 0x1p-1020L, -7.853981633974483096156608458198757210493e-1L, 4.450147717014402766180465434664808128438e-308L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4945 TEST_c_c (catan, -1.0L, -0x1p-1020L, -7.853981633974483096156608458198757210493e-1L, -4.450147717014402766180465434664808128438e-308L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4946 TEST_c_c (catan, 0x1p-1020L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 3.538516356758520804574969980043991380025e2L),
4947 TEST_c_c (catan, -0x1p-1020L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 3.538516356758520804574969980043991380025e2L),
4948 TEST_c_c (catan, 0x1p-1020L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -3.538516356758520804574969980043991380025e2L),
4949 TEST_c_c (catan, -0x1p-1020L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -3.538516356758520804574969980043991380025e2L),
4950 TEST_c_c (catan, 0x1.0000000000001p0L, 0x1p-1022L, 7.853981633974484206379633083355174374608e-1L, 1.112536929253600444512293438042957369978e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4951 TEST_c_c (catan, 0x1.0000000000001p0L, -0x1p-1022L, 7.853981633974484206379633083355174374608e-1L, -1.112536929253600444512293438042957369978e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4952 TEST_c_c (catan, -0x1.0000000000001p0L, 0x1p-1022L, -7.853981633974484206379633083355174374608e-1L, 1.112536929253600444512293438042957369978e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4953 TEST_c_c (catan, -0x1.0000000000001p0L, -0x1p-1022L, -7.853981633974484206379633083355174374608e-1L, -1.112536929253600444512293438042957369978e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4954 TEST_c_c (catan, 0x1p-1022L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 1.836840028483855075506780244989950299369e1L),
4955 TEST_c_c (catan, -0x1p-1022L, 0x1.0000000000001p0L, -1.570796326794896619231321691639751442099L, 1.836840028483855075506780244989950299369e1L),
4956 TEST_c_c (catan, 0x1p-1022L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -1.836840028483855075506780244989950299369e1L),
4957 TEST_c_c (catan, -0x1p-1022L, -0x1.0000000000001p0L, -1.570796326794896619231321691639751442099L, -1.836840028483855075506780244989950299369e1L),
4958 TEST_c_c (catan, 0x0.fffffffffffff8p0L, 0x1p-1022L, 7.853981633974482541045096145620456183798e-1L, 1.112536929253600815061527818977844932790e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4959 TEST_c_c (catan, 0x0.fffffffffffff8p0L, -0x1p-1022L, 7.853981633974482541045096145620456183798e-1L, -1.112536929253600815061527818977844932790e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4960 TEST_c_c (catan, -0x0.fffffffffffff8p0L, 0x1p-1022L, -7.853981633974482541045096145620456183798e-1L, 1.112536929253600815061527818977844932790e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4961 TEST_c_c (catan, -0x0.fffffffffffff8p0L, -0x1p-1022L, -7.853981633974482541045096145620456183798e-1L, -1.112536929253600815061527818977844932790e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4962 TEST_c_c (catan, 0x1p-1022L, 0x0.fffffffffffff8p0L, 1.002084180004486444624900488355118689113e-292L, 1.871497387511852332650969166374185305708e1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4963 TEST_c_c (catan, -0x1p-1022L, 0x0.fffffffffffff8p0L, -1.002084180004486444624900488355118689113e-292L, 1.871497387511852332650969166374185305708e1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4964 TEST_c_c (catan, 0x1p-1022L, -0x0.fffffffffffff8p0L, 1.002084180004486444624900488355118689113e-292L, -1.871497387511852332650969166374185305708e1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4965 TEST_c_c (catan, -0x1p-1022L, -0x0.fffffffffffff8p0L, -1.002084180004486444624900488355118689113e-292L, -1.871497387511852332650969166374185305708e1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
10de07f5
JM		 4966#endif
4967#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 4968 TEST_c_c (catan, 0x1.0000000000000002p0L, 0x1p-1022L, 7.853981633974483096698709544441509427467e-1L, 1.112536929253600691424494863099491450042e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4969 TEST_c_c (catan, 0x1.0000000000000002p0L, -0x1p-1022L, 7.853981633974483096698709544441509427467e-1L, -1.112536929253600691424494863099491450042e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4970 TEST_c_c (catan, -0x1.0000000000000002p0L, 0x1p-1022L, -7.853981633974483096698709544441509427467e-1L, 1.112536929253600691424494863099491450042e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4971 TEST_c_c (catan, -0x1.0000000000000002p0L, -0x1p-1022L, -7.853981633974483096698709544441509427467e-1L, -1.112536929253600691424494863099491450042e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4972 TEST_c_c (catan, 0x1p-1022L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 2.218070977791824990137853294097378778927e1L),
4973 TEST_c_c (catan, -0x1p-1022L, 0x1.0000000000000002p0L, -1.570796326794896619231321691639751442099L, 2.218070977791824990137853294097378778927e1L),
4974 TEST_c_c (catan, 0x1p-1022L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -2.218070977791824990137853294097378778927e1L),
4975 TEST_c_c (catan, -0x1p-1022L, -0x1.0000000000000002p0L, -1.570796326794896619231321691639751442099L, -2.218070977791824990137853294097378778927e1L),
4976 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, 0x1p-1022L, 7.853981633974483095885557915077381101984e-1L, 1.112536929253600691605427106449557323148e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4977 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, -0x1p-1022L, 7.853981633974483095885557915077381101984e-1L, -1.112536929253600691605427106449557323148e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4978 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, 0x1p-1022L, -7.853981633974483095885557915077381101984e-1L, 1.112536929253600691605427106449557323148e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4979 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, -0x1p-1022L, -7.853981633974483095885557915077381101984e-1L, -1.112536929253600691605427106449557323148e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4980 TEST_c_c (catan, 0x1p-1022L, 0x0.ffffffffffffffffp0L, 2.052268400649188124723641491045245971623e-289L, 2.252728336819822255604649142023466965703e1L),
4981 TEST_c_c (catan, -0x1p-1022L, 0x0.ffffffffffffffffp0L, -2.052268400649188124723641491045245971623e-289L, 2.252728336819822255604649142023466965703e1L),
4982 TEST_c_c (catan, 0x1p-1022L, -0x0.ffffffffffffffffp0L, 2.052268400649188124723641491045245971623e-289L, -2.252728336819822255604649142023466965703e1L),
4983 TEST_c_c (catan, -0x1p-1022L, -0x0.ffffffffffffffffp0L, -2.052268400649188124723641491045245971623e-289L, -2.252728336819822255604649142023466965703e1L),
10de07f5
JM		 4984#endif
4985#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 4986 TEST_c_c (catan, 0x1.000000000000000000000000008p0L, 0x1p-1022L, 7.853981633974483096156608458198880470009e-1L, 1.112536929253600691545116358666174605957e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4987 TEST_c_c (catan, 0x1.000000000000000000000000008p0L, -0x1p-1022L, 7.853981633974483096156608458198880470009e-1L, -1.112536929253600691545116358666174605957e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4988 TEST_c_c (catan, -0x1.000000000000000000000000008p0L, 0x1p-1022L, -7.853981633974483096156608458198880470009e-1L, 1.112536929253600691545116358666174605957e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4989 TEST_c_c (catan, -0x1.000000000000000000000000008p0L, -0x1p-1022L, -7.853981633974483096156608458198880470009e-1L, -1.112536929253600691545116358666174605957e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4990 TEST_c_c (catan, 0x1p-1022L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 3.673680056967710139911330243728336427098e1L),
4991 TEST_c_c (catan, -0x1p-1022L, 0x1.000000000000000000000000008p0L, -1.570796326794896619231321691639751442099L, 3.673680056967710139911330243728336427098e1L),
4992 TEST_c_c (catan, 0x1p-1022L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -3.673680056967710139911330243728336427098e1L),
4993 TEST_c_c (catan, -0x1p-1022L, -0x1.000000000000000000000000008p0L, -1.570796326794896619231321691639751442099L, -3.673680056967710139911330243728336427098e1L),
4994 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-1022L, 7.853981633974483096156608458198695580735e-1L, 1.112536929253600691545116358666215745186e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4995 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-1022L, 7.853981633974483096156608458198695580735e-1L, -1.112536929253600691545116358666215745186e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4996 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-1022L, -7.853981633974483096156608458198695580735e-1L, 1.112536929253600691545116358666215745186e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4997 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-1022L, -7.853981633974483096156608458198695580735e-1L, -1.112536929253600691545116358666215745186e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4998 TEST_c_c (catan, 0x1p-1022L, 0x0.ffffffffffffffffffffffffffcp0L, 9.025971879324147880346310405868788320726e-277L, 3.708337415995707405382191849801244331055e1L),
4999 TEST_c_c (catan, -0x1p-1022L, 0x0.ffffffffffffffffffffffffffcp0L, -9.025971879324147880346310405868788320726e-277L, 3.708337415995707405382191849801244331055e1L),
5000 TEST_c_c (catan, 0x1p-1022L, -0x0.ffffffffffffffffffffffffffcp0L, 9.025971879324147880346310405868788320726e-277L, -3.708337415995707405382191849801244331055e1L),
5001 TEST_c_c (catan, -0x1p-1022L, -0x0.ffffffffffffffffffffffffffcp0L, -9.025971879324147880346310405868788320726e-277L, -3.708337415995707405382191849801244331055e1L),
10de07f5
JM		 5002#endif
5003#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5004 TEST_c_c (catan, 1.0L, 0x1p-8192L, 7.853981633974483096156608458198757210493e-1L, 4.584009668887117914053530980121207914891e-2467L),
5005 TEST_c_c (catan, 1.0L, -0x1p-8192L, 7.853981633974483096156608458198757210493e-1L, -4.584009668887117914053530980121207914891e-2467L),
5006 TEST_c_c (catan, -1.0L, 0x1p-8192L, -7.853981633974483096156608458198757210493e-1L, 4.584009668887117914053530980121207914891e-2467L),
5007 TEST_c_c (catan, -1.0L, -0x1p-8192L, -7.853981633974483096156608458198757210493e-1L, -4.584009668887117914053530980121207914891e-2467L),
5008 TEST_c_c (catan, 0x1p-8192L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 2.839477425163815960027691385553420311121e3L),
5009 TEST_c_c (catan, -0x1p-8192L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 2.839477425163815960027691385553420311121e3L),
5010 TEST_c_c (catan, 0x1p-8192L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -2.839477425163815960027691385553420311121e3L),
5011 TEST_c_c (catan, -0x1p-8192L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -2.839477425163815960027691385553420311121e3L),
5012 TEST_c_c (catan, 1.0L, 0x1.3p-8221L, 7.853981633974483096156608458198757210493e-1L, 1.013933025636421986471594877335044443409e-2475L),
5013 TEST_c_c (catan, 1.0L, -0x1.3p-8221L, 7.853981633974483096156608458198757210493e-1L, -1.013933025636421986471594877335044443409e-2475L),
5014 TEST_c_c (catan, -1.0L, 0x1.3p-8221L, -7.853981633974483096156608458198757210493e-1L, 1.013933025636421986471594877335044443409e-2475L),
5015 TEST_c_c (catan, -1.0L, -0x1.3p-8221L, -7.853981633974483096156608458198757210493e-1L, -1.013933025636421986471594877335044443409e-2475L),
5016 TEST_c_c (catan, 0x1.3p-8221L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 2.849442134153471837403071201841536297726e3L),
5017 TEST_c_c (catan, -0x1.3p-8221L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 2.849442134153471837403071201841536297726e3L),
5018 TEST_c_c (catan, 0x1.3p-8221L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -2.849442134153471837403071201841536297726e3L),
5019 TEST_c_c (catan, -0x1.3p-8221L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -2.849442134153471837403071201841536297726e3L),
5020 TEST_c_c (catan, 1.0L, 0x1.3p-8246L, 7.853981633974483096156608458198757210493e-1L, 3.021755890954798419688924781486524472858e-2483L),
5021 TEST_c_c (catan, 1.0L, -0x1.3p-8246L, 7.853981633974483096156608458198757210493e-1L, -3.021755890954798419688924781486524472858e-2483L),
5022 TEST_c_c (catan, -1.0L, 0x1.3p-8246L, -7.853981633974483096156608458198757210493e-1L, 3.021755890954798419688924781486524472858e-2483L),
5023 TEST_c_c (catan, -1.0L, -0x1.3p-8246L, -7.853981633974483096156608458198757210493e-1L, -3.021755890954798419688924781486524472858e-2483L),
5024 TEST_c_c (catan, 0x1.3p-8246L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 2.858106473910471153770786603359763504827e3L),
5025 TEST_c_c (catan, -0x1.3p-8246L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 2.858106473910471153770786603359763504827e3L),
5026 TEST_c_c (catan, 0x1.3p-8246L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -2.858106473910471153770786603359763504827e3L),
5027 TEST_c_c (catan, -0x1.3p-8246L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -2.858106473910471153770786603359763504827e3L),
5028 TEST_c_c (catan, 1.0L, 0x1p-16380L, 7.853981633974483096156608458198757210493e-1L, 6.724206286224187012525355634643505205196e-4932L),
5029 TEST_c_c (catan, 1.0L, -0x1p-16380L, 7.853981633974483096156608458198757210493e-1L, -6.724206286224187012525355634643505205196e-4932L),
5030 TEST_c_c (catan, -1.0L, 0x1p-16380L, -7.853981633974483096156608458198757210493e-1L, 6.724206286224187012525355634643505205196e-4932L),
5031 TEST_c_c (catan, -1.0L, -0x1p-16380L, -7.853981633974483096156608458198757210493e-1L, -6.724206286224187012525355634643505205196e-4932L),
5032 TEST_c_c (catan, 0x1p-16380L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 5.677221982376232056781839690803195180822e3L),
5033 TEST_c_c (catan, -0x1p-16380L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 5.677221982376232056781839690803195180822e3L),
5034 TEST_c_c (catan, 0x1p-16380L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -5.677221982376232056781839690803195180822e3L),
5035 TEST_c_c (catan, -0x1p-16380L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -5.677221982376232056781839690803195180822e3L),
5036 TEST_c_c (catan, 0x1.0000000000000002p0L, 0x1p-16382L, 7.853981633974483096698709544441509427467e-1L, 1.681051571556046752949078932066752571182e-4932L, UNDERFLOW_EXCEPTION),
5037 TEST_c_c (catan, 0x1.0000000000000002p0L, -0x1p-16382L, 7.853981633974483096698709544441509427467e-1L, -1.681051571556046752949078932066752571182e-4932L, UNDERFLOW_EXCEPTION),
5038 TEST_c_c (catan, -0x1.0000000000000002p0L, 0x1p-16382L, -7.853981633974483096698709544441509427467e-1L, 1.681051571556046752949078932066752571182e-4932L, UNDERFLOW_EXCEPTION),
5039 TEST_c_c (catan, -0x1.0000000000000002p0L, -0x1p-16382L, -7.853981633974483096698709544441509427467e-1L, -1.681051571556046752949078932066752571182e-4932L, UNDERFLOW_EXCEPTION),
5040 TEST_c_c (catan, 0x1p-16382L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 2.218070977791824990137853294097378778927e1L),
5041 TEST_c_c (catan, -0x1p-16382L, 0x1.0000000000000002p0L, -1.570796326794896619231321691639751442099L, 2.218070977791824990137853294097378778927e1L),
5042 TEST_c_c (catan, 0x1p-16382L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -2.218070977791824990137853294097378778927e1L),
5043 TEST_c_c (catan, -0x1p-16382L, -0x1.0000000000000002p0L, -1.570796326794896619231321691639751442099L, -2.218070977791824990137853294097378778927e1L),
5044 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, 0x1p-16382L, 7.853981633974483095885557915077381101984e-1L, 1.681051571556046753222468896957938166365e-4932L, UNDERFLOW_EXCEPTION),
5045 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, -0x1p-16382L, 7.853981633974483095885557915077381101984e-1L, -1.681051571556046753222468896957938166365e-4932L, UNDERFLOW_EXCEPTION),
5046 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, 0x1p-16382L, -7.853981633974483095885557915077381101984e-1L, 1.681051571556046753222468896957938166365e-4932L, UNDERFLOW_EXCEPTION),
5047 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, -0x1p-16382L, -7.853981633974483095885557915077381101984e-1L, -1.681051571556046753222468896957938166365e-4932L, UNDERFLOW_EXCEPTION),
5048 TEST_c_c (catan, 0x1p-16382L, 0x0.ffffffffffffffffp0L, 3.100992811520163369065387859792822623745e-4913L, 2.252728336819822255604649142023466965703e1L),
5049 TEST_c_c (catan, -0x1p-16382L, 0x0.ffffffffffffffffp0L, -3.100992811520163369065387859792822623745e-4913L, 2.252728336819822255604649142023466965703e1L),
5050 TEST_c_c (catan, 0x1p-16382L, -0x0.ffffffffffffffffp0L, 3.100992811520163369065387859792822623745e-4913L, -2.252728336819822255604649142023466965703e1L),
5051 TEST_c_c (catan, -0x1p-16382L, -0x0.ffffffffffffffffp0L, -3.100992811520163369065387859792822623745e-4913L, -2.252728336819822255604649142023466965703e1L),
10de07f5 5052# if LDBL_MANT_DIG >= 113
08198877
JM		 5053 TEST_c_c (catan, 0x1.0000000000000000000000000001p0L, 0x1p-16382L, 7.853981633974483096156608458198758173458e-1L, 1.681051571556046753131338908660875977540e-4932L, UNDERFLOW_EXCEPTION),
5054 TEST_c_c (catan, 0x1.0000000000000000000000000001p0L, -0x1p-16382L, 7.853981633974483096156608458198758173458e-1L, -1.681051571556046753131338908660875977540e-4932L, UNDERFLOW_EXCEPTION),
5055 TEST_c_c (catan, -0x1.0000000000000000000000000001p0L, 0x1p-16382L, -7.853981633974483096156608458198758173458e-1L, 1.681051571556046753131338908660875977540e-4932L, UNDERFLOW_EXCEPTION),
5056 TEST_c_c (catan, -0x1.0000000000000000000000000001p0L, -0x1p-16382L, -7.853981633974483096156608458198758173458e-1L, -1.681051571556046753131338908660875977540e-4932L, UNDERFLOW_EXCEPTION),
5057 TEST_c_c (catan, 0x1p-16382L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 3.916281570163690998207361486238697614441e1L),
5058 TEST_c_c (catan, -0x1p-16382L, 0x1.0000000000000000000000000001p0L, -1.570796326794896619231321691639751442099L, 3.916281570163690998207361486238697614441e1L),
5059 TEST_c_c (catan, 0x1p-16382L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -3.916281570163690998207361486238697614441e1L),
5060 TEST_c_c (catan, -0x1p-16382L, -0x1.0000000000000000000000000001p0L, -1.570796326794896619231321691639751442099L, -3.916281570163690998207361486238697614441e1L),
5061 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-16382L, 7.853981633974483096156608458198756729010e-1L, 1.681051571556046753131338908660876463178e-4932L, UNDERFLOW_EXCEPTION),
5062 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-16382L, 7.853981633974483096156608458198756729010e-1L, -1.681051571556046753131338908660876463178e-4932L, UNDERFLOW_EXCEPTION),
5063 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-16382L, -7.853981633974483096156608458198756729010e-1L, 1.681051571556046753131338908660876463178e-4932L, UNDERFLOW_EXCEPTION),
5064 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-16382L, -7.853981633974483096156608458198756729010e-1L, -1.681051571556046753131338908660876463178e-4932L, UNDERFLOW_EXCEPTION),
5065 TEST_c_c (catan, 0x1p-16382L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.745703758805099310527547423749501866998e-4898L, 3.950938929191688263678223092311606435623e1L),
5066 TEST_c_c (catan, -0x1p-16382L, 0x0.ffffffffffffffffffffffffffff8p0L, -1.745703758805099310527547423749501866998e-4898L, 3.950938929191688263678223092311606435623e1L),
5067 TEST_c_c (catan, 0x1p-16382L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.745703758805099310527547423749501866998e-4898L, -3.950938929191688263678223092311606435623e1L),
5068 TEST_c_c (catan, -0x1p-16382L, -0x0.ffffffffffffffffffffffffffff8p0L, -1.745703758805099310527547423749501866998e-4898L, -3.950938929191688263678223092311606435623e1L),
10de07f5 5069# endif
caf84319 5070#endif
2f38fbfe 5071
08198877
JM		 5072 TEST_c_c (catan, 0.75L, 1.25L, 1.10714871779409050301706546017853704L, 0.549306144334054845697622618461262852L),
5073 TEST_c_c (catan, -2, -3, -1.4099210495965755225306193844604208L, -0.22907268296853876629588180294200276L),
5074 END_DATA (catan)
5075 };
8847214f
UD		 5076
5077static void
08198877 5078catan_test (void)
8847214f 5079{
aaca11d8 5080 errno = 0;
08198877 5081 FUNC(catan) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD		 5082 if (errno == ENOSYS)
5083 /* Function not implemented. */
5084 return;
5085
08198877
JM		 5086 START (catan);
5087 RUN_TEST_LOOP_c_c (catan, catan_test_data, );
5088 END (catan, complex);
5089}
8847214f 5090
08198877
JM		 5091static const struct test_c_c_data catanh_test_data[] =
5092 {
5093 START_DATA (catanh),
5094 TEST_c_c (catanh, 0, 0, 0.0, 0.0),
5095 TEST_c_c (catanh, minus_zero, 0, minus_zero, 0.0),
5096 TEST_c_c (catanh, 0, minus_zero, 0.0, minus_zero),
5097 TEST_c_c (catanh, minus_zero, minus_zero, minus_zero, minus_zero),
5098
5099 TEST_c_c (catanh, 1.0L, plus_zero, plus_infty, plus_zero, DIVIDE_BY_ZERO_EXCEPTION),
5100 TEST_c_c (catanh, 1.0L, minus_zero, plus_infty, minus_zero, DIVIDE_BY_ZERO_EXCEPTION),
5101 TEST_c_c (catanh, -1.0L, plus_zero, minus_infty, plus_zero, DIVIDE_BY_ZERO_EXCEPTION),
5102 TEST_c_c (catanh, -1.0L, minus_zero, minus_infty, minus_zero, DIVIDE_BY_ZERO_EXCEPTION),
5103 TEST_c_c (catanh, plus_zero, 1.0L, plus_zero, M_PI_4l),
5104 TEST_c_c (catanh, minus_zero, 1.0L, minus_zero, M_PI_4l),
5105 TEST_c_c (catanh, plus_zero, -1.0L, plus_zero, -M_PI_4l),
5106 TEST_c_c (catanh, minus_zero, -1.0L, minus_zero, -M_PI_4l),
5107
5108 TEST_c_c (catanh, plus_infty, plus_infty, 0.0, M_PI_2l),
5109 TEST_c_c (catanh, plus_infty, minus_infty, 0.0, -M_PI_2l),
5110 TEST_c_c (catanh, minus_infty, plus_infty, minus_zero, M_PI_2l),
5111 TEST_c_c (catanh, minus_infty, minus_infty, minus_zero, -M_PI_2l),
5112
5113 TEST_c_c (catanh, -10.0, plus_infty, minus_zero, M_PI_2l),
5114 TEST_c_c (catanh, -10.0, minus_infty, minus_zero, -M_PI_2l),
5115 TEST_c_c (catanh, minus_zero, plus_infty, minus_zero, M_PI_2l),
5116 TEST_c_c (catanh, minus_zero, minus_infty, minus_zero, -M_PI_2l),
5117 TEST_c_c (catanh, 0, plus_infty, 0.0, M_PI_2l),
5118 TEST_c_c (catanh, 0, minus_infty, 0.0, -M_PI_2l),
5119 TEST_c_c (catanh, 0.1L, plus_infty, 0.0, M_PI_2l),
5120 TEST_c_c (catanh, 0.1L, minus_infty, 0.0, -M_PI_2l),
5121
5122 TEST_c_c (catanh, minus_infty, 0, minus_zero, M_PI_2l),
5123 TEST_c_c (catanh, minus_infty, minus_zero, minus_zero, -M_PI_2l),
5124 TEST_c_c (catanh, minus_infty, 100, minus_zero, M_PI_2l),
5125 TEST_c_c (catanh, minus_infty, -100, minus_zero, -M_PI_2l),
5126
5127 TEST_c_c (catanh, plus_infty, 0, 0.0, M_PI_2l),
5128 TEST_c_c (catanh, plus_infty, minus_zero, 0.0, -M_PI_2l),
5129 TEST_c_c (catanh, plus_infty, 0.5, 0.0, M_PI_2l),
5130 TEST_c_c (catanh, plus_infty, -0.5, 0.0, -M_PI_2l),
5131
5132 TEST_c_c (catanh, 0, qnan_value, 0.0, qnan_value),
5133 TEST_c_c (catanh, minus_zero, qnan_value, minus_zero, qnan_value),
5134
5135 TEST_c_c (catanh, plus_infty, qnan_value, 0.0, qnan_value),
5136 TEST_c_c (catanh, minus_infty, qnan_value, minus_zero, qnan_value),
5137
5138 TEST_c_c (catanh, qnan_value, 0, qnan_value, qnan_value),
5139 TEST_c_c (catanh, qnan_value, minus_zero, qnan_value, qnan_value),
5140
5141 TEST_c_c (catanh, qnan_value, plus_infty, 0.0, M_PI_2l, IGNORE_ZERO_INF_SIGN),
5142 TEST_c_c (catanh, qnan_value, minus_infty, 0.0, -M_PI_2l, IGNORE_ZERO_INF_SIGN),
5143
5144 TEST_c_c (catanh, 10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5145 TEST_c_c (catanh, -10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5146
5147 TEST_c_c (catanh, qnan_value, 0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5148 TEST_c_c (catanh, qnan_value, -0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5149
5150 TEST_c_c (catanh, qnan_value, qnan_value, qnan_value, qnan_value),
5151
5152 TEST_c_c (catanh, 0x1p50L, 0.0L, 8.881784197001252323389053344728897997441e-16L, 1.570796326794896619231321691639751442099L),
5153 TEST_c_c (catanh, 0x1p50L, -0.0L, 8.881784197001252323389053344728897997441e-16L, -1.570796326794896619231321691639751442099L),
5154 TEST_c_c (catanh, -0x1p50L, 0.0L, -8.881784197001252323389053344728897997441e-16L, 1.570796326794896619231321691639751442099L),
5155 TEST_c_c (catanh, -0x1p50L, -0.0L, -8.881784197001252323389053344728897997441e-16L, -1.570796326794896619231321691639751442099L),
5156 TEST_c_c (catanh, 0.0L, 0x1p50L, 0.0L, 1.570796326794895731052901991514519103193L),
5157 TEST_c_c (catanh, -0.0L, 0x1p50L, -0.0L, 1.570796326794895731052901991514519103193L),
5158 TEST_c_c (catanh, 0.0L, -0x1p50L, 0.0L, -1.570796326794895731052901991514519103193L),
5159 TEST_c_c (catanh, -0.0L, -0x1p50L, -0.0L, -1.570796326794895731052901991514519103193L),
2f38fbfe 5160#ifndef TEST_FLOAT
08198877
JM		 5161 TEST_c_c (catanh, 0x1p500L, 0.0L, 3.054936363499604682051979393213617699789e-151L, 1.570796326794896619231321691639751442099L),
5162 TEST_c_c (catanh, 0x1p500L, -0.0L, 3.054936363499604682051979393213617699789e-151L, -1.570796326794896619231321691639751442099L),
5163 TEST_c_c (catanh, -0x1p500L, 0.0L, -3.054936363499604682051979393213617699789e-151L, 1.570796326794896619231321691639751442099L),
5164 TEST_c_c (catanh, -0x1p500L, -0.0L, -3.054936363499604682051979393213617699789e-151L, -1.570796326794896619231321691639751442099L),
5165 TEST_c_c (catanh, 0.0L, 0x1p500L, 0.0L, 1.570796326794896619231321691639751442099L),
5166 TEST_c_c (catanh, -0.0L, 0x1p500L, -0.0L, 1.570796326794896619231321691639751442099L),
5167 TEST_c_c (catanh, 0.0L, -0x1p500L, 0.0L, -1.570796326794896619231321691639751442099L),
5168 TEST_c_c (catanh, -0.0L, -0x1p500L, -0.0L, -1.570796326794896619231321691639751442099L),
2f38fbfe
JM		 5169#endif
5170#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5171 TEST_c_c (catanh, 0x1p5000L, 0.0L, 7.079811261048172892385615158694057552948e-1506L, 1.570796326794896619231321691639751442099L),
5172 TEST_c_c (catanh, 0x1p5000L, -0.0L, 7.079811261048172892385615158694057552948e-1506L, -1.570796326794896619231321691639751442099L),
5173 TEST_c_c (catanh, -0x1p5000L, 0.0L, -7.079811261048172892385615158694057552948e-1506L, 1.570796326794896619231321691639751442099L),
5174 TEST_c_c (catanh, -0x1p5000L, -0.0L, -7.079811261048172892385615158694057552948e-1506L, -1.570796326794896619231321691639751442099L),
5175 TEST_c_c (catanh, 0.0L, 0x1p5000L, 0.0L, 1.570796326794896619231321691639751442099L),
5176 TEST_c_c (catanh, -0.0L, 0x1p5000L, -0.0L, 1.570796326794896619231321691639751442099L),
5177 TEST_c_c (catanh, 0.0L, -0x1p5000L, 0.0L, -1.570796326794896619231321691639751442099L),
5178 TEST_c_c (catanh, -0.0L, -0x1p5000L, -0.0L, -1.570796326794896619231321691639751442099L),
5179#endif
5180 TEST_c_c (catanh, 0x1p63L, 0.5L, 1.084202172485504434007452800869941711427e-19L, 1.570796326794896619231321691639751442093L),
5181 TEST_c_c (catanh, 0x1p63L, -0.5L, 1.084202172485504434007452800869941711427e-19L, -1.570796326794896619231321691639751442093L),
5182 TEST_c_c (catanh, -0x1p63L, 0.5L, -1.084202172485504434007452800869941711427e-19L, 1.570796326794896619231321691639751442093L),
5183 TEST_c_c (catanh, -0x1p63L, -0.5L, -1.084202172485504434007452800869941711427e-19L, -1.570796326794896619231321691639751442093L),
5184 TEST_c_c (catanh, 0.5L, 0x1p63L, 5.877471754111437539843682686111228389007e-39L, 1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
5185 TEST_c_c (catanh, -0.5L, 0x1p63L, -5.877471754111437539843682686111228389007e-39L, 1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
5186 TEST_c_c (catanh, 0.5L, -0x1p63L, 5.877471754111437539843682686111228389007e-39L, -1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
5187 TEST_c_c (catanh, -0.5L, -0x1p63L, -5.877471754111437539843682686111228389007e-39L, -1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
9457fd95 5188#ifndef TEST_FLOAT
08198877
JM		 5189 TEST_c_c (catanh, 0x1p511L, 0.5L, 1.491668146240041348658193063092586767475e-154L, 1.570796326794896619231321691639751442099L),
5190 TEST_c_c (catanh, 0x1p511L, -0.5L, 1.491668146240041348658193063092586767475e-154L, -1.570796326794896619231321691639751442099L),
5191 TEST_c_c (catanh, -0x1p511L, 0.5L, -1.491668146240041348658193063092586767475e-154L, 1.570796326794896619231321691639751442099L),
5192 TEST_c_c (catanh, -0x1p511L, -0.5L, -1.491668146240041348658193063092586767475e-154L, -1.570796326794896619231321691639751442099L),
5193 TEST_c_c (catanh, 0.5L, 0x1p511L, 1.112536929253600691545116358666202032110e-308L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5194 TEST_c_c (catanh, -0.5L, 0x1p511L, -1.112536929253600691545116358666202032110e-308L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5195 TEST_c_c (catanh, 0.5L, -0x1p511L, 1.112536929253600691545116358666202032110e-308L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5196 TEST_c_c (catanh, -0.5L, -0x1p511L, -1.112536929253600691545116358666202032110e-308L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
9457fd95
JM		 5197#endif
5198#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5199 TEST_c_c (catanh, 0x1p8191L, 0.5L, 1.833603867554847165621412392048483165956e-2466L, 1.570796326794896619231321691639751442099L),
5200 TEST_c_c (catanh, 0x1p8191L, -0.5L, 1.833603867554847165621412392048483165956e-2466L, -1.570796326794896619231321691639751442099L),
5201 TEST_c_c (catanh, -0x1p8191L, 0.5L, -1.833603867554847165621412392048483165956e-2466L, 1.570796326794896619231321691639751442099L),
5202 TEST_c_c (catanh, -0x1p8191L, -0.5L, -1.833603867554847165621412392048483165956e-2466L, -1.570796326794896619231321691639751442099L),
5203 TEST_c_c (catanh, 0.5L, 0x1p8191L, 1.681051571556046753131338908660876301299e-4932L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5204 TEST_c_c (catanh, -0.5L, 0x1p8191L, -1.681051571556046753131338908660876301299e-4932L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5205 TEST_c_c (catanh, 0.5L, -0x1p8191L, 1.681051571556046753131338908660876301299e-4932L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5206 TEST_c_c (catanh, -0.5L, -0x1p8191L, -1.681051571556046753131338908660876301299e-4932L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5207#endif
5208 TEST_c_c (catanh, 0x1p100L, 0.0L, 7.888609052210118054117285652827862296732e-31L, 1.570796326794896619231321691639751442099L),
5209 TEST_c_c (catanh, 0x1p100L, -0.0L, 7.888609052210118054117285652827862296732e-31L, -1.570796326794896619231321691639751442099L),
5210 TEST_c_c (catanh, -0x1p100L, 0.0L, -7.888609052210118054117285652827862296732e-31L, 1.570796326794896619231321691639751442099L),
5211 TEST_c_c (catanh, -0x1p100L, -0.0L, -7.888609052210118054117285652827862296732e-31L, -1.570796326794896619231321691639751442099L),
5212 TEST_c_c (catanh, 0.0L, 0x1p100L, 0.0L, 1.570796326794896619231321691638962581193L),
5213 TEST_c_c (catanh, -0.0L, 0x1p100L, -0.0L, 1.570796326794896619231321691638962581193L),
5214 TEST_c_c (catanh, 0.0L, -0x1p100L, 0.0L, -1.570796326794896619231321691638962581193L),
5215 TEST_c_c (catanh, -0.0L, -0x1p100L, -0.0L, -1.570796326794896619231321691638962581193L),
5216 TEST_c_c (catanh, 0x1.fp127L, 0.0L, 3.033533808573645181854803967025150136306e-39L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_FLOAT),
5217 TEST_c_c (catanh, 0x1.fp127L, -0.0L, 3.033533808573645181854803967025150136306e-39L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_FLOAT),
5218 TEST_c_c (catanh, -0x1.fp127L, 0.0L, -3.033533808573645181854803967025150136306e-39L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_FLOAT),
5219 TEST_c_c (catanh, -0x1.fp127L, -0.0L, -3.033533808573645181854803967025150136306e-39L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_FLOAT),
5220 TEST_c_c (catanh, 0.0L, 0x1.fp127L, 0.0L, 1.570796326794896619231321691639751442096L),
5221 TEST_c_c (catanh, -0.0L, 0x1.fp127L, -0.0L, 1.570796326794896619231321691639751442096L),
5222 TEST_c_c (catanh, 0.0L, -0x1.fp127L, 0.0L, -1.570796326794896619231321691639751442096L),
5223 TEST_c_c (catanh, -0.0L, -0x1.fp127L, -0.0L, -1.570796326794896619231321691639751442096L),
5224 TEST_c_c (catanh, 0x1.fp127L, 0x1.fp127L, 1.516766904286822590927401983512575068153e-39L, 1.570796326794896619231321691639751442097L, UNDERFLOW_EXCEPTION_FLOAT),
5225 TEST_c_c (catanh, 0x1.fp127L, -0x1.fp127L, 1.516766904286822590927401983512575068153e-39L, -1.570796326794896619231321691639751442097L, UNDERFLOW_EXCEPTION_FLOAT),
5226 TEST_c_c (catanh, -0x1.fp127L, 0x1.fp127L, -1.516766904286822590927401983512575068153e-39L, 1.570796326794896619231321691639751442097L, UNDERFLOW_EXCEPTION_FLOAT),
5227 TEST_c_c (catanh, -0x1.fp127L, -0x1.fp127L, -1.516766904286822590927401983512575068153e-39L, -1.570796326794896619231321691639751442097L, UNDERFLOW_EXCEPTION_FLOAT),
5b4217d7 5228#ifndef TEST_FLOAT
08198877
JM		 5229 TEST_c_c (catanh, 0x1p900L, 0.0L, 1.183052186166774710972751597518026531652e-271L, 1.570796326794896619231321691639751442099L),
5230 TEST_c_c (catanh, 0x1p900L, -0.0L, 1.183052186166774710972751597518026531652e-271L, -1.570796326794896619231321691639751442099L),
5231 TEST_c_c (catanh, -0x1p900L, 0.0L, -1.183052186166774710972751597518026531652e-271L, 1.570796326794896619231321691639751442099L),
5232 TEST_c_c (catanh, -0x1p900L, -0.0L, -1.183052186166774710972751597518026531652e-271L, -1.570796326794896619231321691639751442099L),
5233 TEST_c_c (catanh, 0.0L, 0x1p900L, 0.0L, 1.570796326794896619231321691639751442099L),
5234 TEST_c_c (catanh, -0.0L, 0x1p900L, -0.0L, 1.570796326794896619231321691639751442099L),
5235 TEST_c_c (catanh, 0.0L, -0x1p900L, 0.0L, -1.570796326794896619231321691639751442099L),
5236 TEST_c_c (catanh, -0.0L, -0x1p900L, -0.0L, -1.570796326794896619231321691639751442099L),
5237 TEST_c_c (catanh, 0x1.fp1023L, 0.0L, 5.742126086470197117652213464083623391533e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5238 TEST_c_c (catanh, 0x1.fp1023L, -0.0L, 5.742126086470197117652213464083623391533e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5239 TEST_c_c (catanh, -0x1.fp1023L, 0.0L, -5.742126086470197117652213464083623391533e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5240 TEST_c_c (catanh, -0x1.fp1023L, -0.0L, -5.742126086470197117652213464083623391533e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5241 TEST_c_c (catanh, 0.0L, 0x1.fp1023L, 0.0L, 1.570796326794896619231321691639751442099L),
5242 TEST_c_c (catanh, -0.0L, 0x1.fp1023L, -0.0L, 1.570796326794896619231321691639751442099L),
5243 TEST_c_c (catanh, 0.0L, -0x1.fp1023L, 0.0L, -1.570796326794896619231321691639751442099L),
5244 TEST_c_c (catanh, -0.0L, -0x1.fp1023L, -0.0L, -1.570796326794896619231321691639751442099L),
5245 TEST_c_c (catanh, 0x1.fp1023L, 0x1.fp1023L, 2.871063043235098558826106732041811695767e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5246 TEST_c_c (catanh, 0x1.fp1023L, -0x1.fp1023L, 2.871063043235098558826106732041811695767e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5247 TEST_c_c (catanh, -0x1.fp1023L, 0x1.fp1023L, -2.871063043235098558826106732041811695767e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5248 TEST_c_c (catanh, -0x1.fp1023L, -0x1.fp1023L, -2.871063043235098558826106732041811695767e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5b4217d7
JM		 5249#endif
5250#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5251 TEST_c_c (catanh, 0x1p10000L, 0.0L, 5.012372749206452009297555933742977749322e-3011L, 1.570796326794896619231321691639751442099L),
5252 TEST_c_c (catanh, 0x1p10000L, -0.0L, 5.012372749206452009297555933742977749322e-3011L, -1.570796326794896619231321691639751442099L),
5253 TEST_c_c (catanh, -0x1p10000L, 0.0L, -5.012372749206452009297555933742977749322e-3011L, 1.570796326794896619231321691639751442099L),
5254 TEST_c_c (catanh, -0x1p10000L, -0.0L, -5.012372749206452009297555933742977749322e-3011L, -1.570796326794896619231321691639751442099L),
5255 TEST_c_c (catanh, 0.0L, 0x1p10000L, 0.0L, 1.570796326794896619231321691639751442099L),
5256 TEST_c_c (catanh, -0.0L, 0x1p10000L, -0.0L, 1.570796326794896619231321691639751442099L),
5257 TEST_c_c (catanh, 0.0L, -0x1p10000L, 0.0L, -1.570796326794896619231321691639751442099L),
5258 TEST_c_c (catanh, -0.0L, -0x1p10000L, -0.0L, -1.570796326794896619231321691639751442099L),
5259 TEST_c_c (catanh, 0x1.fp16383L, 0.0L, 8.676395208031209048419813722120651877672e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5260 TEST_c_c (catanh, 0x1.fp16383L, -0.0L, 8.676395208031209048419813722120651877672e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5261 TEST_c_c (catanh, -0x1.fp16383L, 0.0L, -8.676395208031209048419813722120651877672e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5262 TEST_c_c (catanh, -0x1.fp16383L, -0.0L, -8.676395208031209048419813722120651877672e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5263 TEST_c_c (catanh, 0.0L, 0x1.fp16383L, 0.0L, 1.570796326794896619231321691639751442099L),
5264 TEST_c_c (catanh, -0.0L, 0x1.fp16383L, -0.0L, 1.570796326794896619231321691639751442099L),
5265 TEST_c_c (catanh, 0.0L, -0x1.fp16383L, 0.0L, -1.570796326794896619231321691639751442099L),
5266 TEST_c_c (catanh, -0.0L, -0x1.fp16383L, -0.0L, -1.570796326794896619231321691639751442099L),
5267 TEST_c_c (catanh, 0x1.fp16383L, 0x1.fp16383L, 4.338197604015604524209906861060325938836e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5268 TEST_c_c (catanh, 0x1.fp16383L, -0x1.fp16383L, 4.338197604015604524209906861060325938836e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5269 TEST_c_c (catanh, -0x1.fp16383L, 0x1.fp16383L, -4.338197604015604524209906861060325938836e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5270 TEST_c_c (catanh, -0x1.fp16383L, -0x1.fp16383L, -4.338197604015604524209906861060325938836e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5271#endif
5272 TEST_c_c (catanh, 0x1p-13L, 1.0L, 6.103515609841754902688560615027452023669e-5L, 7.853981671227386080775748393881580082970e-1L),
5273 TEST_c_c (catanh, 0x1p-13L, -1.0L, 6.103515609841754902688560615027452023669e-5L, -7.853981671227386080775748393881580082970e-1L),
5274 TEST_c_c (catanh, -0x1p-13L, 1.0L, -6.103515609841754902688560615027452023669e-5L, 7.853981671227386080775748393881580082970e-1L),
5275 TEST_c_c (catanh, -0x1p-13L, -1.0L, -6.103515609841754902688560615027452023669e-5L, -7.853981671227386080775748393881580082970e-1L),
5276 TEST_c_c (catanh, 1.0L, 0x1p-13L, 4.852030264850939738801379894163661227127L, 7.854286809755354140031716771044626356262e-1L),
5277 TEST_c_c (catanh, -1.0L, 0x1p-13L, -4.852030264850939738801379894163661227127L, 7.854286809755354140031716771044626356262e-1L),
5278 TEST_c_c (catanh, 1.0L, -0x1p-13L, 4.852030264850939738801379894163661227127L, -7.854286809755354140031716771044626356262e-1L),
5279 TEST_c_c (catanh, -1.0L, -0x1p-13L, -4.852030264850939738801379894163661227127L, -7.854286809755354140031716771044626356262e-1L),
5280 TEST_c_c (catanh, 0x1p-27L, 1.0L, 3.725290298461914028034141143623846306386e-9L, 7.853981633974483234934486536343324763447e-1L),
5281 TEST_c_c (catanh, 0x1p-27L, -1.0L, 3.725290298461914028034141143623846306386e-9L, -7.853981633974483234934486536343324763447e-1L),
5282 TEST_c_c (catanh, -0x1p-27L, 1.0L, -3.725290298461914028034141143623846306386e-9L, 7.853981633974483234934486536343324763447e-1L),
5283 TEST_c_c (catanh, -0x1p-27L, -1.0L, -3.725290298461914028034141143623846306386e-9L, -7.853981633974483234934486536343324763447e-1L),
5284 TEST_c_c (catanh, 1.0L, 0x1p-27L, 9.704060527839234335310696652368086117807L, 7.853981652600934588466178684534110069553e-1L),
5285 TEST_c_c (catanh, -1.0L, 0x1p-27L, -9.704060527839234335310696652368086117807L, 7.853981652600934588466178684534110069553e-1L),
5286 TEST_c_c (catanh, 1.0L, -0x1p-27L, 9.704060527839234335310696652368086117807L, -7.853981652600934588466178684534110069553e-1L),
5287 TEST_c_c (catanh, -1.0L, -0x1p-27L, -9.704060527839234335310696652368086117807L, -7.853981652600934588466178684534110069553e-1L),
5288 TEST_c_c (catanh, 0x1p-33L, 1.0L, 5.820766091346740722643102318246316469910e-11L, 7.853981633974483096190489776088929224056e-1L),
5289 TEST_c_c (catanh, 0x1p-33L, -1.0L, 5.820766091346740722643102318246316469910e-11L, -7.853981633974483096190489776088929224056e-1L),
5290 TEST_c_c (catanh, -0x1p-33L, 1.0L, -5.820766091346740722643102318246316469910e-11L, 7.853981633974483096190489776088929224056e-1L),
5291 TEST_c_c (catanh, -0x1p-33L, -1.0L, -5.820766091346740722643102318246316469910e-11L, -7.853981633974483096190489776088929224056e-1L),
5292 TEST_c_c (catanh, 1.0L, 0x1p-33L, 1.178350206951907026009379309773625595762e1L, 7.853981634265521400723945494331241018449e-1L),
5293 TEST_c_c (catanh, -1.0L, 0x1p-33L, -1.178350206951907026009379309773625595762e1L, 7.853981634265521400723945494331241018449e-1L),
5294 TEST_c_c (catanh, 1.0L, -0x1p-33L, 1.178350206951907026009379309773625595762e1L, -7.853981634265521400723945494331241018449e-1L),
5295 TEST_c_c (catanh, -1.0L, -0x1p-33L, -1.178350206951907026009379309773625595762e1L, -7.853981634265521400723945494331241018449e-1L),
5296 TEST_c_c (catanh, 0x1p-54L, 1.0L, 2.775557561562891351059079170227049355775e-17L, 7.853981633974483096156608458198764914213e-1L),
5297 TEST_c_c (catanh, 0x1p-54L, -1.0L, 2.775557561562891351059079170227049355775e-17L, -7.853981633974483096156608458198764914213e-1L),
5298 TEST_c_c (catanh, -0x1p-54L, 1.0L, -2.775557561562891351059079170227049355775e-17L, 7.853981633974483096156608458198764914213e-1L),
5299 TEST_c_c (catanh, -0x1p-54L, -1.0L, -2.775557561562891351059079170227049355775e-17L, -7.853981633974483096156608458198764914213e-1L),
5300 TEST_c_c (catanh, 1.0L, 0x1p-54L, 1.906154746539849600897388334009985581467e1L, 7.853981633974483234934486536343324763447e-1L),
5301 TEST_c_c (catanh, -1.0L, 0x1p-54L, -1.906154746539849600897388334009985581467e1L, 7.853981633974483234934486536343324763447e-1L),
5302 TEST_c_c (catanh, 1.0L, -0x1p-54L, 1.906154746539849600897388334009985581467e1L, -7.853981633974483234934486536343324763447e-1L),
5303 TEST_c_c (catanh, -1.0L, -0x1p-54L, -1.906154746539849600897388334009985581467e1L, -7.853981633974483234934486536343324763447e-1L),
5304 TEST_c_c (catanh, 0x1p-57L, 1.0L, 3.469446951953614188823848962783813448721e-18L, 7.853981633974483096156608458198757330864e-1L),
5305 TEST_c_c (catanh, 0x1p-57L, -1.0L, 3.469446951953614188823848962783813448721e-18L, -7.853981633974483096156608458198757330864e-1L),
5306 TEST_c_c (catanh, -0x1p-57L, 1.0L, -3.469446951953614188823848962783813448721e-18L, 7.853981633974483096156608458198757330864e-1L),
5307 TEST_c_c (catanh, -0x1p-57L, -1.0L, -3.469446951953614188823848962783813448721e-18L, -7.853981633974483096156608458198757330864e-1L),
5308 TEST_c_c (catanh, 1.0L, 0x1p-57L, 2.010126823623841397309973152228712047720e1L, 7.853981633974483113503843217966828154612e-1L),
5309 TEST_c_c (catanh, -1.0L, 0x1p-57L, -2.010126823623841397309973152228712047720e1L, 7.853981633974483113503843217966828154612e-1L),
5310 TEST_c_c (catanh, 1.0L, -0x1p-57L, 2.010126823623841397309973152228712047720e1L, -7.853981633974483113503843217966828154612e-1L),
5311 TEST_c_c (catanh, -1.0L, -0x1p-57L, -2.010126823623841397309973152228712047720e1L, -7.853981633974483113503843217966828154612e-1L),
5312 TEST_c_c (catanh, 0x1p-13L, 0x1.000002p0L, 6.103514882246036852433556327261700380577e-5L, 7.853982267273793866654490522673596014524e-1L),
5313 TEST_c_c (catanh, 0x1p-13L, -0x1.000002p0L, 6.103514882246036852433556327261700380577e-5L, -7.853982267273793866654490522673596014524e-1L),
5314 TEST_c_c (catanh, -0x1p-13L, 0x1.000002p0L, -6.103514882246036852433556327261700380577e-5L, 7.853982267273793866654490522673596014524e-1L),
5315 TEST_c_c (catanh, -0x1p-13L, -0x1.000002p0L, -6.103514882246036852433556327261700380577e-5L, -7.853982267273793866654490522673596014524e-1L),
5316 TEST_c_c (catanh, 0x1.000002p0L, 0x1p-13L, 4.852030056234795712498957387213592193975L, 7.859169620684960844300240092596908675974e-1L),
5317 TEST_c_c (catanh, -0x1.000002p0L, 0x1p-13L, -4.852030056234795712498957387213592193975L, 7.859169620684960844300240092596908675974e-1L),
5318 TEST_c_c (catanh, 0x1.000002p0L, -0x1p-13L, 4.852030056234795712498957387213592193975L, -7.859169620684960844300240092596908675974e-1L),
5319 TEST_c_c (catanh, -0x1.000002p0L, -0x1p-13L, -4.852030056234795712498957387213592193975L, -7.859169620684960844300240092596908675974e-1L),
5320 TEST_c_c (catanh, 0x1p-13L, 0x0.ffffffp0L, 6.103515973639646453881721999956617260502e-5L, 7.853981373204155542484315721351697277336e-1L),
5321 TEST_c_c (catanh, 0x1p-13L, -0x0.ffffffp0L, 6.103515973639646453881721999956617260502e-5L, -7.853981373204155542484315721351697277336e-1L),
5322 TEST_c_c (catanh, -0x1p-13L, 0x0.ffffffp0L, -6.103515973639646453881721999956617260502e-5L, 7.853981373204155542484315721351697277336e-1L),
5323 TEST_c_c (catanh, -0x1p-13L, -0x0.ffffffp0L, -6.103515973639646453881721999956617260502e-5L, -7.853981373204155542484315721351697277336e-1L),
5324 TEST_c_c (catanh, 0x0.ffffffp0L, 0x1p-13L, 4.852030190345140708455871037447717761868L, 7.851845403708474595909269086711426246675e-1L),
5325 TEST_c_c (catanh, -0x0.ffffffp0L, 0x1p-13L, -4.852030190345140708455871037447717761868L, 7.851845403708474595909269086711426246675e-1L),
5326 TEST_c_c (catanh, 0x0.ffffffp0L, -0x1p-13L, 4.852030190345140708455871037447717761868L, -7.851845403708474595909269086711426246675e-1L),
5327 TEST_c_c (catanh, -0x0.ffffffp0L, -0x1p-13L, -4.852030190345140708455871037447717761868L, -7.851845403708474595909269086711426246675e-1L),
caf84319 5328#ifndef TEST_FLOAT
08198877
JM		 5329 TEST_c_c (catanh, 0x1p-27L, 0x1.0000000000001p0L, 3.725290298461913200853528590596263270474e-9L, 7.853981633974484345157511161499711112683e-1L),
5330 TEST_c_c (catanh, 0x1p-27L, -0x1.0000000000001p0L, 3.725290298461913200853528590596263270474e-9L, -7.853981633974484345157511161499711112683e-1L),
5331 TEST_c_c (catanh, -0x1p-27L, 0x1.0000000000001p0L, -3.725290298461913200853528590596263270474e-9L, 7.853981633974484345157511161499711112683e-1L),
5332 TEST_c_c (catanh, -0x1p-27L, -0x1.0000000000001p0L, -3.725290298461913200853528590596263270474e-9L, -7.853981633974484345157511161499711112683e-1L),
5333 TEST_c_c (catanh, 0x1.0000000000001p0L, 0x1p-27L, 9.704060527839234168777242958594699810015L, 7.853981801612546526942695000283242525531e-1L),
5334 TEST_c_c (catanh, -0x1.0000000000001p0L, 0x1p-27L, -9.704060527839234168777242958594699810015L, 7.853981801612546526942695000283242525531e-1L),
5335 TEST_c_c (catanh, 0x1.0000000000001p0L, -0x1p-27L, 9.704060527839234168777242958594699810015L, -7.853981801612546526942695000283242525531e-1L),
5336 TEST_c_c (catanh, -0x1.0000000000001p0L, -0x1p-27L, -9.704060527839234168777242958594699810015L, -7.853981801612546526942695000283242525531e-1L),
5337 TEST_c_c (catanh, 0x1p-27L, 0x0.fffffffffffff8p0L, 3.725290298461914441624447420137706700965e-9L, 7.853981633974482679822974223765039144191e-1L),
5338 TEST_c_c (catanh, 0x1p-27L, -0x0.fffffffffffff8p0L, 3.725290298461914441624447420137706700965e-9L, -7.853981633974482679822974223765039144191e-1L),
5339 TEST_c_c (catanh, -0x1p-27L, 0x0.fffffffffffff8p0L, -3.725290298461914441624447420137706700965e-9L, 7.853981633974482679822974223765039144191e-1L),
5340 TEST_c_c (catanh, -0x1p-27L, -0x0.fffffffffffff8p0L, -3.725290298461914441624447420137706700965e-9L, -7.853981633974482679822974223765039144191e-1L),
5341 TEST_c_c (catanh, 0x0.fffffffffffff8p0L, 0x1p-27L, 9.704060527839234252043969805481351363824L, 7.853981578095128619227903983047292781021e-1L),
5342 TEST_c_c (catanh, -0x0.fffffffffffff8p0L, 0x1p-27L, -9.704060527839234252043969805481351363824L, 7.853981578095128619227903983047292781021e-1L),
5343 TEST_c_c (catanh, 0x0.fffffffffffff8p0L, -0x1p-27L, 9.704060527839234252043969805481351363824L, -7.853981578095128619227903983047292781021e-1L),
5344 TEST_c_c (catanh, -0x0.fffffffffffff8p0L, -0x1p-27L, -9.704060527839234252043969805481351363824L, -7.853981578095128619227903983047292781021e-1L),
caf84319
JM		 5345#endif
5346#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 5347 TEST_c_c (catanh, 0x1p-33L, 0x1.0000000000000002p0L, 5.820766091346740722012013594069507025615e-11L, 7.853981633974483096732590862331681441026e-1L),
5348 TEST_c_c (catanh, 0x1p-33L, -0x1.0000000000000002p0L, 5.820766091346740722012013594069507025615e-11L, -7.853981633974483096732590862331681441026e-1L),
5349 TEST_c_c (catanh, -0x1p-33L, 0x1.0000000000000002p0L, -5.820766091346740722012013594069507025615e-11L, 7.853981633974483096732590862331681441026e-1L),
5350 TEST_c_c (catanh, -0x1p-33L, -0x1.0000000000000002p0L, -5.820766091346740722012013594069507025615e-11L, -7.853981633974483096732590862331681441026e-1L),
5351 TEST_c_c (catanh, 0x1.0000000000000002p0L, 0x1p-33L, 1.178350206951907025990405771755129268176e1L, 7.853981638922134273801338071094141188767e-1L),
5352 TEST_c_c (catanh, -0x1.0000000000000002p0L, 0x1p-33L, -1.178350206951907025990405771755129268176e1L, 7.853981638922134273801338071094141188767e-1L),
5353 TEST_c_c (catanh, 0x1.0000000000000002p0L, -0x1p-33L, 1.178350206951907025990405771755129268176e1L, -7.853981638922134273801338071094141188767e-1L),
5354 TEST_c_c (catanh, -0x1.0000000000000002p0L, -0x1p-33L, -1.178350206951907025990405771755129268176e1L, -7.853981638922134273801338071094141188767e-1L),
5355 TEST_c_c (catanh, 0x1p-33L, 0x0.ffffffffffffffffp0L, 5.820766091346740722958646680334721192083e-11L, 7.853981633974483095919439232967553115548e-1L),
5356 TEST_c_c (catanh, 0x1p-33L, -0x0.ffffffffffffffffp0L, 5.820766091346740722958646680334721192083e-11L, -7.853981633974483095919439232967553115548e-1L),
5357 TEST_c_c (catanh, -0x1p-33L, 0x0.ffffffffffffffffp0L, -5.820766091346740722958646680334721192083e-11L, 7.853981633974483095919439232967553115548e-1L),
5358 TEST_c_c (catanh, -0x1p-33L, -0x0.ffffffffffffffffp0L, -5.820766091346740722958646680334721192083e-11L, -7.853981633974483095919439232967553115548e-1L),
5359 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, 0x1p-33L, 1.178350206951907026002603046195591193050e1L, 7.853981631937214964185249205444919953948e-1L),
5360 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, 0x1p-33L, -1.178350206951907026002603046195591193050e1L, 7.853981631937214964185249205444919953948e-1L),
5361 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, -0x1p-33L, 1.178350206951907026002603046195591193050e1L, -7.853981631937214964185249205444919953948e-1L),
5362 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, -0x1p-33L, -1.178350206951907026002603046195591193050e1L, -7.853981631937214964185249205444919953948e-1L),
caf84319
JM		 5363#endif
5364#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 5365 TEST_c_c (catanh, 0x1p-54L, 0x1.000000000000000000000000008p0L, 2.775557561562891351059079170226980932999e-17L, 7.853981633974483096156608458198888173729e-1L),
5366 TEST_c_c (catanh, 0x1p-54L, -0x1.000000000000000000000000008p0L, 2.775557561562891351059079170226980932999e-17L, -7.853981633974483096156608458198888173729e-1L),
5367 TEST_c_c (catanh, -0x1p-54L, 0x1.000000000000000000000000008p0L, -2.775557561562891351059079170226980932999e-17L, 7.853981633974483096156608458198888173729e-1L),
5368 TEST_c_c (catanh, -0x1p-54L, -0x1.000000000000000000000000008p0L, -2.775557561562891351059079170226980932999e-17L, -7.853981633974483096156608458198888173729e-1L),
5369 TEST_c_c (catanh, 0x1.000000000000000000000000008p0L, 0x1p-54L, 1.906154746539849600897388334009981267384e1L, 7.853981633974485455380535786656405610710e-1L),
5370 TEST_c_c (catanh, -0x1.000000000000000000000000008p0L, 0x1p-54L, -1.906154746539849600897388334009981267384e1L, 7.853981633974485455380535786656405610710e-1L),
5371 TEST_c_c (catanh, 0x1.000000000000000000000000008p0L, -0x1p-54L, 1.906154746539849600897388334009981267384e1L, -7.853981633974485455380535786656405610710e-1L),
5372 TEST_c_c (catanh, -0x1.000000000000000000000000008p0L, -0x1p-54L, -1.906154746539849600897388334009981267384e1L, -7.853981633974485455380535786656405610710e-1L),
5373 TEST_c_c (catanh, 0x1p-54L, 0x0.ffffffffffffffffffffffffffcp0L, 2.775557561562891351059079170227083567164e-17L, 7.853981633974483096156608458198703284454e-1L),
5374 TEST_c_c (catanh, 0x1p-54L, -0x0.ffffffffffffffffffffffffffcp0L, 2.775557561562891351059079170227083567164e-17L, -7.853981633974483096156608458198703284454e-1L),
5375 TEST_c_c (catanh, -0x1p-54L, 0x0.ffffffffffffffffffffffffffcp0L, -2.775557561562891351059079170227083567164e-17L, 7.853981633974483096156608458198703284454e-1L),
5376 TEST_c_c (catanh, -0x1p-54L, -0x0.ffffffffffffffffffffffffffcp0L, -2.775557561562891351059079170227083567164e-17L, -7.853981633974483096156608458198703284454e-1L),
5377 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-54L, 1.906154746539849600897388334009984040723e1L, 7.853981633974482124711461911186784339815e-1L),
5378 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-54L, -1.906154746539849600897388334009984040723e1L, 7.853981633974482124711461911186784339815e-1L),
5379 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-54L, 1.906154746539849600897388334009984040723e1L, -7.853981633974482124711461911186784339815e-1L),
5380 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-54L, -1.906154746539849600897388334009984040723e1L, -7.853981633974482124711461911186784339815e-1L),
caf84319
JM		 5381#endif
5382#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 5383 TEST_c_c (catanh, 0x1p-57L, 0x1.0000000000000000000000000001p0L, 3.469446951953614188823848962783812780530e-18L, 7.853981633974483096156608458198758293829e-1L),
5384 TEST_c_c (catanh, 0x1p-57L, -0x1.0000000000000000000000000001p0L, 3.469446951953614188823848962783812780530e-18L, -7.853981633974483096156608458198758293829e-1L),
5385 TEST_c_c (catanh, -0x1p-57L, 0x1.0000000000000000000000000001p0L, -3.469446951953614188823848962783812780530e-18L, 7.853981633974483096156608458198758293829e-1L),
5386 TEST_c_c (catanh, -0x1p-57L, -0x1.0000000000000000000000000001p0L, -3.469446951953614188823848962783812780530e-18L, -7.853981633974483096156608458198758293829e-1L),
5387 TEST_c_c (catanh, 0x1.0000000000000000000000000001p0L, 0x1p-57L, 2.010126823623841397309973152228712033275e1L, 7.853981633974483252281721296111395707566e-1L),
5388 TEST_c_c (catanh, -0x1.0000000000000000000000000001p0L, 0x1p-57L, -2.010126823623841397309973152228712033275e1L, 7.853981633974483252281721296111395707566e-1L),
5389 TEST_c_c (catanh, 0x1.0000000000000000000000000001p0L, -0x1p-57L, 2.010126823623841397309973152228712033275e1L, -7.853981633974483252281721296111395707566e-1L),
5390 TEST_c_c (catanh, -0x1.0000000000000000000000000001p0L, -0x1p-57L, -2.010126823623841397309973152228712033275e1L, -7.853981633974483252281721296111395707566e-1L),
5391 TEST_c_c (catanh, 0x1p-57L, 0x0.ffffffffffffffffffffffffffff8p0L, 3.469446951953614188823848962783813782817e-18L, 7.853981633974483096156608458198756849381e-1L),
5392 TEST_c_c (catanh, 0x1p-57L, -0x0.ffffffffffffffffffffffffffff8p0L, 3.469446951953614188823848962783813782817e-18L, -7.853981633974483096156608458198756849381e-1L),
5393 TEST_c_c (catanh, -0x1p-57L, 0x0.ffffffffffffffffffffffffffff8p0L, -3.469446951953614188823848962783813782817e-18L, 7.853981633974483096156608458198756849381e-1L),
5394 TEST_c_c (catanh, -0x1p-57L, -0x0.ffffffffffffffffffffffffffff8p0L, -3.469446951953614188823848962783813782817e-18L, -7.853981633974483096156608458198756849381e-1L),
5395 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-57L, 2.010126823623841397309973152228712040498e1L, 7.853981633974483044114904178894544378135e-1L),
5396 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-57L, -2.010126823623841397309973152228712040498e1L, 7.853981633974483044114904178894544378135e-1L),
5397 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-57L, 2.010126823623841397309973152228712040498e1L, -7.853981633974483044114904178894544378135e-1L),
5398 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-57L, -2.010126823623841397309973152228712040498e1L, -7.853981633974483044114904178894544378135e-1L),
5399#endif
5400 TEST_c_c (catanh, 1.0L, 0x1p-64L, 2.252728336819822255606004394739073846245e1L, 7.853981633974483096292133729759445264744e-1L),
5401 TEST_c_c (catanh, 1.0L, -0x1p-64L, 2.252728336819822255606004394739073846245e1L, -7.853981633974483096292133729759445264744e-1L),
5402 TEST_c_c (catanh, -1.0L, 0x1p-64L, -2.252728336819822255606004394739073846245e1L, 7.853981633974483096292133729759445264744e-1L),
5403 TEST_c_c (catanh, -1.0L, -0x1p-64L, -2.252728336819822255606004394739073846245e1L, -7.853981633974483096292133729759445264744e-1L),
5404 TEST_c_c (catanh, 0x1p-64L, 1.0L, 2.710505431213761085018632002174854278563e-20L, 7.853981633974483096156608458198757210500e-1L),
5405 TEST_c_c (catanh, -0x1p-64L, 1.0L, -2.710505431213761085018632002174854278563e-20L, 7.853981633974483096156608458198757210500e-1L),
5406 TEST_c_c (catanh, 0x1p-64L, -1.0L, 2.710505431213761085018632002174854278563e-20L, -7.853981633974483096156608458198757210500e-1L),
5407 TEST_c_c (catanh, -0x1p-64L, -1.0L, -2.710505431213761085018632002174854278563e-20L, -7.853981633974483096156608458198757210500e-1L),
5408 TEST_c_c (catanh, 1.0L, 0x1.3p-73L, 2.556052055225464683726753902092495938633e1L, 7.853981633974483096156922786831527361009e-1L),
5409 TEST_c_c (catanh, 1.0L, -0x1.3p-73L, 2.556052055225464683726753902092495938633e1L, -7.853981633974483096156922786831527361009e-1L),
5410 TEST_c_c (catanh, -1.0L, 0x1.3p-73L, -2.556052055225464683726753902092495938633e1L, 7.853981633974483096156922786831527361009e-1L),
5411 TEST_c_c (catanh, -1.0L, -0x1.3p-73L, -2.556052055225464683726753902092495938633e1L, -7.853981633974483096156922786831527361009e-1L),
5412 TEST_c_c (catanh, 0x1.3p-73L, 1.0L, 6.286572655403010329022706059731717687100e-23L, 7.853981633974483096156608458198757210493e-1L),
5413 TEST_c_c (catanh, -0x1.3p-73L, 1.0L, -6.286572655403010329022706059731717687100e-23L, 7.853981633974483096156608458198757210493e-1L),
5414 TEST_c_c (catanh, 0x1.3p-73L, -1.0L, 6.286572655403010329022706059731717687100e-23L, -7.853981633974483096156608458198757210493e-1L),
5415 TEST_c_c (catanh, -0x1.3p-73L, -1.0L, -6.286572655403010329022706059731717687100e-23L, -7.853981633974483096156608458198757210493e-1L),
5416 TEST_c_c (catanh, 1.0L, 0x1p-124L, 4.332169878499658183857700759113603550472e1L, 7.853981633974483096156608458198757210610e-1L),
5417 TEST_c_c (catanh, 1.0L, -0x1p-124L, 4.332169878499658183857700759113603550472e1L, -7.853981633974483096156608458198757210610e-1L),
5418 TEST_c_c (catanh, -1.0L, 0x1p-124L, -4.332169878499658183857700759113603550472e1L, 7.853981633974483096156608458198757210610e-1L),
5419 TEST_c_c (catanh, -1.0L, -0x1p-124L, -4.332169878499658183857700759113603550472e1L, -7.853981633974483096156608458198757210610e-1L),
5420 TEST_c_c (catanh, 0x1p-124L, 1.0L, 2.350988701644575015937473074444491355637e-38L, 7.853981633974483096156608458198757210493e-1L),
5421 TEST_c_c (catanh, -0x1p-124L, 1.0L, -2.350988701644575015937473074444491355637e-38L, 7.853981633974483096156608458198757210493e-1L),
5422 TEST_c_c (catanh, 0x1p-124L, -1.0L, 2.350988701644575015937473074444491355637e-38L, -7.853981633974483096156608458198757210493e-1L),
5423 TEST_c_c (catanh, -0x1p-124L, -1.0L, -2.350988701644575015937473074444491355637e-38L, -7.853981633974483096156608458198757210493e-1L),
5424 TEST_c_c (catanh, 0x1.000002p0L, 0x1p-126L, 8.317766196521665212523713550410777685446L, 1.570796326794896619231321691639702138295L),
5425 TEST_c_c (catanh, 0x1.000002p0L, -0x1p-126L, 8.317766196521665212523713550410777685446L, -1.570796326794896619231321691639702138295L),
5426 TEST_c_c (catanh, -0x1.000002p0L, 0x1p-126L, -8.317766196521665212523713550410777685446L, 1.570796326794896619231321691639702138295L),
5427 TEST_c_c (catanh, -0x1.000002p0L, -0x1p-126L, -8.317766196521665212523713550410777685446L, -1.570796326794896619231321691639702138295L),
5428 TEST_c_c (catanh, 0x1p-126L, 0x1.000002p0L, 5.877471053462247139383742414506671233336e-39L, 7.853982230020895322927482174768220815493e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5429 TEST_c_c (catanh, -0x1p-126L, 0x1.000002p0L, -5.877471053462247139383742414506671233336e-39L, 7.853982230020895322927482174768220815493e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5430 TEST_c_c (catanh, 0x1p-126L, -0x1.000002p0L, 5.877471053462247139383742414506671233336e-39L, -7.853982230020895322927482174768220815493e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5431 TEST_c_c (catanh, -0x1p-126L, -0x1.000002p0L, -5.877471053462247139383742414506671233336e-39L, -7.853982230020895322927482174768220815493e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5432 TEST_c_c (catanh, 0x0.ffffffp0L, 0x1p-126L, 8.664339742098154951823135931565866792454L, 9.860761609136244031334147100512154160097e-32L),
5433 TEST_c_c (catanh, 0x0.ffffffp0L, -0x1p-126L, 8.664339742098154951823135931565866792454L, -9.860761609136244031334147100512154160097e-32L),
5434 TEST_c_c (catanh, -0x0.ffffffp0L, 0x1p-126L, -8.664339742098154951823135931565866792454L, 9.860761609136244031334147100512154160097e-32L),
5435 TEST_c_c (catanh, -0x0.ffffffp0L, -0x1p-126L, -8.664339742098154951823135931565866792454L, -9.860761609136244031334147100512154160097e-32L),
5436 TEST_c_c (catanh, 0x1p-126L, 0x0.ffffffp0L, 5.877472104436064061535099214664320916184e-39L, 7.853981335951250337419109991749089175724e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5437 TEST_c_c (catanh, -0x1p-126L, 0x0.ffffffp0L, -5.877472104436064061535099214664320916184e-39L, 7.853981335951250337419109991749089175724e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5438 TEST_c_c (catanh, 0x1p-126L, -0x0.ffffffp0L, 5.877472104436064061535099214664320916184e-39L, -7.853981335951250337419109991749089175724e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5439 TEST_c_c (catanh, -0x1p-126L, -0x0.ffffffp0L, -5.877472104436064061535099214664320916184e-39L, -7.853981335951250337419109991749089175724e-1L, UNDERFLOW_EXCEPTION_FLOAT),
10de07f5 5440#ifndef TEST_FLOAT
08198877
JM		 5441 TEST_c_c (catanh, 1.0L, 0x1p-512L, 1.777922518136259718655200391540222897114e2L, 7.853981633974483096156608458198757210493e-1L),
5442 TEST_c_c (catanh, 1.0L, -0x1p-512L, 1.777922518136259718655200391540222897114e2L, -7.853981633974483096156608458198757210493e-1L),
5443 TEST_c_c (catanh, -1.0L, 0x1p-512L, -1.777922518136259718655200391540222897114e2L, 7.853981633974483096156608458198757210493e-1L),
5444 TEST_c_c (catanh, -1.0L, -0x1p-512L, -1.777922518136259718655200391540222897114e2L, -7.853981633974483096156608458198757210493e-1L),
5445 TEST_c_c (catanh, 0x1p-512L, 1.0L, 3.729170365600103371645482657731466918688e-155L, 7.853981633974483096156608458198757210493e-1L),
5446 TEST_c_c (catanh, -0x1p-512L, 1.0L, -3.729170365600103371645482657731466918688e-155L, 7.853981633974483096156608458198757210493e-1L),
5447 TEST_c_c (catanh, 0x1p-512L, -1.0L, 3.729170365600103371645482657731466918688e-155L, -7.853981633974483096156608458198757210493e-1L),
5448 TEST_c_c (catanh, -0x1p-512L, -1.0L, -3.729170365600103371645482657731466918688e-155L, -7.853981633974483096156608458198757210493e-1L),
5449 TEST_c_c (catanh, 1.0L, 0x1.3p-536L, 1.860240928518819859673567751384928348958e2L, 7.853981633974483096156608458198757210493e-1L),
5450 TEST_c_c (catanh, 1.0L, -0x1.3p-536L, 1.860240928518819859673567751384928348958e2L, -7.853981633974483096156608458198757210493e-1L),
5451 TEST_c_c (catanh, -1.0L, 0x1.3p-536L, -1.860240928518819859673567751384928348958e2L, 7.853981633974483096156608458198757210493e-1L),
5452 TEST_c_c (catanh, -1.0L, -0x1.3p-536L, -1.860240928518819859673567751384928348958e2L, -7.853981633974483096156608458198757210493e-1L),
5453 TEST_c_c (catanh, 0x1.3p-536L, 1.0L, 2.639526015013529511588222179446290115084e-162L, 7.853981633974483096156608458198757210493e-1L),
5454 TEST_c_c (catanh, -0x1.3p-536L, 1.0L, -2.639526015013529511588222179446290115084e-162L, 7.853981633974483096156608458198757210493e-1L),
5455 TEST_c_c (catanh, 0x1.3p-536L, -1.0L, 2.639526015013529511588222179446290115084e-162L, -7.853981633974483096156608458198757210493e-1L),
5456 TEST_c_c (catanh, -0x1.3p-536L, -1.0L, -2.639526015013529511588222179446290115084e-162L, -7.853981633974483096156608458198757210493e-1L),
5457 TEST_c_c (catanh, 1.0L, 0x1p-1020L, 3.538516356758520804574969980043991380025e2L, 7.853981633974483096156608458198757210493e-1L),
5458 TEST_c_c (catanh, 1.0L, -0x1p-1020L, 3.538516356758520804574969980043991380025e2L, -7.853981633974483096156608458198757210493e-1L),
5459 TEST_c_c (catanh, -1.0L, 0x1p-1020L, -3.538516356758520804574969980043991380025e2L, 7.853981633974483096156608458198757210493e-1L),
5460 TEST_c_c (catanh, -1.0L, -0x1p-1020L, -3.538516356758520804574969980043991380025e2L, -7.853981633974483096156608458198757210493e-1L),
5461 TEST_c_c (catanh, 0x1p-1020L, 1.0L, 4.450147717014402766180465434664808128438e-308L, 7.853981633974483096156608458198757210493e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5462 TEST_c_c (catanh, -0x1p-1020L, 1.0L, -4.450147717014402766180465434664808128438e-308L, 7.853981633974483096156608458198757210493e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5463 TEST_c_c (catanh, 0x1p-1020L, -1.0L, 4.450147717014402766180465434664808128438e-308L, -7.853981633974483096156608458198757210493e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5464 TEST_c_c (catanh, -0x1p-1020L, -1.0L, -4.450147717014402766180465434664808128438e-308L, -7.853981633974483096156608458198757210493e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5465 TEST_c_c (catanh, 0x1.0000000000001p0L, 0x1p-1022L, 1.836840028483855075506780244989950299369e1L, 1.570796326794896619231321691639751442099L),
5466 TEST_c_c (catanh, 0x1.0000000000001p0L, -0x1p-1022L, 1.836840028483855075506780244989950299369e1L, -1.570796326794896619231321691639751442099L),
5467 TEST_c_c (catanh, -0x1.0000000000001p0L, 0x1p-1022L, -1.836840028483855075506780244989950299369e1L, 1.570796326794896619231321691639751442099L),
5468 TEST_c_c (catanh, -0x1.0000000000001p0L, -0x1p-1022L, -1.836840028483855075506780244989950299369e1L, -1.570796326794896619231321691639751442099L),
5469 TEST_c_c (catanh, 0x1p-1022L, 0x1.0000000000001p0L, 1.112536929253600444512293438042957369978e-308L, 7.853981633974484206379633083355174374608e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5470 TEST_c_c (catanh, -0x1p-1022L, 0x1.0000000000001p0L, -1.112536929253600444512293438042957369978e-308L, 7.853981633974484206379633083355174374608e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5471 TEST_c_c (catanh, 0x1p-1022L, -0x1.0000000000001p0L, 1.112536929253600444512293438042957369978e-308L, -7.853981633974484206379633083355174374608e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5472 TEST_c_c (catanh, -0x1p-1022L, -0x1.0000000000001p0L, -1.112536929253600444512293438042957369978e-308L, -7.853981633974484206379633083355174374608e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5473 TEST_c_c (catanh, 0x0.fffffffffffff8p0L, 0x1p-1022L, 1.871497387511852332650969166374185305708e1L, 1.002084180004486444624900488355118689113e-292L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5474 TEST_c_c (catanh, 0x0.fffffffffffff8p0L, -0x1p-1022L, 1.871497387511852332650969166374185305708e1L, -1.002084180004486444624900488355118689113e-292L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5475 TEST_c_c (catanh, -0x0.fffffffffffff8p0L, 0x1p-1022L, -1.871497387511852332650969166374185305708e1L, 1.002084180004486444624900488355118689113e-292L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5476 TEST_c_c (catanh, -0x0.fffffffffffff8p0L, -0x1p-1022L, -1.871497387511852332650969166374185305708e1L, -1.002084180004486444624900488355118689113e-292L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5477 TEST_c_c (catanh, 0x1p-1022L, 0x0.fffffffffffff8p0L, 1.112536929253600815061527818977844932790e-308L, 7.853981633974482541045096145620456183798e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5478 TEST_c_c (catanh, -0x1p-1022L, 0x0.fffffffffffff8p0L, -1.112536929253600815061527818977844932790e-308L, 7.853981633974482541045096145620456183798e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5479 TEST_c_c (catanh, 0x1p-1022L, -0x0.fffffffffffff8p0L, 1.112536929253600815061527818977844932790e-308L, -7.853981633974482541045096145620456183798e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5480 TEST_c_c (catanh, -0x1p-1022L, -0x0.fffffffffffff8p0L, -1.112536929253600815061527818977844932790e-308L, -7.853981633974482541045096145620456183798e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
10de07f5
JM		 5481#endif
5482#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 5483 TEST_c_c (catanh, 0x1.0000000000000002p0L, 0x1p-1022L, 2.218070977791824990137853294097378778927e1L, 1.570796326794896619231321691639751442099L),
5484 TEST_c_c (catanh, 0x1.0000000000000002p0L, -0x1p-1022L, 2.218070977791824990137853294097378778927e1L, -1.570796326794896619231321691639751442099L),
5485 TEST_c_c (catanh, -0x1.0000000000000002p0L, 0x1p-1022L, -2.218070977791824990137853294097378778927e1L, 1.570796326794896619231321691639751442099L),
5486 TEST_c_c (catanh, -0x1.0000000000000002p0L, -0x1p-1022L, -2.218070977791824990137853294097378778927e1L, -1.570796326794896619231321691639751442099L),
5487 TEST_c_c (catanh, 0x1p-1022L, 0x1.0000000000000002p0L, 1.112536929253600691424494863099491450042e-308L, 7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5488 TEST_c_c (catanh, -0x1p-1022L, 0x1.0000000000000002p0L, -1.112536929253600691424494863099491450042e-308L, 7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5489 TEST_c_c (catanh, 0x1p-1022L, -0x1.0000000000000002p0L, 1.112536929253600691424494863099491450042e-308L, -7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5490 TEST_c_c (catanh, -0x1p-1022L, -0x1.0000000000000002p0L, -1.112536929253600691424494863099491450042e-308L, -7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5491 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, 0x1p-1022L, 2.252728336819822255604649142023466965703e1L, 2.052268400649188124723641491045245971623e-289L),
5492 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, -0x1p-1022L, 2.252728336819822255604649142023466965703e1L, -2.052268400649188124723641491045245971623e-289L),
5493 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, 0x1p-1022L, -2.252728336819822255604649142023466965703e1L, 2.052268400649188124723641491045245971623e-289L),
5494 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, -0x1p-1022L, -2.252728336819822255604649142023466965703e1L, -2.052268400649188124723641491045245971623e-289L),
5495 TEST_c_c (catanh, 0x1p-1022L, 0x0.ffffffffffffffffp0L, 1.112536929253600691605427106449557323148e-308L, 7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5496 TEST_c_c (catanh, -0x1p-1022L, 0x0.ffffffffffffffffp0L, -1.112536929253600691605427106449557323148e-308L, 7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5497 TEST_c_c (catanh, 0x1p-1022L, -0x0.ffffffffffffffffp0L, 1.112536929253600691605427106449557323148e-308L, -7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5498 TEST_c_c (catanh, -0x1p-1022L, -0x0.ffffffffffffffffp0L, -1.112536929253600691605427106449557323148e-308L, -7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
10de07f5
JM		 5499#endif
5500#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 5501 TEST_c_c (catanh, 0x1.000000000000000000000000008p0L, 0x1p-1022L, 3.673680056967710139911330243728336427098e1L, 1.570796326794896619231321691639751442099L),
5502 TEST_c_c (catanh, 0x1.000000000000000000000000008p0L, -0x1p-1022L, 3.673680056967710139911330243728336427098e1L, -1.570796326794896619231321691639751442099L),
5503 TEST_c_c (catanh, -0x1.000000000000000000000000008p0L, 0x1p-1022L, -3.673680056967710139911330243728336427098e1L, 1.570796326794896619231321691639751442099L),
5504 TEST_c_c (catanh, -0x1.000000000000000000000000008p0L, -0x1p-1022L, -3.673680056967710139911330243728336427098e1L, -1.570796326794896619231321691639751442099L),
5505 TEST_c_c (catanh, 0x1p-1022L, 0x1.000000000000000000000000008p0L, 1.112536929253600691545116358666174605957e-308L, 7.853981633974483096156608458198880470009e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5506 TEST_c_c (catanh, -0x1p-1022L, 0x1.000000000000000000000000008p0L, -1.112536929253600691545116358666174605957e-308L, 7.853981633974483096156608458198880470009e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5507 TEST_c_c (catanh, 0x1p-1022L, -0x1.000000000000000000000000008p0L, 1.112536929253600691545116358666174605957e-308L, -7.853981633974483096156608458198880470009e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5508 TEST_c_c (catanh, -0x1p-1022L, -0x1.000000000000000000000000008p0L, -1.112536929253600691545116358666174605957e-308L, -7.853981633974483096156608458198880470009e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5509 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-1022L, 3.708337415995707405382191849801244331055e1L, 9.025971879324147880346310405868788320726e-277L),
5510 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-1022L, 3.708337415995707405382191849801244331055e1L, -9.025971879324147880346310405868788320726e-277L),
5511 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-1022L, -3.708337415995707405382191849801244331055e1L, 9.025971879324147880346310405868788320726e-277L),
5512 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-1022L, -3.708337415995707405382191849801244331055e1L, -9.025971879324147880346310405868788320726e-277L),
5513 TEST_c_c (catanh, 0x1p-1022L, 0x0.ffffffffffffffffffffffffffcp0L, 1.112536929253600691545116358666215745186e-308L, 7.853981633974483096156608458198695580735e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5514 TEST_c_c (catanh, -0x1p-1022L, 0x0.ffffffffffffffffffffffffffcp0L, -1.112536929253600691545116358666215745186e-308L, 7.853981633974483096156608458198695580735e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5515 TEST_c_c (catanh, 0x1p-1022L, -0x0.ffffffffffffffffffffffffffcp0L, 1.112536929253600691545116358666215745186e-308L, -7.853981633974483096156608458198695580735e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5516 TEST_c_c (catanh, -0x1p-1022L, -0x0.ffffffffffffffffffffffffffcp0L, -1.112536929253600691545116358666215745186e-308L, -7.853981633974483096156608458198695580735e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
10de07f5
JM		 5517#endif
5518#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5519 TEST_c_c (catanh, 1.0L, 0x1p-8192L, 2.839477425163815960027691385553420311121e3L, 7.853981633974483096156608458198757210493e-1L),
5520 TEST_c_c (catanh, 1.0L, -0x1p-8192L, 2.839477425163815960027691385553420311121e3L, -7.853981633974483096156608458198757210493e-1L),
5521 TEST_c_c (catanh, -1.0L, 0x1p-8192L, -2.839477425163815960027691385553420311121e3L, 7.853981633974483096156608458198757210493e-1L),
5522 TEST_c_c (catanh, -1.0L, -0x1p-8192L, -2.839477425163815960027691385553420311121e3L, -7.853981633974483096156608458198757210493e-1L),
5523 TEST_c_c (catanh, 0x1p-8192L, 1.0L, 4.584009668887117914053530980121207914891e-2467L, 7.853981633974483096156608458198757210493e-1L),
5524 TEST_c_c (catanh, -0x1p-8192L, 1.0L, -4.584009668887117914053530980121207914891e-2467L, 7.853981633974483096156608458198757210493e-1L),
5525 TEST_c_c (catanh, 0x1p-8192L, -1.0L, 4.584009668887117914053530980121207914891e-2467L, -7.853981633974483096156608458198757210493e-1L),
5526 TEST_c_c (catanh, -0x1p-8192L, -1.0L, -4.584009668887117914053530980121207914891e-2467L, -7.853981633974483096156608458198757210493e-1L),
5527 TEST_c_c (catanh, 1.0L, 0x1.3p-8221L, 2.849442134153471837403071201841536297726e3L, 7.853981633974483096156608458198757210493e-1L),
5528 TEST_c_c (catanh, 1.0L, -0x1.3p-8221L, 2.849442134153471837403071201841536297726e3L, -7.853981633974483096156608458198757210493e-1L),
5529 TEST_c_c (catanh, -1.0L, 0x1.3p-8221L, -2.849442134153471837403071201841536297726e3L, 7.853981633974483096156608458198757210493e-1L),
5530 TEST_c_c (catanh, -1.0L, -0x1.3p-8221L, -2.849442134153471837403071201841536297726e3L, -7.853981633974483096156608458198757210493e-1L),
5531 TEST_c_c (catanh, 0x1.3p-8221L, 1.0L, 1.013933025636421986471594877335044443409e-2475L, 7.853981633974483096156608458198757210493e-1L),
5532 TEST_c_c (catanh, -0x1.3p-8221L, 1.0L, -1.013933025636421986471594877335044443409e-2475L, 7.853981633974483096156608458198757210493e-1L),
5533 TEST_c_c (catanh, 0x1.3p-8221L, -1.0L, 1.013933025636421986471594877335044443409e-2475L, -7.853981633974483096156608458198757210493e-1L),
5534 TEST_c_c (catanh, -0x1.3p-8221L, -1.0L, -1.013933025636421986471594877335044443409e-2475L, -7.853981633974483096156608458198757210493e-1L),
5535 TEST_c_c (catanh, 1.0L, 0x1.3p-8246L, 2.858106473910471153770786603359763504827e3L, 7.853981633974483096156608458198757210493e-1L),
5536 TEST_c_c (catanh, 1.0L, -0x1.3p-8246L, 2.858106473910471153770786603359763504827e3L, -7.853981633974483096156608458198757210493e-1L),
5537 TEST_c_c (catanh, -1.0L, 0x1.3p-8246L, -2.858106473910471153770786603359763504827e3L, 7.853981633974483096156608458198757210493e-1L),
5538 TEST_c_c (catanh, -1.0L, -0x1.3p-8246L, -2.858106473910471153770786603359763504827e3L, -7.853981633974483096156608458198757210493e-1L),
5539 TEST_c_c (catanh, 0x1.3p-8246L, 1.0L, 3.021755890954798419688924781486524472858e-2483L, 7.853981633974483096156608458198757210493e-1L),
5540 TEST_c_c (catanh, -0x1.3p-8246L, 1.0L, -3.021755890954798419688924781486524472858e-2483L, 7.853981633974483096156608458198757210493e-1L),
5541 TEST_c_c (catanh, 0x1.3p-8246L, -1.0L, 3.021755890954798419688924781486524472858e-2483L, -7.853981633974483096156608458198757210493e-1L),
5542 TEST_c_c (catanh, -0x1.3p-8246L, -1.0L, -3.021755890954798419688924781486524472858e-2483L, -7.853981633974483096156608458198757210493e-1L),
5543 TEST_c_c (catanh, 1.0L, 0x1p-16380L, 5.677221982376232056781839690803195180822e3L, 7.853981633974483096156608458198757210493e-1L),
5544 TEST_c_c (catanh, 1.0L, -0x1p-16380L, 5.677221982376232056781839690803195180822e3L, -7.853981633974483096156608458198757210493e-1L),
5545 TEST_c_c (catanh, -1.0L, 0x1p-16380L, -5.677221982376232056781839690803195180822e3L, 7.853981633974483096156608458198757210493e-1L),
5546 TEST_c_c (catanh, -1.0L, -0x1p-16380L, -5.677221982376232056781839690803195180822e3L, -7.853981633974483096156608458198757210493e-1L),
5547 TEST_c_c (catanh, 0x1p-16380L, 1.0L, 6.724206286224187012525355634643505205196e-4932L, 7.853981633974483096156608458198757210493e-1L),
5548 TEST_c_c (catanh, -0x1p-16380L, 1.0L, -6.724206286224187012525355634643505205196e-4932L, 7.853981633974483096156608458198757210493e-1L),
5549 TEST_c_c (catanh, 0x1p-16380L, -1.0L, 6.724206286224187012525355634643505205196e-4932L, -7.853981633974483096156608458198757210493e-1L),
5550 TEST_c_c (catanh, -0x1p-16380L, -1.0L, -6.724206286224187012525355634643505205196e-4932L, -7.853981633974483096156608458198757210493e-1L),
5551 TEST_c_c (catanh, 0x1.0000000000000002p0L, 0x1p-16382L, 2.218070977791824990137853294097378778927e1L, 1.570796326794896619231321691639751442099L),
5552 TEST_c_c (catanh, 0x1.0000000000000002p0L, -0x1p-16382L, 2.218070977791824990137853294097378778927e1L, -1.570796326794896619231321691639751442099L),
5553 TEST_c_c (catanh, -0x1.0000000000000002p0L, 0x1p-16382L, -2.218070977791824990137853294097378778927e1L, 1.570796326794896619231321691639751442099L),
5554 TEST_c_c (catanh, -0x1.0000000000000002p0L, -0x1p-16382L, -2.218070977791824990137853294097378778927e1L, -1.570796326794896619231321691639751442099L),
5555 TEST_c_c (catanh, 0x1p-16382L, 0x1.0000000000000002p0L, 1.681051571556046752949078932066752571182e-4932L, 7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION),
5556 TEST_c_c (catanh, -0x1p-16382L, 0x1.0000000000000002p0L, -1.681051571556046752949078932066752571182e-4932L, 7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION),
5557 TEST_c_c (catanh, 0x1p-16382L, -0x1.0000000000000002p0L, 1.681051571556046752949078932066752571182e-4932L, -7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION),
5558 TEST_c_c (catanh, -0x1p-16382L, -0x1.0000000000000002p0L, -1.681051571556046752949078932066752571182e-4932L, -7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION),
5559 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, 0x1p-16382L, 2.252728336819822255604649142023466965703e1L, 3.100992811520163369065387859792822623745e-4913L),
5560 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, -0x1p-16382L, 2.252728336819822255604649142023466965703e1L, -3.100992811520163369065387859792822623745e-4913L),
5561 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, 0x1p-16382L, -2.252728336819822255604649142023466965703e1L, 3.100992811520163369065387859792822623745e-4913L),
5562 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, -0x1p-16382L, -2.252728336819822255604649142023466965703e1L, -3.100992811520163369065387859792822623745e-4913L),
5563 TEST_c_c (catanh, 0x1p-16382L, 0x0.ffffffffffffffffp0L, 1.681051571556046753222468896957938166365e-4932L, 7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION),
5564 TEST_c_c (catanh, -0x1p-16382L, 0x0.ffffffffffffffffp0L, -1.681051571556046753222468896957938166365e-4932L, 7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION),
5565 TEST_c_c (catanh, 0x1p-16382L, -0x0.ffffffffffffffffp0L, 1.681051571556046753222468896957938166365e-4932L, -7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION),
5566 TEST_c_c (catanh, -0x1p-16382L, -0x0.ffffffffffffffffp0L, -1.681051571556046753222468896957938166365e-4932L, -7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION),
10de07f5 5567# if LDBL_MANT_DIG >= 113
08198877
JM		 5568 TEST_c_c (catanh, 0x1.0000000000000000000000000001p0L, 0x1p-16382L, 3.916281570163690998207361486238697614441e1L, 1.570796326794896619231321691639751442099L),
5569 TEST_c_c (catanh, 0x1.0000000000000000000000000001p0L, -0x1p-16382L, 3.916281570163690998207361486238697614441e1L, -1.570796326794896619231321691639751442099L),
5570 TEST_c_c (catanh, -0x1.0000000000000000000000000001p0L, 0x1p-16382L, -3.916281570163690998207361486238697614441e1L, 1.570796326794896619231321691639751442099L),
5571 TEST_c_c (catanh, -0x1.0000000000000000000000000001p0L, -0x1p-16382L, -3.916281570163690998207361486238697614441e1L, -1.570796326794896619231321691639751442099L),
5572 TEST_c_c (catanh, 0x1p-16382L, 0x1.0000000000000000000000000001p0L, 1.681051571556046753131338908660875977540e-4932L, 7.853981633974483096156608458198758173458e-1L, UNDERFLOW_EXCEPTION),
5573 TEST_c_c (catanh, -0x1p-16382L, 0x1.0000000000000000000000000001p0L, -1.681051571556046753131338908660875977540e-4932L, 7.853981633974483096156608458198758173458e-1L, UNDERFLOW_EXCEPTION),
5574 TEST_c_c (catanh, 0x1p-16382L, -0x1.0000000000000000000000000001p0L, 1.681051571556046753131338908660875977540e-4932L, -7.853981633974483096156608458198758173458e-1L, UNDERFLOW_EXCEPTION),
5575 TEST_c_c (catanh, -0x1p-16382L, -0x1.0000000000000000000000000001p0L, -1.681051571556046753131338908660875977540e-4932L, -7.853981633974483096156608458198758173458e-1L, UNDERFLOW_EXCEPTION),
5576 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-16382L, 3.950938929191688263678223092311606435623e1L, 1.745703758805099310527547423749501866998e-4898L),
5577 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-16382L, 3.950938929191688263678223092311606435623e1L, -1.745703758805099310527547423749501866998e-4898L),
5578 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-16382L, -3.950938929191688263678223092311606435623e1L, 1.745703758805099310527547423749501866998e-4898L),
5579 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-16382L, -3.950938929191688263678223092311606435623e1L, -1.745703758805099310527547423749501866998e-4898L),
5580 TEST_c_c (catanh, 0x1p-16382L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.681051571556046753131338908660876463178e-4932L, 7.853981633974483096156608458198756729010e-1L, UNDERFLOW_EXCEPTION),
5581 TEST_c_c (catanh, -0x1p-16382L, 0x0.ffffffffffffffffffffffffffff8p0L, -1.681051571556046753131338908660876463178e-4932L, 7.853981633974483096156608458198756729010e-1L, UNDERFLOW_EXCEPTION),
5582 TEST_c_c (catanh, 0x1p-16382L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.681051571556046753131338908660876463178e-4932L, -7.853981633974483096156608458198756729010e-1L, UNDERFLOW_EXCEPTION),
5583 TEST_c_c (catanh, -0x1p-16382L, -0x0.ffffffffffffffffffffffffffff8p0L, -1.681051571556046753131338908660876463178e-4932L, -7.853981633974483096156608458198756729010e-1L, UNDERFLOW_EXCEPTION),
10de07f5 5584# endif
caf84319 5585#endif
2f38fbfe 5586
08198877
JM		 5587 TEST_c_c (catanh, 0.75L, 1.25L, 0.261492138795671927078652057366532140L, 0.996825126463918666098902241310446708L),
5588 TEST_c_c (catanh, -2, -3, -0.14694666622552975204743278515471595L, -1.3389725222944935611241935759091443L),
5589 END_DATA (catanh)
5590 };
8847214f 5591
08198877
JM		 5592static void
5593catanh_test (void)
5594{
5595 errno = 0;
5596 FUNC(catanh) (BUILD_COMPLEX (0.7L, 1.2L));
5597 if (errno == ENOSYS)
5598 /* Function not implemented. */
5599 return;
5600
5601 START (catanh);
5602 RUN_TEST_LOOP_c_c (catanh, catanh_test_data, );
6815fabc 5603 END (catanh, complex);
8847214f
UD		 5604}
5605
74c57478
JM		 5606static const struct test_f_f_data cbrt_test_data[] =
5607 {
5608 START_DATA (cbrt),
5609 TEST_f_f (cbrt, 0.0, 0.0),
5610 TEST_f_f (cbrt, minus_zero, minus_zero),
5611
5612 TEST_f_f (cbrt, plus_infty, plus_infty),
5613 TEST_f_f (cbrt, minus_infty, minus_infty),
5614 TEST_f_f (cbrt, qnan_value, qnan_value),
5615
5616 TEST_f_f (cbrt, -0.001L, -0.1L),
5617 TEST_f_f (cbrt, 8, 2),
5618 TEST_f_f (cbrt, -27.0, -3.0),
5619 TEST_f_f (cbrt, 0.9921875L, 0.997389022060725270579075195353955217L),
5620 TEST_f_f (cbrt, 0.75L, 0.908560296416069829445605878163630251L),
5621 END_DATA (cbrt)
5622 };
5623
8847214f
UD		 5624static void
5625cbrt_test (void)
5626{
42be70d4
UD		 5627 errno = 0;
5628 FUNC(cbrt) (8);
5629 if (errno == ENOSYS)
5630 /* Function not implemented. */
5631 return;
5632
8847214f 5633 START (cbrt);
74c57478 5634 RUN_TEST_LOOP_f_f (cbrt, cbrt_test_data, );
8847214f
UD		 5635 END (cbrt);
5636}
5637
2550dfe9 5638
08198877
JM		 5639static const struct test_c_c_data ccos_test_data[] =
5640 {
5641 START_DATA (ccos),
5642 TEST_c_c (ccos, 0.0, 0.0, 1.0, minus_zero),
5643 TEST_c_c (ccos, minus_zero, 0.0, 1.0, 0.0),
5644 TEST_c_c (ccos, 0.0, minus_zero, 1.0, 0.0),
5645 TEST_c_c (ccos, minus_zero, minus_zero, 1.0, minus_zero),
8847214f 5646
08198877
JM		 5647 TEST_c_c (ccos, plus_infty, 0.0, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5648 TEST_c_c (ccos, plus_infty, minus_zero, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5649 TEST_c_c (ccos, minus_infty, 0.0, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5650 TEST_c_c (ccos, minus_infty, minus_zero, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 5651
08198877
JM		 5652 TEST_c_c (ccos, 0.0, plus_infty, plus_infty, minus_zero),
5653 TEST_c_c (ccos, 0.0, minus_infty, plus_infty, 0.0),
5654 TEST_c_c (ccos, minus_zero, plus_infty, plus_infty, 0.0),
5655 TEST_c_c (ccos, minus_zero, minus_infty, plus_infty, minus_zero),
8847214f 5656
08198877
JM		 5657 TEST_c_c (ccos, plus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5658 TEST_c_c (ccos, minus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5659 TEST_c_c (ccos, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5660 TEST_c_c (ccos, minus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8847214f 5661
08198877
JM		 5662 TEST_c_c (ccos, 4.625, plus_infty, minus_infty, plus_infty),
5663 TEST_c_c (ccos, 4.625, minus_infty, minus_infty, minus_infty),
5664 TEST_c_c (ccos, -4.625, plus_infty, minus_infty, minus_infty),
5665 TEST_c_c (ccos, -4.625, minus_infty, minus_infty, plus_infty),
8847214f 5666
08198877
JM		 5667 TEST_c_c (ccos, plus_infty, 6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
5668 TEST_c_c (ccos, plus_infty, -6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
5669 TEST_c_c (ccos, minus_infty, 6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
5670 TEST_c_c (ccos, minus_infty, -6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 5671
08198877
JM		 5672 TEST_c_c (ccos, qnan_value, 0.0, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5673 TEST_c_c (ccos, qnan_value, minus_zero, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 5674
08198877
JM		 5675 TEST_c_c (ccos, qnan_value, plus_infty, plus_infty, qnan_value),
5676 TEST_c_c (ccos, qnan_value, minus_infty, plus_infty, qnan_value),
8847214f 5677
08198877
JM		 5678 TEST_c_c (ccos, qnan_value, 9.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5679 TEST_c_c (ccos, qnan_value, -9.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5680
08198877
JM		 5681 TEST_c_c (ccos, 0.0, qnan_value, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5682 TEST_c_c (ccos, minus_zero, qnan_value, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 5683
08198877
JM		 5684 TEST_c_c (ccos, 10.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5685 TEST_c_c (ccos, -10.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5686
08198877
JM		 5687 TEST_c_c (ccos, plus_infty, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5688 TEST_c_c (ccos, minus_infty, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5689
08198877 5690 TEST_c_c (ccos, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 5691
08198877
JM		 5692 TEST_c_c (ccos, 0.75L, 1.25L, 1.38173873063425888530729933139078645L, -1.09193013555397466170919531722024128L),
5693 TEST_c_c (ccos, -2, -3, -4.18962569096880723013255501961597373L, -9.10922789375533659797919726277886212L),
8847214f 5694
08198877
JM		 5695 TEST_c_c (ccos, 0.75, 89.5, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
5696 TEST_c_c (ccos, 0.75, -89.5, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
5697 TEST_c_c (ccos, -0.75, 89.5, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
5698 TEST_c_c (ccos, -0.75, -89.5, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
e0b16cc2
JM		 5699
5700#ifndef TEST_FLOAT
08198877
JM		 5701 TEST_c_c (ccos, 0.75, 710.5, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
5702 TEST_c_c (ccos, 0.75, -710.5, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
5703 TEST_c_c (ccos, -0.75, 710.5, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
5704 TEST_c_c (ccos, -0.75, -710.5, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
e0b16cc2
JM		 5705#endif
5706
5707#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5708 TEST_c_c (ccos, 0.75, 11357.25, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
5709 TEST_c_c (ccos, 0.75, -11357.25, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
5710 TEST_c_c (ccos, -0.75, 11357.25, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
5711 TEST_c_c (ccos, -0.75, -11357.25, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
e0b16cc2
JM		 5712#endif
5713
5714#ifdef TEST_FLOAT
08198877 5715 TEST_c_c (ccos, 0x1p-149, 180, plus_infty, -1.043535896672617552965983803453927655332e33L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 5716#endif
5717
5718#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 5719 TEST_c_c (ccos, 0x1p-1074, 1440, plus_infty, -5.981479269486130556466515778180916082415e301L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 5720#endif
5721
5722#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 5723 TEST_c_c (ccos, 0x1p-16434L, 22730, plus_infty, -1.217853148905605987081057582351152052687e4924L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 5724#endif
5725
08198877
JM		 5726 TEST_c_c (ccos, min_subnorm_value * 0x1p120, 0x1p-120, 1.0, -min_subnorm_value, UNDERFLOW_EXCEPTION),
5727 TEST_c_c (ccos, 0x1p-120, min_subnorm_value * 0x1p120, 1.0, -min_subnorm_value, UNDERFLOW_EXCEPTION),
5728 END_DATA (ccos)
5729 };
8847214f
UD		 5730
5731static void
08198877 5732ccos_test (void)
8847214f 5733{
aaca11d8 5734 errno = 0;
08198877 5735 FUNC(ccos) (BUILD_COMPLEX (0, 0));
aaca11d8
UD		 5736 if (errno == ENOSYS)
5737 /* Function not implemented. */
5738 return;
8847214f 5739
08198877
JM		 5740 START (ccos);
5741 RUN_TEST_LOOP_c_c (ccos, ccos_test_data, );
5742 END (ccos, complex);
5743}
8847214f 5744
8847214f 5745
08198877
JM		 5746static const struct test_c_c_data ccosh_test_data[] =
5747 {
5748 START_DATA (ccosh),
5749 TEST_c_c (ccosh, 0.0, 0.0, 1.0, 0.0),
5750 TEST_c_c (ccosh, minus_zero, 0.0, 1.0, minus_zero),
5751 TEST_c_c (ccosh, 0.0, minus_zero, 1.0, minus_zero),
5752 TEST_c_c (ccosh, minus_zero, minus_zero, 1.0, 0.0),
5753
5754 TEST_c_c (ccosh, 0.0, plus_infty, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5755 TEST_c_c (ccosh, minus_zero, plus_infty, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5756 TEST_c_c (ccosh, 0.0, minus_infty, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5757 TEST_c_c (ccosh, minus_zero, minus_infty, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 5758
08198877
JM		 5759 TEST_c_c (ccosh, plus_infty, 0.0, plus_infty, 0.0),
5760 TEST_c_c (ccosh, minus_infty, 0.0, plus_infty, minus_zero),
5761 TEST_c_c (ccosh, plus_infty, minus_zero, plus_infty, minus_zero),
5762 TEST_c_c (ccosh, minus_infty, minus_zero, plus_infty, 0.0),
8847214f 5763
08198877
JM		 5764 TEST_c_c (ccosh, plus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5765 TEST_c_c (ccosh, minus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5766 TEST_c_c (ccosh, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5767 TEST_c_c (ccosh, minus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8847214f 5768
08198877
JM		 5769 TEST_c_c (ccosh, plus_infty, 4.625, minus_infty, minus_infty),
5770 TEST_c_c (ccosh, minus_infty, 4.625, minus_infty, plus_infty),
5771 TEST_c_c (ccosh, plus_infty, -4.625, minus_infty, plus_infty),
5772 TEST_c_c (ccosh, minus_infty, -4.625, minus_infty, minus_infty),
8847214f 5773
08198877
JM		 5774 TEST_c_c (ccosh, 6.75, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5775 TEST_c_c (ccosh, -6.75, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5776 TEST_c_c (ccosh, 6.75, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5777 TEST_c_c (ccosh, -6.75, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 5778
08198877
JM		 5779 TEST_c_c (ccosh, 0.0, qnan_value, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5780 TEST_c_c (ccosh, minus_zero, qnan_value, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 5781
08198877
JM		 5782 TEST_c_c (ccosh, plus_infty, qnan_value, plus_infty, qnan_value),
5783 TEST_c_c (ccosh, minus_infty, qnan_value, plus_infty, qnan_value),
8847214f 5784
08198877
JM		 5785 TEST_c_c (ccosh, 9.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5786 TEST_c_c (ccosh, -9.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5787
08198877
JM		 5788 TEST_c_c (ccosh, qnan_value, 0.0, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5789 TEST_c_c (ccosh, qnan_value, minus_zero, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 5790
08198877
JM		 5791 TEST_c_c (ccosh, qnan_value, 10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5792 TEST_c_c (ccosh, qnan_value, -10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5793
08198877
JM		 5794 TEST_c_c (ccosh, qnan_value, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5795 TEST_c_c (ccosh, qnan_value, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5796
08198877 5797 TEST_c_c (ccosh, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 5798
08198877 5799 TEST_c_c (ccosh, 0.75L, 1.25L, 0.408242591877968807788852146397499084L, 0.780365930845853240391326216300863152L),
8847214f 5800
08198877 5801 TEST_c_c (ccosh, -2, -3, -3.72454550491532256547397070325597253L, 0.511822569987384608834463849801875634L),
8847214f 5802
08198877
JM		 5803 TEST_c_c (ccosh, 89.5, 0.75, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
5804 TEST_c_c (ccosh, -89.5, 0.75, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
5805 TEST_c_c (ccosh, 89.5, -0.75, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
5806 TEST_c_c (ccosh, -89.5, -0.75, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
e0b16cc2
JM		 5807
5808#ifndef TEST_FLOAT
08198877
JM		 5809 TEST_c_c (ccosh, 710.5, 0.75, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
5810 TEST_c_c (ccosh, -710.5, 0.75, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
5811 TEST_c_c (ccosh, 710.5, -0.75, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
5812 TEST_c_c (ccosh, -710.5, -0.75, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
e0b16cc2
JM		 5813#endif
5814
5815#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5816 TEST_c_c (ccosh, 11357.25, 0.75, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
5817 TEST_c_c (ccosh, -11357.25, 0.75, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
5818 TEST_c_c (ccosh, 11357.25, -0.75, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
5819 TEST_c_c (ccosh, -11357.25, -0.75, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
e0b16cc2
JM		 5820#endif
5821
5822#ifdef TEST_FLOAT
08198877 5823 TEST_c_c (ccosh, 180, 0x1p-149, plus_infty, 1.043535896672617552965983803453927655332e33L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 5824#endif
5825
5826#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 5827 TEST_c_c (ccosh, 1440, 0x1p-1074, plus_infty, 5.981479269486130556466515778180916082415e301L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 5828#endif
5829
5830#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 5831 TEST_c_c (ccosh, 22730, 0x1p-16434L, plus_infty, 1.217853148905605987081057582351152052687e4924L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 5832#endif
5833
08198877
JM		 5834 TEST_c_c (ccosh, min_subnorm_value * 0x1p120, 0x1p-120, 1.0, min_subnorm_value, UNDERFLOW_EXCEPTION),
5835 TEST_c_c (ccosh, 0x1p-120, min_subnorm_value * 0x1p120, 1.0, min_subnorm_value, UNDERFLOW_EXCEPTION),
5836 END_DATA (ccosh)
5837 };
5838
5839static void
5840ccosh_test (void)
5841{
5842 errno = 0;
5843 FUNC(ccosh) (BUILD_COMPLEX (0.7L, 1.2L));
5844 if (errno == ENOSYS)
5845 /* Function not implemented. */
5846 return;
f0302940 5847
08198877
JM		 5848 START (ccosh);
5849 RUN_TEST_LOOP_c_c (ccosh, ccosh_test_data, );
6815fabc 5850 END (ccosh, complex);
8847214f
UD		 5851}
5852
5853
74c57478
JM		 5854static const struct test_f_f_data ceil_test_data[] =
5855 {
5856 START_DATA (ceil),
5857 TEST_f_f (ceil, 0.0, 0.0),
5858 TEST_f_f (ceil, minus_zero, minus_zero),
5859 TEST_f_f (ceil, plus_infty, plus_infty),
5860 TEST_f_f (ceil, minus_infty, minus_infty),
5861 TEST_f_f (ceil, qnan_value, qnan_value),
5862
5863 TEST_f_f (ceil, M_PIl, 4.0),
5864 TEST_f_f (ceil, -M_PIl, -3.0),
5865 TEST_f_f (ceil, 0.1, 1.0),
5866 TEST_f_f (ceil, 0.25, 1.0),
5867 TEST_f_f (ceil, 0.625, 1.0),
5868 TEST_f_f (ceil, -0.1, minus_zero),
5869 TEST_f_f (ceil, -0.25, minus_zero),
5870 TEST_f_f (ceil, -0.625, minus_zero),
8847214f 5871
f964490f 5872#ifdef TEST_LDOUBLE
74c57478
JM		 5873 /* The result can only be represented in long double. */
5874 TEST_f_f (ceil, 4503599627370495.5L, 4503599627370496.0L),
5875 TEST_f_f (ceil, 4503599627370496.25L, 4503599627370497.0L),
5876 TEST_f_f (ceil, 4503599627370496.5L, 4503599627370497.0L),
5877 TEST_f_f (ceil, 4503599627370496.75L, 4503599627370497.0L),
5878 TEST_f_f (ceil, 4503599627370497.5L, 4503599627370498.0L),
5879
5880 TEST_f_f (ceil, -4503599627370495.5L, -4503599627370495.0L),
5881 TEST_f_f (ceil, -4503599627370496.25L, -4503599627370496.0L),
5882 TEST_f_f (ceil, -4503599627370496.5L, -4503599627370496.0L),
5883 TEST_f_f (ceil, -4503599627370496.75L, -4503599627370496.0L),
5884 TEST_f_f (ceil, -4503599627370497.5L, -4503599627370497.0L),
f964490f 5885
5c68d401 5886# if LDBL_MANT_DIG > 100
74c57478
JM		 5887 TEST_f_f (ceil, 4503599627370494.5000000000001L, 4503599627370495.0L),
5888 TEST_f_f (ceil, 4503599627370495.5000000000001L, 4503599627370496.0L),
5889 TEST_f_f (ceil, 4503599627370496.5000000000001L, 4503599627370497.0L),
5890 TEST_f_f (ceil, -4503599627370494.5000000000001L, -4503599627370494.0L),
5891 TEST_f_f (ceil, -4503599627370495.5000000000001L, -4503599627370495.0L),
5892 TEST_f_f (ceil, -4503599627370496.5000000000001L, -4503599627370496.0L),
5c68d401
RM		 5893# endif
5894
74c57478
JM		 5895 TEST_f_f (ceil, 9007199254740991.5L, 9007199254740992.0L),
5896 TEST_f_f (ceil, 9007199254740992.25L, 9007199254740993.0L),
5897 TEST_f_f (ceil, 9007199254740992.5L, 9007199254740993.0L),
5898 TEST_f_f (ceil, 9007199254740992.75L, 9007199254740993.0L),
5899 TEST_f_f (ceil, 9007199254740993.5L, 9007199254740994.0L),
f964490f 5900
74c57478
JM		 5901 TEST_f_f (ceil, -9007199254740991.5L, -9007199254740991.0L),
5902 TEST_f_f (ceil, -9007199254740992.25L, -9007199254740992.0L),
5903 TEST_f_f (ceil, -9007199254740992.5L, -9007199254740992.0L),
5904 TEST_f_f (ceil, -9007199254740992.75L, -9007199254740992.0L),
5905 TEST_f_f (ceil, -9007199254740993.5L, -9007199254740993.0L),
f964490f 5906
5c68d401 5907# if LDBL_MANT_DIG > 100
74c57478
JM		 5908 TEST_f_f (ceil, 9007199254740991.0000000000001L, 9007199254740992.0L),
5909 TEST_f_f (ceil, 9007199254740992.0000000000001L, 9007199254740993.0L),
5910 TEST_f_f (ceil, 9007199254740993.0000000000001L, 9007199254740994.0L),
5911 TEST_f_f (ceil, 9007199254740991.5000000000001L, 9007199254740992.0L),
5912 TEST_f_f (ceil, 9007199254740992.5000000000001L, 9007199254740993.0L),
5913 TEST_f_f (ceil, 9007199254740993.5000000000001L, 9007199254740994.0L),
5914
5915 TEST_f_f (ceil, -9007199254740991.0000000000001L, -9007199254740991.0L),
5916 TEST_f_f (ceil, -9007199254740992.0000000000001L, -9007199254740992.0L),
5917 TEST_f_f (ceil, -9007199254740993.0000000000001L, -9007199254740993.0L),
5918 TEST_f_f (ceil, -9007199254740991.5000000000001L, -9007199254740991.0L),
5919 TEST_f_f (ceil, -9007199254740992.5000000000001L, -9007199254740992.0L),
5920 TEST_f_f (ceil, -9007199254740993.5000000000001L, -9007199254740993.0L),
5c68d401
RM		 5921# endif
5922
74c57478
JM		 5923 TEST_f_f (ceil, 72057594037927935.5L, 72057594037927936.0L),
5924 TEST_f_f (ceil, 72057594037927936.25L, 72057594037927937.0L),
5925 TEST_f_f (ceil, 72057594037927936.5L, 72057594037927937.0L),
5926 TEST_f_f (ceil, 72057594037927936.75L, 72057594037927937.0L),
5927 TEST_f_f (ceil, 72057594037927937.5L, 72057594037927938.0L),
5928
5929 TEST_f_f (ceil, -72057594037927935.5L, -72057594037927935.0L),
5930 TEST_f_f (ceil, -72057594037927936.25L, -72057594037927936.0L),
5931 TEST_f_f (ceil, -72057594037927936.5L, -72057594037927936.0L),
5932 TEST_f_f (ceil, -72057594037927936.75L, -72057594037927936.0L),
5933 TEST_f_f (ceil, -72057594037927937.5L, -72057594037927937.0L),
5934
5935 TEST_f_f (ceil, 10141204801825835211973625643007.5L, 10141204801825835211973625643008.0L),
5936 TEST_f_f (ceil, 10141204801825835211973625643008.25L, 10141204801825835211973625643009.0L),
5937 TEST_f_f (ceil, 10141204801825835211973625643008.5L, 10141204801825835211973625643009.0L),
5938 TEST_f_f (ceil, 10141204801825835211973625643008.75L, 10141204801825835211973625643009.0L),
5939 TEST_f_f (ceil, 10141204801825835211973625643009.5L, 10141204801825835211973625643010.0L),
5940#endif
5941 END_DATA (ceil)
5942 };
f964490f 5943
74c57478
JM		 5944static void
5945ceil_test (void)
5946{
5947 START (ceil);
5948 RUN_TEST_LOOP_f_f (ceil, ceil_test_data, );
8847214f
UD		 5949 END (ceil);
5950}
5951
5952
08198877
JM		 5953static const struct test_c_c_data cexp_test_data[] =
5954 {
5955 START_DATA (cexp),
5956 TEST_c_c (cexp, plus_zero, plus_zero, 1, 0.0),
5957 TEST_c_c (cexp, minus_zero, plus_zero, 1, 0.0),
5958 TEST_c_c (cexp, plus_zero, minus_zero, 1, minus_zero),
5959 TEST_c_c (cexp, minus_zero, minus_zero, 1, minus_zero),
8847214f 5960
08198877
JM		 5961 TEST_c_c (cexp, plus_infty, plus_zero, plus_infty, 0.0),
5962 TEST_c_c (cexp, plus_infty, minus_zero, plus_infty, minus_zero),
8847214f 5963
08198877
JM		 5964 TEST_c_c (cexp, minus_infty, plus_zero, 0.0, 0.0),
5965 TEST_c_c (cexp, minus_infty, minus_zero, 0.0, minus_zero),
8847214f 5966
08198877
JM		 5967 TEST_c_c (cexp, 0.0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5968 TEST_c_c (cexp, minus_zero, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 5969
08198877
JM		 5970 TEST_c_c (cexp, 0.0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5971 TEST_c_c (cexp, minus_zero, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 5972
08198877
JM		 5973 TEST_c_c (cexp, 100.0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5974 TEST_c_c (cexp, -100.0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 5975
08198877
JM		 5976 TEST_c_c (cexp, 100.0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5977 TEST_c_c (cexp, -100.0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 5978
08198877
JM		 5979 TEST_c_c (cexp, minus_infty, 2.0, minus_zero, 0.0),
5980 TEST_c_c (cexp, minus_infty, 4.0, minus_zero, minus_zero),
5981 TEST_c_c (cexp, plus_infty, 2.0, minus_infty, plus_infty),
5982 TEST_c_c (cexp, plus_infty, 4.0, minus_infty, minus_infty),
8847214f 5983
08198877
JM		 5984 TEST_c_c (cexp, plus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5985 TEST_c_c (cexp, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 5986
08198877
JM		 5987 TEST_c_c (cexp, minus_infty, plus_infty, 0.0, 0.0, IGNORE_ZERO_INF_SIGN),
5988 TEST_c_c (cexp, minus_infty, minus_infty, 0.0, minus_zero, IGNORE_ZERO_INF_SIGN),
8847214f 5989
08198877 5990 TEST_c_c (cexp, minus_infty, qnan_value, 0, 0, IGNORE_ZERO_INF_SIGN),
8847214f 5991
08198877 5992 TEST_c_c (cexp, plus_infty, qnan_value, plus_infty, qnan_value),
8847214f 5993
08198877
JM		 5994 TEST_c_c (cexp, qnan_value, 0.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5995 TEST_c_c (cexp, qnan_value, 1.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5996
08198877
JM		 5997 TEST_c_c (cexp, qnan_value, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5998 TEST_c_c (cexp, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5999 TEST_c_c (cexp, 1, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6000 TEST_c_c (cexp, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 6001
08198877
JM		 6002 TEST_c_c (cexp, 0.75L, 1.25L, 0.667537446429131586942201977015932112L, 2.00900045494094876258347228145863909L),
6003 TEST_c_c (cexp, -2.0, -3.0, -0.13398091492954261346140525546115575L, -0.019098516261135196432576240858800925L),
8847214f 6004
08198877
JM		 6005 TEST_c_c (cexp, 0, 0x1p65, 0.99888622066058013610642172179340364209972L, -0.047183876212354673805106149805700013943218L),
6006 TEST_c_c (cexp, 0, -0x1p65, 0.99888622066058013610642172179340364209972L, 0.047183876212354673805106149805700013943218L),
6007 TEST_c_c (cexp, 50, 0x1p127, 4.053997150228616856622417636046265337193e21L, 3.232070315463388524466674772633810238819e21L),
1a4ac776
JM		 6008
6009#ifndef TEST_FLOAT
08198877
JM		 6010 TEST_c_c (cexp, 0, 1e22, 0.5232147853951389454975944733847094921409L, -0.8522008497671888017727058937530293682618L),
6011 TEST_c_c (cexp, 0, 0x1p1023, -0.826369834614147994500785680811743734805L, 0.5631277798508840134529434079444683477104L),
6012 TEST_c_c (cexp, 500, 0x1p1023, -1.159886268932754433233243794561351783426e217L, 7.904017694554466595359379965081774849708e216L),
1a4ac776
JM		 6013#endif
6014
6015#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6016 TEST_c_c (cexp, 0, 0x1p16383L, 0.9210843909921906206874509522505756251609L, 0.3893629985894208126948115852610595405563L),
6017 TEST_c_c (cexp, -10000, 0x1p16383L, 1.045876464564882298442774542991176546722e-4343L, 4.421154026488516836023811173959413420548e-4344L),
1a4ac776
JM		 6018#endif
6019
08198877
JM		 6020 TEST_c_c (cexp, 88.75, 0.75, 2.558360358486542817001900410314204322891e38L, 2.383359453227311447654736314679677655100e38L),
6021 TEST_c_c (cexp, -95, 0.75, 4.039714446238306526889476684000081624047e-42L, 3.763383677300535390271646960780570275931e-42L, UNDERFLOW_EXCEPTION_FLOAT),
7c69cd14
JM		 6022
6023#ifndef TEST_FLOAT
08198877
JM		 6024 TEST_c_c (cexp, 709.8125, 0.75, 1.355121963080879535248452862759108365762e308L, 1.262426823598609432507811340856186873507e308L),
6025 TEST_c_c (cexp, -720, 0.75, 1.486960657116368433685753325516638551722e-313L, 1.385247284245720590980701226843815229385e-313L, UNDERFLOW_EXCEPTION_DOUBLE),
7c69cd14
JM		 6026#endif
6027
6028#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6029 TEST_c_c (cexp, 11356.5625, 0.75, 9.052188470850960144814815984311663764287e4931L, 8.432986734191301036267148978260970230200e4931L),
6030 TEST_c_c (cexp, -11370, 0.75, 8.631121063182211587489310508568170739592e-4939L, 8.040721827809267291427062346918413482824e-4939L, UNDERFLOW_EXCEPTION),
7c69cd14
JM		 6031#endif
6032
6033#ifdef TEST_FLOAT
08198877 6034 TEST_c_c (cexp, 180, 0x1p-149, plus_infty, 2.087071793345235105931967606907855310664e33L, OVERFLOW_EXCEPTION),
7c69cd14
JM		 6035#endif
6036
6037#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 6038 TEST_c_c (cexp, 1440, 0x1p-1074, plus_infty, 1.196295853897226111293303155636183216483e302L, OVERFLOW_EXCEPTION),
7c69cd14
JM		 6039#endif
6040
6041#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 6042 TEST_c_c (cexp, 22730, 0x1p-16434L, plus_infty, 2.435706297811211974162115164702304105374e4924L, OVERFLOW_EXCEPTION),
7c69cd14
JM		 6043#endif
6044
08198877
JM		 6045 TEST_c_c (cexp, 1e6, 0, plus_infty, 0, OVERFLOW_EXCEPTION),
6046 TEST_c_c (cexp, 1e6, min_value, plus_infty, plus_infty, OVERFLOW_EXCEPTION),
6047 TEST_c_c (cexp, 1e6, -min_value, plus_infty, minus_infty, OVERFLOW_EXCEPTION),
7c69cd14 6048
08198877
JM		 6049 TEST_c_c (cexp, min_value, min_subnorm_value, 1.0, min_subnorm_value, UNDERFLOW_EXCEPTION),
6050 TEST_c_c (cexp, min_value, -min_subnorm_value, 1.0, -min_subnorm_value, UNDERFLOW_EXCEPTION),
6051 END_DATA (cexp)
6052 };
6053
6054static void
6055cexp_test (void)
6056{
6057 errno = 0;
6058 FUNC(cexp) (BUILD_COMPLEX (0, 0));
6059 if (errno == ENOSYS)
6060 /* Function not implemented. */
6061 return;
05e166c8 6062
08198877
JM		 6063 START (cexp);
6064 RUN_TEST_LOOP_c_c (cexp, cexp_test_data, );
6815fabc 6065 END (cexp, complex);
8847214f
UD		 6066}
6067
2550dfe9 6068
0cdc8e6f
UD		 6069static void
6070cimag_test (void)
6071{
6072 START (cimag);
6073 TEST_c_f (cimag, 1.0, 0.0, 0.0);
6074 TEST_c_f (cimag, 1.0, minus_zero, minus_zero);
67e971f1
TS		 6075 TEST_c_f (cimag, 1.0, qnan_value, qnan_value);
6076 TEST_c_f (cimag, qnan_value, qnan_value, qnan_value);
0cdc8e6f
UD		 6077 TEST_c_f (cimag, 1.0, plus_infty, plus_infty);
6078 TEST_c_f (cimag, 1.0, minus_infty, minus_infty);
6079 TEST_c_f (cimag, 2.0, 3.0, 3.0);
6080
6081 END (cimag);
6082}
6083
08198877
JM		 6084static const struct test_c_c_data clog_test_data[] =
6085 {
6086 START_DATA (clog),
6087 TEST_c_c (clog, minus_zero, 0, minus_infty, M_PIl, DIVIDE_BY_ZERO_EXCEPTION),
6088 TEST_c_c (clog, minus_zero, minus_zero, minus_infty, -M_PIl, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 6089
08198877
JM		 6090 TEST_c_c (clog, 0, 0, minus_infty, 0.0, DIVIDE_BY_ZERO_EXCEPTION),
6091 TEST_c_c (clog, 0, minus_zero, minus_infty, minus_zero, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 6092
08198877
JM		 6093 TEST_c_c (clog, minus_infty, plus_infty, plus_infty, M_PI_34l),
6094 TEST_c_c (clog, minus_infty, minus_infty, plus_infty, -M_PI_34l),
8847214f 6095
08198877
JM		 6096 TEST_c_c (clog, plus_infty, plus_infty, plus_infty, M_PI_4l),
6097 TEST_c_c (clog, plus_infty, minus_infty, plus_infty, -M_PI_4l),
8847214f 6098
08198877
JM		 6099 TEST_c_c (clog, 0, plus_infty, plus_infty, M_PI_2l),
6100 TEST_c_c (clog, 3, plus_infty, plus_infty, M_PI_2l),
6101 TEST_c_c (clog, minus_zero, plus_infty, plus_infty, M_PI_2l),
6102 TEST_c_c (clog, -3, plus_infty, plus_infty, M_PI_2l),
6103 TEST_c_c (clog, 0, minus_infty, plus_infty, -M_PI_2l),
6104 TEST_c_c (clog, 3, minus_infty, plus_infty, -M_PI_2l),
6105 TEST_c_c (clog, minus_zero, minus_infty, plus_infty, -M_PI_2l),
6106 TEST_c_c (clog, -3, minus_infty, plus_infty, -M_PI_2l),
8847214f 6107
08198877
JM		 6108 TEST_c_c (clog, minus_infty, 0, plus_infty, M_PIl),
6109 TEST_c_c (clog, minus_infty, 1, plus_infty, M_PIl),
6110 TEST_c_c (clog, minus_infty, minus_zero, plus_infty, -M_PIl),
6111 TEST_c_c (clog, minus_infty, -1, plus_infty, -M_PIl),
8847214f 6112
08198877
JM		 6113 TEST_c_c (clog, plus_infty, 0, plus_infty, 0.0),
6114 TEST_c_c (clog, plus_infty, 1, plus_infty, 0.0),
6115 TEST_c_c (clog, plus_infty, minus_zero, plus_infty, minus_zero),
6116 TEST_c_c (clog, plus_infty, -1, plus_infty, minus_zero),
8847214f 6117
08198877
JM		 6118 TEST_c_c (clog, plus_infty, qnan_value, plus_infty, qnan_value),
6119 TEST_c_c (clog, minus_infty, qnan_value, plus_infty, qnan_value),
8847214f 6120
08198877
JM		 6121 TEST_c_c (clog, qnan_value, plus_infty, plus_infty, qnan_value),
6122 TEST_c_c (clog, qnan_value, minus_infty, plus_infty, qnan_value),
8847214f 6123
08198877
JM		 6124 TEST_c_c (clog, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6125 TEST_c_c (clog, 3, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6126 TEST_c_c (clog, minus_zero, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6127 TEST_c_c (clog, -3, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6128
08198877
JM		 6129 TEST_c_c (clog, qnan_value, 0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6130 TEST_c_c (clog, qnan_value, 5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6131 TEST_c_c (clog, qnan_value, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6132 TEST_c_c (clog, qnan_value, -5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6133
08198877 6134 TEST_c_c (clog, qnan_value, qnan_value, qnan_value, qnan_value),
2550dfe9 6135
08198877
JM		 6136 TEST_c_c (clog, 0.75L, 1.25L, 0.376885901188190075998919126749298416L, 1.03037682652431246378774332703115153L),
6137 TEST_c_c (clog, -2, -3, 1.2824746787307683680267437207826593L, -2.1587989303424641704769327722648368L),
8847214f 6138
08198877
JM		 6139 TEST_c_c (clog, 0x1.fffffep+127L, 0x1.fffffep+127L, 89.06941264234832570836679262104313101776L, M_PI_4l),
6140 TEST_c_c (clog, 0x1.fffffep+127L, 1.0L, 88.72283905206835305365817656031404273372L, 2.938736052218037251011746307725933020145e-39L, UNDERFLOW_EXCEPTION_FLOAT),
6141 TEST_c_c (clog, 0x1p-149L, 0x1p-149L, -102.9323563131518784484589700365392203592L, M_PI_4l),
6142 TEST_c_c (clog, 0x1p-147L, 0x1p-147L, -101.5460619520319878296245057936228672231L, M_PI_4l),
1897ad44
JM		 6143
6144#ifndef TEST_FLOAT
08198877
JM		 6145 TEST_c_c (clog, 0x1.fffffffffffffp+1023L, 0x1.fffffffffffffp+1023L, 710.1292864836639693869320059713862337880L, M_PI_4l),
6146 TEST_c_c (clog, 0x1.fffffffffffffp+1023L, 0x1p+1023L, 709.8942846690411016323109979483151967689L, 0.4636476090008061606231772164674799632783L),
6147 TEST_c_c (clog, 0x1p-1074L, 0x1p-1074L, -744.0934983311012896593986823853525458290L, M_PI_4l),
6148 TEST_c_c (clog, 0x1p-1073L, 0x1p-1073L, -743.4003511505413443499814502638943692610L, M_PI_4l),
1897ad44
JM		 6149#endif
6150
6151#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6152 TEST_c_c (clog, 0x1.fp+16383L, 0x1.fp+16383L, 11356.83823118610934184548269774874545400L, M_PI_4l),
6153 TEST_c_c (clog, 0x1.fp+16383L, 0x1p+16383L, 11356.60974243783798653123798337822335902L, 0.4764674194737066993385333770295162295856L),
6154 TEST_c_c (clog, 0x1p-16440L, 0x1p-16441L, -11395.22807662984378194141292922726786191L, 0.4636476090008061162142562314612144020285L),
1897ad44
JM		 6155#endif
6156
08198877
JM		 6157 TEST_c_c (clog, 0x1p-149L, 0x1.fp+127L, 88.69109041335841930424871526389807508374L, M_PI_2l),
6158 TEST_c_c (clog, -0x1p-149L, 0x1.fp+127L, 88.69109041335841930424871526389807508374L, M_PI_2l),
6159 TEST_c_c (clog, 0x1p-149L, -0x1.fp+127L, 88.69109041335841930424871526389807508374L, -M_PI_2l),
6160 TEST_c_c (clog, -0x1p-149L, -0x1.fp+127L, 88.69109041335841930424871526389807508374L, -M_PI_2l),
6161 TEST_c_c (clog, -0x1.fp+127L, 0x1p-149L, 88.69109041335841930424871526389807508374L, M_PIl),
6162 TEST_c_c (clog, -0x1.fp+127L, -0x1p-149L, 88.69109041335841930424871526389807508374L, -M_PIl),
638a572e 6163#ifdef TEST_FLOAT
08198877
JM		 6164 TEST_c_c (clog, 0x1.fp+127L, 0x1p-149L, 88.69109041335841930424871526389807508374L, plus_zero, UNDERFLOW_EXCEPTION),
6165 TEST_c_c (clog, 0x1.fp+127L, -0x1p-149L, 88.69109041335841930424871526389807508374L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM		 6166#endif
6167
6168#ifndef TEST_FLOAT
08198877
JM		 6169 TEST_c_c (clog, 0x1p-1074L, 0x1.fp+1023L, 709.7509641950694165420886960904242800794L, M_PI_2l),
6170 TEST_c_c (clog, -0x1p-1074L, 0x1.fp+1023L, 709.7509641950694165420886960904242800794L, M_PI_2l),
6171 TEST_c_c (clog, 0x1p-1074L, -0x1.fp+1023L, 709.7509641950694165420886960904242800794L, -M_PI_2l),
6172 TEST_c_c (clog, -0x1p-1074L, -0x1.fp+1023L, 709.7509641950694165420886960904242800794L, -M_PI_2l),
6173 TEST_c_c (clog, -0x1.fp+1023L, 0x1p-1074L, 709.7509641950694165420886960904242800794L, M_PIl),
6174 TEST_c_c (clog, -0x1.fp+1023L, -0x1p-1074L, 709.7509641950694165420886960904242800794L, -M_PIl),
638a572e
JM		 6175#endif
6176#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877
JM		 6177 TEST_c_c (clog, 0x1.fp+1023L, 0x1p-1074L, 709.7509641950694165420886960904242800794L, plus_zero, UNDERFLOW_EXCEPTION),
6178 TEST_c_c (clog, 0x1.fp+1023L, -0x1p-1074L, 709.7509641950694165420886960904242800794L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM		 6179#endif
6180
6181#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6182 TEST_c_c (clog, 0x1p-16445L, 0x1.fp+16383L, 11356.49165759582936919077408168801636572L, M_PI_2l),
6183 TEST_c_c (clog, -0x1p-16445L, 0x1.fp+16383L, 11356.49165759582936919077408168801636572L, M_PI_2l),
6184 TEST_c_c (clog, 0x1p-16445L, -0x1.fp+16383L, 11356.49165759582936919077408168801636572L, -M_PI_2l),
6185 TEST_c_c (clog, -0x1p-16445L, -0x1.fp+16383L, 11356.49165759582936919077408168801636572L, -M_PI_2l),
6186 TEST_c_c (clog, -0x1.fp+16383L, 0x1p-16445L, 11356.49165759582936919077408168801636572L, M_PIl),
6187 TEST_c_c (clog, -0x1.fp+16383L, -0x1p-16445L, 11356.49165759582936919077408168801636572L, -M_PIl),
6188 TEST_c_c (clog, 0x1.fp+16383L, 0x1p-16445L, 11356.49165759582936919077408168801636572L, plus_zero, UNDERFLOW_EXCEPTION),
6189 TEST_c_c (clog, 0x1.fp+16383L, -0x1p-16445L, 11356.49165759582936919077408168801636572L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e 6190# if LDBL_MANT_DIG >= 113
08198877
JM		 6191 TEST_c_c (clog, 0x1p-16494L, 0x1.fp+16383L, 11356.49165759582936919077408168801636572L, M_PI_2l),
6192 TEST_c_c (clog, -0x1p-16494L, 0x1.fp+16383L, 11356.49165759582936919077408168801636572L, M_PI_2l),
6193 TEST_c_c (clog, 0x1p-16494L, -0x1.fp+16383L, 11356.49165759582936919077408168801636572L, -M_PI_2l),
6194 TEST_c_c (clog, -0x1p-16494L, -0x1.fp+16383L, 11356.49165759582936919077408168801636572L, -M_PI_2l),
6195 TEST_c_c (clog, -0x1.fp+16383L, 0x1p-16494L, 11356.49165759582936919077408168801636572L, M_PIl),
6196 TEST_c_c (clog, -0x1.fp+16383L, -0x1p-16494L, 11356.49165759582936919077408168801636572L, -M_PIl),
6197 TEST_c_c (clog, 0x1.fp+16383L, 0x1p-16494L, 11356.49165759582936919077408168801636572L, plus_zero, UNDERFLOW_EXCEPTION),
6198 TEST_c_c (clog, 0x1.fp+16383L, -0x1p-16494L, 11356.49165759582936919077408168801636572L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM		 6199# endif
6200#endif
6201
08198877
JM		 6202 TEST_c_c (clog, 1.0L, 0x1.234566p-10L, 6.172834701221959432440126967147726538097e-7L, 1.111110564353742042376451655136933182201e-3L),
6203 TEST_c_c (clog, -1.0L, 0x1.234566p-20L, 5.886877547844618300918562490463748605537e-13L, 3.141591568520436206990380699322226378452L),
6204 TEST_c_c (clog, 0x1.234566p-30L, 1.0L, 5.614163921211322622623353961365728040115e-19L, 1.570796325735258575254858696548386439740L),
6205 TEST_c_c (clog, -0x1.234566p-40L, -1.0L, 5.354083939753840089583620652120903838944e-25L, -1.570796326795931422008642456283782656359L),
6206 TEST_c_c (clog, 0x1.234566p-50L, 1.0L, 5.106052341226425256332038420428899201070e-31L, 1.570796326794895608681734464330528755366L),
6207 TEST_c_c (clog, 0x1.234566p-60L, 1.0L, 4.869510976053643471080816669875627875933e-37L, 1.570796326794896618244456860363082279319L),
6208 TEST_c_c (clog, 0x1p-62L, 1.0L, 2.350988701644575015937473074444491355582e-38L, 1.570796326794896619014481257142650555297L),
6209 TEST_c_c (clog, 0x1p-63L, 1.0L, 5.877471754111437539843682686111228389059e-39L, 1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
6210 TEST_c_c (clog, 0x1p-64L, 1.0L, 1.469367938527859384960920671527807097271e-39L, 1.570796326794896619177111583015476220398L, UNDERFLOW_EXCEPTION_FLOAT),
da865e95 6211#ifndef TEST_FLOAT
08198877
JM		 6212 TEST_c_c (clog, 0x1p-510L, 1.0L, 4.450147717014402766180465434664808128438e-308L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
6213 TEST_c_c (clog, 0x1p-511L, 1.0L, 1.112536929253600691545116358666202032110e-308L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
6214 TEST_c_c (clog, 0x1p-512L, 1.0L, 2.781342323134001728862790896665505080274e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
da865e95
JM		 6215#endif
6216#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6217 TEST_c_c (clog, 0x1p-8190L, 1.0L, 6.724206286224187012525355634643505205196e-4932L, 1.570796326794896619231321691639751442099L),
6218 TEST_c_c (clog, 0x1p-8191L, 1.0L, 1.681051571556046753131338908660876301299e-4932L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
6219 TEST_c_c (clog, 0x1p-8192L, 1.0L, 4.202628928890116882828347271652190753248e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
da865e95
JM		 6220#endif
6221
08198877
JM		 6222 TEST_c_c (clog, 0x1.000566p0L, 0x1.234p-10L, 8.298731898331237038231468223024422855654e-5L, 1.110938609507128729312743251313024793990e-3L),
6223 TEST_c_c (clog, 0x1.000566p0L, 0x1.234p-100L, 8.237022655933121125560939513260027133767e-5L, 8.974094312218060110948251664314290484113e-31L),
d0419dbf 6224#ifndef TEST_FLOAT
08198877
JM		 6225 TEST_c_c (clog, -0x1.0000000123456p0L, 0x1.2345678p-30L, 2.649094282537168795982991778475646793277e-10L, 3.141592652530155111500161671113150737892L),
6226 TEST_c_c (clog, -0x1.0000000123456p0L, 0x1.2345678p-1000L, 2.649094276923003995420209214900915462737e-10L, 3.141592653589793238462643383279502884197L),
d0419dbf
JM		 6227#endif
6228#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 6229 TEST_c_c (clog, 0x1.00000000000000123456789abcp0L, 0x1.23456789p-60L, 9.868649107778739757272772275265050767867e-19L, 9.868649106423871142816660980898339912137e-19L),
6230 TEST_c_c (clog, 0x1.00000000000000123456789abcp0L, 0x1.23456789p-1000L, 9.868649107778739752403260515979017248596e-19L, 1.061846605795612822522063052130030717368e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d0419dbf
JM		 6231#endif
6232
08198877 6233 TEST_c_c (clog, 0x0.ffffffp0L, 0x0.ffffffp-100L, -5.960464655174753498633255797994360530379e-8L, 7.888609052210118054117285652827862296732e-31L),
d032e0d2 6234#ifndef TEST_FLOAT
08198877 6235 TEST_c_c (clog, 0x0.fffffffffffff8p0L, 0x0.fffffffffffff8p-1000L, -1.110223024625156602053389888482372171810e-16L, 9.332636185032188789900895447238171696171e-302L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d032e0d2
JM		 6236#endif
6237#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 6238 TEST_c_c (clog, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp-15000L, -5.421010862427522170184200798202494495630e-20L, 3.548665303440282824232502561095699343814e-4516L),
6239#endif
6240
6241 TEST_c_c (clog, 0x1a6p-10L, 0x3a5p-10L, -1.4305135209763571252847059962654228661815e-06L, 1.1460277178115757370775644871674016684074L),
6242 TEST_c_c (clog, 0xf2p-10L, 0x3e3p-10L, 6.1988446308070710970664736815277450078106e-06L, 1.3322126499153926210226335249558203898460L),
6243 TEST_c_c (clog, 0x4d4ep-15L, 0x6605p-15L, -1.6298145321400412054744424587143483169412e-08L, 0.9223574537155056772124552172295398141249L),
6244 TEST_c_c (clog, 0x2818p-15L, 0x798fp-15L, 1.5366822245016167178749091974664853785194e-08L, 1.2522014929038946066987318471922169174157L),
6245 TEST_c_c (clog, 0x9b57bp-20L, 0xcb7b4p-20L, -3.9563019528687610863490232935890272740908e-11L, 0.9187593477446338910857133065497364950682L),
6246 TEST_c_c (clog, 0x2731p-20L, 0xfffd0p-20L, 4.4110493034041283943115971658295280288115e-11L, 1.5612279663766352262688735061954290528838L),
6247 TEST_c_c (clog, 0x2ede88p-23L, 0x771c3fp-23L, -4.4764192352906350039050902870893173560494e-13L, 1.1959106857549200806818600493552847793381L),
6248 TEST_c_c (clog, 0x11682p-23L, 0x7ffed1p-23L, 1.1723955140027907954461000991619077811832e-12L, 1.5622968405332756349813737986164832897108L),
6249 TEST_c_c (clog, 0xa1f2c1p-24L, 0xc643aep-24L, -1.0480505352462576151523512837107080269981e-13L, 0.8858771987699967480545613322309315260313L),
6250 TEST_c_c (clog, 0x659feap-24L, 0xeaf6f9p-24L, 3.7303493627403868207597214252239749960738e-14L, 1.1625816408046866464773042283673653469061L),
d032e0d2 6251#ifndef TEST_FLOAT
08198877
JM		 6252 TEST_c_c (clog, 0x4447d7175p-35L, 0x6c445e00ap-35L, -1.4823076576950255933915367361099865652625e-20L, 1.0081311552703893116404606212158840190615L),
6253 TEST_c_c (clog, 0x2dd46725bp-35L, 0x7783a1284p-35L, 4.4469229730850767799109418892826021157328e-20L, 1.2046235979300843056806465045930070146351L),
6254 TEST_c_c (clog, 0x164c74eea876p-45L, 0x16f393482f77p-45L, -3.0292258760486853327810377824479932031744e-26L, 0.7998237934177411746093524982030330293980L),
6255 TEST_c_c (clog, 0xfe961079616p-45L, 0x1bc37e09e6d1p-45L, 5.3718272201930019901317065495843842735179e-26L, 1.0503831592447830576186444373011142397404L),
6256 TEST_c_c (clog, 0xa4722f19346cp-51L, 0x7f9631c5e7f07p-51L, -6.2122796286154679676173624516405339768606e-30L, 1.4904138780720095276446375492434049214172L),
6257 TEST_c_c (clog, 0x10673dd0f2481p-51L, 0x7ef1d17cefbd2p-51L, 3.2047474274603604594851472963586149973093e-29L, 1.4422922682185099608731642353544207976604L),
6258 TEST_c_c (clog, 0x8ecbf810c4ae6p-52L, 0xd479468b09a37p-52L, -9.7375017988218644730510244778042114638107e-30L, 0.9790637929494922564724108399524154766631L),
6259 TEST_c_c (clog, 0x5b06b680ea2ccp-52L, 0xef452b965da9fp-52L, 8.3076914081087805757422664530653247447136e-30L, 1.2072712126771536614482822173033535043206L),
6260 TEST_c_c (clog, 0x659b70ab7971bp-53L, 0x1f5d111e08abecp-53L, -2.5083311595699359750201056724289010648701e-30L, 1.3710185432462268491534742969536240564640L),
6261 TEST_c_c (clog, 0x15cfbd1990d1ffp-53L, 0x176a3973e09a9ap-53L, 1.0168910106364605304135563536838075568606e-30L, 0.8208373755522359859870890246475340086663L),
6262 TEST_c_c (clog, 0x1367a310575591p-54L, 0x3cfcc0a0541f60p-54L, 5.0844550531823026520677817684239496041087e-32L, 1.2627468605458094918919206628466016525397L),
6263 TEST_c_c (clog, 0x55cb6d0c83af5p-55L, 0x7fe33c0c7c4e90p-55L, -5.2000108498455368032511404449795741611813e-32L, 1.5288921536982513453421343495466824420259L),
d032e0d2
JM		 6264#endif
6265#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 6266 TEST_c_c (clog, 0x298c62cb546588a7p-63L, 0x7911b1dfcc4ecdaep-63L, -1.1931267660846218205882675852805793644095e-36L, 1.2402109774337032400594953899784058127412L),
6267 TEST_c_c (clog, 0x4d9c37e2b5cb4533p-63L, 0x65c98be2385a042ep-63L, 6.4064442119814669184296141278612389400075e-37L, 0.9193591364645830864185131402313014890145L),
6268 TEST_c_c (clog, 0x602fd5037c4792efp-64L, 0xed3e2086dcca80b8p-64L, -2.3362950222592964220878638677292132852104e-37L, 1.1856121127236268105413184264288408265852L),
6269 TEST_c_c (clog, 0x6b10b4f3520217b6p-64L, 0xe8893cbb449253a1p-64L, 2.4244570985709679851855191080208817099132e-37L, 1.1393074519572050614551047548718495655972L),
6270 TEST_c_c (clog, 0x81b7efa81fc35ad1p-65L, 0x1ef4b835f1c79d812p-65L, -9.9182335850630508484862145328126979066934e-39L, 1.3146479888794807046338799047003947008804L),
d032e0d2
JM		 6271#endif
6272#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 6273 TEST_c_c (clog, 0x3f96469050f650869c2p-75L, 0x6f16b2c9c8b05988335p-75L, -1.0509738482436128031927971874674370984602e-45L, 1.0509191467640012308402149909370784281448L),
6274 TEST_c_c (clog, 0x3157fc1d73233e580c8p-75L, 0x761b52ccd435d7c7f5fp-75L, 1.3487497719126364307640897239165442763573e-43L, 1.1750493008528425228929764149024375035382L),
6275 TEST_c_c (clog, 0x155f8afc4c48685bf63610p-85L, 0x17d0cf2652cdbeb1294e19p-85L, -4.7775669192897997174762089350332738583822e-50L, 0.8393953487996880419413728440067635213372L),
6276 TEST_c_c (clog, 0x13836d58a13448d750b4b9p-85L, 0x195ca7bc3ab4f9161edbe6p-85L, 2.8398125044729578740243199963484494962411e-50L, 0.9149964976334130461795060758257083099706L),
6277 TEST_c_c (clog, 0x1df515eb171a808b9e400266p-95L, 0x7c71eb0cd4688dfe98581c77p-95L, -3.5048022044913950094635368750889659723004e-57L, 1.3345633256521815205858155673950177421079L),
6278 TEST_c_c (clog, 0xe33f66c9542ca25cc43c867p-95L, 0x7f35a68ebd3704a43c465864p-95L, 4.1101771307217268747345114262406964584250e-56L, 1.4596065864518742494094402406719567059585L),
6279 TEST_c_c (clog, 0x6771f22c64ed551b857c128b4cp-105L, 0x1f570e7a13cc3cf2f44fd793ea1p-105L, -1.4281333889622737316199756373421183559948e-62L, 1.3673546561165378090903506783353927980633L),
6280 TEST_c_c (clog, 0x15d8ab6ed05ca514086ac3a1e84p-105L, 0x1761e480aa094c0b10b34b09ce9p-105L, 1.0027319539522347477331743836657426754857e-62L, 0.8193464073721167323313606647411269414759L),
6281 TEST_c_c (clog, 0x187190c1a334497bdbde5a95f48p-106L, 0x3b25f08062d0a095c4cfbbc338dp-106L, -1.7471844652198029695350765775994001163767e-63L, 1.1789110097072986038243729592318526094314L),
6282 TEST_c_c (clog, 0x6241ef0da53f539f02fad67dabp-106L, 0x3fb46641182f7efd9caa769dac0p-106L, 4.3299788920664682288477984749202524623248e-63L, 1.4746938237585656250866370987773473745867L),
d032e0d2
JM		 6283#endif
6284#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 6285 TEST_c_c (clog, 0x3e1d0a105ac4ebeacd9c6952d34cp-112L, 0xf859b3d1b06d005dcbb5516d5479p-112L, -1.1683999374665377365054966073875064467108e-66L, 1.3257197596350832748781065387304444940172L),
6286 TEST_c_c (clog, 0x47017a2e36807acb1e5214b209dep-112L, 0xf5f4a550c9d75e3bb1839d865f0dp-112L, 1.5077923002544367932999503838191154621839e-65L, 1.2897445708311412721399861948957141824914L),
6287 TEST_c_c (clog, 0x148f818cb7a9258fca942ade2a0cap-113L, 0x18854a34780b8333ec53310ad7001p-113L, -7.1865869169568789348552370692485515571497e-67L, 0.8730167479365994646287897223471819363668L),
6288 TEST_c_c (clog, 0xfd95243681c055c2632286921092p-113L, 0x1bccabcd29ca2152860ec29e34ef7p-113L, 6.6255694866654064502633121109394710807528e-66L, 1.0526409614996288387567810726095850312049L),
6289 TEST_c_c (clog, 0xdb85c467ee2aadd5f425fe0f4b8dp-114L, 0x3e83162a0f95f1dcbf97dddf410eap-114L, 4.6017338806965821566734340588575402712716e-67L, 1.3547418904611758959096647942223384691728L),
6290 TEST_c_c (clog, 0x1415bcaf2105940d49a636e98ae59p-115L, 0x7e6a150adfcd1b0921d44b31f40f4p-115L, 2.5993421227864195179698176012564317527271e-67L, 1.4132318089683022770487383611430906982461L),
6291#endif
6292 END_DATA (clog)
6293 };
8847214f
UD		 6294
6295static void
08198877 6296clog_test (void)
8847214f 6297{
aaca11d8 6298 errno = 0;
08198877 6299 FUNC(clog) (BUILD_COMPLEX (-2, -3));
aaca11d8
UD		 6300 if (errno == ENOSYS)
6301 /* Function not implemented. */
6302 return;
6303
08198877
JM		 6304 START (clog);
6305 RUN_TEST_LOOP_c_c (clog, clog_test_data, );
6306 END (clog, complex);
6307}
6308
8847214f 6309
08198877
JM		 6310static const struct test_c_c_data clog10_test_data[] =
6311 {
6312 START_DATA (clog10),
6313 TEST_c_c (clog10, minus_zero, 0, minus_infty, M_PIl, DIVIDE_BY_ZERO_EXCEPTION),
6314 TEST_c_c (clog10, minus_zero, minus_zero, minus_infty, -M_PIl, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 6315
08198877
JM		 6316 TEST_c_c (clog10, 0, 0, minus_infty, 0.0, DIVIDE_BY_ZERO_EXCEPTION),
6317 TEST_c_c (clog10, 0, minus_zero, minus_infty, minus_zero, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 6318
08198877 6319 TEST_c_c (clog10, minus_infty, plus_infty, plus_infty, M_PI_34_LOG10El),
8847214f 6320
08198877
JM		 6321 TEST_c_c (clog10, plus_infty, plus_infty, plus_infty, M_PI4_LOG10El),
6322 TEST_c_c (clog10, plus_infty, minus_infty, plus_infty, -M_PI4_LOG10El),
8847214f 6323
08198877
JM		 6324 TEST_c_c (clog10, 0, plus_infty, plus_infty, M_PI2_LOG10El),
6325 TEST_c_c (clog10, 3, plus_infty, plus_infty, M_PI2_LOG10El),
6326 TEST_c_c (clog10, minus_zero, plus_infty, plus_infty, M_PI2_LOG10El),
6327 TEST_c_c (clog10, -3, plus_infty, plus_infty, M_PI2_LOG10El),
6328 TEST_c_c (clog10, 0, minus_infty, plus_infty, -M_PI2_LOG10El),
6329 TEST_c_c (clog10, 3, minus_infty, plus_infty, -M_PI2_LOG10El),
6330 TEST_c_c (clog10, minus_zero, minus_infty, plus_infty, -M_PI2_LOG10El),
6331 TEST_c_c (clog10, -3, minus_infty, plus_infty, -M_PI2_LOG10El),
8847214f 6332
08198877
JM		 6333 TEST_c_c (clog10, minus_infty, 0, plus_infty, M_PI_LOG10El),
6334 TEST_c_c (clog10, minus_infty, 1, plus_infty, M_PI_LOG10El),
6335 TEST_c_c (clog10, minus_infty, minus_zero, plus_infty, -M_PI_LOG10El),
6336 TEST_c_c (clog10, minus_infty, -1, plus_infty, -M_PI_LOG10El),
8847214f 6337
08198877
JM		 6338 TEST_c_c (clog10, plus_infty, 0, plus_infty, 0.0),
6339 TEST_c_c (clog10, plus_infty, 1, plus_infty, 0.0),
6340 TEST_c_c (clog10, plus_infty, minus_zero, plus_infty, minus_zero),
6341 TEST_c_c (clog10, plus_infty, -1, plus_infty, minus_zero),
8847214f 6342
08198877
JM		 6343 TEST_c_c (clog10, plus_infty, qnan_value, plus_infty, qnan_value),
6344 TEST_c_c (clog10, minus_infty, qnan_value, plus_infty, qnan_value),
8847214f 6345
08198877
JM		 6346 TEST_c_c (clog10, qnan_value, plus_infty, plus_infty, qnan_value),
6347 TEST_c_c (clog10, qnan_value, minus_infty, plus_infty, qnan_value),
8847214f 6348
08198877
JM		 6349 TEST_c_c (clog10, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6350 TEST_c_c (clog10, 3, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6351 TEST_c_c (clog10, minus_zero, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6352 TEST_c_c (clog10, -3, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6353
08198877
JM		 6354 TEST_c_c (clog10, qnan_value, 0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6355 TEST_c_c (clog10, qnan_value, 5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6356 TEST_c_c (clog10, qnan_value, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6357 TEST_c_c (clog10, qnan_value, -5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6358
08198877 6359 TEST_c_c (clog10, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 6360
08198877
JM		 6361 TEST_c_c (clog10, 0.75L, 1.25L, 0.163679467193165171449476605077428975L, 0.447486970040493067069984724340855636L),
6362 TEST_c_c (clog10, -2, -3, 0.556971676153418384603252578971164214L, -0.937554462986374708541507952140189646L),
8847214f 6363
08198877
JM		 6364 TEST_c_c (clog10, 0x1.fffffep+127L, 0x1.fffffep+127L, 38.68235441693561449174780668781319348761L, M_PI4_LOG10El),
6365 TEST_c_c (clog10, 0x1.fffffep+127L, 1.0L, 38.53183941910362389414093724045094697423L, 1.276276851248440096917018665609900318458e-39L, UNDERFLOW_EXCEPTION_FLOAT),
6366 TEST_c_c (clog10, 0x1p-149L, 0x1p-149L, -44.70295435610120748924022586658721447508L, M_PI4_LOG10El),
6367 TEST_c_c (clog10, 0x1p-147L, 0x1p-147L, -44.10089436477324509881274807713822842154L, M_PI4_LOG10El),
1897ad44
JM		 6368
6369#ifndef TEST_FLOAT
08198877
JM		 6370 TEST_c_c (clog10, 0x1.fffffffffffffp+1023L, 0x1.fffffffffffffp+1023L, 308.4052305577487344482591243175787477115L, M_PI4_LOG10El),
6371 TEST_c_c (clog10, 0x1.fffffffffffffp+1023L, 0x1p+1023L, 308.3031705664207720674749211936626341569L, 0.2013595981366865903254995612594728746470L),
6372 TEST_c_c (clog10, 0x1p-1074L, 0x1p-1074L, -323.1557003452838130619487034867432642357L, M_PI4_LOG10El),
6373 TEST_c_c (clog10, 0x1p-1073L, 0x1p-1073L, -322.8546703496198318667349645920187712089L, M_PI4_LOG10El),
1897ad44
JM		 6374#endif
6375
6376#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6377 TEST_c_c (clog10, 0x1.fp+16383L, 0x1.fp+16383L, 4932.212175672014259683102930239951947672L, M_PI4_LOG10El),
6378 TEST_c_c (clog10, 0x1.fp+16383L, 0x1p+16383L, 4932.112944269463028900262609694408579449L, 0.2069271710841128115912940666587802677383L),
6379 TEST_c_c (clog10, 0x1p-16440L, 0x1p-16441L, -4948.884673709346821106688037612752099609L, 0.2013595981366865710389502301937289472543L),
1897ad44
JM		 6380#endif
6381
08198877
JM		 6382 TEST_c_c (clog10, 0x1p-149L, 0x1.fp+127L, 38.51805116050395969095658815123105801479L, 0.6821881769209206737428918127156778851051L),
6383 TEST_c_c (clog10, -0x1p-149L, 0x1.fp+127L, 38.51805116050395969095658815123105801479L, 0.6821881769209206737428918127156778851051L),
6384 TEST_c_c (clog10, 0x1p-149L, -0x1.fp+127L, 38.51805116050395969095658815123105801479L, -0.6821881769209206737428918127156778851051L),
6385 TEST_c_c (clog10, -0x1p-149L, -0x1.fp+127L, 38.51805116050395969095658815123105801479L, -0.6821881769209206737428918127156778851051L),
6386 TEST_c_c (clog10, -0x1.fp+127L, 0x1p-149L, 38.51805116050395969095658815123105801479L, 1.364376353841841347485783625431355770210L),
6387 TEST_c_c (clog10, -0x1.fp+127L, -0x1p-149L, 38.51805116050395969095658815123105801479L, -1.364376353841841347485783625431355770210L),
638a572e 6388#ifdef TEST_FLOAT
08198877
JM		 6389 TEST_c_c (clog10, 0x1.fp+127L, 0x1p-149L, 38.51805116050395969095658815123105801479L, plus_zero, UNDERFLOW_EXCEPTION),
6390 TEST_c_c (clog10, 0x1.fp+127L, -0x1p-149L, 38.51805116050395969095658815123105801479L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM		 6391#endif
6392
6393#ifndef TEST_FLOAT
08198877
JM		 6394 TEST_c_c (clog10, 0x1p-1074L, 0x1.fp+1023L, 308.2409272754311106024666378243768099991L, 0.6821881769209206737428918127156778851051L),
6395 TEST_c_c (clog10, -0x1p-1074L, 0x1.fp+1023L, 308.2409272754311106024666378243768099991L, 0.6821881769209206737428918127156778851051L),
6396 TEST_c_c (clog10, 0x1p-1074L, -0x1.fp+1023L, 308.2409272754311106024666378243768099991L, -0.6821881769209206737428918127156778851051L),
6397 TEST_c_c (clog10, -0x1p-1074L, -0x1.fp+1023L, 308.2409272754311106024666378243768099991L, -0.6821881769209206737428918127156778851051L),
6398 TEST_c_c (clog10, -0x1.fp+1023L, 0x1p-1074L, 308.2409272754311106024666378243768099991L, 1.364376353841841347485783625431355770210L),
6399 TEST_c_c (clog10, -0x1.fp+1023L, -0x1p-1074L, 308.2409272754311106024666378243768099991L, -1.364376353841841347485783625431355770210L),
638a572e
JM		 6400#endif
6401#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877
JM		 6402 TEST_c_c (clog10, 0x1.fp+1023L, 0x1p-1074L, 308.2409272754311106024666378243768099991L, plus_zero, UNDERFLOW_EXCEPTION),
6403 TEST_c_c (clog10, 0x1.fp+1023L, -0x1p-1074L, 308.2409272754311106024666378243768099991L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM		 6404#endif
6405
6406#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6407 TEST_c_c (clog10, 0x1p-16445L, 0x1.fp+16383L, 4932.061660674182269085496060792589701158L, 0.6821881769209206737428918127156778851051L),
6408 TEST_c_c (clog10, -0x1p-16445L, 0x1.fp+16383L, 4932.061660674182269085496060792589701158L, 0.6821881769209206737428918127156778851051L),
6409 TEST_c_c (clog10, 0x1p-16445L, -0x1.fp+16383L, 4932.061660674182269085496060792589701158L, -0.6821881769209206737428918127156778851051L),
6410 TEST_c_c (clog10, -0x1p-16445L, -0x1.fp+16383L, 4932.061660674182269085496060792589701158L, -0.6821881769209206737428918127156778851051L),
6411 TEST_c_c (clog10, -0x1.fp+16383L, 0x1p-16445L, 4932.061660674182269085496060792589701158L, 1.364376353841841347485783625431355770210L),
6412 TEST_c_c (clog10, -0x1.fp+16383L, -0x1p-16445L, 4932.061660674182269085496060792589701158L, -1.364376353841841347485783625431355770210L),
6413 TEST_c_c (clog10, 0x1.fp+16383L, 0x1p-16445L, 4932.061660674182269085496060792589701158L, plus_zero, UNDERFLOW_EXCEPTION),
6414 TEST_c_c (clog10, 0x1.fp+16383L, -0x1p-16445L, 4932.061660674182269085496060792589701158L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e 6415# if LDBL_MANT_DIG >= 113
08198877
JM		 6416 TEST_c_c (clog10, 0x1p-16494L, 0x1.fp+16383L, 4932.061660674182269085496060792589701158L, 0.6821881769209206737428918127156778851051L),
6417 TEST_c_c (clog10, -0x1p-16494L, 0x1.fp+16383L, 4932.061660674182269085496060792589701158L, 0.6821881769209206737428918127156778851051L),
6418 TEST_c_c (clog10, 0x1p-16494L, -0x1.fp+16383L, 4932.061660674182269085496060792589701158L, -0.6821881769209206737428918127156778851051L),
6419 TEST_c_c (clog10, -0x1p-16494L, -0x1.fp+16383L, 4932.061660674182269085496060792589701158L, -0.6821881769209206737428918127156778851051L),
6420 TEST_c_c (clog10, -0x1.fp+16383L, 0x1p-16494L, 4932.061660674182269085496060792589701158L, 1.364376353841841347485783625431355770210L),
6421 TEST_c_c (clog10, -0x1.fp+16383L, -0x1p-16494L, 4932.061660674182269085496060792589701158L, -1.364376353841841347485783625431355770210L),
6422 TEST_c_c (clog10, 0x1.fp+16383L, 0x1p-16494L, 4932.061660674182269085496060792589701158L, plus_zero, UNDERFLOW_EXCEPTION),
6423 TEST_c_c (clog10, 0x1.fp+16383L, -0x1p-16494L, 4932.061660674182269085496060792589701158L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM		 6424# endif
6425#endif
6426
08198877
JM		 6427 TEST_c_c (clog10, 1.0L, 0x1.234566p-10L, 2.680828048441605163181684680300513080769e-7L, 4.825491868832381486767558728169977751564e-4L),
6428 TEST_c_c (clog10, -1.0L, 0x1.234566p-20L, 2.556638434669064077889576526006849923281e-13L, 1.364375882602207106407956770293808181427L),
6429 TEST_c_c (clog10, 0x1.234566p-30L, 1.0L, 2.438200411482400072282924063740535840474e-19L, 6.821881764607257184291586401763604544928e-1L),
6430 TEST_c_c (clog10, -0x1.234566p-40L, -1.0L, 2.325249110681915353442924915876654139373e-25L, -6.821881769213700828789403802671540158935e-1L),
6431 TEST_c_c (clog10, 0x1.234566p-50L, 1.0L, 2.217530356103816369479108963807448194409e-31L, 6.821881769209202348667823902864283966959e-1L),
6432 TEST_c_c (clog10, 0x1.234566p-60L, 1.0L, 2.114801746467415208319767917450504756866e-37L, 6.821881769209206733143018621078368211515e-1L),
6433 TEST_c_c (clog10, 0x1p-61L, 1.0L, 4.084085680564517578238994467153626207224e-38L, 6.821881769209206735545466044044889962925e-1L),
6434 TEST_c_c (clog10, 0x1p-62L, 1.0L, 1.021021420141129394559748616788406551878e-38L, 6.821881769209206736487192085600834406988e-1L, UNDERFLOW_EXCEPTION_FLOAT),
6435 TEST_c_c (clog10, 0x1p-63L, 1.0L, 2.552553550352823486399371541971016379740e-39L, 6.821881769209206736958055106378806629019e-1L, UNDERFLOW_EXCEPTION_FLOAT),
da865e95 6436#ifndef TEST_FLOAT
08198877
JM		 6437 TEST_c_c (clog10, 0x1p-509L, 1.0L, 7.730698388614835910296270976605350994446e-308L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
6438 TEST_c_c (clog10, 0x1p-510L, 1.0L, 1.932674597153708977574067744151337748612e-308L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
6439 TEST_c_c (clog10, 0x1p-511L, 1.0L, 4.831686492884272443935169360378344371529e-309L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
da865e95
JM		 6440#endif
6441#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6442 TEST_c_c (clog10, 0x1p-8189L, 1.0L, 1.168114274114528946314738738025008370069e-4931L, 6.821881769209206737428918127156778851051e-1L),
6443 TEST_c_c (clog10, 0x1p-8190L, 1.0L, 2.920285685286322365786846845062520925172e-4932L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION),
6444 TEST_c_c (clog10, 0x1p-8191L, 1.0L, 7.300714213215805914467117112656302312931e-4933L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION),
da865e95
JM		 6445#endif
6446
08198877
JM		 6447 TEST_c_c (clog10, 0x1.000566p0L, 0x1.234p-10L, 3.604093470239754109961125085078190708674e-5L, 4.824745078422174667425851670822596859720e-4L),
6448 TEST_c_c (clog10, 0x1.000566p0L, 0x1.234p-100L, 3.577293486783822178310971763308187385546e-5L, 3.897399639875661463735636919790792140598e-31L),
d0419dbf 6449#ifndef TEST_FLOAT
08198877
JM		 6450 TEST_c_c (clog10, -0x1.0000000123456p0L, 0x1.2345678p-30L, 1.150487028947346337782682105935961875822e-10L, 1.364376353381646356131680448946397884147L),
6451 TEST_c_c (clog10, -0x1.0000000123456p0L, 0x1.2345678p-1000L, 1.150487026509145544402795327729455391948e-10L, 1.364376353841841347485783625431355770210L),
d0419dbf
JM		 6452#endif
6453#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 6454 TEST_c_c (clog10, 0x1.00000000000000123456789abcp0L, 0x1.23456789p-60L, 4.285899851347756188767674032946882584784e-19L, 4.285899850759344225805480528847018395861e-19L),
6455 TEST_c_c (clog10, 0x1.00000000000000123456789abcp0L, 0x1.23456789p-1000L, 4.285899851347756186652871946325962330640e-19L, 4.611541215247321502041995872887317363241e-302L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d0419dbf
JM		 6456#endif
6457
08198877 6458 TEST_c_c (clog10, 0x0.ffffffp0L, 0x0.ffffffp-100L, -2.588596909321764128428416045209904492216e-8L, 3.425979381266895667295625489912064603415e-31L),
d032e0d2 6459#ifndef TEST_FLOAT
08198877 6460 TEST_c_c (clog10, 0x0.fffffffffffff8p0L, 0x0.fffffffffffff8p-1000L, -4.821637332766435821255375046554377090472e-17L, 4.053112396770095089737411317782466262176e-302L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d032e0d2
JM		 6461#endif
6462#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 6463 TEST_c_c (clog10, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp-15000L, -2.354315103889861110220423157644627849164e-20L, 1.541165759405643564697852372112893034397e-4516L),
6464#endif
6465
6466 TEST_c_c (clog10, 0x1a6p-10L, 0x3a5p-10L, -6.2126412844802358329771948751248003038444e-07L, 0.4977135139537443711784513409096950995985L),
6467 TEST_c_c (clog10, 0xf2p-10L, 0x3e3p-10L, 2.6921240173351112953324592659528481616879e-06L, 0.5785726025799636431142862788413361783862L),
6468 TEST_c_c (clog10, 0x4d4ep-15L, 0x6605p-15L, -7.0781945783414996953799915941870192015212e-09L, 0.4005747524909781155537088181659175147564L),
6469 TEST_c_c (clog10, 0x2818p-15L, 0x798fp-15L, 6.6737261053986614395049481326819059203910e-09L, 0.5438241985991753781478398141908629586460L),
6470 TEST_c_c (clog10, 0x9b57bp-20L, 0xcb7b4p-20L, -1.7182001068739620267773842120965071561416e-11L, 0.3990121149225253562859800593935899629087L),
6471 TEST_c_c (clog10, 0x2731p-20L, 0xfffd0p-20L, 1.9156943718715958194239364991329064049438e-11L, 0.6780326907904082601285090019969008967595L),
6472 TEST_c_c (clog10, 0x2ede88p-23L, 0x771c3fp-23L, -1.9440841725722970687903291200493082253766e-13L, 0.5193774116724956222518530053006822210323L),
6473 TEST_c_c (clog10, 0x11682p-23L, 0x7ffed1p-23L, 5.0916490233953865181284669870035717560498e-13L, 0.6784968969384861816694467029319146542069L),
6474 TEST_c_c (clog10, 0xa1f2c1p-24L, 0xc643aep-24L, -4.5516256421319921959681423447271490869664e-14L, 0.3847315790697197749315054516562206543710L),
6475 TEST_c_c (clog10, 0x659feap-24L, 0xeaf6f9p-24L, 1.6200701438094619117335617123525612051457e-14L, 0.5049027913635038013499728086604870749732L),
d032e0d2 6476#ifndef TEST_FLOAT
08198877
JM		 6477 TEST_c_c (clog10, 0x4447d7175p-35L, 0x6c445e00ap-35L, -6.4375803621988389731799033530075237868110e-21L, 0.4378257977686804492768642780897650927167L),
6478 TEST_c_c (clog10, 0x2dd46725bp-35L, 0x7783a1284p-35L, 1.9312741086596516918394613098872836703188e-20L, 0.5231613813514771042838490538484014771862L),
6479 TEST_c_c (clog10, 0x164c74eea876p-45L, 0x16f393482f77p-45L, -1.3155760824064879362415202279780039150764e-26L, 0.3473590599762514228227328130640352044313L),
6480 TEST_c_c (clog10, 0xfe961079616p-45L, 0x1bc37e09e6d1p-45L, 2.3329549194675052736016290082882121135546e-26L, 0.4561756099441139182878993697611751382976L),
6481 TEST_c_c (clog10, 0xa4722f19346cp-51L, 0x7f9631c5e7f07p-51L, -2.6979587627476803379953050733225113494503e-30L, 0.6472785229986997177606324374555347813105L),
6482 TEST_c_c (clog10, 0x10673dd0f2481p-51L, 0x7ef1d17cefbd2p-51L, 1.3918041236396763648388478552321724382899e-29L, 0.6263795733790237053262025311642907438291L),
6483 TEST_c_c (clog10, 0x8ecbf810c4ae6p-52L, 0xd479468b09a37p-52L, -4.2289432987513243393180377141513840878196e-30L, 0.4252020027092323591068799049905597805296L),
6484 TEST_c_c (clog10, 0x5b06b680ea2ccp-52L, 0xef452b965da9fp-52L, 3.6079845358966994996207055940336690133424e-30L, 0.5243112258263349992771652393178033846555L),
6485 TEST_c_c (clog10, 0x659b70ab7971bp-53L, 0x1f5d111e08abecp-53L, -1.0893543813872082317104059174982092534059e-30L, 0.5954257879188711495921161433751775633232L),
6486 TEST_c_c (clog10, 0x15cfbd1990d1ffp-53L, 0x176a3973e09a9ap-53L, 4.4163015461643576961232672330852798804976e-31L, 0.3564851427422832755956993418877523303529L),
6487 TEST_c_c (clog10, 0x1367a310575591p-54L, 0x3cfcc0a0541f60p-54L, 2.2081507730821788480616336165447731164865e-32L, 0.5484039935757001196548030312819898864760L),
6488 TEST_c_c (clog10, 0x55cb6d0c83af5p-55L, 0x7fe33c0c7c4e90p-55L, -2.2583360179249556400630343805573865814771e-32L, 0.6639894257763289307423302343317622430835L),
d032e0d2
JM		 6489#endif
6490#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 6491 TEST_c_c (clog10, 0x298c62cb546588a7p-63L, 0x7911b1dfcc4ecdaep-63L, -5.1816837072162316773907242302011632570857e-37L, 0.5386167838952956925896424154370364458140L),
6492 TEST_c_c (clog10, 0x4d9c37e2b5cb4533p-63L, 0x65c98be2385a042ep-63L, 2.7822833698845776001753149807484078521508e-37L, 0.3992725998539071066769046272515417679815L),
6493 TEST_c_c (clog10, 0x602fd5037c4792efp-64L, 0xed3e2086dcca80b8p-64L, -1.0146400362652473358437501879334790111898e-37L, 0.5149047982335273098246594109614460842099L),
6494 TEST_c_c (clog10, 0x6b10b4f3520217b6p-64L, 0xe8893cbb449253a1p-64L, 1.0529283395205396881397407610630442563938e-37L, 0.4947949395762683446121140513971996916447L),
6495 TEST_c_c (clog10, 0x81b7efa81fc35ad1p-65L, 0x1ef4b835f1c79d812p-65L, -4.3074341162203896332989394770760901408798e-39L, 0.5709443672155660428417571212549720987784L),
d032e0d2
JM		 6496#endif
6497#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 6498 TEST_c_c (clog10, 0x3f96469050f650869c2p-75L, 0x6f16b2c9c8b05988335p-75L, -4.5643214291682663316715446865040356750881e-46L, 0.4564083863660793840592614609053162690362L),
6499 TEST_c_c (clog10, 0x3157fc1d73233e580c8p-75L, 0x761b52ccd435d7c7f5fp-75L, 5.8575458340992751256451490143468457830297e-44L, 0.5103174273246635294300470585396890237265L),
6500 TEST_c_c (clog10, 0x155f8afc4c48685bf63610p-85L, 0x17d0cf2652cdbeb1294e19p-85L, -2.0748709499710785084693619097712106753591e-50L, 0.3645447681189598740620098186365764884771L),
6501 TEST_c_c (clog10, 0x13836d58a13448d750b4b9p-85L, 0x195ca7bc3ab4f9161edbe6p-85L, 1.2333149003324592532859843519619084433953e-50L, 0.3973779298829931059309198145608711073016L),
6502 TEST_c_c (clog10, 0x1df515eb171a808b9e400266p-95L, 0x7c71eb0cd4688dfe98581c77p-95L, -1.5221162575729652613635150540947625639689e-57L, 0.5795934880811949230121092882659698986043L),
6503 TEST_c_c (clog10, 0xe33f66c9542ca25cc43c867p-95L, 0x7f35a68ebd3704a43c465864p-95L, 1.7850272475173865337808494725293124613817e-56L, 0.6338990862456906754888183278564382516852L),
6504 TEST_c_c (clog10, 0x6771f22c64ed551b857c128b4cp-105L, 0x1f570e7a13cc3cf2f44fd793ea1p-105L, -6.2023045024810589256360494043570293518879e-63L, 0.5938345819561308555003145899438513900776L),
6505 TEST_c_c (clog10, 0x15d8ab6ed05ca514086ac3a1e84p-105L, 0x1761e480aa094c0b10b34b09ce9p-105L, 4.3548095442952115860848857519953610343042e-63L, 0.3558376234889641500775150477035448866763L),
6506 TEST_c_c (clog10, 0x187190c1a334497bdbde5a95f48p-106L, 0x3b25f08062d0a095c4cfbbc338dp-106L, -7.5879257211204444302994221436282805900756e-64L, 0.5119945461708707332160859198685423099187L),
6507 TEST_c_c (clog10, 0x6241ef0da53f539f02fad67dabp-106L, 0x3fb46641182f7efd9caa769dac0p-106L, 1.8804859395820231849002915747252695375405e-63L, 0.6404513901551516189871978418046651877394L),
d032e0d2
JM		 6508#endif
6509#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 6510 TEST_c_c (clog10, 0x3e1d0a105ac4ebeacd9c6952d34cp-112L, 0xf859b3d1b06d005dcbb5516d5479p-112L, -5.0742964549782184008668435276046798273476e-67L, 0.5757527761596220360985719127090110408283L),
6511 TEST_c_c (clog10, 0x47017a2e36807acb1e5214b209dep-112L, 0xf5f4a550c9d75e3bb1839d865f0dp-112L, 6.5482587585671294601662599808612773010057e-66L, 0.5601289501766423782280643144987875760229L),
6512 TEST_c_c (clog10, 0x148f818cb7a9258fca942ade2a0cap-113L, 0x18854a34780b8333ec53310ad7001p-113L, -3.1210950417524756037077807411854181477733e-67L, 0.3791463562379872585396164879981280044658L),
6513 TEST_c_c (clog10, 0xfd95243681c055c2632286921092p-113L, 0x1bccabcd29ca2152860ec29e34ef7p-113L, 2.8774482675253468630312378575186855052697e-66L, 0.4571561610046221605554903008571429975493L),
6514 TEST_c_c (clog10, 0xdb85c467ee2aadd5f425fe0f4b8dp-114L, 0x3e83162a0f95f1dcbf97dddf410eap-114L, 1.9985076315737626043096596036300177494613e-67L, 0.5883569274304683249184005177865521205198L),
6515 TEST_c_c (clog10, 0x1415bcaf2105940d49a636e98ae59p-115L, 0x7e6a150adfcd1b0921d44b31f40f4p-115L, 1.1288799405048268615023706955013387413519e-67L, 0.6137587762850841972073301550420510507903L),
6516#endif
6517 END_DATA (clog10)
6518 };
d032e0d2 6519
08198877
JM		 6520static void
6521clog10_test (void)
6522{
6523 errno = 0;
6524 FUNC(clog10) (BUILD_COMPLEX (0.7L, 1.2L));
6525 if (errno == ENOSYS)
6526 /* Function not implemented. */
6527 return;
6528
6529 START (clog10);
6530 RUN_TEST_LOOP_c_c (clog10, clog10_test_data, );
6815fabc 6531 END (clog10, complex);
8847214f
UD		 6532}
6533
2550dfe9 6534
08198877
JM		 6535static const struct test_c_c_data conj_test_data[] =
6536 {
6537 START_DATA (conj),
6538 TEST_c_c (conj, 0.0, 0.0, 0.0, minus_zero),
6539 TEST_c_c (conj, 0.0, minus_zero, 0.0, 0.0),
6540 TEST_c_c (conj, qnan_value, qnan_value, qnan_value, qnan_value),
6541 TEST_c_c (conj, plus_infty, minus_infty, plus_infty, plus_infty),
6542 TEST_c_c (conj, plus_infty, plus_infty, plus_infty, minus_infty),
6543 TEST_c_c (conj, 1.0, 2.0, 1.0, -2.0),
6544 TEST_c_c (conj, 3.0, -4.0, 3.0, 4.0),
6545 END_DATA (conj)
6546 };
6547
0cdc8e6f
UD		 6548static void
6549conj_test (void)
6550{
6551 START (conj);
08198877 6552 RUN_TEST_LOOP_c_c (conj, conj_test_data, );
0cdc8e6f
UD		 6553 END (conj, complex);
6554}
6555
6556
601a3a5f
JM		 6557static const struct test_ff_f_data copysign_test_data[] =
6558 {
6559 START_DATA (copysign),
6560 TEST_ff_f (copysign, 0, 4, 0),
6561 TEST_ff_f (copysign, 0, -4, minus_zero),
6562 TEST_ff_f (copysign, minus_zero, 4, 0),
6563 TEST_ff_f (copysign, minus_zero, -4, minus_zero),
6564
6565 TEST_ff_f (copysign, plus_infty, 0, plus_infty),
6566 TEST_ff_f (copysign, plus_infty, minus_zero, minus_infty),
6567 TEST_ff_f (copysign, minus_infty, 0, plus_infty),
6568 TEST_ff_f (copysign, minus_infty, minus_zero, minus_infty),
6569
6570 TEST_ff_f (copysign, 0, plus_infty, 0),
6571 TEST_ff_f (copysign, 0, minus_zero, minus_zero),
6572 TEST_ff_f (copysign, minus_zero, plus_infty, 0),
6573 TEST_ff_f (copysign, minus_zero, minus_zero, minus_zero),
6574
6575 /* XXX More correctly we would have to check the sign of the NaN. */
6576 TEST_ff_f (copysign, qnan_value, 0, qnan_value),
6577 TEST_ff_f (copysign, qnan_value, minus_zero, qnan_value),
6578 TEST_ff_f (copysign, -qnan_value, 0, qnan_value),
6579 TEST_ff_f (copysign, -qnan_value, minus_zero, qnan_value),
6580 END_DATA (copysign)
6581 };
6582
8847214f
UD		 6583static void
6584copysign_test (void)
6585{
6586 START (copysign);
601a3a5f 6587 RUN_TEST_LOOP_ff_f (copysign, copysign_test_data, );
8847214f
UD		 6588 END (copysign);
6589}
6590
2550dfe9 6591
74c57478
JM		 6592static const struct test_f_f_data cos_test_data[] =
6593 {
6594 START_DATA (cos),
6595 TEST_f_f (cos, 0, 1),
6596 TEST_f_f (cos, minus_zero, 1),
6597 TEST_f_f (cos, plus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
6598 TEST_f_f (cos, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
6599 TEST_f_f (cos, qnan_value, qnan_value, ERRNO_UNCHANGED),
6600
6601 TEST_f_f (cos, M_PI_6l * 2.0, 0.5),
6602 TEST_f_f (cos, M_PI_6l * 4.0, -0.5),
6603
6604 /* The value of M_PI_2l is never exactly PI/2, and therefore the
6605 answer is never exactly zero. The answer is equal to the error
6606 in rounding PI/2 for the type used. Thus the answer is unique
6607 to each type. */
aba5e333 6608#ifdef TEST_FLOAT
74c57478
JM		 6609 /* 32-bit float. */
6610 TEST_f_f (cos, M_PI_2l, -0x1.777a5cp-25L),
aba5e333
CD		 6611#endif
6612#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MANT_DIG == 53)
74c57478
JM		 6613 /* 64-bit double or 64-bit long double. */
6614 TEST_f_f (cos, M_PI_2l, 0x1.1a62633145c07p-54L),
aba5e333
CD		 6615#endif
6616#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 64
74c57478
JM		 6617 /* 96-bit long double. */
6618 TEST_f_f (cos, M_PI_2l, -0xe.ce675d1fc8f8cbbp-69L),
aba5e333
CD		 6619#endif
6620#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 106
74c57478
JM		 6621 /* 128-bit IBM long double. */
6622 TEST_f_f (cos, M_PI_2l, 0x1.c1cd129024e088a67cc74020bcp-107L),
aba5e333
CD		 6623#endif
6624#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 113
74c57478
JM		 6625 /* 128-bit long double. */
6626 TEST_f_f (cos, M_PI_2l, 0x1.cd129024e088a67cc74020bbea64p-115L),
aba5e333 6627#endif
8847214f 6628
74c57478 6629 TEST_f_f (cos, 0.75L, 0.731688868873820886311838753000084544L),
8847214f 6630
74c57478
JM		 6631 TEST_f_f (cos, 0x1p65, 0.99888622066058013610642172179340364209972L),
6632 TEST_f_f (cos, -0x1p65, 0.99888622066058013610642172179340364209972L),
8c0247db 6633
d32e4346 6634#ifdef TEST_DOUBLE
74c57478 6635 TEST_f_f (cos, 0.80190127184058835, 0.69534156199418473),
8848d99d
JM		 6636#endif
6637
74c57478 6638 TEST_f_f (cos, 0x1.442f74p+15, 2.4407839902314016628485779006274989801517e-06L),
7a845b2c 6639
8848d99d 6640#ifndef TEST_FLOAT
74c57478
JM		 6641 TEST_f_f (cos, 1e22, 0.5232147853951389454975944733847094921409L),
6642 TEST_f_f (cos, 0x1p1023, -0.826369834614147994500785680811743734805L),
8848d99d
JM		 6643#endif
6644
6645#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478 6646 TEST_f_f (cos, 0x1p16383L, 0.9210843909921906206874509522505756251609L),
d32e4346
RM		 6647#endif
6648
74c57478
JM		 6649 TEST_f_f (cos, 0x1p+120, -9.25879022854837867303861764107414946730833e-01L),
6650 TEST_f_f (cos, 0x1p+127, 7.81914638714960072263910298466369236613162e-01L),
6651 TEST_f_f (cos, 0x1.fffff8p+127, 9.98819362551949040703862043664101081064641e-01L),
6652 TEST_f_f (cos, 0x1.fffffep+127, 8.53021039830304158051791467692161107353094e-01L),
6653 TEST_f_f (cos, 0x1p+50, 8.68095904660550604334592502063501320395739e-01L),
6654 TEST_f_f (cos, 0x1p+28, -1.65568979490578758865468278195361551113358e-01L),
6655 END_DATA (cos)
6656 };
6657
6658static void
6659cos_test (void)
6660{
6661 errno = 0;
6662 FUNC(cos) (0);
6663 if (errno == ENOSYS)
6664 /* Function not implemented. */
6665 return;
4ffffbd2 6666
74c57478
JM		 6667 START (cos);
6668 RUN_TEST_LOOP_f_f (cos, cos_test_data, );
8847214f
UD		 6669 END (cos);
6670}
6671
2550dfe9 6672
74c57478
JM		 6673static const struct test_f_f_data cos_tonearest_test_data[] =
6674 {
6675 START_DATA (cos_tonearest),
6676 TEST_f_f (cos, 1, 0.5403023058681397174009366074429766037323L),
6677 TEST_f_f (cos, 2, -0.4161468365471423869975682295007621897660L),
6678 TEST_f_f (cos, 3, -0.9899924966004454572715727947312613023937L),
6679 TEST_f_f (cos, 4, -0.6536436208636119146391681830977503814241L),
6680 TEST_f_f (cos, 5, 0.2836621854632262644666391715135573083344L),
6681 TEST_f_f (cos, 6, 0.9601702866503660205456522979229244054519L),
6682 TEST_f_f (cos, 7, 0.7539022543433046381411975217191820122183L),
6683 TEST_f_f (cos, 8, -0.1455000338086135258688413818311946826093L),
6684 TEST_f_f (cos, 9, -0.9111302618846769883682947111811653112463L),
6685 TEST_f_f (cos, 10, -0.8390715290764524522588639478240648345199L),
6686 END_DATA (cos_tonearest)
6687 };
6688
804360ed
JM		 6689static void
6690cos_test_tonearest (void)
6691{
804360ed
JM		 6692 errno = 0;
6693 FUNC(cos) (0);
6694 if (errno == ENOSYS)
6695 /* Function not implemented. */
6696 return;
6697
6698 START (cos_tonearest);
74c57478 6699 RUN_TEST_LOOP_f_f (cos, cos_tonearest_test_data, FE_TONEAREST);
804360ed
JM		 6700 END (cos_tonearest);
6701}
6702
6703
74c57478
JM		 6704static const struct test_f_f_data cos_towardzero_test_data[] =
6705 {
6706 START_DATA (cos_towardzero),
6707 TEST_f_f (cos, 1, 0.5403023058681397174009366074429766037323L),
6708 TEST_f_f (cos, 2, -0.4161468365471423869975682295007621897660L),
6709 TEST_f_f (cos, 3, -0.9899924966004454572715727947312613023937L),
6710 TEST_f_f (cos, 4, -0.6536436208636119146391681830977503814241L),
6711 TEST_f_f (cos, 5, 0.2836621854632262644666391715135573083344L),
6712 TEST_f_f (cos, 6, 0.9601702866503660205456522979229244054519L),
6713 TEST_f_f (cos, 7, 0.7539022543433046381411975217191820122183L),
6714 TEST_f_f (cos, 8, -0.1455000338086135258688413818311946826093L),
6715 TEST_f_f (cos, 9, -0.9111302618846769883682947111811653112463L),
6716 TEST_f_f (cos, 10, -0.8390715290764524522588639478240648345199L),
6717 END_DATA (cos_towardzero)
6718 };
6719
804360ed
JM		 6720static void
6721cos_test_towardzero (void)
6722{
804360ed
JM		 6723 errno = 0;
6724 FUNC(cos) (0);
6725 if (errno == ENOSYS)
6726 /* Function not implemented. */
6727 return;
6728
6729 START (cos_towardzero);
74c57478 6730 RUN_TEST_LOOP_f_f (cos, cos_towardzero_test_data, FE_TOWARDZERO);
804360ed
JM		 6731 END (cos_towardzero);
6732}
6733
6734
74c57478
JM		 6735static const struct test_f_f_data cos_downward_test_data[] =
6736 {
6737 START_DATA (cos_downward),
6738 TEST_f_f (cos, 1, 0.5403023058681397174009366074429766037323L),
6739 TEST_f_f (cos, 2, -0.4161468365471423869975682295007621897660L),
6740 TEST_f_f (cos, 3, -0.9899924966004454572715727947312613023937L),
6741 TEST_f_f (cos, 4, -0.6536436208636119146391681830977503814241L),
6742 TEST_f_f (cos, 5, 0.2836621854632262644666391715135573083344L),
6743 TEST_f_f (cos, 6, 0.9601702866503660205456522979229244054519L),
6744 TEST_f_f (cos, 7, 0.7539022543433046381411975217191820122183L),
6745 TEST_f_f (cos, 8, -0.1455000338086135258688413818311946826093L),
6746 TEST_f_f (cos, 9, -0.9111302618846769883682947111811653112463L),
6747 TEST_f_f (cos, 10, -0.8390715290764524522588639478240648345199L),
6748 END_DATA (cos_downward)
6749 };
6750
804360ed
JM		 6751static void
6752cos_test_downward (void)
6753{
804360ed
JM		 6754 errno = 0;
6755 FUNC(cos) (0);
6756 if (errno == ENOSYS)
6757 /* Function not implemented. */
6758 return;
6759
6760 START (cos_downward);
74c57478
JM		 6761 RUN_TEST_LOOP_f_f (cos, cos_downward_test_data, FE_DOWNWARD);
6762 END (cos_downward);
6763}
804360ed 6764
804360ed 6765
74c57478
JM		 6766static const struct test_f_f_data cos_upward_test_data[] =
6767 {
6768 START_DATA (cos_upward),
6769 TEST_f_f (cos, 1, 0.5403023058681397174009366074429766037323L),
6770 TEST_f_f (cos, 2, -0.4161468365471423869975682295007621897660L),
6771 TEST_f_f (cos, 3, -0.9899924966004454572715727947312613023937L),
6772 TEST_f_f (cos, 4, -0.6536436208636119146391681830977503814241L),
6773 TEST_f_f (cos, 5, 0.2836621854632262644666391715135573083344L),
6774 TEST_f_f (cos, 6, 0.9601702866503660205456522979229244054519L),
6775 TEST_f_f (cos, 7, 0.7539022543433046381411975217191820122183L),
6776 TEST_f_f (cos, 8, -0.1455000338086135258688413818311946826093L),
6777 TEST_f_f (cos, 9, -0.9111302618846769883682947111811653112463L),
6778 TEST_f_f (cos, 10, -0.8390715290764524522588639478240648345199L),
6779 END_DATA (cos_upward)
6780 };
804360ed
JM		 6781
6782static void
6783cos_test_upward (void)
6784{
804360ed
JM		 6785 errno = 0;
6786 FUNC(cos) (0);
6787 if (errno == ENOSYS)
6788 /* Function not implemented. */
6789 return;
6790
6791 START (cos_upward);
74c57478
JM		 6792 RUN_TEST_LOOP_f_f (cos, cos_upward_test_data, FE_UPWARD);
6793 END (cos_upward);
6794}
804360ed 6795
804360ed 6796
74c57478
JM		 6797static const struct test_f_f_data cosh_test_data[] =
6798 {
6799 START_DATA (cosh),
6800 TEST_f_f (cosh, 0, 1),
6801 TEST_f_f (cosh, minus_zero, 1),
804360ed 6802
74c57478
JM		 6803#ifndef TEST_INLINE
6804 TEST_f_f (cosh, plus_infty, plus_infty),
6805 TEST_f_f (cosh, minus_infty, plus_infty),
6806#endif
6807 TEST_f_f (cosh, qnan_value, qnan_value),
804360ed 6808
74c57478 6809 TEST_f_f (cosh, 0.75L, 1.29468328467684468784170818539018176L),
804360ed 6810
74c57478
JM		 6811#ifndef TEST_FLOAT
6812 TEST_f_f (cosh, 709.8893558127259666434838436543941497802734375L, 9.9999998999995070652573675944761818416035e+307L),
6813 TEST_f_f (cosh, -709.8893558127259666434838436543941497802734375L, 9.9999998999995070652573675944761818416035e+307L),
6814#endif
6815 END_DATA (cosh)
6816 };
804360ed 6817
8847214f
UD		 6818static void
6819cosh_test (void)
6820{
aaca11d8 6821 errno = 0;
3c6cad26 6822 FUNC(cosh) (0.7L);
aaca11d8
UD		 6823 if (errno == ENOSYS)
6824 /* Function not implemented. */
6825 return;
6826
8847214f 6827 START (cosh);
74c57478 6828 RUN_TEST_LOOP_f_f (cosh, cosh_test_data, );
8847214f
UD		 6829 END (cosh);
6830}
6831
6832
74c57478
JM		 6833static const struct test_f_f_data cosh_tonearest_test_data[] =
6834 {
6835 START_DATA (cosh_tonearest),
6836 TEST_f_f (cosh, 22, 1792456423.065795780980053377632656584997L),
6837 TEST_f_f (cosh, 23, 4872401723.124451300068625740569997090344L),
6838 TEST_f_f (cosh, 24, 13244561064.92173614708845674912733665919L),
6839 END_DATA (cosh_tonearest)
6840 };
6841
ca811b22
JM		 6842static void
6843cosh_test_tonearest (void)
6844{
ca811b22
JM		 6845 errno = 0;
6846 FUNC(cosh) (0);
6847 if (errno == ENOSYS)
6848 /* Function not implemented. */
6849 return;
6850
6851 START (cosh_tonearest);
74c57478 6852 RUN_TEST_LOOP_f_f (cosh, cosh_tonearest_test_data, FE_TONEAREST);
ca811b22
JM		 6853 END (cosh_tonearest);
6854}
6855
6856
74c57478
JM		 6857static const struct test_f_f_data cosh_towardzero_test_data[] =
6858 {
6859 START_DATA (cosh_towardzero),
6860 TEST_f_f (cosh, 22, 1792456423.065795780980053377632656584997L),
6861 TEST_f_f (cosh, 23, 4872401723.124451300068625740569997090344L),
6862 TEST_f_f (cosh, 24, 13244561064.92173614708845674912733665919L),
6863 END_DATA (cosh_towardzero)
6864 };
6865
ca811b22
JM		 6866static void
6867cosh_test_towardzero (void)
6868{
ca811b22
JM		 6869 errno = 0;
6870 FUNC(cosh) (0);
6871 if (errno == ENOSYS)
6872 /* Function not implemented. */
6873 return;
6874
6875 START (cosh_towardzero);
74c57478 6876 RUN_TEST_LOOP_f_f (cosh, cosh_towardzero_test_data, FE_TOWARDZERO);
ca811b22
JM		 6877 END (cosh_towardzero);
6878}
6879
6880
74c57478
JM		 6881static const struct test_f_f_data cosh_downward_test_data[] =
6882 {
6883 START_DATA (cosh_downward),
6884 TEST_f_f (cosh, 22, 1792456423.065795780980053377632656584997L),
6885 TEST_f_f (cosh, 23, 4872401723.124451300068625740569997090344L),
6886 TEST_f_f (cosh, 24, 13244561064.92173614708845674912733665919L),
6887 END_DATA (cosh_downward)
6888 };
6889
ca811b22
JM		 6890static void
6891cosh_test_downward (void)
6892{
ca811b22
JM		 6893 errno = 0;
6894 FUNC(cosh) (0);
6895 if (errno == ENOSYS)
6896 /* Function not implemented. */
6897 return;
6898
6899 START (cosh_downward);
74c57478 6900 RUN_TEST_LOOP_f_f (cosh, cosh_downward_test_data, FE_DOWNWARD);
ca811b22
JM		 6901 END (cosh_downward);
6902}
6903
6904
74c57478
JM		 6905static const struct test_f_f_data cosh_upward_test_data[] =
6906 {
6907 START_DATA (cosh_upward),
6908 TEST_f_f (cosh, 22, 1792456423.065795780980053377632656584997L),
6909 TEST_f_f (cosh, 23, 4872401723.124451300068625740569997090344L),
6910 TEST_f_f (cosh, 24, 13244561064.92173614708845674912733665919L),
6911 END_DATA (cosh_upward)
6912 };
6913
ca811b22
JM		 6914static void
6915cosh_test_upward (void)
6916{
ca811b22
JM		 6917 errno = 0;
6918 FUNC(cosh) (0);
6919 if (errno == ENOSYS)
6920 /* Function not implemented. */
6921 return;
6922
6923 START (cosh_upward);
74c57478 6924 RUN_TEST_LOOP_f_f (cosh, cosh_upward_test_data, FE_UPWARD);
ca811b22
JM		 6925 END (cosh_upward);
6926}
6927
6928
8847214f
UD		 6929static void
6930cpow_test (void)
6931{
aaca11d8
UD		 6932 errno = 0;
6933 FUNC(cpow) (BUILD_COMPLEX (1, 0), BUILD_COMPLEX (0, 0));
6934 if (errno == ENOSYS)
6935 /* Function not implemented. */
6936 return;
6937
8847214f
UD		 6938 START (cpow);
6939
6940 TEST_cc_c (cpow, 1, 0, 0, 0, 1.0, 0.0);
6941 TEST_cc_c (cpow, 2, 0, 10, 0, 1024.0, 0.0);
6942
6943 TEST_cc_c (cpow, M_El, 0, 0, 2 * M_PIl, 1.0, 0.0);
6944 TEST_cc_c (cpow, 2, 3, 4, 0, -119.0, -120.0);
6945
67e971f1 6946 TEST_cc_c (cpow, qnan_value, qnan_value, qnan_value, qnan_value, qnan_value, qnan_value);
15daa639 6947
96d10bdf
AJ		 6948 TEST_cc_c (cpow, 0.75L, 1.25L, 0.75L, 1.25L, 0.117506293914473555420279832210420483L, 0.346552747708338676483025352060418001L);
6949 TEST_cc_c (cpow, 0.75L, 1.25L, 1.0L, 1.0L, 0.0846958290317209430433805274189191353L, 0.513285749182902449043287190519090481L);
2550dfe9 6950 TEST_cc_c (cpow, 0.75L, 1.25L, 1.0L, 0.0L, 0.75L, 1.25L);
96d10bdf 6951 TEST_cc_c (cpow, 0.75L, 1.25L, 0.0L, 1.0L, 0.331825439177608832276067945276730566L, 0.131338600281188544930936345230903032L);
2550dfe9 6952
6815fabc 6953 END (cpow, complex);
8847214f
UD		 6954}
6955
2550dfe9 6956
08198877
JM		 6957static const struct test_c_c_data cproj_test_data[] =
6958 {
6959 START_DATA (cproj),
6960 TEST_c_c (cproj, 0.0, 0.0, 0.0, 0.0),
6961 TEST_c_c (cproj, minus_zero, minus_zero, minus_zero, minus_zero),
6962 TEST_c_c (cproj, 0.0, minus_zero, 0.0, minus_zero),
6963 TEST_c_c (cproj, minus_zero, 0.0, minus_zero, 0.0),
6964
6965 TEST_c_c (cproj, qnan_value, qnan_value, qnan_value, qnan_value),
6966
6967 TEST_c_c (cproj, plus_infty, plus_infty, plus_infty, 0.0),
6968 TEST_c_c (cproj, plus_infty, minus_infty, plus_infty, minus_zero),
6969 TEST_c_c (cproj, minus_infty, plus_infty, plus_infty, 0.0),
6970 TEST_c_c (cproj, minus_infty, minus_infty, plus_infty, minus_zero),
6971
6972 TEST_c_c (cproj, 1.0, 0.0, 1.0, 0.0),
6973 TEST_c_c (cproj, 2.0, 3.0, 2.0, 3.0),
6974 END_DATA (cproj)
6975 };
6976
8847214f
UD		 6977static void
6978cproj_test (void)
6979{
6980 START (cproj);
08198877 6981 RUN_TEST_LOOP_c_c (cproj, cproj_test_data, );
6815fabc 6982 END (cproj, complex);
8847214f
UD		 6983}
6984
2550dfe9 6985
0cdc8e6f
UD		 6986static void
6987creal_test (void)
6988{
6989 START (creal);
6990 TEST_c_f (creal, 0.0, 1.0, 0.0);
6991 TEST_c_f (creal, minus_zero, 1.0, minus_zero);
67e971f1
TS		 6992 TEST_c_f (creal, qnan_value, 1.0, qnan_value);
6993 TEST_c_f (creal, qnan_value, qnan_value, qnan_value);
0cdc8e6f
UD		 6994 TEST_c_f (creal, plus_infty, 1.0, plus_infty);
6995 TEST_c_f (creal, minus_infty, 1.0, minus_infty);
6996 TEST_c_f (creal, 2.0, 3.0, 2.0);
6997
6998 END (creal);
6999}
8847214f 7000
08198877
JM		 7001static const struct test_c_c_data csin_test_data[] =
7002 {
7003 START_DATA (csin),
7004 TEST_c_c (csin, 0.0, 0.0, 0.0, 0.0),
7005 TEST_c_c (csin, minus_zero, 0.0, minus_zero, 0.0),
7006 TEST_c_c (csin, 0.0, minus_zero, 0, minus_zero),
7007 TEST_c_c (csin, minus_zero, minus_zero, minus_zero, minus_zero),
8847214f 7008
08198877
JM		 7009 TEST_c_c (csin, 0.0, plus_infty, 0.0, plus_infty),
7010 TEST_c_c (csin, minus_zero, plus_infty, minus_zero, plus_infty),
7011 TEST_c_c (csin, 0.0, minus_infty, 0.0, minus_infty),
7012 TEST_c_c (csin, minus_zero, minus_infty, minus_zero, minus_infty),
8847214f 7013
08198877
JM		 7014 TEST_c_c (csin, plus_infty, 0.0, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7015 TEST_c_c (csin, minus_infty, 0.0, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7016 TEST_c_c (csin, plus_infty, minus_zero, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7017 TEST_c_c (csin, minus_infty, minus_zero, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 7018
08198877
JM		 7019 TEST_c_c (csin, plus_infty, plus_infty, qnan_value, plus_infty, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7020 TEST_c_c (csin, minus_infty, plus_infty, qnan_value, plus_infty, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7021 TEST_c_c (csin, plus_infty, minus_infty, qnan_value, plus_infty, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7022 TEST_c_c (csin, minus_infty, minus_infty, qnan_value, plus_infty, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 7023
08198877
JM		 7024 TEST_c_c (csin, plus_infty, 6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
7025 TEST_c_c (csin, plus_infty, -6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
7026 TEST_c_c (csin, minus_infty, 6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
7027 TEST_c_c (csin, minus_infty, -6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 7028
08198877
JM		 7029 TEST_c_c (csin, 4.625, plus_infty, minus_infty, minus_infty),
7030 TEST_c_c (csin, 4.625, minus_infty, minus_infty, plus_infty),
7031 TEST_c_c (csin, -4.625, plus_infty, plus_infty, minus_infty),
7032 TEST_c_c (csin, -4.625, minus_infty, plus_infty, plus_infty),
8847214f 7033
08198877
JM		 7034 TEST_c_c (csin, qnan_value, 0.0, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
7035 TEST_c_c (csin, qnan_value, minus_zero, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 7036
08198877
JM		 7037 TEST_c_c (csin, qnan_value, plus_infty, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
7038 TEST_c_c (csin, qnan_value, minus_infty, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
8847214f 7039
08198877
JM		 7040 TEST_c_c (csin, qnan_value, 9.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7041 TEST_c_c (csin, qnan_value, -9.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7042
08198877
JM		 7043 TEST_c_c (csin, 0.0, qnan_value, 0.0, qnan_value),
7044 TEST_c_c (csin, minus_zero, qnan_value, minus_zero, qnan_value),
8847214f 7045
08198877
JM		 7046 TEST_c_c (csin, 10.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7047 TEST_c_c (csin, qnan_value, -10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7048
08198877
JM		 7049 TEST_c_c (csin, plus_infty, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7050 TEST_c_c (csin, minus_infty, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7051
08198877 7052 TEST_c_c (csin, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 7053
08198877
JM		 7054 TEST_c_c (csin, 0.75L, 1.25L, 1.28722291002649188575873510790565441L, 1.17210635989270256101081285116138863L),
7055 TEST_c_c (csin, -2, -3, -9.15449914691142957346729954460983256L, 4.16890695996656435075481305885375484L),
8847214f 7056
08198877
JM		 7057 TEST_c_c (csin, 0.75, 89.5, 2.522786001038096774676288412995370563339e38L, 2.708024460708609732016532185663087200560e38L),
7058 TEST_c_c (csin, 0.75, -89.5, 2.522786001038096774676288412995370563339e38L, -2.708024460708609732016532185663087200560e38L),
7059 TEST_c_c (csin, -0.75, 89.5, -2.522786001038096774676288412995370563339e38L, 2.708024460708609732016532185663087200560e38L),
7060 TEST_c_c (csin, -0.75, -89.5, -2.522786001038096774676288412995370563339e38L, -2.708024460708609732016532185663087200560e38L),
e0b16cc2
JM		 7061
7062#ifndef TEST_FLOAT
08198877
JM		 7063 TEST_c_c (csin, 0.75, 710.5, 1.255317763348154410745082950806112487736e308L, 1.347490911916428129246890157395342279438e308L),
7064 TEST_c_c (csin, 0.75, -710.5, 1.255317763348154410745082950806112487736e308L, -1.347490911916428129246890157395342279438e308L),
7065 TEST_c_c (csin, -0.75, 710.5, -1.255317763348154410745082950806112487736e308L, 1.347490911916428129246890157395342279438e308L),
7066 TEST_c_c (csin, -0.75, -710.5, -1.255317763348154410745082950806112487736e308L, -1.347490911916428129246890157395342279438e308L),
e0b16cc2
JM		 7067#endif
7068
7069#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 7070 TEST_c_c (csin, 0.75, 11357.25, 8.385498349388321535962327491346664141020e4931L, 9.001213196851067077465606717616495588201e4931L),
7071 TEST_c_c (csin, 0.75, -11357.25, 8.385498349388321535962327491346664141020e4931L, -9.001213196851067077465606717616495588201e4931L),
7072 TEST_c_c (csin, -0.75, 11357.25, -8.385498349388321535962327491346664141020e4931L, 9.001213196851067077465606717616495588201e4931L),
7073 TEST_c_c (csin, -0.75, -11357.25, -8.385498349388321535962327491346664141020e4931L, -9.001213196851067077465606717616495588201e4931L),
e0b16cc2
JM		 7074#endif
7075
7076#ifdef TEST_FLOAT
08198877 7077 TEST_c_c (csin, 0x1p-149, 180, 1.043535896672617552965983803453927655332e33L, plus_infty, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 7078#endif
7079
7080#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 7081 TEST_c_c (csin, 0x1p-1074, 1440, 5.981479269486130556466515778180916082415e301L, plus_infty, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 7082#endif
7083
7084#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 7085 TEST_c_c (csin, 0x1p-16434L, 22730, 1.217853148905605987081057582351152052687e4924L, plus_infty, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 7086#endif
7087
08198877
JM		 7088 TEST_c_c (csin, min_subnorm_value, min_value, min_subnorm_value, min_value, UNDERFLOW_EXCEPTION),
7089 TEST_c_c (csin, min_value, min_subnorm_value, min_value, min_subnorm_value, UNDERFLOW_EXCEPTION),
7090 END_DATA (csin)
7091 };
8847214f
UD		 7092
7093static void
08198877 7094csin_test (void)
8847214f 7095{
aaca11d8 7096 errno = 0;
08198877 7097 FUNC(csin) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD		 7098 if (errno == ENOSYS)
7099 /* Function not implemented. */
7100 return;
8847214f 7101
08198877
JM		 7102 START (csin);
7103 RUN_TEST_LOOP_c_c (csin, csin_test_data, );
7104 END (csin, complex);
7105}
7106
8847214f 7107
08198877
JM		 7108static const struct test_c_c_data csinh_test_data[] =
7109 {
7110 START_DATA (csinh),
7111 TEST_c_c (csinh, 0.0, 0.0, 0.0, 0.0),
7112 TEST_c_c (csinh, minus_zero, 0.0, minus_zero, 0.0),
7113 TEST_c_c (csinh, 0.0, minus_zero, 0.0, minus_zero),
7114 TEST_c_c (csinh, minus_zero, minus_zero, minus_zero, minus_zero),
8847214f 7115
08198877
JM		 7116 TEST_c_c (csinh, 0.0, plus_infty, 0.0, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7117 TEST_c_c (csinh, minus_zero, plus_infty, 0.0, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7118 TEST_c_c (csinh, 0.0, minus_infty, 0.0, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7119 TEST_c_c (csinh, minus_zero, minus_infty, 0.0, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 7120
08198877
JM		 7121 TEST_c_c (csinh, plus_infty, 0.0, plus_infty, 0.0),
7122 TEST_c_c (csinh, minus_infty, 0.0, minus_infty, 0.0),
7123 TEST_c_c (csinh, plus_infty, minus_zero, plus_infty, minus_zero),
7124 TEST_c_c (csinh, minus_infty, minus_zero, minus_infty, minus_zero),
8847214f 7125
08198877
JM		 7126 TEST_c_c (csinh, plus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7127 TEST_c_c (csinh, minus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7128 TEST_c_c (csinh, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7129 TEST_c_c (csinh, minus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 7130
08198877
JM		 7131 TEST_c_c (csinh, plus_infty, 4.625, minus_infty, minus_infty),
7132 TEST_c_c (csinh, minus_infty, 4.625, plus_infty, minus_infty),
7133 TEST_c_c (csinh, plus_infty, -4.625, minus_infty, plus_infty),
7134 TEST_c_c (csinh, minus_infty, -4.625, plus_infty, plus_infty),
8847214f 7135
08198877
JM		 7136 TEST_c_c (csinh, 6.75, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7137 TEST_c_c (csinh, -6.75, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7138 TEST_c_c (csinh, 6.75, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7139 TEST_c_c (csinh, -6.75, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 7140
08198877
JM		 7141 TEST_c_c (csinh, 0.0, qnan_value, 0.0, qnan_value, IGNORE_ZERO_INF_SIGN),
7142 TEST_c_c (csinh, minus_zero, qnan_value, 0.0, qnan_value, IGNORE_ZERO_INF_SIGN),
8847214f 7143
08198877
JM		 7144 TEST_c_c (csinh, plus_infty, qnan_value, plus_infty, qnan_value, IGNORE_ZERO_INF_SIGN),
7145 TEST_c_c (csinh, minus_infty, qnan_value, plus_infty, qnan_value, IGNORE_ZERO_INF_SIGN),
8847214f 7146
08198877
JM		 7147 TEST_c_c (csinh, 9.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7148 TEST_c_c (csinh, -9.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7149
08198877
JM		 7150 TEST_c_c (csinh, qnan_value, 0.0, qnan_value, 0.0),
7151 TEST_c_c (csinh, qnan_value, minus_zero, qnan_value, minus_zero),
8847214f 7152
08198877
JM		 7153 TEST_c_c (csinh, qnan_value, 10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7154 TEST_c_c (csinh, qnan_value, -10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7155
08198877
JM		 7156 TEST_c_c (csinh, qnan_value, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7157 TEST_c_c (csinh, qnan_value, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7158
08198877 7159 TEST_c_c (csinh, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 7160
08198877
JM		 7161 TEST_c_c (csinh, 0.75L, 1.25L, 0.259294854551162779153349830618433028L, 1.22863452409509552219214606515777594L),
7162 TEST_c_c (csinh, -2, -3, 3.59056458998577995201256544779481679L, -0.530921086248519805267040090660676560L),
8847214f 7163
08198877
JM		 7164 TEST_c_c (csinh, 89.5, 0.75, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
7165 TEST_c_c (csinh, -89.5, 0.75, -2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
7166 TEST_c_c (csinh, 89.5, -0.75, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
7167 TEST_c_c (csinh, -89.5, -0.75, -2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
e0b16cc2
JM		 7168
7169#ifndef TEST_FLOAT
08198877
JM		 7170 TEST_c_c (csinh, 710.5, 0.75, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
7171 TEST_c_c (csinh, -710.5, 0.75, -1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
7172 TEST_c_c (csinh, 710.5, -0.75, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
7173 TEST_c_c (csinh, -710.5, -0.75, -1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
e0b16cc2
JM		 7174#endif
7175
7176#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 7177 TEST_c_c (csinh, 11357.25, 0.75, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
7178 TEST_c_c (csinh, -11357.25, 0.75, -9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
7179 TEST_c_c (csinh, 11357.25, -0.75, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
7180 TEST_c_c (csinh, -11357.25, -0.75, -9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
e0b16cc2
JM		 7181#endif
7182
7183#ifdef TEST_FLOAT
08198877 7184 TEST_c_c (csinh, 180, 0x1p-149, plus_infty, 1.043535896672617552965983803453927655332e33L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 7185#endif
7186
7187#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 7188 TEST_c_c (csinh, 1440, 0x1p-1074, plus_infty, 5.981479269486130556466515778180916082415e301L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 7189#endif
7190
7191#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 7192 TEST_c_c (csinh, 22730, 0x1p-16434L, plus_infty, 1.217853148905605987081057582351152052687e4924L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 7193#endif
7194
08198877
JM		 7195 TEST_c_c (csinh, min_subnorm_value, min_value, min_subnorm_value, min_value, UNDERFLOW_EXCEPTION),
7196 TEST_c_c (csinh, min_value, min_subnorm_value, min_value, min_subnorm_value, UNDERFLOW_EXCEPTION),
7197 END_DATA (csinh)
7198 };
2550dfe9 7199
8847214f 7200static void
08198877 7201csinh_test (void)
8847214f 7202{
aaca11d8 7203 errno = 0;
08198877 7204 FUNC(csinh) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD		 7205 if (errno == ENOSYS)
7206 /* Function not implemented. */
7207 return;
7208
08198877
JM		 7209 START (csinh);
7210 RUN_TEST_LOOP_c_c (csinh, csinh_test_data, );
7211 END (csinh, complex);
7212}
8847214f 7213
08198877
JM		 7214
7215static const struct test_c_c_data csqrt_test_data[] =
7216 {
7217 START_DATA (csqrt),
7218 TEST_c_c (csqrt, 0, 0, 0.0, 0.0),
7219 TEST_c_c (csqrt, 0, minus_zero, 0, minus_zero),
7220 TEST_c_c (csqrt, minus_zero, 0, 0.0, 0.0),
7221 TEST_c_c (csqrt, minus_zero, minus_zero, 0.0, minus_zero),
7222
7223 TEST_c_c (csqrt, minus_infty, 0, 0.0, plus_infty),
7224 TEST_c_c (csqrt, minus_infty, 6, 0.0, plus_infty),
7225 TEST_c_c (csqrt, minus_infty, minus_zero, 0.0, minus_infty),
7226 TEST_c_c (csqrt, minus_infty, -6, 0.0, minus_infty),
7227
7228 TEST_c_c (csqrt, plus_infty, 0, plus_infty, 0.0),
7229 TEST_c_c (csqrt, plus_infty, 6, plus_infty, 0.0),
7230 TEST_c_c (csqrt, plus_infty, minus_zero, plus_infty, minus_zero),
7231 TEST_c_c (csqrt, plus_infty, -6, plus_infty, minus_zero),
7232
7233 TEST_c_c (csqrt, 0, plus_infty, plus_infty, plus_infty),
7234 TEST_c_c (csqrt, 4, plus_infty, plus_infty, plus_infty),
7235 TEST_c_c (csqrt, plus_infty, plus_infty, plus_infty, plus_infty),
7236 TEST_c_c (csqrt, minus_zero, plus_infty, plus_infty, plus_infty),
7237 TEST_c_c (csqrt, -4, plus_infty, plus_infty, plus_infty),
7238 TEST_c_c (csqrt, minus_infty, plus_infty, plus_infty, plus_infty),
7239 TEST_c_c (csqrt, 0, minus_infty, plus_infty, minus_infty),
7240 TEST_c_c (csqrt, 4, minus_infty, plus_infty, minus_infty),
7241 TEST_c_c (csqrt, plus_infty, minus_infty, plus_infty, minus_infty),
7242 TEST_c_c (csqrt, minus_zero, minus_infty, plus_infty, minus_infty),
7243 TEST_c_c (csqrt, -4, minus_infty, plus_infty, minus_infty),
7244 TEST_c_c (csqrt, minus_infty, minus_infty, plus_infty, minus_infty),
7245
7246 TEST_c_c (csqrt, minus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
7247
7248 TEST_c_c (csqrt, plus_infty, qnan_value, plus_infty, qnan_value),
7249
7250 TEST_c_c (csqrt, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7251 TEST_c_c (csqrt, 1, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7252 TEST_c_c (csqrt, minus_zero, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7253 TEST_c_c (csqrt, -1, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7254
7255 TEST_c_c (csqrt, qnan_value, 0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7256 TEST_c_c (csqrt, qnan_value, 8, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7257 TEST_c_c (csqrt, qnan_value, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7258 TEST_c_c (csqrt, qnan_value, -8, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7259
7260 TEST_c_c (csqrt, qnan_value, qnan_value, qnan_value, qnan_value),
7261
7262 TEST_c_c (csqrt, 16.0, -30.0, 5.0, -3.0),
7263 TEST_c_c (csqrt, -1, 0, 0.0, 1.0),
7264 TEST_c_c (csqrt, 0, 2, 1.0, 1.0),
7265 TEST_c_c (csqrt, 119, 120, 12.0, 5.0),
7266 TEST_c_c (csqrt, 0.75L, 1.25L, 1.05065169626078392338656675760808326L, 0.594868882070379067881984030639932657L),
7267 TEST_c_c (csqrt, -2, -3, 0.89597747612983812471573375529004348L, -1.6741492280355400404480393008490519L),
7268 TEST_c_c (csqrt, -2, 3, 0.89597747612983812471573375529004348L, 1.6741492280355400404480393008490519L),
7269 /* Principal square root should be returned (i.e., non-negative real
7270 part). */
7271 TEST_c_c (csqrt, 0, -1, M_SQRT1_2l, -M_SQRT1_2l),
7272
7273 TEST_c_c (csqrt, 0x1.fffffep+127L, 0x1.fffffep+127L, 2.026714405498316804978751017492482558075e+19L, 8.394925938143272988211878516208015586281e+18L),
7274 TEST_c_c (csqrt, 0x1.fffffep+127L, 1.0L, 1.844674352395372953599975585936590505260e+19L, 2.710505511993121390769065968615872097053e-20L),
7275 TEST_c_c (csqrt, 0x1p-149L, 0x1p-149L, 4.112805464342778798097003462770175200803e-23L, 1.703579802732953750368659735601389709551e-23L),
7276 TEST_c_c (csqrt, 0x1p-147L, 0x1p-147L, 8.225610928685557596194006925540350401606e-23L, 3.407159605465907500737319471202779419102e-23L),
7277
7278 TEST_c_c (csqrt, plus_zero, 0x1p-149L, 2.646977960169688559588507814623881131411e-23L, 2.646977960169688559588507814623881131411e-23L),
7279 TEST_c_c (csqrt, 0x1p-50L, 0x1p-149L, 2.980232238769531250000000000000000000000e-8L, 2.350988701644575015937473074444491355637e-38L),
cdfe2c5e 7280#ifdef TEST_FLOAT
08198877 7281 TEST_c_c (csqrt, 0x1p+127L, 0x1p-149L, 1.304381782533278221234957180625250836888e19L, plus_zero, UNDERFLOW_EXCEPTION),
cdfe2c5e 7282#endif
08198877
JM		 7283 TEST_c_c (csqrt, 0x1p-149L, 0x1p+127L, 9.223372036854775808000000000000000000000e18L, 9.223372036854775808000000000000000000000e18L),
7284 TEST_c_c (csqrt, 0x1.000002p-126L, 0x1.000002p-126L, 1.191195773697904627170323731331667740087e-19L, 4.934094449071842328766868579214125217132e-20L),
7285 TEST_c_c (csqrt, -0x1.000002p-126L, -0x1.000002p-126L, 4.934094449071842328766868579214125217132e-20L, -1.191195773697904627170323731331667740087e-19L),
cdfe2c5e 7286
e456826d 7287#ifndef TEST_FLOAT
08198877
JM		 7288 TEST_c_c (csqrt, 0x1.fffffffffffffp+1023L, 0x1.fffffffffffffp+1023L, 1.473094556905565378990473658199034571917e+154L, 6.101757441282702188537080005372547713595e+153L),
7289 TEST_c_c (csqrt, 0x1.fffffffffffffp+1023L, 0x1p+1023L, 1.379778091031440685006200821918878702861e+154L, 3.257214233483129514781233066898042490248e+153L),
7290 TEST_c_c (csqrt, 0x1p-1074L, 0x1p-1074L, 2.442109726130830256743814843868934877597e-162L, 1.011554969366634726113090867589031782487e-162L),
7291 TEST_c_c (csqrt, 0x1p-1073L, 0x1p-1073L, 3.453664695497464982856905711457966660085e-162L, 1.430554756764195530630723976279903095110e-162L),
cdfe2c5e 7292
08198877
JM		 7293 TEST_c_c (csqrt, plus_zero, 0x1p-1074L, 1.571727784702628688909515672805082228285e-162L, 1.571727784702628688909515672805082228285e-162L),
7294 TEST_c_c (csqrt, 0x1p-500L, 0x1p-1074L, 5.527147875260444560247265192192255725514e-76L, 4.469444793151709302716387622440056066334e-249L),
cdfe2c5e 7295#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 7296 TEST_c_c (csqrt, 0x1p+1023L, 0x1p-1074L, 9.480751908109176726832526455652159260085e153L, plus_zero, UNDERFLOW_EXCEPTION),
cdfe2c5e 7297#endif
08198877
JM		 7298 TEST_c_c (csqrt, 0x1p-1074L, 0x1p+1023L, 6.703903964971298549787012499102923063740e153L, 6.703903964971298549787012499102923063740e153L),
7299 TEST_c_c (csqrt, 0x1.0000000000001p-1022L, 0x1.0000000000001p-1022L, 1.638872094839911521020410942677082920935e-154L, 6.788430486774966350907249113759995429568e-155L),
7300 TEST_c_c (csqrt, -0x1.0000000000001p-1022L, -0x1.0000000000001p-1022L, 6.788430486774966350907249113759995429568e-155L, -1.638872094839911521020410942677082920935e-154L),
e456826d
JM		 7301#endif
7302
7303#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 7304 TEST_c_c (csqrt, 0x1.fp+16383L, 0x1.fp+16383L, 1.179514222452201722651836720466795901016e+2466L, 4.885707879516577666702435054303191575148e+2465L),
7305 TEST_c_c (csqrt, 0x1.fp+16383L, 0x1p+16383L, 1.106698967236475180613254276996359485630e+2466L, 2.687568007603946993388538156299100955642e+2465L),
7306 TEST_c_c (csqrt, 0x1p-16440L, 0x1p-16441L, 3.514690655930285351254618340783294558136e-2475L, 8.297059146828716918029689466551384219370e-2476L),
cdfe2c5e 7307
08198877
JM		 7308 TEST_c_c (csqrt, plus_zero, 0x1p-16445L, 4.269191686890197837775136325621239761720e-2476L, 4.269191686890197837775136325621239761720e-2476L),
7309 TEST_c_c (csqrt, 0x1p-5000L, 0x1p-16445L, 2.660791472672778409283210520357607795518e-753L, 6.849840675828785164910701384823702064234e-4199L),
7310 TEST_c_c (csqrt, 0x1p+16383L, 0x1p-16445L, 7.712754032630730034273323365543179095045e2465L, plus_zero, UNDERFLOW_EXCEPTION),
7311 TEST_c_c (csqrt, 0x1p-16445L, 0x1p+16383L, 5.453740678097079647314921223668914312241e2465L, 5.453740678097079647314921223668914312241e2465L),
7312 TEST_c_c (csqrt, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-16382L, 2.014551439675644900131815801350165472778e-2466L, 8.344545284118961664300307045791497724440e-2467L),
7313 TEST_c_c (csqrt, -0x1.0000000000000002p-16382L, -0x1.0000000000000002p-16382L, 8.344545284118961664300307045791497724440e-2467L, -2.014551439675644900131815801350165472778e-2466L),
cdfe2c5e
JM		 7314
7315# if LDBL_MANT_DIG >= 113
08198877
JM		 7316 TEST_c_c (csqrt, plus_zero, 0x1p-16494L, 1.799329752913293143453817328207572571442e-2483L, 1.799329752913293143453817328207572571442e-2483L),
7317 TEST_c_c (csqrt, 0x1p-5000L, 0x1p-16494L, 2.660791472672778409283210520357607795518e-753L, 1.216776133331049643422030716668249905907e-4213L),
7318 TEST_c_c (csqrt, 0x1p+16383L, 0x1p-16494L, 7.712754032630730034273323365543179095045e2465L, plus_zero, UNDERFLOW_EXCEPTION),
7319 TEST_c_c (csqrt, 0x1p-16494L, 0x1p+16383L, 5.453740678097079647314921223668914312241e2465L, 5.453740678097079647314921223668914312241e2465L),
7320 TEST_c_c (csqrt, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-16382L, 2.014551439675644900022606748976158925145e-2466L, 8.344545284118961663847948339519226074126e-2467L),
7321 TEST_c_c (csqrt, -0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-16382L, 8.344545284118961663847948339519226074126e-2467L, -2.014551439675644900022606748976158925145e-2466L),
cdfe2c5e 7322# endif
e456826d 7323#endif
08198877
JM		 7324 END_DATA (csqrt)
7325 };
8847214f
UD		 7326
7327static void
08198877 7328csqrt_test (void)
8847214f 7329{
aaca11d8 7330 errno = 0;
08198877 7331 FUNC(csqrt) (BUILD_COMPLEX (-1, 0));
aaca11d8
UD		 7332 if (errno == ENOSYS)
7333 /* Function not implemented. */
7334 return;
7335
08198877
JM		 7336 START (csqrt);
7337 RUN_TEST_LOOP_c_c (csqrt, csqrt_test_data, );
7338 END (csqrt, complex);
7339}
8847214f 7340
08198877
JM		 7341static const struct test_c_c_data ctan_test_data[] =
7342 {
7343 START_DATA (ctan),
7344 TEST_c_c (ctan, 0, 0, 0.0, 0.0),
7345 TEST_c_c (ctan, 0, minus_zero, 0.0, minus_zero),
7346 TEST_c_c (ctan, minus_zero, 0, minus_zero, 0.0),
7347 TEST_c_c (ctan, minus_zero, minus_zero, minus_zero, minus_zero),
8847214f 7348
08198877
JM		 7349 TEST_c_c (ctan, 0, plus_infty, 0.0, 1.0),
7350 TEST_c_c (ctan, 1, plus_infty, 0.0, 1.0),
7351 TEST_c_c (ctan, minus_zero, plus_infty, minus_zero, 1.0),
7352 TEST_c_c (ctan, -1, plus_infty, minus_zero, 1.0),
8847214f 7353
08198877
JM		 7354 TEST_c_c (ctan, 0, minus_infty, 0.0, -1.0),
7355 TEST_c_c (ctan, 1, minus_infty, 0.0, -1.0),
7356 TEST_c_c (ctan, minus_zero, minus_infty, minus_zero, -1.0),
7357 TEST_c_c (ctan, -1, minus_infty, minus_zero, -1.0),
8847214f 7358
08198877
JM		 7359 TEST_c_c (ctan, plus_infty, 0, qnan_value, qnan_value, INVALID_EXCEPTION),
7360 TEST_c_c (ctan, plus_infty, 2, qnan_value, qnan_value, INVALID_EXCEPTION),
7361 TEST_c_c (ctan, minus_infty, 0, qnan_value, qnan_value, INVALID_EXCEPTION),
7362 TEST_c_c (ctan, minus_infty, 2, qnan_value, qnan_value, INVALID_EXCEPTION),
7363 TEST_c_c (ctan, plus_infty, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION),
7364 TEST_c_c (ctan, plus_infty, -2, qnan_value, qnan_value, INVALID_EXCEPTION),
7365 TEST_c_c (ctan, minus_infty, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION),
7366 TEST_c_c (ctan, minus_infty, -2, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 7367
08198877
JM		 7368 TEST_c_c (ctan, qnan_value, plus_infty, 0.0, 1.0, IGNORE_ZERO_INF_SIGN),
7369 TEST_c_c (ctan, qnan_value, minus_infty, 0.0, -1.0, IGNORE_ZERO_INF_SIGN),
8847214f 7370
08198877
JM		 7371 TEST_c_c (ctan, 0, qnan_value, 0.0, qnan_value),
7372 TEST_c_c (ctan, minus_zero, qnan_value, minus_zero, qnan_value),
8847214f 7373
08198877
JM		 7374 TEST_c_c (ctan, 0.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7375 TEST_c_c (ctan, -4.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7376
08198877
JM		 7377 TEST_c_c (ctan, qnan_value, 0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7378 TEST_c_c (ctan, qnan_value, 5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7379 TEST_c_c (ctan, qnan_value, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7380 TEST_c_c (ctan, qnan_value, -0.25, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7381
08198877 7382 TEST_c_c (ctan, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 7383
08198877
JM		 7384 TEST_c_c (ctan, 0.75L, 1.25L, 0.160807785916206426725166058173438663L, 0.975363285031235646193581759755216379L),
7385 TEST_c_c (ctan, -2, -3, 0.376402564150424829275122113032269084e-2L, -1.00323862735360980144635859782192726L),
8847214f 7386
08198877
JM		 7387 TEST_c_c (ctan, 1, 45, 1.490158918874345552942703234806348520895e-39L, 1.000000000000000000000000000000000000001L, UNDERFLOW_EXCEPTION_FLOAT),
7388 TEST_c_c (ctan, 1, 47, 2.729321264492904590777293425576722354636e-41L, 1.0, UNDERFLOW_EXCEPTION_FLOAT),
bcc8d661
JM		 7389
7390#ifndef TEST_FLOAT
08198877
JM		 7391 TEST_c_c (ctan, 1, 355, 8.140551093483276762350406321792653551513e-309L, 1.0, UNDERFLOW_EXCEPTION_DOUBLE),
7392 TEST_c_c (ctan, 1, 365, 1.677892637497921890115075995898773550884e-317L, 1.0, UNDERFLOW_EXCEPTION_DOUBLE),
bcc8d661
JM		 7393#endif
7394
7395#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 7396 TEST_c_c (ctan, 1, 5680, 4.725214596136812019616700920476949798307e-4934L, 1.0, UNDERFLOW_EXCEPTION),
7397 TEST_c_c (ctan, 1, 5690, 9.739393181626937151720816611272607059057e-4943L, 1.0, UNDERFLOW_EXCEPTION),
bcc8d661
JM		 7398#endif
7399
08198877 7400 TEST_c_c (ctan, 0x3.243f6cp-1, 0, -2.287733242885645987394874673945769518150e7L, 0.0),
bcc8d661 7401
08198877 7402 TEST_c_c (ctan, 0x1p127, 1, 0.2446359391192790896381501310437708987204L, 0.9101334047676183761532873794426475906201L),
bcc8d661
JM		 7403
7404#ifndef TEST_FLOAT
08198877 7405 TEST_c_c (ctan, 0x1p1023, 1, -0.2254627924997545057926782581695274244229L, 0.8786063118883068695462540226219865087189L),
bcc8d661
JM		 7406#endif
7407
7408#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 7409 TEST_c_c (ctan, 0x1p16383L, 1, 0.1608598776370396607204448234354670036772L, 0.8133818522051542536316746743877629761488L),
bcc8d661
JM		 7410#endif
7411
08198877
JM		 7412 TEST_c_c (ctan, 50000, 50000, plus_zero, 1.0, UNDERFLOW_EXCEPTION),
7413 TEST_c_c (ctan, 50000, -50000, plus_zero, -1.0, UNDERFLOW_EXCEPTION),
7414 TEST_c_c (ctan, -50000, 50000, minus_zero, 1.0, UNDERFLOW_EXCEPTION),
7415 TEST_c_c (ctan, -50000, -50000, minus_zero, -1.0, UNDERFLOW_EXCEPTION),
7416 END_DATA (ctan)
7417 };
bcc8d661 7418
08198877
JM		 7419static void
7420ctan_test (void)
7421{
7422 errno = 0;
7423 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7424 if (errno == ENOSYS)
7425 /* Function not implemented. */
7426 return;
7427
7428 START (ctan);
7429 RUN_TEST_LOOP_c_c (ctan, ctan_test_data, );
6815fabc 7430 END (ctan, complex);
8847214f
UD		 7431}
7432
7433
08198877
JM		 7434static const struct test_c_c_data ctan_tonearest_test_data[] =
7435 {
7436 START_DATA (ctan_tonearest),
7437 TEST_c_c (ctan, 0x1.921fb6p+0, 0x1p-149, -2.287733242885645987394874673945769518150e7L, 7.334008549954377778731880988481078535821e-31L),
7438
7439#ifndef TEST_FLOAT
7440 TEST_c_c (ctan, 0x1.921fb54442d18p+0, 0x1p-1074, 1.633123935319536975596773704152891653086e16L, 1.317719414943508315995636961402669067843e-291L),
7441#endif
7442
7443#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
7444 TEST_c_c (ctan, 0x1.921fb54442d1846ap+0L, 0x1p-16445L, -3.986797629811710706723242948653362815645e19L, 5.793882568875674066286163141055208625180e-4912L),
7445#endif
7446 END_DATA (ctan_tonearest)
7447 };
7448
ca61cf32
JM		 7449static void
7450ctan_test_tonearest (void)
7451{
ca61cf32
JM		 7452 errno = 0;
7453 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7454 if (errno == ENOSYS)
7455 /* Function not implemented. */
7456 return;
7457
7458 START (ctan_tonearest);
08198877
JM		 7459 RUN_TEST_LOOP_c_c (ctan, ctan_tonearest_test_data, FE_TONEAREST);
7460 END (ctan_tonearest, complex);
7461}
ca61cf32 7462
ca61cf32 7463
08198877
JM		 7464static const struct test_c_c_data ctan_towardzero_test_data[] =
7465 {
7466 START_DATA (ctan_towardzero),
7467 TEST_c_c (ctan, 0x1.921fb6p+0, 0x1p-149, -2.287733242885645987394874673945769518150e7L, 7.334008549954377778731880988481078535821e-31L),
ca61cf32
JM		 7468
7469#ifndef TEST_FLOAT
08198877 7470 TEST_c_c (ctan, 0x1.921fb54442d18p+0, 0x1p-1074, 1.633123935319536975596773704152891653086e16L, 1.317719414943508315995636961402669067843e-291L),
ca61cf32
JM		 7471#endif
7472
7473#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7474 TEST_c_c (ctan, 0x1.921fb54442d1846ap+0L, 0x1p-16445L, -3.986797629811710706723242948653362815645e19L, 5.793882568875674066286163141055208625180e-4912L),
ca61cf32 7475#endif
08198877
JM		 7476 END_DATA (ctan_towardzero)
7477 };
ca61cf32
JM		 7478
7479static void
7480ctan_test_towardzero (void)
7481{
ca61cf32
JM		 7482 errno = 0;
7483 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7484 if (errno == ENOSYS)
7485 /* Function not implemented. */
7486 return;
7487
7488 START (ctan_towardzero);
08198877
JM		 7489 RUN_TEST_LOOP_c_c (ctan, ctan_towardzero_test_data, FE_TOWARDZERO);
7490 END (ctan_towardzero, complex);
7491}
ca61cf32 7492
ca61cf32 7493
08198877
JM		 7494static const struct test_c_c_data ctan_downward_test_data[] =
7495 {
7496 START_DATA (ctan_downward),
7497 TEST_c_c (ctan, 0x1.921fb6p+0, 0x1p-149, -2.287733242885645987394874673945769518150e7L, 7.334008549954377778731880988481078535821e-31L),
ca61cf32
JM		 7498
7499#ifndef TEST_FLOAT
08198877 7500 TEST_c_c (ctan, 0x1.921fb54442d18p+0, 0x1p-1074, 1.633123935319536975596773704152891653086e16L, 1.317719414943508315995636961402669067843e-291L),
ca61cf32
JM		 7501#endif
7502
7503#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7504 TEST_c_c (ctan, 0x1.921fb54442d1846ap+0L, 0x1p-16445L, -3.986797629811710706723242948653362815645e19L, 5.793882568875674066286163141055208625180e-4912L),
ca61cf32 7505#endif
08198877
JM		 7506 END_DATA (ctan_downward)
7507 };
ca61cf32
JM		 7508
7509static void
7510ctan_test_downward (void)
7511{
ca61cf32
JM		 7512 errno = 0;
7513 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7514 if (errno == ENOSYS)
7515 /* Function not implemented. */
7516 return;
7517
7518 START (ctan_downward);
08198877
JM		 7519 RUN_TEST_LOOP_c_c (ctan, ctan_downward_test_data, FE_DOWNWARD);
7520 END (ctan_downward, complex);
7521}
ca61cf32 7522
ca61cf32 7523
08198877
JM		 7524static const struct test_c_c_data ctan_upward_test_data[] =
7525 {
7526 START_DATA (ctan_upward),
7527 TEST_c_c (ctan, 0x1.921fb6p+0, 0x1p-149, -2.287733242885645987394874673945769518150e7L, 7.334008549954377778731880988481078535821e-31L),
ca61cf32
JM		 7528
7529#ifndef TEST_FLOAT
08198877 7530 TEST_c_c (ctan, 0x1.921fb54442d18p+0, 0x1p-1074, 1.633123935319536975596773704152891653086e16L, 1.317719414943508315995636961402669067843e-291L),
ca61cf32
JM		 7531#endif
7532
7533#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7534 TEST_c_c (ctan, 0x1.921fb54442d1846ap+0L, 0x1p-16445L, -3.986797629811710706723242948653362815645e19L, 5.793882568875674066286163141055208625180e-4912L),
ca61cf32 7535#endif
08198877
JM		 7536 END_DATA (ctan_upward)
7537 };
ca61cf32
JM		 7538
7539static void
7540ctan_test_upward (void)
7541{
ca61cf32
JM		 7542 errno = 0;
7543 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7544 if (errno == ENOSYS)
7545 /* Function not implemented. */
7546 return;
7547
7548 START (ctan_upward);
08198877
JM		 7549 RUN_TEST_LOOP_c_c (ctan, ctan_upward_test_data, FE_UPWARD);
7550 END (ctan_upward, complex);
7551}
ca61cf32 7552
ca61cf32 7553
08198877
JM		 7554static const struct test_c_c_data ctanh_test_data[] =
7555 {
7556 START_DATA (ctanh),
7557 TEST_c_c (ctanh, 0, 0, 0.0, 0.0),
7558 TEST_c_c (ctanh, 0, minus_zero, 0.0, minus_zero),
7559 TEST_c_c (ctanh, minus_zero, 0, minus_zero, 0.0),
7560 TEST_c_c (ctanh, minus_zero, minus_zero, minus_zero, minus_zero),
7561
7562 TEST_c_c (ctanh, plus_infty, 0, 1.0, 0.0),
7563 TEST_c_c (ctanh, plus_infty, 1, 1.0, 0.0),
7564 TEST_c_c (ctanh, plus_infty, minus_zero, 1.0, minus_zero),
7565 TEST_c_c (ctanh, plus_infty, -1, 1.0, minus_zero),
7566 TEST_c_c (ctanh, minus_infty, 0, -1.0, 0.0),
7567 TEST_c_c (ctanh, minus_infty, 1, -1.0, 0.0),
7568 TEST_c_c (ctanh, minus_infty, minus_zero, -1.0, minus_zero),
7569 TEST_c_c (ctanh, minus_infty, -1, -1.0, minus_zero),
7570
7571 TEST_c_c (ctanh, 0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7572 TEST_c_c (ctanh, 2, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7573 TEST_c_c (ctanh, 0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7574 TEST_c_c (ctanh, 2, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7575 TEST_c_c (ctanh, minus_zero, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7576 TEST_c_c (ctanh, -2, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7577 TEST_c_c (ctanh, minus_zero, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7578 TEST_c_c (ctanh, -2, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7579
7580 TEST_c_c (ctanh, plus_infty, qnan_value, 1.0, 0.0, IGNORE_ZERO_INF_SIGN),
7581 TEST_c_c (ctanh, minus_infty, qnan_value, -1.0, 0.0, IGNORE_ZERO_INF_SIGN),
7582
7583 TEST_c_c (ctanh, qnan_value, 0, qnan_value, 0.0),
7584 TEST_c_c (ctanh, qnan_value, minus_zero, qnan_value, minus_zero),
7585
7586 TEST_c_c (ctanh, qnan_value, 0.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7587 TEST_c_c (ctanh, qnan_value, -4.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7588
7589 TEST_c_c (ctanh, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7590 TEST_c_c (ctanh, 5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7591 TEST_c_c (ctanh, minus_zero, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7592 TEST_c_c (ctanh, -0.25, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7593
7594 TEST_c_c (ctanh, qnan_value, qnan_value, qnan_value, qnan_value),
7595
7596 TEST_c_c (ctanh, 0, M_PI_4l, 0.0, 1.0),
7597
7598 TEST_c_c (ctanh, 0.75L, 1.25L, 1.37260757053378320258048606571226857L, 0.385795952609750664177596760720790220L),
7599 TEST_c_c (ctanh, -2, -3, -0.965385879022133124278480269394560686L, 0.988437503832249372031403430350121098e-2L),
7600
7601 TEST_c_c (ctanh, 45, 1, 1.000000000000000000000000000000000000001L, 1.490158918874345552942703234806348520895e-39L, UNDERFLOW_EXCEPTION_FLOAT),
7602 TEST_c_c (ctanh, 47, 1, 1.0, 2.729321264492904590777293425576722354636e-41L, UNDERFLOW_EXCEPTION_FLOAT),
ca61cf32
JM		 7603
7604#ifndef TEST_FLOAT
08198877
JM		 7605 TEST_c_c (ctanh, 355, 1, 1.0, 8.140551093483276762350406321792653551513e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
7606 TEST_c_c (ctanh, 365, 1, 1.0, 1.677892637497921890115075995898773550884e-317L, UNDERFLOW_EXCEPTION_DOUBLE),
ca61cf32
JM		 7607#endif
7608
08198877
JM		 7609#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
7610 TEST_c_c (ctanh, 5680, 1, 1.0, 4.725214596136812019616700920476949798307e-4934L, UNDERFLOW_EXCEPTION),
7611 TEST_c_c (ctanh, 5690, 1, 1.0, 9.739393181626937151720816611272607059057e-4943L, UNDERFLOW_EXCEPTION),
ca61cf32 7612#endif
ca61cf32 7613
08198877 7614 TEST_c_c (ctanh, 0, 0x3.243f6cp-1, 0.0, -2.287733242885645987394874673945769518150e7L),
ca61cf32 7615
08198877 7616 TEST_c_c (ctanh, 1, 0x1p127, 0.9101334047676183761532873794426475906201L, 0.2446359391192790896381501310437708987204L),
ca61cf32 7617
08198877
JM		 7618#ifndef TEST_FLOAT
7619 TEST_c_c (ctanh, 1, 0x1p1023, 0.8786063118883068695462540226219865087189L, -0.2254627924997545057926782581695274244229L),
7620#endif
7621
7622#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
7623 TEST_c_c (ctanh, 1, 0x1p16383L, 0.8133818522051542536316746743877629761488L, 0.1608598776370396607204448234354670036772L),
7624#endif
7625
7626 TEST_c_c (ctanh, 50000, 50000, 1.0, plus_zero, UNDERFLOW_EXCEPTION),
7627 TEST_c_c (ctanh, 50000, -50000, 1.0, minus_zero, UNDERFLOW_EXCEPTION),
7628 TEST_c_c (ctanh, -50000, 50000, -1.0, plus_zero, UNDERFLOW_EXCEPTION),
7629 TEST_c_c (ctanh, -50000, -50000, -1.0, minus_zero, UNDERFLOW_EXCEPTION),
7630 END_DATA (ctanh)
7631 };
ca61cf32 7632
8847214f
UD		 7633static void
7634ctanh_test (void)
7635{
aaca11d8
UD		 7636 errno = 0;
7637 FUNC(ctanh) (BUILD_COMPLEX (0, 0));
7638 if (errno == ENOSYS)
7639 /* Function not implemented. */
7640 return;
7641
8847214f 7642 START (ctanh);
08198877
JM		 7643 RUN_TEST_LOOP_c_c (ctanh, ctanh_test_data, );
7644 END (ctanh, complex);
7645}
8847214f 7646
bcc8d661 7647
08198877
JM		 7648static const struct test_c_c_data ctanh_tonearest_test_data[] =
7649 {
7650 START_DATA (ctanh_tonearest),
7651 TEST_c_c (ctanh, 0x1p-149, 0x1.921fb6p+0, 7.334008549954377778731880988481078535821e-31L, -2.287733242885645987394874673945769518150e7L),
bcc8d661
JM		 7652
7653#ifndef TEST_FLOAT
08198877 7654 TEST_c_c (ctanh, 0x1p-1074, 0x1.921fb54442d18p+0, 1.317719414943508315995636961402669067843e-291L, 1.633123935319536975596773704152891653086e16L),
bcc8d661
JM		 7655#endif
7656
08198877
JM		 7657#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
7658 TEST_c_c (ctanh, 0x1p-16445L, 0x1.921fb54442d1846ap+0L, 5.793882568875674066286163141055208625180e-4912L, -3.986797629811710706723242948653362815645e19L),
bcc8d661 7659#endif
08198877
JM		 7660 END_DATA (ctanh_tonearest)
7661 };
2550dfe9 7662
ca61cf32
JM		 7663static void
7664ctanh_test_tonearest (void)
7665{
ca61cf32
JM		 7666 errno = 0;
7667 FUNC(ctanh) (BUILD_COMPLEX (0.7L, 1.2L));
7668 if (errno == ENOSYS)
7669 /* Function not implemented. */
7670 return;
7671
7672 START (ctanh_tonearest);
08198877
JM		 7673 RUN_TEST_LOOP_c_c (ctanh, ctanh_tonearest_test_data, FE_TONEAREST);
7674 END (ctanh_tonearest, complex);
7675}
ca61cf32 7676
ca61cf32 7677
08198877
JM		 7678static const struct test_c_c_data ctanh_towardzero_test_data[] =
7679 {
7680 START_DATA (ctanh_towardzero),
7681 TEST_c_c (ctanh, 0x1p-149, 0x1.921fb6p+0, 7.334008549954377778731880988481078535821e-31L, -2.287733242885645987394874673945769518150e7L),
ca61cf32
JM		 7682
7683#ifndef TEST_FLOAT
08198877 7684 TEST_c_c (ctanh, 0x1p-1074, 0x1.921fb54442d18p+0, 1.317719414943508315995636961402669067843e-291L, 1.633123935319536975596773704152891653086e16L),
ca61cf32
JM		 7685#endif
7686
7687#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7688 TEST_c_c (ctanh, 0x1p-16445L, 0x1.921fb54442d1846ap+0L, 5.793882568875674066286163141055208625180e-4912L, -3.986797629811710706723242948653362815645e19L),
ca61cf32 7689#endif
08198877
JM		 7690 END_DATA (ctanh_towardzero)
7691 };
ca61cf32
JM		 7692
7693static void
7694ctanh_test_towardzero (void)
7695{
ca61cf32
JM		 7696 errno = 0;
7697 FUNC(ctanh) (BUILD_COMPLEX (0.7L, 1.2L));
7698 if (errno == ENOSYS)
7699 /* Function not implemented. */
7700 return;
7701
7702 START (ctanh_towardzero);
08198877
JM		 7703 RUN_TEST_LOOP_c_c (ctanh, ctanh_towardzero_test_data, FE_TOWARDZERO);
7704 END (ctanh_towardzero, complex);
7705}
ca61cf32 7706
ca61cf32 7707
08198877
JM		 7708static const struct test_c_c_data ctanh_downward_test_data[] =
7709 {
7710 START_DATA (ctanh_downward),
7711 TEST_c_c (ctanh, 0x1p-149, 0x1.921fb6p+0, 7.334008549954377778731880988481078535821e-31L, -2.287733242885645987394874673945769518150e7L),
ca61cf32
JM		 7712
7713#ifndef TEST_FLOAT
08198877 7714 TEST_c_c (ctanh, 0x1p-1074, 0x1.921fb54442d18p+0, 1.317719414943508315995636961402669067843e-291L, 1.633123935319536975596773704152891653086e16L),
ca61cf32
JM		 7715#endif
7716
7717#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7718 TEST_c_c (ctanh, 0x1p-16445L, 0x1.921fb54442d1846ap+0L, 5.793882568875674066286163141055208625180e-4912L, -3.986797629811710706723242948653362815645e19L),
ca61cf32 7719#endif
08198877
JM		 7720 END_DATA (ctanh_downward)
7721 };
ca61cf32
JM		 7722
7723static void
7724ctanh_test_downward (void)
7725{
ca61cf32
JM		 7726 errno = 0;
7727 FUNC(ctanh) (BUILD_COMPLEX (0.7L, 1.2L));
7728 if (errno == ENOSYS)
7729 /* Function not implemented. */
7730 return;
7731
7732 START (ctanh_downward);
08198877
JM		 7733 RUN_TEST_LOOP_c_c (ctanh, ctanh_downward_test_data, FE_DOWNWARD);
7734 END (ctanh_downward, complex);
7735}
ca61cf32 7736
ca61cf32 7737
08198877
JM		 7738static const struct test_c_c_data ctanh_upward_test_data[] =
7739 {
7740 START_DATA (ctanh_upward),
7741 TEST_c_c (ctanh, 0x1p-149, 0x1.921fb6p+0, 7.334008549954377778731880988481078535821e-31L, -2.287733242885645987394874673945769518150e7L),
ca61cf32
JM		 7742
7743#ifndef TEST_FLOAT
08198877 7744 TEST_c_c (ctanh, 0x1p-1074, 0x1.921fb54442d18p+0, 1.317719414943508315995636961402669067843e-291L, 1.633123935319536975596773704152891653086e16L),
ca61cf32
JM		 7745#endif
7746
7747#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7748 TEST_c_c (ctanh, 0x1p-16445L, 0x1.921fb54442d1846ap+0L, 5.793882568875674066286163141055208625180e-4912L, -3.986797629811710706723242948653362815645e19L),
ca61cf32 7749#endif
08198877
JM		 7750 END_DATA (ctanh_upward)
7751 };
ca61cf32
JM		 7752
7753static void
7754ctanh_test_upward (void)
7755{
ca61cf32
JM		 7756 errno = 0;
7757 FUNC(ctanh) (BUILD_COMPLEX (0.7L, 1.2L));
7758 if (errno == ENOSYS)
7759 /* Function not implemented. */
7760 return;
7761
7762 START (ctanh_upward);
08198877 7763 RUN_TEST_LOOP_c_c (ctanh, ctanh_upward_test_data, FE_UPWARD);
ca61cf32
JM		 7764 END (ctanh_upward, complex);
7765}
7766
7767
74c57478
JM		 7768static const struct test_f_f_data erf_test_data[] =
7769 {
7770 START_DATA (erf),
7771 TEST_f_f (erf, 0, 0),
7772 TEST_f_f (erf, minus_zero, minus_zero),
7773 TEST_f_f (erf, plus_infty, 1),
7774 TEST_f_f (erf, minus_infty, -1),
7775 TEST_f_f (erf, qnan_value, qnan_value),
7776
7777 TEST_f_f (erf, 0.125L, 0.140316204801333817393029446521623398L),
7778 TEST_f_f (erf, 0.75L, 0.711155633653515131598937834591410777L),
7779 TEST_f_f (erf, 1.25L, 0.922900128256458230136523481197281140L),
7780 TEST_f_f (erf, 2.0L, 0.995322265018952734162069256367252929L),
7781 TEST_f_f (erf, 4.125L, 0.999999994576599200434933994687765914L),
7782 TEST_f_f (erf, 27.0L, 1.0L),
7783 END_DATA (erf)
7784 };
7785
8847214f
UD		 7786static void
7787erf_test (void)
7788{
7789 errno = 0;
7790 FUNC(erf) (0);
7791 if (errno == ENOSYS)
7792 /* Function not implemented. */
7793 return;
7794
7795 START (erf);
74c57478 7796 RUN_TEST_LOOP_f_f (erf, erf_test_data, );
8847214f
UD		 7797 END (erf);
7798}
7799
7800
74c57478
JM		 7801static const struct test_f_f_data erfc_test_data[] =
7802 {
7803 START_DATA (erfc),
7804 TEST_f_f (erfc, plus_infty, 0.0),
7805 TEST_f_f (erfc, minus_infty, 2.0),
7806 TEST_f_f (erfc, 0.0, 1.0),
7807 TEST_f_f (erfc, minus_zero, 1.0),
7808 TEST_f_f (erfc, qnan_value, qnan_value),
7809
7810 TEST_f_f (erfc, 0.125L, 0.859683795198666182606970553478376602L),
7811 TEST_f_f (erfc, 0.75L, 0.288844366346484868401062165408589223L),
7812 TEST_f_f (erfc, 1.25L, 0.0770998717435417698634765188027188596L),
7813 TEST_f_f (erfc, 2.0L, 0.00467773498104726583793074363274707139L),
7814 TEST_f_f (erfc, 0x1.f7303cp+1L, 2.705500297238986897105236321218861842255e-8L),
7815 TEST_f_f (erfc, 4.125L, 0.542340079956506600531223408575531062e-8L),
7816 TEST_f_f (erfc, 0x1.ffa002p+2L, 1.233585992097580296336099501489175967033e-29L),
7817 TEST_f_f (erfc, 0x1.ffffc8p+2L, 1.122671365033056305522366683719541099329e-29L),
2550dfe9 7818#ifdef TEST_LDOUBLE
74c57478 7819 /* The result can only be represented in long double. */
f964490f 7820# if LDBL_MIN_10_EXP < -319
74c57478 7821 TEST_f_f (erfc, 27.0L, 0.523704892378925568501606768284954709e-318L),
f964490f 7822# endif
7b1902cb 7823# if LDBL_MANT_DIG >= 106
74c57478 7824 TEST_f_f (erfc, 0x1.ffff56789abcdef0123456789a8p+2L, 1.123161416304655390092138725253789378459e-29L),
7b1902cb 7825# endif
2550dfe9 7826#endif
74c57478
JM		 7827 END_DATA (erfc)
7828 };
2550dfe9 7829
8847214f 7830static void
74c57478 7831erfc_test (void)
8847214f 7832{
e6d3c4a7 7833 errno = 0;
74c57478 7834 FUNC(erfc) (0);
e6d3c4a7
AJ		 7835 if (errno == ENOSYS)
7836 /* Function not implemented. */
7837 return;
7838
74c57478
JM		 7839 START (erfc);
7840 RUN_TEST_LOOP_f_f (erfc, erfc_test_data, );
7841 END (erfc);
7842}
8847214f 7843
74c57478
JM		 7844
7845static const struct test_f_f_data exp_test_data[] =
7846 {
7847 START_DATA (exp),
7848 TEST_f_f (exp, 0, 1),
7849 TEST_f_f (exp, minus_zero, 1),
8847214f 7850
15daa639 7851#ifndef TEST_INLINE
74c57478
JM		 7852 TEST_f_f (exp, plus_infty, plus_infty),
7853 TEST_f_f (exp, minus_infty, 0),
15daa639 7854#endif
74c57478
JM		 7855 TEST_f_f (exp, qnan_value, qnan_value),
7856 TEST_f_f (exp, 1, M_El),
8847214f 7857
74c57478
JM		 7858 TEST_f_f (exp, 2, M_E2l),
7859 TEST_f_f (exp, 3, M_E3l),
7860 TEST_f_f (exp, 0.75L, 2.11700001661267466854536981983709561L),
7861 TEST_f_f (exp, 50.0L, 5184705528587072464087.45332293348538L),
7862 TEST_f_f (exp, 88.72269439697265625L, 3.40233126623160774937554134772290447915e38L),
e42a38dd 7863#ifndef TEST_FLOAT
74c57478 7864 TEST_f_f (exp, 709.75L, 1.739836873264160557698252711673830393864768e+308L),
e42a38dd 7865#endif
8fb0af98 7866#if defined TEST_LDOUBLE && __LDBL_MAX_EXP__ > 1024
74c57478
JM		 7867 /* The result can only be represented in sane long double. */
7868 TEST_f_f (exp, 1000.0L, 0.197007111401704699388887935224332313e435L),
4c95adde 7869#endif
2550dfe9 7870
41498f4d 7871#if !(defined TEST_LDOUBLE && LDBL_MAX_EXP > 1024)
74c57478
JM		 7872 TEST_f_f (exp, 710, plus_infty, OVERFLOW_EXCEPTION),
7873 TEST_f_f (exp, -1234, plus_zero, UNDERFLOW_EXCEPTION),
41498f4d 7874#endif
74c57478
JM		 7875 TEST_f_f (exp, 1e5, plus_infty, OVERFLOW_EXCEPTION),
7876 TEST_f_f (exp, max_value, plus_infty, OVERFLOW_EXCEPTION),
7877 TEST_f_f (exp, -max_value, 0, UNDERFLOW_EXCEPTION),
7878 END_DATA (exp)
7879 };
7880
7881static void
7882exp_test (void)
7883{
7884 errno = 0;
7885 FUNC(exp) (0);
7886 if (errno == ENOSYS)
7887 /* Function not implemented. */
7888 return;
41bf21a1 7889
74c57478
JM		 7890 START (exp);
7891 RUN_TEST_LOOP_f_f (exp, exp_test_data, );
8847214f
UD		 7892 END (exp);
7893}
7894
7895
74c57478
JM		 7896static const struct test_f_f_data exp_tonearest_test_data[] =
7897 {
7898 START_DATA (exp_tonearest),
7899 TEST_f_f (exp, 1, M_El),
7900 TEST_f_f (exp, 2, M_E2l),
7901 TEST_f_f (exp, 3, M_E3l),
7902 END_DATA (exp_tonearest)
7903 };
7904
28afd92d
JM		 7905static void
7906exp_test_tonearest (void)
7907{
28afd92d
JM		 7908 errno = 0;
7909 FUNC(exp) (0);
7910 if (errno == ENOSYS)
7911 /* Function not implemented. */
7912 return;
7913
7914 START (exp_tonearest);
74c57478 7915 RUN_TEST_LOOP_f_f (exp, exp_tonearest_test_data, FE_TONEAREST);
28afd92d
JM		 7916 END (exp_tonearest);
7917}
7918
7919
74c57478
JM		 7920static const struct test_f_f_data exp_towardzero_test_data[] =
7921 {
7922 START_DATA (exp_towardzero),
7923 TEST_f_f (exp, 1, M_El),
7924 TEST_f_f (exp, 2, M_E2l),
7925 TEST_f_f (exp, 3, M_E3l),
7926 END_DATA (exp_towardzero)
7927 };
7928
28afd92d
JM		 7929static void
7930exp_test_towardzero (void)
7931{
28afd92d
JM		 7932 errno = 0;
7933 FUNC(exp) (0);
7934 if (errno == ENOSYS)
7935 /* Function not implemented. */
7936 return;
7937
7938 START (exp_towardzero);
74c57478 7939 RUN_TEST_LOOP_f_f (exp, exp_towardzero_test_data, FE_TOWARDZERO);
28afd92d
JM		 7940 END (exp_towardzero);
7941}
7942
7943
74c57478
JM		 7944static const struct test_f_f_data exp_downward_test_data[] =
7945 {
7946 START_DATA (exp_downward),
7947 TEST_f_f (exp, 1, M_El),
7948 TEST_f_f (exp, 2, M_E2l),
7949 TEST_f_f (exp, 3, M_E3l),
7950 END_DATA (exp_downward)
7951 };
7952
28afd92d
JM		 7953static void
7954exp_test_downward (void)
7955{
28afd92d
JM		 7956 errno = 0;
7957 FUNC(exp) (0);
7958 if (errno == ENOSYS)
7959 /* Function not implemented. */
7960 return;
7961
7962 START (exp_downward);
74c57478 7963 RUN_TEST_LOOP_f_f (exp, exp_downward_test_data, FE_DOWNWARD);
28afd92d
JM		 7964 END (exp_downward);
7965}
7966
7967
74c57478
JM		 7968static const struct test_f_f_data exp_upward_test_data[] =
7969 {
7970 START_DATA (exp_upward),
7971 TEST_f_f (exp, 1, M_El),
7972 TEST_f_f (exp, 2, M_E2l),
7973 TEST_f_f (exp, 3, M_E3l),
7974 END_DATA (exp_upward)
7975 };
7976
28afd92d
JM		 7977static void
7978exp_test_upward (void)
7979{
28afd92d
JM		 7980 errno = 0;
7981 FUNC(exp) (0);
7982 if (errno == ENOSYS)
7983 /* Function not implemented. */
7984 return;
7985
7986 START (exp_upward);
74c57478 7987 RUN_TEST_LOOP_f_f (exp, exp_upward_test_data, FE_UPWARD);
28afd92d
JM		 7988 END (exp_upward);
7989}
7990
7991
74c57478
JM		 7992static const struct test_f_f_data exp10_test_data[] =
7993 {
7994 START_DATA (exp10),
7995 TEST_f_f (exp10, 0, 1),
7996 TEST_f_f (exp10, minus_zero, 1),
7997
7998 TEST_f_f (exp10, plus_infty, plus_infty),
7999 TEST_f_f (exp10, minus_infty, 0),
8000 TEST_f_f (exp10, qnan_value, qnan_value),
8001 TEST_f_f (exp10, 3, 1000),
8002 TEST_f_f (exp10, -1, 0.1L),
8003 TEST_f_f (exp10, 36, 1.0e36L),
8004 TEST_f_f (exp10, -36, 1.0e-36L),
8005#ifndef TEST_FLOAT
8006 TEST_f_f (exp10, 305, 1.0e305L),
8007 TEST_f_f (exp10, -305, 1.0e-305L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
8008#endif
8009#if defined TEST_LDOUBLE && LDBL_MAX_10_EXP >= 4932
8010 TEST_f_f (exp10, 4932, 1.0e4932L),
8011 TEST_f_f (exp10, -4932, 1.0e-4932L, UNDERFLOW_EXCEPTION),
8012#endif
8013 TEST_f_f (exp10, 1e6, plus_infty, OVERFLOW_EXCEPTION),
8014 TEST_f_f (exp10, -1e6, 0, UNDERFLOW_EXCEPTION),
8015 TEST_f_f (exp10, max_value, plus_infty, OVERFLOW_EXCEPTION),
8016 TEST_f_f (exp10, -max_value, 0, UNDERFLOW_EXCEPTION),
8017 TEST_f_f (exp10, 0.75L, 5.62341325190349080394951039776481231L),
8018 END_DATA (exp10)
8019 };
8020
8847214f
UD		 8021static void
8022exp10_test (void)
8023{
8024 errno = 0;
8025 FUNC(exp10) (0);
8026 if (errno == ENOSYS)
8027 /* Function not implemented. */
8028 return;
8029
8030 START (exp10);
74c57478
JM		 8031 RUN_TEST_LOOP_f_f (exp10, exp10_test_data, );
8032 END (exp10);
8033}
8034
8035
8036static const struct test_f_f_data exp2_test_data[] =
8037 {
8038 START_DATA (exp2),
8039 TEST_f_f (exp2, 0, 1),
8040 TEST_f_f (exp2, minus_zero, 1),
8041 TEST_f_f (exp2, plus_infty, plus_infty),
8042 TEST_f_f (exp2, minus_infty, 0),
8043 TEST_f_f (exp2, qnan_value, qnan_value),
8044
8045 TEST_f_f (exp2, 10, 1024),
8046 TEST_f_f (exp2, -1, 0.5),
8047 TEST_f_f (exp2, 1e6, plus_infty, OVERFLOW_EXCEPTION),
8048 TEST_f_f (exp2, -1e6, 0, UNDERFLOW_EXCEPTION),
8049 TEST_f_f (exp2, max_value, plus_infty, OVERFLOW_EXCEPTION),
8050 TEST_f_f (exp2, -max_value, 0, UNDERFLOW_EXCEPTION),
8051 TEST_f_f (exp2, 0.75L, 1.68179283050742908606225095246642979L),
8847214f 8052
74c57478
JM		 8053 TEST_f_f (exp2, 100.5, 1.792728671193156477399422023278661496394e+30L),
8054 TEST_f_f (exp2, 127, 0x1p127),
8055 TEST_f_f (exp2, -149, 0x1p-149),
8847214f 8056
d8b82cad 8057#ifndef TEST_FLOAT
74c57478
JM		 8058 TEST_f_f (exp2, 1000.25, 1.274245659452564874772384918171765416737e+301L),
8059 TEST_f_f (exp2, 1023, 0x1p1023),
8060 TEST_f_f (exp2, -1074, 0x1p-1074),
9568c0c2 8061#endif
8847214f 8062
74c57478
JM		 8063#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
8064 TEST_f_f (exp2, 16383, 0x1p16383L),
8065 TEST_f_f (exp2, -16400, 0x1p-16400L),
8066#endif
8067 END_DATA (exp2)
8068 };
2550dfe9 8069
8847214f
UD		 8070static void
8071exp2_test (void)
8072{
8073 errno = 0;
8074 FUNC(exp2) (0);
8075 if (errno == ENOSYS)
8076 /* Function not implemented. */
8077 return;
8078
8079 START (exp2);
74c57478
JM		 8080 RUN_TEST_LOOP_f_f (exp2, exp2_test_data, );
8081 END (exp2);
8082}
8847214f 8083
15daa639 8084
74c57478
JM		 8085static const struct test_f_f_data expm1_test_data[] =
8086 {
8087 START_DATA (expm1),
8088 TEST_f_f (expm1, 0, 0),
8089 TEST_f_f (expm1, minus_zero, minus_zero),
8090
8091#ifndef TEST_INLINE
8092 TEST_f_f (expm1, plus_infty, plus_infty),
8093 TEST_f_f (expm1, minus_infty, -1),
8094#endif
8095 TEST_f_f (expm1, qnan_value, qnan_value),
8096
8097 TEST_f_f (expm1, 1, M_El - 1.0),
8098 TEST_f_f (expm1, 0.75L, 1.11700001661267466854536981983709561L),
8847214f 8099
74c57478 8100 TEST_f_f (expm1, 50.0L, 5.1847055285870724640864533229334853848275e+21L),
48e44791
JM		 8101
8102#ifndef TEST_FLOAT
74c57478
JM		 8103 TEST_f_f (expm1, 127.0L, 1.4302079958348104463583671072905261080748e+55L),
8104 TEST_f_f (expm1, 500.0L, 1.4035922178528374107397703328409120821806e+217L),
48e44791
JM		 8105#endif
8106
8107#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM		 8108 TEST_f_f (expm1, 11356.25L, 9.05128237311923300051376115753226014206e+4931L),
8109#endif
8110
8111 TEST_f_f (expm1, -10.0, -0.9999546000702375151484644084844394493898L),
8112 TEST_f_f (expm1, -16.0, -0.9999998874648252807408854862248209398728L),
8113 TEST_f_f (expm1, -17.0, -0.9999999586006228121483334034897228104472L),
8114 TEST_f_f (expm1, -18.0, -0.9999999847700202552873715638633707664826L),
8115 TEST_f_f (expm1, -36.0, -0.9999999999999997680477169756430611687736L),
8116 TEST_f_f (expm1, -37.0, -0.9999999999999999146695237425593420572195L),
8117 TEST_f_f (expm1, -38.0, -0.9999999999999999686086720795197037129104L),
8118 TEST_f_f (expm1, -44.0, -0.9999999999999999999221886775886620348429L),
8119 TEST_f_f (expm1, -45.0, -0.9999999999999999999713748141945060635553L),
8120 TEST_f_f (expm1, -46.0, -0.9999999999999999999894693826424461876212L),
8121 TEST_f_f (expm1, -73.0, -0.9999999999999999999999999999999802074012L),
8122 TEST_f_f (expm1, -74.0, -0.9999999999999999999999999999999927187098L),
8123 TEST_f_f (expm1, -75.0, -0.9999999999999999999999999999999973213630L),
8124 TEST_f_f (expm1, -78.0, -0.9999999999999999999999999999999998666385L),
8125 TEST_f_f (expm1, -79.0, -0.9999999999999999999999999999999999509391L),
8126 TEST_f_f (expm1, -80.0, -0.9999999999999999999999999999999999819515L),
8127 TEST_f_f (expm1, -100.0, -1.0),
8128 TEST_f_f (expm1, -1000.0, -1.0),
8129 TEST_f_f (expm1, -10000.0, -1.0),
8130 TEST_f_f (expm1, -100000.0, -1.0),
8131
8132 TEST_f_f (expm1, 100000.0, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
8133 TEST_f_f (expm1, max_value, plus_infty, OVERFLOW_EXCEPTION),
8134 TEST_f_f (expm1, -max_value, -1),
8135 END_DATA (expm1)
8136 };
2550dfe9 8137
8847214f
UD		 8138static void
8139expm1_test (void)
8140{
e6d3c4a7
AJ		 8141 errno = 0;
8142 FUNC(expm1) (0);
8143 if (errno == ENOSYS)
8144 /* Function not implemented. */
8145 return;
8146
8847214f 8147 START (expm1);
74c57478
JM		 8148 RUN_TEST_LOOP_f_f (expm1, expm1_test_data, );
8149 END (expm1);
8150}
8847214f 8151
495fd99f 8152
74c57478
JM		 8153static const struct test_f_f_data fabs_test_data[] =
8154 {
8155 START_DATA (fabs),
8156 TEST_f_f (fabs, 0, 0),
8157 TEST_f_f (fabs, minus_zero, 0),
bbc5d74d 8158
74c57478
JM		 8159 TEST_f_f (fabs, plus_infty, plus_infty),
8160 TEST_f_f (fabs, minus_infty, plus_infty),
8161 TEST_f_f (fabs, qnan_value, qnan_value),
8847214f 8162
74c57478
JM		 8163 TEST_f_f (fabs, 38.0, 38.0),
8164 TEST_f_f (fabs, -M_El, M_El),
8165 END_DATA (fabs)
8166 };
2550dfe9 8167
8847214f
UD		 8168static void
8169fabs_test (void)
8170{
8171 START (fabs);
74c57478 8172 RUN_TEST_LOOP_f_f (fabs, fabs_test_data, );
8847214f
UD		 8173 END (fabs);
8174}
8175
2550dfe9 8176
601a3a5f
JM		 8177static const struct test_ff_f_data fdim_test_data[] =
8178 {
8179 START_DATA (fdim),
8180 TEST_ff_f (fdim, 0, 0, 0),
8181 TEST_ff_f (fdim, 9, 0, 9),
8182 TEST_ff_f (fdim, 0, 9, 0),
8183 TEST_ff_f (fdim, -9, 0, 0),
8184 TEST_ff_f (fdim, 0, -9, 9),
8185
8186 TEST_ff_f (fdim, plus_infty, 9, plus_infty),
8187 TEST_ff_f (fdim, plus_infty, -9, plus_infty),
8188 TEST_ff_f (fdim, minus_infty, 9, 0),
8189 TEST_ff_f (fdim, minus_infty, -9, 0),
8190 TEST_ff_f (fdim, 9, minus_infty, plus_infty),
8191 TEST_ff_f (fdim, -9, minus_infty, plus_infty),
8192 TEST_ff_f (fdim, 9, plus_infty, 0),
8193 TEST_ff_f (fdim, -9, plus_infty, 0),
8194
8195 TEST_ff_f (fdim, 0, qnan_value, qnan_value),
8196 TEST_ff_f (fdim, 9, qnan_value, qnan_value),
8197 TEST_ff_f (fdim, -9, qnan_value, qnan_value),
8198 TEST_ff_f (fdim, qnan_value, 9, qnan_value),
8199 TEST_ff_f (fdim, qnan_value, -9, qnan_value),
8200 TEST_ff_f (fdim, plus_infty, qnan_value, qnan_value),
8201 TEST_ff_f (fdim, minus_infty, qnan_value, qnan_value),
8202 TEST_ff_f (fdim, qnan_value, plus_infty, qnan_value),
8203 TEST_ff_f (fdim, qnan_value, minus_infty, qnan_value),
8204 TEST_ff_f (fdim, qnan_value, qnan_value, qnan_value),
8205
8206 TEST_ff_f (fdim, plus_infty, plus_infty, 0),
8207 END_DATA (fdim)
8208 };
8209
8847214f
UD		 8210static void
8211fdim_test (void)
8212{
8213 START (fdim);
601a3a5f 8214 RUN_TEST_LOOP_ff_f (fdim, fdim_test_data, );
8847214f
UD		 8215 END (fdim);
8216}
8217
2550dfe9 8218
ef1bb361
JM		 8219static void
8220finite_test (void)
8221{
8222 START (finite);
8223
8224 TEST_f_b (finite, 0, 1);
8225 TEST_f_b (finite, minus_zero, 1);
8226 TEST_f_b (finite, 10, 1);
8227 TEST_f_b (finite, min_subnorm_value, 1);
8228 TEST_f_b (finite, plus_infty, 0);
8229 TEST_f_b (finite, minus_infty, 0);
67e971f1 8230 TEST_f_b (finite, qnan_value, 0);
ef1bb361
JM		 8231
8232 END (finite);
8233}
8234
8235
74c57478
JM		 8236static const struct test_f_f_data floor_test_data[] =
8237 {
8238 START_DATA (floor),
8239 TEST_f_f (floor, 0.0, 0.0),
8240 TEST_f_f (floor, minus_zero, minus_zero),
8241 TEST_f_f (floor, plus_infty, plus_infty),
8242 TEST_f_f (floor, minus_infty, minus_infty),
8243 TEST_f_f (floor, qnan_value, qnan_value),
8244
8245 TEST_f_f (floor, M_PIl, 3.0),
8246 TEST_f_f (floor, -M_PIl, -4.0),
8247
8248 TEST_f_f (floor, 0.1, 0.0),
8249 TEST_f_f (floor, 0.25, 0.0),
8250 TEST_f_f (floor, 0.625, 0.0),
8251 TEST_f_f (floor, -0.1, -1.0),
8252 TEST_f_f (floor, -0.25, -1.0),
8253 TEST_f_f (floor, -0.625, -1.0),
f964490f
RM		 8254
8255#ifdef TEST_LDOUBLE
74c57478
JM		 8256 /* The result can only be represented in long double. */
8257 TEST_f_f (floor, 4503599627370495.5L, 4503599627370495.0L),
8258 TEST_f_f (floor, 4503599627370496.25L, 4503599627370496.0L),
8259 TEST_f_f (floor, 4503599627370496.5L, 4503599627370496.0L),
8260 TEST_f_f (floor, 4503599627370496.75L, 4503599627370496.0L),
8261 TEST_f_f (floor, 4503599627370497.5L, 4503599627370497.0L),
5c68d401 8262# if LDBL_MANT_DIG > 100
74c57478
JM		 8263 TEST_f_f (floor, 4503599627370494.5000000000001L, 4503599627370494.0L),
8264 TEST_f_f (floor, 4503599627370495.5000000000001L, 4503599627370495.0L),
8265 TEST_f_f (floor, 4503599627370496.5000000000001L, 4503599627370496.0L),
5c68d401 8266# endif
f964490f 8267
74c57478
JM		 8268 TEST_f_f (floor, -4503599627370495.5L, -4503599627370496.0L),
8269 TEST_f_f (floor, -4503599627370496.25L, -4503599627370497.0L),
8270 TEST_f_f (floor, -4503599627370496.5L, -4503599627370497.0L),
8271 TEST_f_f (floor, -4503599627370496.75L, -4503599627370497.0L),
8272 TEST_f_f (floor, -4503599627370497.5L, -4503599627370498.0L),
5c68d401 8273# if LDBL_MANT_DIG > 100
74c57478
JM		 8274 TEST_f_f (floor, -4503599627370494.5000000000001L, -4503599627370495.0L),
8275 TEST_f_f (floor, -4503599627370495.5000000000001L, -4503599627370496.0L),
8276 TEST_f_f (floor, -4503599627370496.5000000000001L, -4503599627370497.0L),
5c68d401 8277# endif
f964490f 8278
74c57478
JM		 8279 TEST_f_f (floor, 9007199254740991.5L, 9007199254740991.0L),
8280 TEST_f_f (floor, 9007199254740992.25L, 9007199254740992.0L),
8281 TEST_f_f (floor, 9007199254740992.5L, 9007199254740992.0L),
8282 TEST_f_f (floor, 9007199254740992.75L, 9007199254740992.0L),
8283 TEST_f_f (floor, 9007199254740993.5L, 9007199254740993.0L),
f964490f 8284
5c68d401 8285# if LDBL_MANT_DIG > 100
74c57478
JM		 8286 TEST_f_f (floor, 9007199254740991.0000000000001L, 9007199254740991.0L),
8287 TEST_f_f (floor, 9007199254740992.0000000000001L, 9007199254740992.0L),
8288 TEST_f_f (floor, 9007199254740993.0000000000001L, 9007199254740993.0L),
8289 TEST_f_f (floor, 9007199254740991.5000000000001L, 9007199254740991.0L),
8290 TEST_f_f (floor, 9007199254740992.5000000000001L, 9007199254740992.0L),
8291 TEST_f_f (floor, 9007199254740993.5000000000001L, 9007199254740993.0L),
5c68d401
RM		 8292# endif
8293
74c57478
JM		 8294 TEST_f_f (floor, -9007199254740991.5L, -9007199254740992.0L),
8295 TEST_f_f (floor, -9007199254740992.25L, -9007199254740993.0L),
8296 TEST_f_f (floor, -9007199254740992.5L, -9007199254740993.0L),
8297 TEST_f_f (floor, -9007199254740992.75L, -9007199254740993.0L),
8298 TEST_f_f (floor, -9007199254740993.5L, -9007199254740994.0L),
f964490f 8299
5c68d401 8300# if LDBL_MANT_DIG > 100
74c57478
JM		 8301 TEST_f_f (floor, -9007199254740991.0000000000001L, -9007199254740992.0L),
8302 TEST_f_f (floor, -9007199254740992.0000000000001L, -9007199254740993.0L),
8303 TEST_f_f (floor, -9007199254740993.0000000000001L, -9007199254740994.0L),
8304 TEST_f_f (floor, -9007199254740991.5000000000001L, -9007199254740992.0L),
8305 TEST_f_f (floor, -9007199254740992.5000000000001L, -9007199254740993.0L),
8306 TEST_f_f (floor, -9007199254740993.5000000000001L, -9007199254740994.0L),
5c68d401
RM		 8307# endif
8308
74c57478
JM		 8309 TEST_f_f (floor, 72057594037927935.5L, 72057594037927935.0L),
8310 TEST_f_f (floor, 72057594037927936.25L, 72057594037927936.0L),
8311 TEST_f_f (floor, 72057594037927936.5L, 72057594037927936.0L),
8312 TEST_f_f (floor, 72057594037927936.75L, 72057594037927936.0L),
8313 TEST_f_f (floor, 72057594037927937.5L, 72057594037927937.0L),
f964490f 8314
74c57478
JM		 8315 TEST_f_f (floor, -72057594037927935.5L, -72057594037927936.0L),
8316 TEST_f_f (floor, -72057594037927936.25L, -72057594037927937.0L),
8317 TEST_f_f (floor, -72057594037927936.5L, -72057594037927937.0L),
8318 TEST_f_f (floor, -72057594037927936.75L, -72057594037927937.0L),
8319 TEST_f_f (floor, -72057594037927937.5L, -72057594037927938.0L),
f964490f 8320
74c57478
JM		 8321 TEST_f_f (floor, 10141204801825835211973625643007.5L, 10141204801825835211973625643007.0L),
8322 TEST_f_f (floor, 10141204801825835211973625643008.25L, 10141204801825835211973625643008.0L),
8323 TEST_f_f (floor, 10141204801825835211973625643008.5L, 10141204801825835211973625643008.0L),
8324 TEST_f_f (floor, 10141204801825835211973625643008.75L, 10141204801825835211973625643008.0L),
8325 TEST_f_f (floor, 10141204801825835211973625643009.5L, 10141204801825835211973625643009.0L),
94e02fc4 8326
74c57478
JM		 8327 TEST_f_f (floor, 0xf.ffffffffffffff8p+47L, 0xf.fffffffffffep+47L),
8328 TEST_f_f (floor, -0x8.000000000000004p+48L, -0x8.000000000001p+48L),
f964490f 8329#endif
74c57478
JM		 8330 END_DATA (floor)
8331 };
f964490f 8332
74c57478
JM		 8333static void
8334floor_test (void)
8335{
8336 START (floor);
8337 RUN_TEST_LOOP_f_f (floor, floor_test_data, );
8847214f
UD		 8338 END (floor);
8339}
8340
2550dfe9 8341
4f184d30
JM		 8342static const struct test_fff_f_data fma_test_data[] =
8343 {
8344 START_DATA (fma),
8345 TEST_fff_f (fma, 1.0, 2.0, 3.0, 5.0),
8346 TEST_fff_f (fma, qnan_value, 2.0, 3.0, qnan_value),
8347 TEST_fff_f (fma, 1.0, qnan_value, 3.0, qnan_value),
8348 TEST_fff_f (fma, 1.0, 2.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8349 TEST_fff_f (fma, plus_infty, 0.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8350 TEST_fff_f (fma, minus_infty, 0.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8351 TEST_fff_f (fma, 0.0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8352 TEST_fff_f (fma, 0.0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8353 TEST_fff_f (fma, plus_infty, 0.0, 1.0, qnan_value, INVALID_EXCEPTION),
8354 TEST_fff_f (fma, minus_infty, 0.0, 1.0, qnan_value, INVALID_EXCEPTION),
8355 TEST_fff_f (fma, 0.0, plus_infty, 1.0, qnan_value, INVALID_EXCEPTION),
8356 TEST_fff_f (fma, 0.0, minus_infty, 1.0, qnan_value, INVALID_EXCEPTION),
8357
8358 TEST_fff_f (fma, plus_infty, plus_infty, minus_infty, qnan_value, INVALID_EXCEPTION),
8359 TEST_fff_f (fma, minus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8360 TEST_fff_f (fma, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8361 TEST_fff_f (fma, minus_infty, minus_infty, minus_infty, qnan_value, INVALID_EXCEPTION),
8362 TEST_fff_f (fma, plus_infty, 3.5L, minus_infty, qnan_value, INVALID_EXCEPTION),
8363 TEST_fff_f (fma, minus_infty, -7.5L, minus_infty, qnan_value, INVALID_EXCEPTION),
8364 TEST_fff_f (fma, -13.5L, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8365 TEST_fff_f (fma, minus_infty, 7.5L, plus_infty, qnan_value, INVALID_EXCEPTION),
8366
8367 TEST_fff_f (fma, 1.25L, 0.75L, 0.0625L, 1.0L),
8368
8369 TEST_fff_f (fma, -max_value, -max_value, minus_infty, minus_infty),
8370 TEST_fff_f (fma, max_value / 2, max_value / 2, minus_infty, minus_infty),
8371 TEST_fff_f (fma, -max_value, max_value, plus_infty, plus_infty),
8372 TEST_fff_f (fma, max_value / 2, -max_value / 4, plus_infty, plus_infty),
8373 TEST_fff_f (fma, plus_infty, 4, plus_infty, plus_infty),
8374 TEST_fff_f (fma, 2, minus_infty, minus_infty, minus_infty),
8375 TEST_fff_f (fma, minus_infty, minus_infty, plus_infty, plus_infty),
8376 TEST_fff_f (fma, plus_infty, minus_infty, minus_infty, minus_infty),
8377
8378 TEST_fff_f (fma, plus_zero, plus_zero, plus_zero, plus_zero),
8379 TEST_fff_f (fma, plus_zero, plus_zero, minus_zero, plus_zero),
8380 TEST_fff_f (fma, plus_zero, minus_zero, plus_zero, plus_zero),
8381 TEST_fff_f (fma, plus_zero, minus_zero, minus_zero, minus_zero),
8382 TEST_fff_f (fma, minus_zero, plus_zero, plus_zero, plus_zero),
8383 TEST_fff_f (fma, minus_zero, plus_zero, minus_zero, minus_zero),
8384 TEST_fff_f (fma, minus_zero, minus_zero, plus_zero, plus_zero),
8385 TEST_fff_f (fma, minus_zero, minus_zero, minus_zero, plus_zero),
8386 TEST_fff_f (fma, 1.0, plus_zero, plus_zero, plus_zero),
8387 TEST_fff_f (fma, 1.0, plus_zero, minus_zero, plus_zero),
8388 TEST_fff_f (fma, 1.0, minus_zero, plus_zero, plus_zero),
8389 TEST_fff_f (fma, 1.0, minus_zero, minus_zero, minus_zero),
8390 TEST_fff_f (fma, -1.0, plus_zero, plus_zero, plus_zero),
8391 TEST_fff_f (fma, -1.0, plus_zero, minus_zero, minus_zero),
8392 TEST_fff_f (fma, -1.0, minus_zero, plus_zero, plus_zero),
8393 TEST_fff_f (fma, -1.0, minus_zero, minus_zero, plus_zero),
8394 TEST_fff_f (fma, plus_zero, 1.0, plus_zero, plus_zero),
8395 TEST_fff_f (fma, plus_zero, 1.0, minus_zero, plus_zero),
8396 TEST_fff_f (fma, plus_zero, -1.0, plus_zero, plus_zero),
8397 TEST_fff_f (fma, plus_zero, -1.0, minus_zero, minus_zero),
8398 TEST_fff_f (fma, minus_zero, 1.0, plus_zero, plus_zero),
8399 TEST_fff_f (fma, minus_zero, 1.0, minus_zero, minus_zero),
8400 TEST_fff_f (fma, minus_zero, -1.0, plus_zero, plus_zero),
8401 TEST_fff_f (fma, minus_zero, -1.0, minus_zero, plus_zero),
8402
8403 TEST_fff_f (fma, 1.0, 1.0, -1.0, plus_zero),
8404 TEST_fff_f (fma, 1.0, -1.0, 1.0, plus_zero),
8405 TEST_fff_f (fma, -1.0, 1.0, 1.0, plus_zero),
8406 TEST_fff_f (fma, -1.0, -1.0, -1.0, plus_zero),
8407
8408 TEST_fff_f (fma, min_value, min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8409 TEST_fff_f (fma, min_value, min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8410 TEST_fff_f (fma, min_value, -min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8411 TEST_fff_f (fma, min_value, -min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8412 TEST_fff_f (fma, -min_value, min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8413 TEST_fff_f (fma, -min_value, min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8414 TEST_fff_f (fma, -min_value, -min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8415 TEST_fff_f (fma, -min_value, -min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8416
8417 TEST_fff_f (fma, max_value, max_value, min_value, plus_infty, OVERFLOW_EXCEPTION),
8418 TEST_fff_f (fma, max_value, max_value, -min_value, plus_infty, OVERFLOW_EXCEPTION),
8419 TEST_fff_f (fma, max_value, -max_value, min_value, minus_infty, OVERFLOW_EXCEPTION),
8420 TEST_fff_f (fma, max_value, -max_value, -min_value, minus_infty, OVERFLOW_EXCEPTION),
8421 TEST_fff_f (fma, -max_value, max_value, min_value, minus_infty, OVERFLOW_EXCEPTION),
8422 TEST_fff_f (fma, -max_value, max_value, -min_value, minus_infty, OVERFLOW_EXCEPTION),
8423 TEST_fff_f (fma, -max_value, -max_value, min_value, plus_infty, OVERFLOW_EXCEPTION),
8424 TEST_fff_f (fma, -max_value, -max_value, -min_value, plus_infty, OVERFLOW_EXCEPTION),
a0c2940d 8425
5e908464 8426#if defined (TEST_FLOAT) && FLT_MANT_DIG == 24
4f184d30
JM		 8427 TEST_fff_f (fma, 0x1.7ff8p+13, 0x1.000002p+0, 0x1.ffffp-24, 0x1.7ff802p+13),
8428 TEST_fff_f (fma, 0x1.fffp+0, 0x1.00001p+0, -0x1.fffp+0, 0x1.fffp-20),
8429 TEST_fff_f (fma, 0x1.9abcdep+127, 0x0.9abcdep-126, -0x1.f08948p+0, 0x1.bb421p-25),
8430 TEST_fff_f (fma, 0x1.9abcdep+100, 0x0.9abcdep-126, -0x1.f08948p-27, 0x1.bb421p-52),
8431 TEST_fff_f (fma, 0x1.fffffep+127, 0x1.001p+0, -0x1.fffffep+127, 0x1.fffffep+115),
8432 TEST_fff_f (fma, -0x1.fffffep+127, 0x1.fffffep+0, 0x1.fffffep+127, -0x1.fffffap+127),
8433 TEST_fff_f (fma, 0x1.fffffep+127, 2.0, -0x1.fffffep+127, 0x1.fffffep+127),
8434 TEST_fff_f (fma, 0x1.4p-126, 0x1.000004p-1, 0x1p-128, 0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8435 TEST_fff_f (fma, -0x1.4p-126, 0x1.000004p-1, -0x1p-128, -0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8436 TEST_fff_f (fma, 0x1.fffff8p-126, 0x1.000002p-1, 0x1p-149, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8437 TEST_fff_f (fma, -0x1.fffff8p-126, 0x1.000002p-1, -0x1p-149, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8438 TEST_fff_f (fma, 0x1p-149, 0x1p-1, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION),
8439 TEST_fff_f (fma, -0x1p-149, 0x1p-1, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION),
8440 TEST_fff_f (fma, 0x1p-149, 0x1.1p-1, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION),
8441 TEST_fff_f (fma, -0x1p-149, 0x1.1p-1, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION),
8442 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p127, 0x1p127),
8443 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p127, 0x1p127),
8444 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p127, -0x1p127),
8445 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p127, -0x1p127),
8446 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-126, 0x1p-126),
8447 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-126, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8448 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-126, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8449 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-126, -0x1p-126),
8450 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8451 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8452 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8453 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8454 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
8455 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
8456 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
8457 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
8458 TEST_fff_f (fma, 0x0.fffp0, 0x0.fffp0, -0x0.ffep0, 0x1p-24),
8459 TEST_fff_f (fma, 0x0.fffp0, -0x0.fffp0, 0x0.ffep0, -0x1p-24),
8460 TEST_fff_f (fma, -0x0.fffp0, 0x0.fffp0, 0x0.ffep0, -0x1p-24),
8461 TEST_fff_f (fma, -0x0.fffp0, -0x0.fffp0, -0x0.ffep0, 0x1p-24),
8462 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p127, 0x1p127),
8463 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p127, 0x1p127),
8464 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p127, -0x1p127),
8465 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p127, -0x1p127),
8466 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p103, 0x1p103),
8467 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p103, 0x1p103),
8468 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p103, -0x1p103),
8469 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p103, -0x1p103),
5e908464
JJ		 8470#endif
8471#if defined (TEST_DOUBLE) && DBL_MANT_DIG == 53
4f184d30
JM		 8472 TEST_fff_f (fma, 0x1.7fp+13, 0x1.0000000000001p+0, 0x1.ffep-48, 0x1.7f00000000001p+13),
8473 TEST_fff_f (fma, 0x1.fffp+0, 0x1.0000000000001p+0, -0x1.fffp+0, 0x1.fffp-52),
8474 TEST_fff_f (fma, 0x1.0000002p+0, 0x1.ffffffcp-1, 0x1p-300, 1.0),
8475 TEST_fff_f (fma, 0x1.0000002p+0, 0x1.ffffffcp-1, -0x1p-300, 0x1.fffffffffffffp-1),
8476 TEST_fff_f (fma, 0x1.deadbeef2feedp+1023, 0x0.deadbeef2feedp-1022, -0x1.a05f8c01a4bfbp+1, 0x1.0989687bc9da4p-53),
8477 TEST_fff_f (fma, 0x1.deadbeef2feedp+900, 0x0.deadbeef2feedp-1022, -0x1.a05f8c01a4bfbp-122, 0x1.0989687bc9da4p-176),
8478 TEST_fff_f (fma, 0x1.fffffffffffffp+1023, 0x1.001p+0, -0x1.fffffffffffffp+1023, 0x1.fffffffffffffp+1011),
8479 TEST_fff_f (fma, -0x1.fffffffffffffp+1023, 0x1.fffffffffffffp+0, 0x1.fffffffffffffp+1023, -0x1.ffffffffffffdp+1023),
8480 TEST_fff_f (fma, 0x1.fffffffffffffp+1023, 2.0, -0x1.fffffffffffffp+1023, 0x1.fffffffffffffp+1023),
8481 TEST_fff_f (fma, 0x1.6a09e667f3bccp-538, 0x1.6a09e667f3bccp-538, 0.0, 0.0, UNDERFLOW_EXCEPTION),
8482 TEST_fff_f (fma, 0x1.deadbeef2feedp-495, 0x1.deadbeef2feedp-495, -0x1.bf86a5786a574p-989, 0x0.0000042625a1fp-1022, UNDERFLOW_EXCEPTION),
8483 TEST_fff_f (fma, 0x1.deadbeef2feedp-503, 0x1.deadbeef2feedp-503, -0x1.bf86a5786a574p-1005, 0x0.0000000004262p-1022, UNDERFLOW_EXCEPTION),
8484 TEST_fff_f (fma, 0x1p-537, 0x1p-538, 0x1p-1074, 0x0.0000000000002p-1022, UNDERFLOW_EXCEPTION),
8485 TEST_fff_f (fma, 0x1.7fffff8p-968, 0x1p-106, 0x0.000001p-1022, 0x0.0000010000001p-1022, UNDERFLOW_EXCEPTION),
8486 TEST_fff_f (fma, 0x1.4000004p-967, 0x1p-106, 0x0.000001p-1022, 0x0.0000010000003p-1022, UNDERFLOW_EXCEPTION),
8487 TEST_fff_f (fma, 0x1.4p-967, -0x1p-106, -0x0.000001p-1022, -0x0.0000010000002p-1022, UNDERFLOW_EXCEPTION),
8488 TEST_fff_f (fma, -0x1.19cab66d73e17p-959, 0x1.c7108a8c5ff51p-107, -0x0.80b0ad65d9b64p-1022, -0x0.80b0ad65d9d59p-1022, UNDERFLOW_EXCEPTION),
8489 TEST_fff_f (fma, -0x1.d2eaed6e8e9d3p-979, -0x1.4e066c62ac9ddp-63, -0x0.9245e6b003454p-1022, -0x0.9245c09c5fb5dp-1022, UNDERFLOW_EXCEPTION),
8490 TEST_fff_f (fma, 0x1.153d650bb9f06p-907, 0x1.2d01230d48407p-125, -0x0.b278d5acfc3cp-1022, -0x0.b22757123bbe9p-1022, UNDERFLOW_EXCEPTION),
8491 TEST_fff_f (fma, -0x1.fffffffffffffp-711, 0x1.fffffffffffffp-275, 0x1.fffffe00007ffp-983, 0x1.7ffffe00007ffp-983),
8492 TEST_fff_f (fma, 0x1.4p-1022, 0x1.0000000000002p-1, 0x1p-1024, 0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8493 TEST_fff_f (fma, -0x1.4p-1022, 0x1.0000000000002p-1, -0x1p-1024, -0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8494 TEST_fff_f (fma, 0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, 0x1p-1074, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8495 TEST_fff_f (fma, -0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, -0x1p-1074, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8496 TEST_fff_f (fma, 0x1p-1074, 0x1p-1, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION),
8497 TEST_fff_f (fma, -0x1p-1074, 0x1p-1, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION),
8498 TEST_fff_f (fma, 0x1p-1074, 0x1.1p-1, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION),
8499 TEST_fff_f (fma, -0x1p-1074, 0x1.1p-1, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION),
8500 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p1023, 0x1p1023),
8501 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p1023, 0x1p1023),
8502 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p1023, -0x1p1023),
8503 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p1023, -0x1p1023),
8504 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1022, 0x1p-1022),
8505 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1022, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8506 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1022, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8507 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1022, -0x1p-1022),
8508 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8509 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8510 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8511 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8512 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
8513 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
8514 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
8515 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
8516 TEST_fff_f (fma, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8517 TEST_fff_f (fma, 0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8518 TEST_fff_f (fma, -0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8519 TEST_fff_f (fma, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8520 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
8521 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
8522 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
8523 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
8524 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p970, 0x1p970),
8525 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p970, 0x1p970),
8526 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p970, -0x1p970),
8527 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p970, -0x1p970),
3e692e05
JJ		 8528#endif
8529#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 64
4f184d30
JM		 8530 TEST_fff_f (fma, -0x8.03fcp+3696L, 0xf.fffffffffffffffp-6140L, 0x8.3ffffffffffffffp-2450L, -0x8.01ecp-2440L),
8531 TEST_fff_f (fma, 0x9.fcp+2033L, -0x8.000e1f000ff800fp-3613L, -0xf.fffffffffffc0ffp-1579L, -0xd.fc119fb093ed092p-1577L),
8532 TEST_fff_f (fma, 0xc.7fc000003ffffffp-1194L, 0x8.1e0003fffffffffp+15327L, -0x8.fffep+14072L, 0xc.ae9f164020effffp+14136L),
8533 TEST_fff_f (fma, -0x8.0001fc000000003p+1798L, 0xcp-2230L, 0x8.f7e000000000007p-468L, -0xc.0002f9ffee10404p-429L),
8534 TEST_fff_f (fma, 0xc.0000000000007ffp+10130L, -0x8.000000000000001p+4430L, 0xc.07000000001ffffp+14513L, -0xb.fffffffffffd7e4p+14563L),
8535 TEST_fff_f (fma, 0xb.ffffp-4777L, 0x8.000000fffffffffp-11612L, -0x0.3800fff8p-16385L, 0x5.c7fe80c7ffeffffp-16385L, UNDERFLOW_EXCEPTION),
8536 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000004p-1L, 0x1p-16384L, 0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8537 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000004p-1L, -0x1p-16384L, -0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8538 TEST_fff_f (fma, 0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, 0x1p-16445L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8539 TEST_fff_f (fma, -0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, -0x1p-16445L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8540 TEST_fff_f (fma, 0x1p-16445L, 0x1p-1L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
8541 TEST_fff_f (fma, -0x1p-16445L, 0x1p-1L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8542 TEST_fff_f (fma, 0x1p-16445L, 0x1.1p-1L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
8543 TEST_fff_f (fma, -0x1p-16445L, 0x1.1p-1L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8544 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p16383L, 0x1p16383L),
8545 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p16383L, 0x1p16383L),
8546 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p16383L, -0x1p16383L),
8547 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p16383L, -0x1p16383L),
8548 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16382L, 0x1p-16382L),
8549 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8550 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8551 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16382L, -0x1p-16382L),
8552 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8553 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8554 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8555 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8556 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
8557 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
8558 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
8559 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
8560 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
8561 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
8562 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
8563 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
8564 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
8565 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
8566 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
8567 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
8568 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
8569 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
8570 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
8571 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
9ff8d36f 8572#endif
7c08a05c 8573#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 113
4f184d30
JM		 8574 TEST_fff_f (fma, 0x1.bb2de33e02ccbbfa6e245a7c1f71p-2584L, -0x1.6b500daf0580d987f1bc0cadfcddp-13777L, 0x1.613cd91d9fed34b33820e5ab9d8dp-16378L, -0x1.3a79fb50eb9ce887cffa0f09bd9fp-16360L),
8575 TEST_fff_f (fma, -0x1.f949b880cacb0f0c61540105321dp-5954L, -0x1.3876cec84b4140f3bd6198731b7ep-10525L, -0x0.a5dc1c6cfbc498c54fb0b504bf19p-16382L, -0x0.a5dc1c6cfbc498c54fb0b5038abbp-16382L, UNDERFLOW_EXCEPTION),
8576 TEST_fff_f (fma, -0x1.0000fffffffffp-16221L, 0x1.0000001fffff8007fep-239L, 0x0.ff87ffffffffffffe000003fffffp-16382L, 0x0.ff87ffffffffffffdffc003bff7fp-16382L, UNDERFLOW_EXCEPTION),
8577 TEST_fff_f (fma, -0x1.ac79c9376ef447f3827c9e9de008p-2228L, -0x1.5ba830022b6139e21fbe7270cad8p-6314L, 0x1.e8282b6a26bb6a9daf5c8e73e9f9p-8616L, 0x1.22f14a0253878a730cd1aee373adp-8541L),
8578 TEST_fff_f (fma, -0x1.c69749ec574caaa2ab8e97ddb9f3p+2652L, 0x1.f34235ff9d095449c29b4831b62dp+3311L, 0x1.fbe4302df23354dbd0c4d3cfe606p+5879L, -0x1.bb473bfdfb7a6e18886ce6e57eafp+5964L),
8579 TEST_fff_f (fma, -0x1.ca8835fc6ecfb5398625fc891be5p-1686L, 0x1.621e1972bbe2180e5be9dd7d8df5p-7671L, -0x1.7d2d21b73b52cf20dec2a83902a4p-9395L, -0x1.3d2322191c9c88bc68a62ab8042cp-9356L),
8580 TEST_fff_f (fma, -0x1.55cff679ec49c2541fab41fc843ep-11819L, 0x1.e60e9f464f9e8df0509647c7c971p+12325L, 0x1.eaa2a7649d765c2f564f7a5beca7p+454L, -0x1.447e29fa7e406a285f4e350fcf86p+507L),
8581 TEST_fff_f (fma, 0x1.f0e7b1454908576f2537d863cf9bp+11432L, 0x1.cdce52f09d4ca76e68706f34b5d5p-1417L, -0x1.2e986187c70f146235ea2066e486p+9979L, 0x1.c030dad3cc5643f3dd0f5619f661p+10016L),
8582 TEST_fff_f (fma, 0x1.f102f7da4a57a3a4aab620e29452p-3098L, -0x1.cc06a4ff40248f9e2dcc4b6afd84p-11727L, 0x1.d512a11126b5ac8ed8973b8580c8p-14849L, -0x1.be8f1cf737ab4d1c31c54f5ec23bp-14824L),
8583 TEST_fff_f (fma, -0x1.fc47ac7434b993cd8dcb2b431f25p-3816L, 0x1.fbc9750da8468852d84558e1db6dp-5773L, -0x1.00a98abf783f75c40fe5b7a37d86p-9607L, -0x1.f81917b166f45e763cfcc057e2adp-9588L),
8584 TEST_fff_f (fma, 0x1.00000000000007ffffffffffffffp-9045L, -0x1.ffffffffffff80000001ffffffffp+4773L, -0x1.f8p-4316L, -0x1.00000000000f88000000fffffdffp-4271L),
8585 TEST_fff_f (fma, 0x1.4e922764c90701d4a2f21d01893dp-8683L, -0x1.955a12e2d7c9447c27fa022fc865p+212L, -0x1.e9634462eaef96528b90b6944578p-8521L, -0x1.08e1783184a371943d3598e10865p-8470L),
8586 TEST_fff_f (fma, 0x1.801181509c03bdbef10d6165588cp-15131L, 0x1.ad86f8e57d3d40bfa8007780af63p-368L, -0x1.6e9df0dab1c9f1d7a6043c390741p-15507L, 0x1.417c9b2b15e2ad57dc9e0e920844p-15498L),
8587 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, 0x1p-16384L, 0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
8588 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, -0x1p-16384L, -0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
8589 TEST_fff_f (fma, 0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, 0x1p-16494L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8590 TEST_fff_f (fma, -0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, -0x1p-16494L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8591 TEST_fff_f (fma, 0x1p-16494L, 0x1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
8592 TEST_fff_f (fma, -0x1p-16494L, 0x1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8593 TEST_fff_f (fma, 0x1p-16494L, 0x1.1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
8594 TEST_fff_f (fma, -0x1p-16494L, 0x1.1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8595 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p16383L, 0x1p16383L),
8596 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p16383L, 0x1p16383L),
8597 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p16383L, -0x1p16383L),
8598 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p16383L, -0x1p16383L),
8599 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16382L, 0x1p-16382L),
8600 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8601 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8602 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16382L, -0x1p-16382L),
8603 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8604 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8605 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8606 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8607 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
8608 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
8609 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
8610 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
8611 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
8612 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
8613 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
8614 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
8615 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
8616 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
8617 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
8618 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
8619 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
8620 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
8621 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
8622 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
8623#endif
8624 END_DATA (fma)
8625 };
8847214f 8626
8ec5b013 8627static void
4f184d30 8628fma_test (void)
8ec5b013 8629{
4f184d30
JM		 8630 START (fma);
8631 RUN_TEST_LOOP_fff_f (fma, fma_test_data, );
8632 END (fma);
8633}
8ec5b013 8634
8ec5b013 8635
4f184d30
JM		 8636static const struct test_fff_f_data fma_towardzero_test_data[] =
8637 {
8638 START_DATA (fma_towardzero),
8639 TEST_fff_f (fma, plus_zero, plus_zero, plus_zero, plus_zero),
8640 TEST_fff_f (fma, plus_zero, plus_zero, minus_zero, plus_zero),
8641 TEST_fff_f (fma, plus_zero, minus_zero, plus_zero, plus_zero),
8642 TEST_fff_f (fma, plus_zero, minus_zero, minus_zero, minus_zero),
8643 TEST_fff_f (fma, minus_zero, plus_zero, plus_zero, plus_zero),
8644 TEST_fff_f (fma, minus_zero, plus_zero, minus_zero, minus_zero),
8645 TEST_fff_f (fma, minus_zero, minus_zero, plus_zero, plus_zero),
8646 TEST_fff_f (fma, minus_zero, minus_zero, minus_zero, plus_zero),
8647 TEST_fff_f (fma, 1.0, plus_zero, plus_zero, plus_zero),
8648 TEST_fff_f (fma, 1.0, plus_zero, minus_zero, plus_zero),
8649 TEST_fff_f (fma, 1.0, minus_zero, plus_zero, plus_zero),
8650 TEST_fff_f (fma, 1.0, minus_zero, minus_zero, minus_zero),
8651 TEST_fff_f (fma, -1.0, plus_zero, plus_zero, plus_zero),
8652 TEST_fff_f (fma, -1.0, plus_zero, minus_zero, minus_zero),
8653 TEST_fff_f (fma, -1.0, minus_zero, plus_zero, plus_zero),
8654 TEST_fff_f (fma, -1.0, minus_zero, minus_zero, plus_zero),
8655 TEST_fff_f (fma, plus_zero, 1.0, plus_zero, plus_zero),
8656 TEST_fff_f (fma, plus_zero, 1.0, minus_zero, plus_zero),
8657 TEST_fff_f (fma, plus_zero, -1.0, plus_zero, plus_zero),
8658 TEST_fff_f (fma, plus_zero, -1.0, minus_zero, minus_zero),
8659 TEST_fff_f (fma, minus_zero, 1.0, plus_zero, plus_zero),
8660 TEST_fff_f (fma, minus_zero, 1.0, minus_zero, minus_zero),
8661 TEST_fff_f (fma, minus_zero, -1.0, plus_zero, plus_zero),
8662 TEST_fff_f (fma, minus_zero, -1.0, minus_zero, plus_zero),
8663
8664 TEST_fff_f (fma, 1.0, 1.0, -1.0, plus_zero),
8665 TEST_fff_f (fma, 1.0, -1.0, 1.0, plus_zero),
8666 TEST_fff_f (fma, -1.0, 1.0, 1.0, plus_zero),
8667 TEST_fff_f (fma, -1.0, -1.0, -1.0, plus_zero),
8668
8669 TEST_fff_f (fma, min_value, min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8670 TEST_fff_f (fma, min_value, min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8671 TEST_fff_f (fma, min_value, -min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8672 TEST_fff_f (fma, min_value, -min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8673 TEST_fff_f (fma, -min_value, min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8674 TEST_fff_f (fma, -min_value, min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8675 TEST_fff_f (fma, -min_value, -min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8676 TEST_fff_f (fma, -min_value, -min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8627a232 8677
7184dcdf 8678#if !(defined TEST_LDOUBLE && LDBL_MANT_DIG == 106) /* Bug 13304. */
4f184d30
JM		 8679 TEST_fff_f (fma, max_value, max_value, min_value, max_value, OVERFLOW_EXCEPTION),
8680 TEST_fff_f (fma, max_value, max_value, -min_value, max_value, OVERFLOW_EXCEPTION),
8681 TEST_fff_f (fma, max_value, -max_value, min_value, -max_value, OVERFLOW_EXCEPTION),
8682 TEST_fff_f (fma, max_value, -max_value, -min_value, -max_value, OVERFLOW_EXCEPTION),
8683 TEST_fff_f (fma, -max_value, max_value, min_value, -max_value, OVERFLOW_EXCEPTION),
8684 TEST_fff_f (fma, -max_value, max_value, -min_value, -max_value, OVERFLOW_EXCEPTION),
8685 TEST_fff_f (fma, -max_value, -max_value, min_value, max_value, OVERFLOW_EXCEPTION),
8686 TEST_fff_f (fma, -max_value, -max_value, -min_value, max_value, OVERFLOW_EXCEPTION),
7184dcdf 8687#endif
a0c2940d 8688
8627a232 8689#if defined (TEST_FLOAT) && FLT_MANT_DIG == 24
4f184d30
JM		 8690 TEST_fff_f (fma, 0x1.4p-126, 0x1.000004p-1, 0x1p-128, 0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8691 TEST_fff_f (fma, -0x1.4p-126, 0x1.000004p-1, -0x1p-128, -0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8692 TEST_fff_f (fma, 0x1.fffff8p-126, 0x1.000002p-1, 0x1p-149, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8693 TEST_fff_f (fma, -0x1.fffff8p-126, 0x1.000002p-1, -0x1p-149, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8694 TEST_fff_f (fma, 0x1p-149, 0x1p-1, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8695 TEST_fff_f (fma, -0x1p-149, 0x1p-1, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8696 TEST_fff_f (fma, 0x1p-149, 0x1.1p-1, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8697 TEST_fff_f (fma, -0x1p-149, 0x1.1p-1, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8698 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p127, 0x1p127),
8699 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p127, 0x0.ffffffp127),
8700 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p127, -0x0.ffffffp127),
8701 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p127, -0x1p127),
8702 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-126, 0x1p-126),
8703 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8704 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8705 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-126, -0x1p-126),
8706 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8707 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x0.fffffep-126, 0x0.fffffcp-126, UNDERFLOW_EXCEPTION),
8708 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x0.fffffep-126, -0x0.fffffcp-126, UNDERFLOW_EXCEPTION),
8709 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8710 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
8711 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-149, plus_zero, UNDERFLOW_EXCEPTION),
8712 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-149, minus_zero, UNDERFLOW_EXCEPTION),
8713 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
8714 TEST_fff_f (fma, 0x0.fffp0, 0x0.fffp0, -0x0.ffep0, 0x1p-24),
8715 TEST_fff_f (fma, 0x0.fffp0, -0x0.fffp0, 0x0.ffep0, -0x1p-24),
8716 TEST_fff_f (fma, -0x0.fffp0, 0x0.fffp0, 0x0.ffep0, -0x1p-24),
8717 TEST_fff_f (fma, -0x0.fffp0, -0x0.fffp0, -0x0.ffep0, 0x1p-24),
8718 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p127, 0x1p127),
8719 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p127, 0x0.ffffffp127),
8720 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p127, -0x0.ffffffp127),
8721 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p127, -0x1p127),
8722 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p103, 0x1p103),
8723 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p103, 0x0.ffffffp103),
8724 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p103, -0x0.ffffffp103),
8725 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p103, -0x1p103),
8627a232
JM		 8726#endif
8727#if defined (TEST_DOUBLE) && DBL_MANT_DIG == 53
4f184d30
JM		 8728 TEST_fff_f (fma, 0x1.4p-1022, 0x1.0000000000002p-1, 0x1p-1024, 0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8729 TEST_fff_f (fma, -0x1.4p-1022, 0x1.0000000000002p-1, -0x1p-1024, -0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8730 TEST_fff_f (fma, 0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, 0x1p-1074, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8731 TEST_fff_f (fma, -0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, -0x1p-1074, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8732 TEST_fff_f (fma, 0x1p-1074, 0x1p-1, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8733 TEST_fff_f (fma, -0x1p-1074, 0x1p-1, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8734 TEST_fff_f (fma, 0x1p-1074, 0x1.1p-1, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8735 TEST_fff_f (fma, -0x1p-1074, 0x1.1p-1, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8736 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p1023, 0x1p1023),
8737 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p1023, 0x0.fffffffffffff8p1023),
8738 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p1023, -0x0.fffffffffffff8p1023),
8739 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p1023, -0x1p1023),
8740 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1022, 0x1p-1022),
8741 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8742 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8743 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1022, -0x1p-1022),
8744 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8745 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.ffffffffffffep-1022, UNDERFLOW_EXCEPTION),
8746 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.ffffffffffffep-1022, UNDERFLOW_EXCEPTION),
8747 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8748 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
8749 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1074, plus_zero, UNDERFLOW_EXCEPTION),
8750 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1074, minus_zero, UNDERFLOW_EXCEPTION),
8751 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
8752 TEST_fff_f (fma, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8753 TEST_fff_f (fma, 0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8754 TEST_fff_f (fma, -0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8755 TEST_fff_f (fma, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8756 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
8757 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p1023, 0x0.fffffffffffff8p1023),
8758 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p1023, -0x0.fffffffffffff8p1023),
8759 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
8760 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p970, 0x1p970),
8761 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p970, 0x0.fffffffffffff8p970),
8762 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p970, -0x0.fffffffffffff8p970),
8763 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p970, -0x1p970),
8627a232
JM		 8764#endif
8765#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 64
4f184d30
JM		 8766 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000004p-1L, 0x1p-16384L, 0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8767 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000004p-1L, -0x1p-16384L, -0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8768 TEST_fff_f (fma, 0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8769 TEST_fff_f (fma, -0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8770 TEST_fff_f (fma, 0x1p-16445L, 0x1p-1L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8771 TEST_fff_f (fma, -0x1p-16445L, 0x1p-1L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8772 TEST_fff_f (fma, 0x1p-16445L, 0x1.1p-1L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8773 TEST_fff_f (fma, -0x1p-16445L, 0x1.1p-1L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8774 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p16383L, 0x1p16383L),
8775 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p16383L, 0x0.ffffffffffffffffp16383L),
8776 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p16383L, -0x0.ffffffffffffffffp16383L),
8777 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p16383L, -0x1p16383L),
8778 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16382L, 0x1p-16382L),
8779 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8780 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8781 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16382L, -0x1p-16382L),
8782 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8783 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffcp-16382L, UNDERFLOW_EXCEPTION),
8784 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffcp-16382L, UNDERFLOW_EXCEPTION),
8785 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8786 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
8787 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16445L, plus_zero, UNDERFLOW_EXCEPTION),
8788 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16445L, minus_zero, UNDERFLOW_EXCEPTION),
8789 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
8790 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
8791 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
8792 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
8793 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
8794 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
8795 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16383L, 0x0.ffffffffffffffffp16383L),
8796 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16383L, -0x0.ffffffffffffffffp16383L),
8797 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
8798 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
8799 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16319L, 0x0.ffffffffffffffffp16319L),
8800 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16319L, -0x0.ffffffffffffffffp16319L),
8801 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
8627a232
JM		 8802#endif
8803#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 113
4f184d30
JM		 8804 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, 0x1p-16384L, 0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
8805 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, -0x1p-16384L, -0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
8806 TEST_fff_f (fma, 0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8807 TEST_fff_f (fma, -0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8808 TEST_fff_f (fma, 0x1p-16494L, 0x1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8809 TEST_fff_f (fma, -0x1p-16494L, 0x1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8810 TEST_fff_f (fma, 0x1p-16494L, 0x1.1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8811 TEST_fff_f (fma, -0x1p-16494L, 0x1.1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8812 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p16383L, 0x1p16383L),
8813 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p16383L, 0x0.ffffffffffffffffffffffffffff8p16383L),
8814 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p16383L, -0x0.ffffffffffffffffffffffffffff8p16383L),
8815 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p16383L, -0x1p16383L),
8816 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16382L, 0x1p-16382L),
8817 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8818 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8819 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16382L, -0x1p-16382L),
8820 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8821 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.fffffffffffffffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8822 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.fffffffffffffffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8823 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8824 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
8825 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16494L, plus_zero, UNDERFLOW_EXCEPTION),
8826 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16494L, minus_zero, UNDERFLOW_EXCEPTION),
8827 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
8828 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
8829 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
8830 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
8831 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
8832 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
8833 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x0.ffffffffffffffffffffffffffff8p16383L),
8834 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x0.ffffffffffffffffffffffffffff8p16383L),
8835 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
8836 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
8837 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x0.ffffffffffffffffffffffffffff8p16319L),
8838 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x0.ffffffffffffffffffffffffffff8p16319L),
8839 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
8840#endif
8841 END_DATA (fma_towardzero)
8842 };
8ec5b013
JM		 8843
8844static void
4f184d30 8845fma_test_towardzero (void)
8ec5b013 8846{
4f184d30
JM		 8847 START (fma_towardzero);
8848 RUN_TEST_LOOP_fff_f (fma, fma_towardzero_test_data, FE_TOWARDZERO);
8849 END (fma_towardzero);
8850}
8ec5b013 8851
8ec5b013 8852
4f184d30
JM		 8853static const struct test_fff_f_data fma_downward_test_data[] =
8854 {
8855 START_DATA (fma_downward),
8856 TEST_fff_f (fma, plus_zero, plus_zero, plus_zero, plus_zero),
8857 TEST_fff_f (fma, plus_zero, plus_zero, minus_zero, minus_zero),
8858 TEST_fff_f (fma, plus_zero, minus_zero, plus_zero, minus_zero),
8859 TEST_fff_f (fma, plus_zero, minus_zero, minus_zero, minus_zero),
8860 TEST_fff_f (fma, minus_zero, plus_zero, plus_zero, minus_zero),
8861 TEST_fff_f (fma, minus_zero, plus_zero, minus_zero, minus_zero),
8862 TEST_fff_f (fma, minus_zero, minus_zero, plus_zero, plus_zero),
8863 TEST_fff_f (fma, minus_zero, minus_zero, minus_zero, minus_zero),
8864 TEST_fff_f (fma, 1.0, plus_zero, plus_zero, plus_zero),
8865 TEST_fff_f (fma, 1.0, plus_zero, minus_zero, minus_zero),
8866 TEST_fff_f (fma, 1.0, minus_zero, plus_zero, minus_zero),
8867 TEST_fff_f (fma, 1.0, minus_zero, minus_zero, minus_zero),
8868 TEST_fff_f (fma, -1.0, plus_zero, plus_zero, minus_zero),
8869 TEST_fff_f (fma, -1.0, plus_zero, minus_zero, minus_zero),
8870 TEST_fff_f (fma, -1.0, minus_zero, plus_zero, plus_zero),
8871 TEST_fff_f (fma, -1.0, minus_zero, minus_zero, minus_zero),
8872 TEST_fff_f (fma, plus_zero, 1.0, plus_zero, plus_zero),
8873 TEST_fff_f (fma, plus_zero, 1.0, minus_zero, minus_zero),
8874 TEST_fff_f (fma, plus_zero, -1.0, plus_zero, minus_zero),
8875 TEST_fff_f (fma, plus_zero, -1.0, minus_zero, minus_zero),
8876 TEST_fff_f (fma, minus_zero, 1.0, plus_zero, minus_zero),
8877 TEST_fff_f (fma, minus_zero, 1.0, minus_zero, minus_zero),
8878 TEST_fff_f (fma, minus_zero, -1.0, plus_zero, plus_zero),
8879 TEST_fff_f (fma, minus_zero, -1.0, minus_zero, minus_zero),
8880
8881 TEST_fff_f (fma, 1.0, 1.0, -1.0, minus_zero),
8882 TEST_fff_f (fma, 1.0, -1.0, 1.0, minus_zero),
8883 TEST_fff_f (fma, -1.0, 1.0, 1.0, minus_zero),
8884 TEST_fff_f (fma, -1.0, -1.0, -1.0, minus_zero),
8885
8886 TEST_fff_f (fma, min_value, min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8887 TEST_fff_f (fma, min_value, min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8888 TEST_fff_f (fma, min_value, -min_value, plus_zero, -min_subnorm_value, UNDERFLOW_EXCEPTION),
8889 TEST_fff_f (fma, min_value, -min_value, minus_zero, -min_subnorm_value, UNDERFLOW_EXCEPTION),
8890 TEST_fff_f (fma, -min_value, min_value, plus_zero, -min_subnorm_value, UNDERFLOW_EXCEPTION),
8891 TEST_fff_f (fma, -min_value, min_value, minus_zero, -min_subnorm_value, UNDERFLOW_EXCEPTION),
8892 TEST_fff_f (fma, -min_value, -min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8893 TEST_fff_f (fma, -min_value, -min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8627a232 8894
7184dcdf 8895#if !(defined TEST_LDOUBLE && LDBL_MANT_DIG == 106) /* Bug 13304. */
4f184d30
JM		 8896 TEST_fff_f (fma, max_value, max_value, min_value, max_value, OVERFLOW_EXCEPTION),
8897 TEST_fff_f (fma, max_value, max_value, -min_value, max_value, OVERFLOW_EXCEPTION),
8898 TEST_fff_f (fma, max_value, -max_value, min_value, minus_infty, OVERFLOW_EXCEPTION),
8899 TEST_fff_f (fma, max_value, -max_value, -min_value, minus_infty, OVERFLOW_EXCEPTION),
8900 TEST_fff_f (fma, -max_value, max_value, min_value, minus_infty, OVERFLOW_EXCEPTION),
8901 TEST_fff_f (fma, -max_value, max_value, -min_value, minus_infty, OVERFLOW_EXCEPTION),
8902 TEST_fff_f (fma, -max_value, -max_value, min_value, max_value, OVERFLOW_EXCEPTION),
8903 TEST_fff_f (fma, -max_value, -max_value, -min_value, max_value, OVERFLOW_EXCEPTION),
7184dcdf 8904#endif
a0c2940d 8905
8627a232 8906#if defined (TEST_FLOAT) && FLT_MANT_DIG == 24
4f184d30
JM		 8907 TEST_fff_f (fma, 0x1.4p-126, 0x1.000004p-1, 0x1p-128, 0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8908 TEST_fff_f (fma, -0x1.4p-126, 0x1.000004p-1, -0x1p-128, -0x1.c00008p-127, UNDERFLOW_EXCEPTION),
8909 TEST_fff_f (fma, 0x1.fffff8p-126, 0x1.000002p-1, 0x1p-149, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8910 TEST_fff_f (fma, -0x1.fffff8p-126, 0x1.000002p-1, -0x1p-149, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8911 TEST_fff_f (fma, 0x1p-149, 0x1p-1, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8912 TEST_fff_f (fma, -0x1p-149, 0x1p-1, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION),
8913 TEST_fff_f (fma, 0x1p-149, 0x1.1p-1, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8914 TEST_fff_f (fma, -0x1p-149, 0x1.1p-1, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8915 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p127, 0x1p127),
8916 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p127, 0x0.ffffffp127),
8917 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p127, -0x1p127),
8918 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p127, -0x1.000002p127),
8919 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-126, 0x1p-126),
8920 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8921 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-126, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8922 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-126, -0x1.000002p-126),
8923 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8924 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x0.fffffep-126, 0x0.fffffcp-126, UNDERFLOW_EXCEPTION),
8925 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8926 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION),
8927 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
8928 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-149, plus_zero, UNDERFLOW_EXCEPTION),
8929 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
8930 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-149, -0x1p-148, UNDERFLOW_EXCEPTION),
8931 TEST_fff_f (fma, 0x0.fffp0, 0x0.fffp0, -0x0.ffep0, 0x1p-24),
8932 TEST_fff_f (fma, 0x0.fffp0, -0x0.fffp0, 0x0.ffep0, -0x1p-24),
8933 TEST_fff_f (fma, -0x0.fffp0, 0x0.fffp0, 0x0.ffep0, -0x1p-24),
8934 TEST_fff_f (fma, -0x0.fffp0, -0x0.fffp0, -0x0.ffep0, 0x1p-24),
8935 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p127, 0x1p127),
8936 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p127, 0x0.ffffffp127),
8937 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p127, -0x1p127),
8938 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p127, -0x1.000002p127),
8939 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p103, 0x1p103),
8940 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p103, 0x0.ffffffp103),
8941 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p103, -0x1p103),
8942 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p103, -0x1.000002p103),
8627a232
JM		 8943#endif
8944#if defined (TEST_DOUBLE) && DBL_MANT_DIG == 53
4f184d30
JM		 8945 TEST_fff_f (fma, 0x1.4p-1022, 0x1.0000000000002p-1, 0x1p-1024, 0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8946 TEST_fff_f (fma, -0x1.4p-1022, 0x1.0000000000002p-1, -0x1p-1024, -0x1.c000000000004p-1023, UNDERFLOW_EXCEPTION),
8947 TEST_fff_f (fma, 0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, 0x1p-1074, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8948 TEST_fff_f (fma, -0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, -0x1p-1074, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8949 TEST_fff_f (fma, 0x1p-1074, 0x1p-1, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8950 TEST_fff_f (fma, -0x1p-1074, 0x1p-1, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION),
8951 TEST_fff_f (fma, 0x1p-1074, 0x1.1p-1, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8952 TEST_fff_f (fma, -0x1p-1074, 0x1.1p-1, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8953 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p1023, 0x1p1023),
8954 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p1023, 0x0.fffffffffffff8p1023),
8955 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p1023, -0x1p1023),
8956 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p1023, -0x1.0000000000001p1023),
8957 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1022, 0x1p-1022),
8958 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8959 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1022, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8960 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1022, -0x1.0000000000001p-1022),
8961 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8962 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.ffffffffffffep-1022, UNDERFLOW_EXCEPTION),
8963 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8964 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION),
8965 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
8966 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1074, plus_zero, UNDERFLOW_EXCEPTION),
8967 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
8968 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1074, -0x1p-1073, UNDERFLOW_EXCEPTION),
8969 TEST_fff_f (fma, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8970 TEST_fff_f (fma, 0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8971 TEST_fff_f (fma, -0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8972 TEST_fff_f (fma, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8973 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
8974 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p1023, 0x0.fffffffffffff8p1023),
8975 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
8976 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p1023, -0x1.0000000000001p1023),
8977 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p970, 0x1p970),
8978 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p970, 0x0.fffffffffffff8p970),
8979 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p970, -0x1p970),
8980 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p970, -0x1.0000000000001p970),
8627a232
JM		 8981#endif
8982#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 64
4f184d30
JM		 8983 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000004p-1L, 0x1p-16384L, 0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8984 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000004p-1L, -0x1p-16384L, -0x1.c000000000000008p-16383L, UNDERFLOW_EXCEPTION),
8985 TEST_fff_f (fma, 0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8986 TEST_fff_f (fma, -0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, -0x1p-16445L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8987 TEST_fff_f (fma, 0x1p-16445L, 0x1p-1L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8988 TEST_fff_f (fma, -0x1p-16445L, 0x1p-1L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8989 TEST_fff_f (fma, 0x1p-16445L, 0x1.1p-1L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8990 TEST_fff_f (fma, -0x1p-16445L, 0x1.1p-1L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8991 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p16383L, 0x1p16383L),
8992 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p16383L, 0x0.ffffffffffffffffp16383L),
8993 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p16383L, -0x1p16383L),
8994 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p16383L, -0x1.0000000000000002p16383L),
8995 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16382L, 0x1p-16382L),
8996 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8997 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8998 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16382L, -0x1.0000000000000002p-16382L),
8999 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9000 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffcp-16382L, UNDERFLOW_EXCEPTION),
9001 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9002 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
9003 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
9004 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16445L, plus_zero, UNDERFLOW_EXCEPTION),
9005 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
9006 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, -0x1p-16444L, UNDERFLOW_EXCEPTION),
9007 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9008 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
9009 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
9010 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9011 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
9012 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16383L, 0x0.ffffffffffffffffp16383L),
9013 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
9014 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16383L, -0x1.0000000000000002p16383L),
9015 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
9016 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16319L, 0x0.ffffffffffffffffp16319L),
9017 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
9018 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16319L, -0x1.0000000000000002p16319L),
8627a232
JM		 9019#endif
9020#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 113
4f184d30
JM		 9021 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, 0x1p-16384L, 0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
9022 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, -0x1p-16384L, -0x1.c000000000000000000000000004p-16383L, UNDERFLOW_EXCEPTION),
9023 TEST_fff_f (fma, 0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9024 TEST_fff_f (fma, -0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, -0x1p-16494L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9025 TEST_fff_f (fma, 0x1p-16494L, 0x1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9026 TEST_fff_f (fma, -0x1p-16494L, 0x1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
9027 TEST_fff_f (fma, 0x1p-16494L, 0x1.1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9028 TEST_fff_f (fma, -0x1p-16494L, 0x1.1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9029 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p16383L, 0x1p16383L),
9030 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p16383L, 0x0.ffffffffffffffffffffffffffff8p16383L),
9031 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p16383L, -0x1p16383L),
9032 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p16383L, -0x1.0000000000000000000000000001p16383L),
9033 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16382L, 0x1p-16382L),
9034 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9035 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9036 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16382L, -0x1.0000000000000000000000000001p-16382L),
9037 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9038 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.fffffffffffffffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9039 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9040 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
9041 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
9042 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16494L, plus_zero, UNDERFLOW_EXCEPTION),
9043 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
9044 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, -0x1p-16493L, UNDERFLOW_EXCEPTION),
9045 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9046 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9047 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9048 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9049 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
9050 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x0.ffffffffffffffffffffffffffff8p16383L),
9051 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
9052 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1.0000000000000000000000000001p16383L),
9053 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
9054 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x0.ffffffffffffffffffffffffffff8p16319L),
9055 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
9056 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1.0000000000000000000000000001p16319L),
9057#endif
9058 END_DATA (fma_downward)
9059 };
8ec5b013
JM		 9060
9061static void
4f184d30 9062fma_test_downward (void)
8ec5b013 9063{
4f184d30
JM		 9064 START (fma_downward);
9065 RUN_TEST_LOOP_fff_f (fma, fma_downward_test_data, FE_DOWNWARD);
9066 END (fma_downward);
9067}
8ec5b013 9068
8ec5b013 9069
4f184d30
JM		 9070static const struct test_fff_f_data fma_upward_test_data[] =
9071 {
9072 START_DATA (fma_upward),
9073 TEST_fff_f (fma, plus_zero, plus_zero, plus_zero, plus_zero),
9074 TEST_fff_f (fma, plus_zero, plus_zero, minus_zero, plus_zero),
9075 TEST_fff_f (fma, plus_zero, minus_zero, plus_zero, plus_zero),
9076 TEST_fff_f (fma, plus_zero, minus_zero, minus_zero, minus_zero),
9077 TEST_fff_f (fma, minus_zero, plus_zero, plus_zero, plus_zero),
9078 TEST_fff_f (fma, minus_zero, plus_zero, minus_zero, minus_zero),
9079 TEST_fff_f (fma, minus_zero, minus_zero, plus_zero, plus_zero),
9080 TEST_fff_f (fma, minus_zero, minus_zero, minus_zero, plus_zero),
9081 TEST_fff_f (fma, 1.0, plus_zero, plus_zero, plus_zero),
9082 TEST_fff_f (fma, 1.0, plus_zero, minus_zero, plus_zero),
9083 TEST_fff_f (fma, 1.0, minus_zero, plus_zero, plus_zero),
9084 TEST_fff_f (fma, 1.0, minus_zero, minus_zero, minus_zero),
9085 TEST_fff_f (fma, -1.0, plus_zero, plus_zero, plus_zero),
9086 TEST_fff_f (fma, -1.0, plus_zero, minus_zero, minus_zero),
9087 TEST_fff_f (fma, -1.0, minus_zero, plus_zero, plus_zero),
9088 TEST_fff_f (fma, -1.0, minus_zero, minus_zero, plus_zero),
9089 TEST_fff_f (fma, plus_zero, 1.0, plus_zero, plus_zero),
9090 TEST_fff_f (fma, plus_zero, 1.0, minus_zero, plus_zero),
9091 TEST_fff_f (fma, plus_zero, -1.0, plus_zero, plus_zero),
9092 TEST_fff_f (fma, plus_zero, -1.0, minus_zero, minus_zero),
9093 TEST_fff_f (fma, minus_zero, 1.0, plus_zero, plus_zero),
9094 TEST_fff_f (fma, minus_zero, 1.0, minus_zero, minus_zero),
9095 TEST_fff_f (fma, minus_zero, -1.0, plus_zero, plus_zero),
9096 TEST_fff_f (fma, minus_zero, -1.0, minus_zero, plus_zero),
9097
9098 TEST_fff_f (fma, 1.0, 1.0, -1.0, plus_zero),
9099 TEST_fff_f (fma, 1.0, -1.0, 1.0, plus_zero),
9100 TEST_fff_f (fma, -1.0, 1.0, 1.0, plus_zero),
9101 TEST_fff_f (fma, -1.0, -1.0, -1.0, plus_zero),
9102
9103 TEST_fff_f (fma, min_value, min_value, plus_zero, min_subnorm_value, UNDERFLOW_EXCEPTION),
9104 TEST_fff_f (fma, min_value, min_value, minus_zero, min_subnorm_value, UNDERFLOW_EXCEPTION),
9105 TEST_fff_f (fma, min_value, -min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
9106 TEST_fff_f (fma, min_value, -min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
9107 TEST_fff_f (fma, -min_value, min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
9108 TEST_fff_f (fma, -min_value, min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
9109 TEST_fff_f (fma, -min_value, -min_value, plus_zero, min_subnorm_value, UNDERFLOW_EXCEPTION),
9110 TEST_fff_f (fma, -min_value, -min_value, minus_zero, min_subnorm_value, UNDERFLOW_EXCEPTION),
8627a232 9111
7184dcdf 9112#if !(defined TEST_LDOUBLE && LDBL_MANT_DIG == 106) /* Bug 13304. */
4f184d30
JM		 9113 TEST_fff_f (fma, max_value, max_value, min_value, plus_infty, OVERFLOW_EXCEPTION),
9114 TEST_fff_f (fma, max_value, max_value, -min_value, plus_infty, OVERFLOW_EXCEPTION),
9115 TEST_fff_f (fma, max_value, -max_value, min_value, -max_value, OVERFLOW_EXCEPTION),
9116 TEST_fff_f (fma, max_value, -max_value, -min_value, -max_value, OVERFLOW_EXCEPTION),
9117 TEST_fff_f (fma, -max_value, max_value, min_value, -max_value, OVERFLOW_EXCEPTION),
9118 TEST_fff_f (fma, -max_value, max_value, -min_value, -max_value, OVERFLOW_EXCEPTION),
9119 TEST_fff_f (fma, -max_value, -max_value, min_value, plus_infty, OVERFLOW_EXCEPTION),
9120 TEST_fff_f (fma, -max_value, -max_value, -min_value, plus_infty, OVERFLOW_EXCEPTION),
7184dcdf 9121#endif
a0c2940d 9122
8627a232 9123#if defined (TEST_FLOAT) && FLT_MANT_DIG == 24
4f184d30
JM		 9124 TEST_fff_f (fma, 0x1.4p-126, 0x1.000004p-1, 0x1p-128, 0x1.c00008p-127, UNDERFLOW_EXCEPTION),
9125 TEST_fff_f (fma, -0x1.4p-126, 0x1.000004p-1, -0x1p-128, -0x1.c00004p-127, UNDERFLOW_EXCEPTION),
9126 TEST_fff_f (fma, 0x1.fffff8p-126, 0x1.000002p-1, 0x1p-149, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9127 TEST_fff_f (fma, -0x1.fffff8p-126, 0x1.000002p-1, -0x1p-149, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9128 TEST_fff_f (fma, 0x1p-149, 0x1p-1, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION),
9129 TEST_fff_f (fma, -0x1p-149, 0x1p-1, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9130 TEST_fff_f (fma, 0x1p-149, 0x1.1p-1, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9131 TEST_fff_f (fma, -0x1p-149, 0x1.1p-1, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9132 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p127, 0x1.000002p127),
9133 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p127, 0x1p127),
9134 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p127, -0x0.ffffffp127),
9135 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p127, -0x1p127),
9136 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-126, 0x1.000002p-126),
9137 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-126, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9138 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9139 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-126, -0x1p-126),
9140 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION),
9141 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9142 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x0.fffffep-126, -0x0.fffffcp-126, UNDERFLOW_EXCEPTION),
9143 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9144 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-149, 0x1p-148, UNDERFLOW_EXCEPTION),
9145 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
9146 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-149, minus_zero, UNDERFLOW_EXCEPTION),
9147 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
9148 TEST_fff_f (fma, 0x0.fffp0, 0x0.fffp0, -0x0.ffep0, 0x1p-24),
9149 TEST_fff_f (fma, 0x0.fffp0, -0x0.fffp0, 0x0.ffep0, -0x1p-24),
9150 TEST_fff_f (fma, -0x0.fffp0, 0x0.fffp0, 0x0.ffep0, -0x1p-24),
9151 TEST_fff_f (fma, -0x0.fffp0, -0x0.fffp0, -0x0.ffep0, 0x1p-24),
9152 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p127, 0x1.000002p127),
9153 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p127, 0x1p127),
9154 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p127, -0x0.ffffffp127),
9155 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p127, -0x1p127),
9156 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p103, 0x1.000002p103),
9157 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p103, 0x1p103),
9158 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p103, -0x0.ffffffp103),
9159 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p103, -0x1p103),
8627a232
JM		 9160#endif
9161#if defined (TEST_DOUBLE) && DBL_MANT_DIG == 53
4f184d30
JM		 9162 TEST_fff_f (fma, 0x1.4p-1022, 0x1.0000000000002p-1, 0x1p-1024, 0x1.c000000000004p-1023, UNDERFLOW_EXCEPTION),
9163 TEST_fff_f (fma, -0x1.4p-1022, 0x1.0000000000002p-1, -0x1p-1024, -0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
9164 TEST_fff_f (fma, 0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, 0x1p-1074, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9165 TEST_fff_f (fma, -0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, -0x1p-1074, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9166 TEST_fff_f (fma, 0x1p-1074, 0x1p-1, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION),
9167 TEST_fff_f (fma, -0x1p-1074, 0x1p-1, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9168 TEST_fff_f (fma, 0x1p-1074, 0x1.1p-1, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9169 TEST_fff_f (fma, -0x1p-1074, 0x1.1p-1, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9170 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p1023, 0x1.0000000000001p1023),
9171 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p1023, 0x1p1023),
9172 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p1023, -0x0.fffffffffffff8p1023),
9173 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p1023, -0x1p1023),
9174 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1022, 0x1.0000000000001p-1022),
9175 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1022, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9176 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9177 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1022, -0x1p-1022),
9178 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION),
9179 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9180 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.ffffffffffffep-1022, UNDERFLOW_EXCEPTION),
9181 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9182 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1074, 0x1p-1073, UNDERFLOW_EXCEPTION),
9183 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
9184 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1074, minus_zero, UNDERFLOW_EXCEPTION),
9185 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
9186 TEST_fff_f (fma, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
9187 TEST_fff_f (fma, 0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
9188 TEST_fff_f (fma, -0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
9189 TEST_fff_f (fma, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
9190 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p1023, 0x1.0000000000001p1023),
9191 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
9192 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p1023, -0x0.fffffffffffff8p1023),
9193 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
9194 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p970, 0x1.0000000000001p970),
9195 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p970, 0x1p970),
9196 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p970, -0x0.fffffffffffff8p970),
9197 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p970, -0x1p970),
8627a232
JM		 9198#endif
9199#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 64
4f184d30
JM		 9200 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000004p-1L, 0x1p-16384L, 0x1.c000000000000008p-16383L, UNDERFLOW_EXCEPTION),
9201 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000004p-1L, -0x1p-16384L, -0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
9202 TEST_fff_f (fma, 0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, 0x1p-16445L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9203 TEST_fff_f (fma, -0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9204 TEST_fff_f (fma, 0x1p-16445L, 0x1p-1L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
9205 TEST_fff_f (fma, -0x1p-16445L, 0x1p-1L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9206 TEST_fff_f (fma, 0x1p-16445L, 0x1.1p-1L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9207 TEST_fff_f (fma, -0x1p-16445L, 0x1.1p-1L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9208 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p16383L, 0x1.0000000000000002p16383L),
9209 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p16383L, 0x1p16383L),
9210 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p16383L, -0x0.ffffffffffffffffp16383L),
9211 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p16383L, -0x1p16383L),
9212 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16382L, 0x1.0000000000000002p-16382L),
9213 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9214 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9215 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16382L, -0x1p-16382L),
9216 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
9217 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9218 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffcp-16382L, UNDERFLOW_EXCEPTION),
9219 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9220 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, 0x1p-16444L, UNDERFLOW_EXCEPTION),
9221 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
9222 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16445L, minus_zero, UNDERFLOW_EXCEPTION),
9223 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
9224 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9225 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
9226 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
9227 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9228 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16383L, 0x1.0000000000000002p16383L),
9229 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
9230 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16383L, -0x0.ffffffffffffffffp16383L),
9231 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
9232 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16319L, 0x1.0000000000000002p16319L),
9233 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
9234 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16319L, -0x0.ffffffffffffffffp16319L),
9235 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
8627a232
JM		 9236#endif
9237#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 113
4f184d30
JM		 9238 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, 0x1p-16384L, 0x1.c000000000000000000000000004p-16383L, UNDERFLOW_EXCEPTION),
9239 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, -0x1p-16384L, -0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
9240 TEST_fff_f (fma, 0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, 0x1p-16494L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9241 TEST_fff_f (fma, -0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9242 TEST_fff_f (fma, 0x1p-16494L, 0x1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
9243 TEST_fff_f (fma, -0x1p-16494L, 0x1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9244 TEST_fff_f (fma, 0x1p-16494L, 0x1.1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9245 TEST_fff_f (fma, -0x1p-16494L, 0x1.1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9246 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p16383L, 0x1.0000000000000000000000000001p16383L),
9247 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p16383L, 0x1p16383L),
9248 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p16383L, -0x0.ffffffffffffffffffffffffffff8p16383L),
9249 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p16383L, -0x1p16383L),
9250 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16382L, 0x1.0000000000000000000000000001p-16382L),
9251 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9252 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9253 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16382L, -0x1p-16382L),
9254 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
9255 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9256 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.fffffffffffffffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9257 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9258 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, 0x1p-16493L, UNDERFLOW_EXCEPTION),
9259 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
9260 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16494L, minus_zero, UNDERFLOW_EXCEPTION),
9261 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
9262 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9263 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9264 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9265 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9266 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1.0000000000000000000000000001p16383L),
9267 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
9268 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x0.ffffffffffffffffffffffffffff8p16383L),
9269 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
9270 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1.0000000000000000000000000001p16319L),
9271 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
9272 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x0.ffffffffffffffffffffffffffff8p16319L),
9273 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
9274#endif
9275 END_DATA (fma_upward)
9276 };
8ec5b013 9277
4f184d30
JM		 9278static void
9279fma_test_upward (void)
9280{
9281 START (fma_upward);
9282 RUN_TEST_LOOP_fff_f (fma, fma_upward_test_data, FE_UPWARD);
8ec5b013
JM		 9283 END (fma_upward);
9284}
9285
9286
601a3a5f
JM		 9287static const struct test_ff_f_data fmax_test_data[] =
9288 {
9289 START_DATA (fmax),
9290 TEST_ff_f (fmax, 0, 0, 0),
9291 TEST_ff_f (fmax, minus_zero, minus_zero, minus_zero),
9292 TEST_ff_f (fmax, 9, 0, 9),
9293 TEST_ff_f (fmax, 0, 9, 9),
9294 TEST_ff_f (fmax, -9, 0, 0),
9295 TEST_ff_f (fmax, 0, -9, 0),
9296
9297 TEST_ff_f (fmax, plus_infty, 9, plus_infty),
9298 TEST_ff_f (fmax, 0, plus_infty, plus_infty),
9299 TEST_ff_f (fmax, -9, plus_infty, plus_infty),
9300 TEST_ff_f (fmax, plus_infty, -9, plus_infty),
9301
9302 TEST_ff_f (fmax, minus_infty, 9, 9),
9303 TEST_ff_f (fmax, minus_infty, -9, -9),
9304 TEST_ff_f (fmax, 9, minus_infty, 9),
9305 TEST_ff_f (fmax, -9, minus_infty, -9),
9306
9307 TEST_ff_f (fmax, 0, qnan_value, 0),
9308 TEST_ff_f (fmax, 9, qnan_value, 9),
9309 TEST_ff_f (fmax, -9, qnan_value, -9),
9310 TEST_ff_f (fmax, qnan_value, 0, 0),
9311 TEST_ff_f (fmax, qnan_value, 9, 9),
9312 TEST_ff_f (fmax, qnan_value, -9, -9),
9313 TEST_ff_f (fmax, plus_infty, qnan_value, plus_infty),
9314 TEST_ff_f (fmax, minus_infty, qnan_value, minus_infty),
9315 TEST_ff_f (fmax, qnan_value, plus_infty, plus_infty),
9316 TEST_ff_f (fmax, qnan_value, minus_infty, minus_infty),
9317 TEST_ff_f (fmax, qnan_value, qnan_value, qnan_value),
9318 END_DATA (fmax)
9319 };
9320
8847214f
UD		 9321static void
9322fmax_test (void)
9323{
9324 START (fmax);
601a3a5f 9325 RUN_TEST_LOOP_ff_f (fmax, fmax_test_data, );
8847214f
UD		 9326 END (fmax);
9327}
9328
9329
601a3a5f
JM		 9330static const struct test_ff_f_data fmin_test_data[] =
9331 {
9332 START_DATA (fmin),
9333 TEST_ff_f (fmin, 0, 0, 0),
9334 TEST_ff_f (fmin, minus_zero, minus_zero, minus_zero),
9335 TEST_ff_f (fmin, 9, 0, 0),
9336 TEST_ff_f (fmin, 0, 9, 0),
9337 TEST_ff_f (fmin, -9, 0, -9),
9338 TEST_ff_f (fmin, 0, -9, -9),
9339
9340 TEST_ff_f (fmin, plus_infty, 9, 9),
9341 TEST_ff_f (fmin, 9, plus_infty, 9),
9342 TEST_ff_f (fmin, plus_infty, -9, -9),
9343 TEST_ff_f (fmin, -9, plus_infty, -9),
9344 TEST_ff_f (fmin, minus_infty, 9, minus_infty),
9345 TEST_ff_f (fmin, minus_infty, -9, minus_infty),
9346 TEST_ff_f (fmin, 9, minus_infty, minus_infty),
9347 TEST_ff_f (fmin, -9, minus_infty, minus_infty),
9348
9349 TEST_ff_f (fmin, 0, qnan_value, 0),
9350 TEST_ff_f (fmin, 9, qnan_value, 9),
9351 TEST_ff_f (fmin, -9, qnan_value, -9),
9352 TEST_ff_f (fmin, qnan_value, 0, 0),
9353 TEST_ff_f (fmin, qnan_value, 9, 9),
9354 TEST_ff_f (fmin, qnan_value, -9, -9),
9355 TEST_ff_f (fmin, plus_infty, qnan_value, plus_infty),
9356 TEST_ff_f (fmin, minus_infty, qnan_value, minus_infty),
9357 TEST_ff_f (fmin, qnan_value, plus_infty, plus_infty),
9358 TEST_ff_f (fmin, qnan_value, minus_infty, minus_infty),
9359 TEST_ff_f (fmin, qnan_value, qnan_value, qnan_value),
9360 END_DATA (fmin)
9361 };
9362
8847214f
UD		 9363static void
9364fmin_test (void)
9365{
9366 START (fmin);
601a3a5f 9367 RUN_TEST_LOOP_ff_f (fmin, fmin_test_data, );
8847214f
UD		 9368 END (fmin);
9369}
9370
9371
601a3a5f
JM		 9372static const struct test_ff_f_data fmod_test_data[] =
9373 {
9374 START_DATA (fmod),
9375 /* fmod (+0, y) == +0 for y != 0. */
9376 TEST_ff_f (fmod, 0, 3, 0),
9377
9378 /* fmod (-0, y) == -0 for y != 0. */
9379 TEST_ff_f (fmod, minus_zero, 3, minus_zero),
9380
9381 /* fmod (+inf, y) == qNaN plus invalid exception. */
9382 TEST_ff_f (fmod, plus_infty, 3, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
9383 /* fmod (-inf, y) == qNaN plus invalid exception. */
9384 TEST_ff_f (fmod, minus_infty, 3, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
9385 /* fmod (x, +0) == qNaN plus invalid exception. */
9386 TEST_ff_f (fmod, 3, 0, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
9387 /* fmod (x, -0) == qNaN plus invalid exception. */
9388 TEST_ff_f (fmod, 3, minus_zero, qnan_value, INVALID_EXCEPTION),
9389
9390 /* fmod (x, +inf) == x for x not infinite. */
9391 TEST_ff_f (fmod, 3.0, plus_infty, 3.0),
9392 /* fmod (x, -inf) == x for x not infinite. */
9393 TEST_ff_f (fmod, 3.0, minus_infty, 3.0),
9394
9395 TEST_ff_f (fmod, qnan_value, qnan_value, qnan_value),
9396
9397 TEST_ff_f (fmod, 6.5, 2.25L, 2.0L),
9398 TEST_ff_f (fmod, -6.5, 2.25L, -2.0L),
9399 TEST_ff_f (fmod, 6.5, -2.25L, 2.0L),
9400 TEST_ff_f (fmod, -6.5, -2.25L, -2.0L),
9401
9402 TEST_ff_f (fmod, 0x0.fffffep-126L, 0x1p-149L, plus_zero),
9403#ifndef TEST_FLOAT
9404 TEST_ff_f (fmod, 0x0.fffffffffffffp-1022L, 0x1p-1074L, plus_zero),
9405#endif
9406#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
9407 TEST_ff_f (fmod, 0x0.fffffffffffffffep-16382L, 0x1p-16445L, plus_zero),
9408#endif
9409 END_DATA (fmod)
9410 };
9411
8847214f
UD		 9412static void
9413fmod_test (void)
9414{
aaca11d8 9415 errno = 0;
3c6cad26 9416 FUNC(fmod) (6.5, 2.3L);
aaca11d8
UD		 9417 if (errno == ENOSYS)
9418 /* Function not implemented. */
9419 return;
9420
8847214f 9421 START (fmod);
601a3a5f 9422 RUN_TEST_LOOP_ff_f (fmod, fmod_test_data, );
8847214f
UD		 9423 END (fmod);
9424}
9425
2550dfe9 9426
8847214f
UD		 9427static void
9428fpclassify_test (void)
9429{
9430 START (fpclassify);
9431
67e971f1 9432 TEST_f_i (fpclassify, qnan_value, FP_NAN);
8847214f
UD		 9433 TEST_f_i (fpclassify, plus_infty, FP_INFINITE);
9434 TEST_f_i (fpclassify, minus_infty, FP_INFINITE);
9435 TEST_f_i (fpclassify, plus_zero, FP_ZERO);
9436 TEST_f_i (fpclassify, minus_zero, FP_ZERO);
9437 TEST_f_i (fpclassify, 1000, FP_NORMAL);
ef1bb361 9438 TEST_f_i (fpclassify, min_subnorm_value, FP_SUBNORMAL);
8847214f
UD		 9439
9440 END (fpclassify);
9441}
9442
9443
9444static void
9445frexp_test (void)
9446{
9447 int x;
9448
9449 START (frexp);
9450
9451 TEST_fI_f1 (frexp, plus_infty, plus_infty, IGNORE);
9452 TEST_fI_f1 (frexp, minus_infty, minus_infty, IGNORE);
67e971f1 9453 TEST_fI_f1 (frexp, qnan_value, qnan_value, IGNORE);
8847214f
UD		 9454
9455 TEST_fI_f1 (frexp, 0.0, 0.0, 0.0);
9456 TEST_fI_f1 (frexp, minus_zero, minus_zero, 0.0);
9457
b15cb495
UD		 9458 TEST_fI_f1 (frexp, 12.8L, 0.8L, 4);
9459 TEST_fI_f1 (frexp, -27.34L, -0.854375L, 5);
8847214f
UD		 9460
9461 END (frexp);
9462}
9463
9464
9465static void
9466gamma_test (void)
9467{
9468 errno = 0;
9469 FUNC(gamma) (1);
9470
9471 if (errno == ENOSYS)
9472 /* Function not implemented. */
9473 return;
8847214f
UD		 9474
9475 START (gamma);
9476
5bf96de5
JM		 9477 TEST_f_f1 (gamma, plus_infty, plus_infty, 1);
9478 TEST_f_f1 (gamma, 0, plus_infty, 1, DIVIDE_BY_ZERO_EXCEPTION);
9479 TEST_f_f1 (gamma, -3, plus_infty, IGNORE, DIVIDE_BY_ZERO_EXCEPTION);
9480 TEST_f_f1 (gamma, minus_infty, plus_infty, IGNORE);
9481 TEST_f_f1 (gamma, qnan_value, qnan_value, IGNORE);
8847214f
UD		 9482
9483 TEST_f_f1 (gamma, 1, 0, 1);
9484 TEST_f_f1 (gamma, 3, M_LN2l, 1);
9485
9486 TEST_f_f1 (gamma, 0.5, M_LOG_SQRT_PIl, 1);
f30e0cd3 9487 TEST_f_f1 (gamma, -0.5, M_LOG_2_SQRT_PIl, -1);
8847214f
UD		 9488
9489 END (gamma);
9490}
9491
601a3a5f
JM		 9492static const struct test_ff_f_data hypot_test_data[] =
9493 {
9494 START_DATA (hypot),
9495 TEST_ff_f (hypot, plus_infty, 1, plus_infty),
9496 TEST_ff_f (hypot, minus_infty, 1, plus_infty),
8847214f 9497
15daa639 9498#ifndef TEST_INLINE
601a3a5f
JM		 9499 TEST_ff_f (hypot, plus_infty, qnan_value, plus_infty),
9500 TEST_ff_f (hypot, minus_infty, qnan_value, plus_infty),
9501 TEST_ff_f (hypot, qnan_value, plus_infty, plus_infty),
9502 TEST_ff_f (hypot, qnan_value, minus_infty, plus_infty),
15daa639 9503#endif
8847214f 9504
601a3a5f 9505 TEST_ff_f (hypot, qnan_value, qnan_value, qnan_value),
8847214f 9506
601a3a5f
JM		 9507 /* hypot (x,y) == hypot (+-x, +-y) */
9508 TEST_ff_f (hypot, 0.7L, 12.4L, 12.419742348374220601176836866763271L),
9509 TEST_ff_f (hypot, -0.7L, 12.4L, 12.419742348374220601176836866763271L),
9510 TEST_ff_f (hypot, 0.7L, -12.4L, 12.419742348374220601176836866763271L),
9511 TEST_ff_f (hypot, -0.7L, -12.4L, 12.419742348374220601176836866763271L),
9512 TEST_ff_f (hypot, 12.4L, 0.7L, 12.419742348374220601176836866763271L),
9513 TEST_ff_f (hypot, -12.4L, 0.7L, 12.419742348374220601176836866763271L),
9514 TEST_ff_f (hypot, 12.4L, -0.7L, 12.419742348374220601176836866763271L),
9515 TEST_ff_f (hypot, -12.4L, -0.7L, 12.419742348374220601176836866763271L),
8847214f 9516
601a3a5f
JM		 9517 /* hypot (x,0) == fabs (x) */
9518 TEST_ff_f (hypot, 0.75L, 0, 0.75L),
9519 TEST_ff_f (hypot, -0.75L, 0, 0.75L),
9520 TEST_ff_f (hypot, -5.7e7, 0, 5.7e7L),
8847214f 9521
601a3a5f 9522 TEST_ff_f (hypot, 0.75L, 1.25L, 1.45773797371132511771853821938639577L),
8847214f 9523
601a3a5f
JM		 9524 TEST_ff_f (hypot, 1.0L, 0x1p-61L, 1.0L),
9525 TEST_ff_f (hypot, 0x1p+0L, 0x1.fp-129L, 0x1p+0L),
1468ded3 9526#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
601a3a5f 9527 TEST_ff_f (hypot, 0x1.23456789abcdef0123456789ab8p-500L, 0x1.23456789abcdef0123456789ab8p-500L, 4.9155782399407039128612180934736799735113e-151L),
1468ded3 9528#endif
8e27e3cc 9529
aa4a2ae1 9530#if !(defined TEST_FLOAT && defined TEST_INLINE)
601a3a5f
JM		 9531 TEST_ff_f (hypot, 0x3p125L, 0x4p125L, 0x5p125L),
9532 TEST_ff_f (hypot, 0x1.234566p-126L, 0x1.234566p-126L, 1.891441686191081936598531534017449451173e-38L),
aa4a2ae1
JM		 9533#endif
9534
5779f134 9535#if !defined TEST_FLOAT && !(defined TEST_DOUBLE && defined TEST_INLINE)
601a3a5f
JM		 9536 TEST_ff_f (hypot, 0x3p1021L, 0x4p1021L, 0x5p1021L),
9537 TEST_ff_f (hypot, 0x1p+0L, 0x0.3ep-1022L, 0x1p+0L),
aa4a2ae1
JM		 9538#endif
9539
9540#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384 && !defined TEST_INLINE
601a3a5f 9541 TEST_ff_f (hypot, 0x3p16381L, 0x4p16381L, 0x5p16381L),
aa4a2ae1 9542#endif
601a3a5f
JM		 9543 END_DATA (hypot)
9544 };
9545
9546static void
9547hypot_test (void)
9548{
9549 errno = 0;
9550 FUNC(hypot) (0.7L, 12.4L);
9551 if (errno == ENOSYS)
9552 /* Function not implemented. */
9553 return;
aa4a2ae1 9554
601a3a5f
JM		 9555 START (hypot);
9556 RUN_TEST_LOOP_ff_f (hypot, hypot_test_data, );
8847214f
UD		 9557 END (hypot);
9558}
9559
9560
9561static void
9562ilogb_test (void)
9563{
9564 START (ilogb);
9565
9566 TEST_f_i (ilogb, 1, 0);
9567 TEST_f_i (ilogb, M_El, 1);
9568 TEST_f_i (ilogb, 1024, 10);
9569 TEST_f_i (ilogb, -2000, 10);
9570
76da7265 9571 /* ilogb (0.0) == FP_ILOGB0 plus invalid exception */
f2da7793 9572 TEST_f_i (ilogb, 0.0, FP_ILOGB0, INVALID_EXCEPTION|ERRNO_EDOM);
67e971f1 9573 /* ilogb (qNaN) == FP_ILOGBNAN plus invalid exception */
f2da7793 9574 TEST_f_i (ilogb, qnan_value, FP_ILOGBNAN, INVALID_EXCEPTION|ERRNO_EDOM);
76da7265 9575 /* ilogb (inf) == INT_MAX plus invalid exception */
f2da7793 9576 TEST_f_i (ilogb, plus_infty, INT_MAX, INVALID_EXCEPTION|ERRNO_EDOM);
76da7265 9577 /* ilogb (-inf) == INT_MAX plus invalid exception */
f2da7793 9578 TEST_f_i (ilogb, minus_infty, INT_MAX, INVALID_EXCEPTION|ERRNO_EDOM);
8847214f
UD		 9579
9580 END (ilogb);
9581}
9582
9583static void
9584isfinite_test (void)
9585{
9586 START (isfinite);
9587
9588 TEST_f_b (isfinite, 0, 1);
9589 TEST_f_b (isfinite, minus_zero, 1);
9590 TEST_f_b (isfinite, 10, 1);
ef1bb361 9591 TEST_f_b (isfinite, min_subnorm_value, 1);
8847214f
UD		 9592 TEST_f_b (isfinite, plus_infty, 0);
9593 TEST_f_b (isfinite, minus_infty, 0);
67e971f1 9594 TEST_f_b (isfinite, qnan_value, 0);
8847214f
UD		 9595
9596 END (isfinite);
9597}
9598
0e8e0c1c
JM		 9599static void
9600isgreater_test (void)
9601{
9602 START (isgreater);
9603
9604 TEST_ff_i (isgreater, minus_zero, minus_zero, 0);
9605 TEST_ff_i (isgreater, minus_zero, plus_zero, 0);
9606 TEST_ff_i (isgreater, minus_zero, (FLOAT) 1, 0);
67e971f1 9607 TEST_ff_i (isgreater, minus_zero, qnan_value, 0);
0e8e0c1c
JM		 9608 TEST_ff_i (isgreater, plus_zero, minus_zero, 0);
9609 TEST_ff_i (isgreater, plus_zero, plus_zero, 0);
9610 TEST_ff_i (isgreater, plus_zero, (FLOAT) 1, 0);
67e971f1 9611 TEST_ff_i (isgreater, plus_zero, qnan_value, 0);
0e8e0c1c
JM		 9612 TEST_ff_i (isgreater, (FLOAT) 1, minus_zero, 1);
9613 TEST_ff_i (isgreater, (FLOAT) 1, plus_zero, 1);
9614 TEST_ff_i (isgreater, (FLOAT) 1, (FLOAT) 1, 0);
67e971f1
TS		 9615 TEST_ff_i (isgreater, (FLOAT) 1, qnan_value, 0);
9616 TEST_ff_i (isgreater, qnan_value, minus_zero, 0);
9617 TEST_ff_i (isgreater, qnan_value, plus_zero, 0);
9618 TEST_ff_i (isgreater, qnan_value, (FLOAT) 1, 0);
9619 TEST_ff_i (isgreater, qnan_value, qnan_value, 0);
0e8e0c1c
JM		 9620
9621 END (isgreater);
9622}
9623
9624static void
9625isgreaterequal_test (void)
9626{
9627 START (isgreaterequal);
9628
9629 TEST_ff_i (isgreaterequal, minus_zero, minus_zero, 1);
9630 TEST_ff_i (isgreaterequal, minus_zero, plus_zero, 1);
9631 TEST_ff_i (isgreaterequal, minus_zero, (FLOAT) 1, 0);
67e971f1 9632 TEST_ff_i (isgreaterequal, minus_zero, qnan_value, 0);
0e8e0c1c
JM		 9633 TEST_ff_i (isgreaterequal, plus_zero, minus_zero, 1);
9634 TEST_ff_i (isgreaterequal, plus_zero, plus_zero, 1);
9635 TEST_ff_i (isgreaterequal, plus_zero, (FLOAT) 1, 0);
67e971f1 9636 TEST_ff_i (isgreaterequal, plus_zero, qnan_value, 0);
0e8e0c1c
JM		 9637 TEST_ff_i (isgreaterequal, (FLOAT) 1, minus_zero, 1);
9638 TEST_ff_i (isgreaterequal, (FLOAT) 1, plus_zero, 1);
9639 TEST_ff_i (isgreaterequal, (FLOAT) 1, (FLOAT) 1, 1);
67e971f1
TS		 9640 TEST_ff_i (isgreaterequal, (FLOAT) 1, qnan_value, 0);
9641 TEST_ff_i (isgreaterequal, qnan_value, minus_zero, 0);
9642 TEST_ff_i (isgreaterequal, qnan_value, plus_zero, 0);
9643 TEST_ff_i (isgreaterequal, qnan_value, (FLOAT) 1, 0);
9644 TEST_ff_i (isgreaterequal, qnan_value, qnan_value, 0);
0e8e0c1c
JM		 9645
9646 END (isgreaterequal);
9647}
9648
ef1bb361
JM		 9649static void
9650isinf_test (void)
9651{
9652 START (isinf);
9653
9654 TEST_f_b (isinf, 0, 0);
9655 TEST_f_b (isinf, minus_zero, 0);
9656 TEST_f_b (isinf, 10, 0);
9657 TEST_f_b (isinf, min_subnorm_value, 0);
9658 TEST_f_b (isinf, plus_infty, 1);
9659 TEST_f_b (isinf, minus_infty, 1);
67e971f1 9660 TEST_f_b (isinf, qnan_value, 0);
ef1bb361
JM		 9661
9662 END (isinf);
9663}
9664
0e8e0c1c
JM		 9665static void
9666isless_test (void)
9667{
9668 START (isless);
9669
9670 TEST_ff_i (isless, minus_zero, minus_zero, 0);
9671 TEST_ff_i (isless, minus_zero, plus_zero, 0);
9672 TEST_ff_i (isless, minus_zero, (FLOAT) 1, 1);
67e971f1 9673 TEST_ff_i (isless, minus_zero, qnan_value, 0);
0e8e0c1c
JM		 9674 TEST_ff_i (isless, plus_zero, minus_zero, 0);
9675 TEST_ff_i (isless, plus_zero, plus_zero, 0);
9676 TEST_ff_i (isless, plus_zero, (FLOAT) 1, 1);
67e971f1 9677 TEST_ff_i (isless, plus_zero, qnan_value, 0);
0e8e0c1c
JM		 9678 TEST_ff_i (isless, (FLOAT) 1, minus_zero, 0);
9679 TEST_ff_i (isless, (FLOAT) 1, plus_zero, 0);
9680 TEST_ff_i (isless, (FLOAT) 1, (FLOAT) 1, 0);
67e971f1
TS		 9681 TEST_ff_i (isless, (FLOAT) 1, qnan_value, 0);
9682 TEST_ff_i (isless, qnan_value, minus_zero, 0);
9683 TEST_ff_i (isless, qnan_value, plus_zero, 0);
9684 TEST_ff_i (isless, qnan_value, (FLOAT) 1, 0);
9685 TEST_ff_i (isless, qnan_value, qnan_value, 0);
0e8e0c1c
JM		 9686
9687 END (isless);
9688}
9689
9690static void
9691islessequal_test (void)
9692{
9693 START (islessequal);
9694
9695 TEST_ff_i (islessequal, minus_zero, minus_zero, 1);
9696 TEST_ff_i (islessequal, minus_zero, plus_zero, 1);
9697 TEST_ff_i (islessequal, minus_zero, (FLOAT) 1, 1);
67e971f1 9698 TEST_ff_i (islessequal, minus_zero, qnan_value, 0);
0e8e0c1c
JM		 9699 TEST_ff_i (islessequal, plus_zero, minus_zero, 1);
9700 TEST_ff_i (islessequal, plus_zero, plus_zero, 1);
9701 TEST_ff_i (islessequal, plus_zero, (FLOAT) 1, 1);
67e971f1 9702 TEST_ff_i (islessequal, plus_zero, qnan_value, 0);
0e8e0c1c
JM		 9703 TEST_ff_i (islessequal, (FLOAT) 1, minus_zero, 0);
9704 TEST_ff_i (islessequal, (FLOAT) 1, plus_zero, 0);
9705 TEST_ff_i (islessequal, (FLOAT) 1, (FLOAT) 1, 1);
67e971f1
TS		 9706 TEST_ff_i (islessequal, (FLOAT) 1, qnan_value, 0);
9707 TEST_ff_i (islessequal, qnan_value, minus_zero, 0);
9708 TEST_ff_i (islessequal, qnan_value, plus_zero, 0);
9709 TEST_ff_i (islessequal, qnan_value, (FLOAT) 1, 0);
9710 TEST_ff_i (islessequal, qnan_value, qnan_value, 0);
0e8e0c1c
JM		 9711
9712 END (islessequal);
9713}
9714
9715static void
9716islessgreater_test (void)
9717{
9718 START (islessgreater);
9719
9720 TEST_ff_i (islessgreater, minus_zero, minus_zero, 0);
9721 TEST_ff_i (islessgreater, minus_zero, plus_zero, 0);
9722 TEST_ff_i (islessgreater, minus_zero, (FLOAT) 1, 1);
67e971f1 9723 TEST_ff_i (islessgreater, minus_zero, qnan_value, 0);
0e8e0c1c
JM		 9724 TEST_ff_i (islessgreater, plus_zero, minus_zero, 0);
9725 TEST_ff_i (islessgreater, plus_zero, plus_zero, 0);
9726 TEST_ff_i (islessgreater, plus_zero, (FLOAT) 1, 1);
67e971f1 9727 TEST_ff_i (islessgreater, plus_zero, qnan_value, 0);
0e8e0c1c
JM		 9728 TEST_ff_i (islessgreater, (FLOAT) 1, minus_zero, 1);
9729 TEST_ff_i (islessgreater, (FLOAT) 1, plus_zero, 1);
9730 TEST_ff_i (islessgreater, (FLOAT) 1, (FLOAT) 1, 0);
67e971f1
TS		 9731 TEST_ff_i (islessgreater, (FLOAT) 1, qnan_value, 0);
9732 TEST_ff_i (islessgreater, qnan_value, minus_zero, 0);
9733 TEST_ff_i (islessgreater, qnan_value, plus_zero, 0);
9734 TEST_ff_i (islessgreater, qnan_value, (FLOAT) 1, 0);
9735 TEST_ff_i (islessgreater, qnan_value, qnan_value, 0);
0e8e0c1c
JM		 9736
9737 END (islessgreater);
9738}
9739
ef1bb361
JM		 9740static void
9741isnan_test (void)
9742{
9743 START (isnan);
9744
9745 TEST_f_b (isnan, 0, 0);
9746 TEST_f_b (isnan, minus_zero, 0);
9747 TEST_f_b (isnan, 10, 0);
9748 TEST_f_b (isnan, min_subnorm_value, 0);
9749 TEST_f_b (isnan, plus_infty, 0);
9750 TEST_f_b (isnan, minus_infty, 0);
67e971f1 9751 TEST_f_b (isnan, qnan_value, 1);
ef1bb361
JM		 9752
9753 END (isnan);
9754}
9755
8847214f
UD		 9756static void
9757isnormal_test (void)
9758{
9759 START (isnormal);
9760
9761 TEST_f_b (isnormal, 0, 0);
9762 TEST_f_b (isnormal, minus_zero, 0);
9763 TEST_f_b (isnormal, 10, 1);
ef1bb361 9764 TEST_f_b (isnormal, min_subnorm_value, 0);
8847214f
UD		 9765 TEST_f_b (isnormal, plus_infty, 0);
9766 TEST_f_b (isnormal, minus_infty, 0);
67e971f1 9767 TEST_f_b (isnormal, qnan_value, 0);
8847214f
UD		 9768
9769 END (isnormal);
9770}
9771
57267616
TS		 9772static void
9773issignaling_test (void)
9774{
9775 START (issignaling);
9776
9777 TEST_f_b (issignaling, 0, 0);
9778 TEST_f_b (issignaling, minus_zero, 0);
9779 TEST_f_b (issignaling, 10, 0);
9780 TEST_f_b (issignaling, min_subnorm_value, 0);
9781 TEST_f_b (issignaling, plus_infty, 0);
9782 TEST_f_b (issignaling, minus_infty, 0);
9783 TEST_f_b (issignaling, qnan_value, 0);
9784
9785 END (issignaling);
9786}
9787
0e8e0c1c
JM		 9788static void
9789isunordered_test (void)
9790{
9791 START (isunordered);
9792
9793 TEST_ff_i (isunordered, minus_zero, minus_zero, 0);
9794 TEST_ff_i (isunordered, minus_zero, plus_zero, 0);
9795 TEST_ff_i (isunordered, minus_zero, (FLOAT) 1, 0);
67e971f1 9796 TEST_ff_i (isunordered, minus_zero, qnan_value, 1);
0e8e0c1c
JM		 9797 TEST_ff_i (isunordered, plus_zero, minus_zero, 0);
9798 TEST_ff_i (isunordered, plus_zero, plus_zero, 0);
9799 TEST_ff_i (isunordered, plus_zero, (FLOAT) 1, 0);
67e971f1 9800 TEST_ff_i (isunordered, plus_zero, qnan_value, 1);
0e8e0c1c
JM		 9801 TEST_ff_i (isunordered, (FLOAT) 1, minus_zero, 0);
9802 TEST_ff_i (isunordered, (FLOAT) 1, plus_zero, 0);
9803 TEST_ff_i (isunordered, (FLOAT) 1, (FLOAT) 1, 0);
67e971f1
TS		 9804 TEST_ff_i (isunordered, (FLOAT) 1, qnan_value, 1);
9805 TEST_ff_i (isunordered, qnan_value, minus_zero, 1);
9806 TEST_ff_i (isunordered, qnan_value, plus_zero, 1);
9807 TEST_ff_i (isunordered, qnan_value, (FLOAT) 1, 1);
9808 TEST_ff_i (isunordered, qnan_value, qnan_value, 1);
0e8e0c1c
JM		 9809
9810 END (isunordered);
9811}
9812
74c57478
JM		 9813static const struct test_f_f_data j0_test_data[] =
9814 {
9815 START_DATA (j0),
9816 /* j0 is the Bessel function of the first kind of order 0 */
9817 TEST_f_f (j0, qnan_value, qnan_value),
9818 TEST_f_f (j0, plus_infty, 0),
9819 TEST_f_f (j0, -1.0, 0.765197686557966551449717526102663221L),
9820 TEST_f_f (j0, 0.0, 1.0),
9821 TEST_f_f (j0, 0.125L, 0.996097563041985204620768999453174712L),
9822 TEST_f_f (j0, 0.75L, 0.864242275166648623555731103820923211L),
9823 TEST_f_f (j0, 1.0, 0.765197686557966551449717526102663221L),
9824 TEST_f_f (j0, 1.5, 0.511827671735918128749051744283411720L),
9825 TEST_f_f (j0, 2.0, 0.223890779141235668051827454649948626L),
9826 TEST_f_f (j0, 8.0, 0.171650807137553906090869407851972001L),
9827 TEST_f_f (j0, 10.0, -0.245935764451348335197760862485328754L),
9828 TEST_f_f (j0, 4.0, -3.9714980986384737228659076845169804197562E-1L),
9829 TEST_f_f (j0, -4.0, -3.9714980986384737228659076845169804197562E-1L),
8847214f 9830
74c57478 9831 TEST_f_f (j0, 0x1.d7ce3ap+107L, 2.775523647291230802651040996274861694514e-17L),
c36e1d23
JM		 9832
9833#ifndef TEST_FLOAT
74c57478
JM		 9834 TEST_f_f (j0, -0x1.001000001p+593L, -3.927269966354206207832593635798954916263e-90L),
9835 TEST_f_f (j0, 0x1p1023L, -1.5665258060609012834424478437196679802783e-155L),
c36e1d23
JM		 9836#endif
9837
d2f9799e 9838#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM		 9839 TEST_f_f (j0, 0x1p16382L, -1.2193782500509000574176799046642541129387e-2466L),
9840 TEST_f_f (j0, 0x1p16383L, 9.5859502826270374691362975419147645151233e-2467L),
d2f9799e 9841#endif
74c57478
JM		 9842 END_DATA (j0)
9843 };
8847214f
UD		 9844
9845static void
74c57478 9846j0_test (void)
8847214f 9847{
8a216c1b 9848 FLOAT s, c;
8847214f 9849 errno = 0;
cd53c157
UD		 9850 FUNC (sincos) (0, &s, &c);
9851 if (errno == ENOSYS)
9852 /* Required function not implemented. */
9853 return;
74c57478 9854 FUNC(j0) (0);
8847214f
UD		 9855 if (errno == ENOSYS)
9856 /* Function not implemented. */
9857 return;
9858
74c57478
JM		 9859 START (j0);
9860 RUN_TEST_LOOP_f_f (j0, j0_test_data, );
9861 END (j0);
9862}
8847214f 9863
8847214f 9864
74c57478
JM		 9865static const struct test_f_f_data j1_test_data[] =
9866 {
9867 START_DATA (j1),
9868 /* j1 is the Bessel function of the first kind of order 1 */
9869 TEST_f_f (j1, qnan_value, qnan_value),
9870 TEST_f_f (j1, plus_infty, 0),
8847214f 9871
74c57478
JM		 9872 TEST_f_f (j1, -1.0, -0.440050585744933515959682203718914913L),
9873 TEST_f_f (j1, 0.0, 0.0),
9874 TEST_f_f (j1, 0.125L, 0.0623780091344946810942311355879361177L),
9875 TEST_f_f (j1, 0.75L, 0.349243602174862192523281016426251335L),
9876 TEST_f_f (j1, 1.0, 0.440050585744933515959682203718914913L),
9877 TEST_f_f (j1, 1.5, 0.557936507910099641990121213156089400L),
9878 TEST_f_f (j1, 2.0, 0.576724807756873387202448242269137087L),
9879 TEST_f_f (j1, 8.0, 0.234636346853914624381276651590454612L),
9880 TEST_f_f (j1, 10.0, 0.0434727461688614366697487680258592883L),
8847214f 9881
74c57478 9882 TEST_f_f (j1, 0x1.3ffp+74L, 1.818984347516051243459364437186082741567e-12L),
c36e1d23
JM		 9883
9884#ifndef TEST_FLOAT
74c57478
JM		 9885 TEST_f_f (j1, 0x1.ff00000000002p+840L, 1.846591691699331493194965158699937660696e-127L),
9886 TEST_f_f (j1, 0x1p1023L, 8.2687542933709649327986678723012001545638e-155L),
c36e1d23
JM		 9887#endif
9888
d2f9799e 9889#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM		 9890 TEST_f_f (j1, 0x1p16382L, 8.0839224448726336195866026476176740513439e-2467L),
9891 TEST_f_f (j1, 0x1p16383L, -3.8895531955766020648617743624167352352217e-2467L),
d2f9799e 9892#endif
74c57478
JM		 9893 END_DATA (j1)
9894 };
d2f9799e 9895
74c57478
JM		 9896static void
9897j1_test (void)
9898{
9899 FLOAT s, c;
9900 errno = 0;
9901 FUNC (sincos) (0, &s, &c);
9902 if (errno == ENOSYS)
9903 /* Required function not implemented. */
9904 return;
9905 FUNC(j1) (0);
9906 if (errno == ENOSYS)
9907 /* Function not implemented. */
9908 return;
9909
9910 START (j1);
9911 RUN_TEST_LOOP_f_f (j1, j1_test_data, );
8847214f
UD		 9912 END (j1);
9913}
9914
0e400df5
JM		 9915static const struct test_if_f_data jn_test_data[] =
9916 {
9917 START_DATA (jn),
9918 /* jn is the Bessel function of the first kind of order n. */
9919 /* jn (0, x) == j0 (x) */
9920 TEST_if_f (jn, 0, qnan_value, qnan_value),
9921 TEST_if_f (jn, 0, plus_infty, 0),
9922 TEST_if_f (jn, 0, -1.0, 0.765197686557966551449717526102663221L),
9923 TEST_if_f (jn, 0, 0.0, 1.0),
9924 TEST_if_f (jn, 0, 0.125L, 0.996097563041985204620768999453174712L),
9925 TEST_if_f (jn, 0, 0.75L, 0.864242275166648623555731103820923211L),
9926 TEST_if_f (jn, 0, 1.0, 0.765197686557966551449717526102663221L),
9927 TEST_if_f (jn, 0, 1.5, 0.511827671735918128749051744283411720L),
9928 TEST_if_f (jn, 0, 2.0, 0.223890779141235668051827454649948626L),
9929 TEST_if_f (jn, 0, 8.0, 0.171650807137553906090869407851972001L),
9930 TEST_if_f (jn, 0, 10.0, -0.245935764451348335197760862485328754L),
9931 TEST_if_f (jn, 0, 4.0, -3.9714980986384737228659076845169804197562E-1L),
9932 TEST_if_f (jn, 0, -4.0, -3.9714980986384737228659076845169804197562E-1L),
9933
9934 /* jn (1, x) == j1 (x) */
9935 TEST_if_f (jn, 1, qnan_value, qnan_value),
9936 TEST_if_f (jn, 1, plus_infty, 0),
9937 TEST_if_f (jn, 1, -1.0, -0.440050585744933515959682203718914913L),
9938 TEST_if_f (jn, 1, 0.0, 0.0),
9939 TEST_if_f (jn, 1, 0.125L, 0.0623780091344946810942311355879361177L),
9940 TEST_if_f (jn, 1, 0.75L, 0.349243602174862192523281016426251335L),
9941 TEST_if_f (jn, 1, 1.0, 0.440050585744933515959682203718914913L),
9942 TEST_if_f (jn, 1, 1.5, 0.557936507910099641990121213156089400L),
9943 TEST_if_f (jn, 1, 2.0, 0.576724807756873387202448242269137087L),
9944 TEST_if_f (jn, 1, 8.0, 0.234636346853914624381276651590454612L),
9945 TEST_if_f (jn, 1, 10.0, 0.0434727461688614366697487680258592883L),
9946
9947 /* jn (3, x) */
9948 TEST_if_f (jn, 3, qnan_value, qnan_value),
9949 TEST_if_f (jn, 3, plus_infty, 0),
9950
9951 TEST_if_f (jn, 3, -1.0, -0.0195633539826684059189053216217515083L),
9952 TEST_if_f (jn, 3, 0.0, 0.0),
9953 TEST_if_f (jn, 3, 0.125L, 0.406503832554912875023029337653442868e-4L),
9954 TEST_if_f (jn, 3, 0.75L, 0.848438342327410884392755236884386804e-2L),
9955 TEST_if_f (jn, 3, 1.0, 0.0195633539826684059189053216217515083L),
9956 TEST_if_f (jn, 3, 2.0, 0.128943249474402051098793332969239835L),
9957 TEST_if_f (jn, 3, 10.0, 0.0583793793051868123429354784103409563L),
9958
9959 /* jn (10, x) */
9960 TEST_if_f (jn, 10, qnan_value, qnan_value),
9961 TEST_if_f (jn, 10, plus_infty, 0),
9962
9963 TEST_if_f (jn, 10, -1.0, 0.263061512368745320699785368779050294e-9L),
9964 TEST_if_f (jn, 10, 0.0, 0.0),
9965 TEST_if_f (jn, 10, 0.125L, 0.250543369809369890173993791865771547e-18L),
9966 TEST_if_f (jn, 10, 0.75L, 0.149621713117596814698712483621682835e-10L),
9967 TEST_if_f (jn, 10, 1.0, 0.263061512368745320699785368779050294e-9L),
9968 TEST_if_f (jn, 10, 2.0, 0.251538628271673670963516093751820639e-6L),
9969 TEST_if_f (jn, 10, 10.0, 0.207486106633358857697278723518753428L),
9970
9971 /* BZ #11589 .*/
9972 TEST_if_f (jn, 2, 2.4048255576957729L, 0.43175480701968038399746111312430703L),
9973 TEST_if_f (jn, 3, 2.4048255576957729L, 0.19899990535769083404042146764530813L),
9974 TEST_if_f (jn, 4, 2.4048255576957729L, 0.647466661641779720084932282551219891E-1L),
9975 TEST_if_f (jn, 5, 2.4048255576957729L, 0.163892432048058525099230549946147698E-1L),
9976 TEST_if_f (jn, 6, 2.4048255576957729L, 0.34048184720278336646673682895929161E-2L),
9977 TEST_if_f (jn, 7, 2.4048255576957729L, 0.60068836573295394221291569249883076E-3L),
9978 TEST_if_f (jn, 8, 2.4048255576957729L, 0.92165786705344923232879022467054148E-4L),
9979 TEST_if_f (jn, 9, 2.4048255576957729L, 0.12517270977961513005428966643852564E-4L),
9980
9981 /* Bug 14155: spurious exception may occur. */
9982 TEST_if_f (jn, 2, 0x1.ffff62p+99L, -4.43860668048170034334926693188979974489e-16L, UNDERFLOW_EXCEPTION_OK),
9983 END_DATA (jn)
9984 };
9985
8847214f
UD		 9986static void
9987jn_test (void)
9988{
8a216c1b 9989 FLOAT s, c;
8847214f 9990 errno = 0;
cd53c157
UD		 9991 FUNC (sincos) (0, &s, &c);
9992 if (errno == ENOSYS)
9993 /* Required function not implemented. */
9994 return;
8847214f
UD		 9995 FUNC(jn) (1, 1);
9996 if (errno == ENOSYS)
9997 /* Function not implemented. */
9998 return;
9999
8847214f 10000 START (jn);
0e400df5 10001 RUN_TEST_LOOP_if_f (jn, jn_test_data, );
8847214f
UD		 10002 END (jn);
10003}
10004
10005
10006static void
10007ldexp_test (void)
10008{
af00a34d
TS		 10009 START (ldexp);
10010
ae08db3b
JM		 10011 TEST_fi_f (ldexp, 0, 0, 0);
10012 TEST_fi_f (ldexp, minus_zero, 0, minus_zero);
8847214f 10013
ae08db3b
JM		 10014 TEST_fi_f (ldexp, plus_infty, 1, plus_infty);
10015 TEST_fi_f (ldexp, minus_infty, 1, minus_infty);
10016 TEST_fi_f (ldexp, qnan_value, 1, qnan_value);
8847214f 10017
ae08db3b
JM		 10018 TEST_fi_f (ldexp, 0.8L, 4, 12.8L);
10019 TEST_fi_f (ldexp, -0.854375L, 5, -27.34L);
8847214f
UD		 10020
10021 /* ldexp (x, 0) == x. */
ae08db3b 10022 TEST_fi_f (ldexp, 1.0L, 0L, 1.0L);
af00a34d
TS		 10023
10024 END (ldexp);
8847214f
UD		 10025}
10026
2550dfe9 10027
8847214f
UD		 10028static void
10029lgamma_test (void)
10030{
10031 errno = 0;
10032 FUNC(lgamma) (0);
10033 if (errno == ENOSYS)
10034 /* Function not implemented. */
10035 return;
8847214f
UD		 10036
10037 START (lgamma);
10038
c31a5b1e
JM		 10039 TEST_f_f1 (lgamma, plus_infty, plus_infty, 1);
10040 TEST_f_f1 (lgamma, 0, plus_infty, 1, DIVIDE_BY_ZERO_EXCEPTION);
10041 TEST_f_f1 (lgamma, minus_zero, plus_infty, -1, DIVIDE_BY_ZERO_EXCEPTION);
10042 TEST_f_f1 (lgamma, qnan_value, qnan_value, IGNORE);
8847214f
UD		 10043
10044 /* lgamma (x) == +inf plus divide by zero exception for integer x <= 0. */
c31a5b1e
JM		 10045 TEST_f_f1 (lgamma, -3, plus_infty, IGNORE, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE);
10046 TEST_f_f1 (lgamma, minus_infty, plus_infty, IGNORE);
10047 TEST_f_f1 (lgamma, -max_value, plus_infty, IGNORE, DIVIDE_BY_ZERO_EXCEPTION);
10048 TEST_f_f1 (lgamma, max_value, plus_infty, 1, OVERFLOW_EXCEPTION);
8847214f
UD		 10049
10050 TEST_f_f1 (lgamma, 1, 0, 1);
10051
10052 TEST_f_f1 (lgamma, 3, M_LN2l, 1);
10053
10054 TEST_f_f1 (lgamma, 0.5, M_LOG_SQRT_PIl, 1);
10055 TEST_f_f1 (lgamma, -0.5, M_LOG_2_SQRT_PIl, -1);
79df8ce5
AJ		 10056 TEST_f_f1 (lgamma, 0.7L, 0.260867246531666514385732417016759578L, 1);
10057 TEST_f_f1 (lgamma, 1.2L, -0.853740900033158497197028392998854470e-1L, 1);
8847214f
UD		 10058
10059 END (lgamma);
10060}
10061
2550dfe9 10062
8847214f
UD		 10063static void
10064lrint_test (void)
10065{
10066 /* XXX this test is incomplete. We need to have a way to specifiy
10067 the rounding method and test the critical cases. So far, only
10068 unproblematic numbers are tested. */
64d063b8 10069 /* TODO: missing +/-Inf as well as qNaN tests. */
8847214f
UD		 10070
10071 START (lrint);
10072
10073 TEST_f_l (lrint, 0.0, 0);
10074 TEST_f_l (lrint, minus_zero, 0);
3c6cad26
UD		 10075 TEST_f_l (lrint, 0.2L, 0);
10076 TEST_f_l (lrint, -0.2L, 0);
8847214f 10077
3c6cad26
UD		 10078 TEST_f_l (lrint, 1.4L, 1);
10079 TEST_f_l (lrint, -1.4L, -1);
8847214f 10080
3c6cad26
UD		 10081 TEST_f_l (lrint, 8388600.3L, 8388600);
10082 TEST_f_l (lrint, -8388600.3L, -8388600);
8847214f 10083
3eb61415
UD		 10084 TEST_f_l (lrint, 1071930.0008, 1071930);
10085#ifndef TEST_FLOAT
10086 TEST_f_l (lrint, 1073741824.01, 1073741824);
39007ae3
UD		 10087# if LONG_MAX > 281474976710656
10088 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
10089# endif
3eb61415
UD		 10090#endif
10091
8847214f
UD		 10092 END (lrint);
10093}
10094
2550dfe9 10095
6624dbc0
UD		 10096static void
10097lrint_test_tonearest (void)
10098{
10099 int save_round_mode;
10100 START (lrint_tonearest);
10101
10102 save_round_mode = fegetround ();
10103
10104 if (!fesetround (FE_TONEAREST))
10105 {
10106 TEST_f_l (lrint, 0.0, 0);
10107 TEST_f_l (lrint, minus_zero, 0);
10108 TEST_f_l (lrint, 0.2L, 0);
10109 TEST_f_l (lrint, -0.2L, 0);
10110 TEST_f_l (lrint, 0.5L, 0);
10111 TEST_f_l (lrint, -0.5L, 0);
10112 TEST_f_l (lrint, 0.8L, 1);
10113 TEST_f_l (lrint, -0.8L, -1);
10114
10115 TEST_f_l (lrint, 1.4L, 1);
10116 TEST_f_l (lrint, -1.4L, -1);
10117
10118 TEST_f_l (lrint, 8388600.3L, 8388600);
10119 TEST_f_l (lrint, -8388600.3L, -8388600);
10120
10121 TEST_f_l (lrint, 1071930.0008, 1071930);
10122#ifndef TEST_FLOAT
10123 TEST_f_l (lrint, 1073741824.01, 1073741824);
10124# if LONG_MAX > 281474976710656
10125 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
10126# endif
10127#endif
10128 }
10129
10130 fesetround (save_round_mode);
10131
10132 END (lrint_tonearest);
10133}
10134
10135
10136static void
10137lrint_test_towardzero (void)
10138{
10139 int save_round_mode;
10140 START (lrint_towardzero);
10141
10142 save_round_mode = fegetround ();
10143
10144 if (!fesetround (FE_TOWARDZERO))
10145 {
10146 TEST_f_l (lrint, 0.0, 0);
10147 TEST_f_l (lrint, minus_zero, 0);
10148 TEST_f_l (lrint, 0.2L, 0);
10149 TEST_f_l (lrint, -0.2L, 0);
10150 TEST_f_l (lrint, 0.5L, 0);
10151 TEST_f_l (lrint, -0.5L, 0);
10152 TEST_f_l (lrint, 0.8L, 0);
10153 TEST_f_l (lrint, -0.8L, 0);
10154
10155 TEST_f_l (lrint, 1.4L, 1);
10156 TEST_f_l (lrint, -1.4L, -1);
10157
10158 TEST_f_l (lrint, 8388600.3L, 8388600);
10159 TEST_f_l (lrint, -8388600.3L, -8388600);
10160
10161 TEST_f_l (lrint, 1071930.0008, 1071930);
10162#ifndef TEST_FLOAT
10163 TEST_f_l (lrint, 1073741824.01, 1073741824);
10164# if LONG_MAX > 281474976710656
10165 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
10166# endif
10167#endif
10168 }
10169
10170 fesetround (save_round_mode);
10171
10172 END (lrint_towardzero);
10173}
10174
10175
10176static void
10177lrint_test_downward (void)
10178{
10179 int save_round_mode;
10180 START (lrint_downward);
10181
10182 save_round_mode = fegetround ();
10183
10184 if (!fesetround (FE_DOWNWARD))
10185 {
10186 TEST_f_l (lrint, 0.0, 0);
10187 TEST_f_l (lrint, minus_zero, 0);
10188 TEST_f_l (lrint, 0.2L, 0);
10189 TEST_f_l (lrint, -0.2L, -1);
10190 TEST_f_l (lrint, 0.5L, 0);
10191 TEST_f_l (lrint, -0.5L, -1);
10192 TEST_f_l (lrint, 0.8L, 0);
10193 TEST_f_l (lrint, -0.8L, -1);
10194
10195 TEST_f_l (lrint, 1.4L, 1);
10196 TEST_f_l (lrint, -1.4L, -2);
10197
10198 TEST_f_l (lrint, 8388600.3L, 8388600);
10199 TEST_f_l (lrint, -8388600.3L, -8388601);
10200
10201 TEST_f_l (lrint, 1071930.0008, 1071930);
10202#ifndef TEST_FLOAT
10203 TEST_f_l (lrint, 1073741824.01, 1073741824);
10204# if LONG_MAX > 281474976710656
10205 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
10206# endif
10207#endif
10208 }
10209
10210 fesetround (save_round_mode);
10211
10212 END (lrint_downward);
10213}
10214
10215
10216static void
10217lrint_test_upward (void)
10218{
10219 int save_round_mode;
10220 START (lrint_upward);
10221
10222 save_round_mode = fegetround ();
10223
10224 if (!fesetround (FE_UPWARD))
10225 {
10226 TEST_f_l (lrint, 0.0, 0);
10227 TEST_f_l (lrint, minus_zero, 0);
10228 TEST_f_l (lrint, 0.2L, 1);
10229 TEST_f_l (lrint, -0.2L, 0);
10230 TEST_f_l (lrint, 0.5L, 1);
10231 TEST_f_l (lrint, -0.5L, 0);
10232 TEST_f_l (lrint, 0.8L, 1);
10233 TEST_f_l (lrint, -0.8L, 0);
10234
10235 TEST_f_l (lrint, 1.4L, 2);
10236 TEST_f_l (lrint, -1.4L, -1);
10237
10238 TEST_f_l (lrint, 8388600.3L, 8388601);
10239 TEST_f_l (lrint, -8388600.3L, -8388600);
10240
10241#ifndef TEST_FLOAT
10242 TEST_f_l (lrint, 1071930.0008, 1071931);
10243 TEST_f_l (lrint, 1073741824.01, 1073741825);
10244# if LONG_MAX > 281474976710656 && defined (TEST_LDOUBLE)
89210b4c 10245 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
6624dbc0
UD		 10246# endif
10247#endif
10248 }
10249
10250 fesetround (save_round_mode);
10251
10252 END (lrint_upward);
10253}
10254
10255
8847214f
UD		 10256static void
10257llrint_test (void)
10258{
10259 /* XXX this test is incomplete. We need to have a way to specifiy
10260 the rounding method and test the critical cases. So far, only
10261 unproblematic numbers are tested. */
64d063b8 10262 /* TODO: missing +/-Inf as well as qNaN tests. */
8847214f
UD		 10263
10264 START (llrint);
10265
10266 TEST_f_L (llrint, 0.0, 0);
10267 TEST_f_L (llrint, minus_zero, 0);
3c6cad26
UD		 10268 TEST_f_L (llrint, 0.2L, 0);
10269 TEST_f_L (llrint, -0.2L, 0);
8847214f 10270
3c6cad26
UD		 10271 TEST_f_L (llrint, 1.4L, 1);
10272 TEST_f_L (llrint, -1.4L, -1);
8847214f 10273
3c6cad26
UD		 10274 TEST_f_L (llrint, 8388600.3L, 8388600);
10275 TEST_f_L (llrint, -8388600.3L, -8388600);
8847214f 10276
3eb61415
UD		 10277 TEST_f_l (llrint, 1071930.0008, 1071930);
10278
8847214f
UD		 10279 /* Test boundary conditions. */
10280 /* 0x1FFFFF */
10281 TEST_f_L (llrint, 2097151.0,2097151LL);
10282 /* 0x800000 */
10283 TEST_f_L (llrint, 8388608.0, 8388608LL);
10284 /* 0x1000000 */
10285 TEST_f_L (llrint, 16777216.0, 16777216LL);
10286 /* 0x20000000000 */
10287 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10288 /* 0x40000000000 */
10289 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
39007ae3
UD		 10290 /* 0x1000000000000 */
10291 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
8847214f
UD		 10292 /* 0x10000000000000 */
10293 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10294 /* 0x10000080000000 */
10295 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10296 /* 0x20000000000000 */
10297 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10298 /* 0x80000000000000 */
10299 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10300 /* 0x100000000000000 */
10301 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
f964490f
RM		 10302#ifdef TEST_LDOUBLE
10303 /* The input can only be represented in long double. */
10304 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370496LL);
10305 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370496LL);
10306 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370496LL);
10307 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370497LL);
10308 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370498LL);
10309
10310 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370496LL);
10311 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370496LL);
10312 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370496LL);
10313 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370497LL);
10314 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370498LL);
10315
830fce04
RM		 10316# if LDBL_MANT_DIG > 100
10317 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370495LL);
10318 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370496LL);
10319 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370497LL);
10320 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370495LL);
10321 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370496LL);
10322 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370497LL);
10323
10324 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370495LL);
10325 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370496LL);
10326 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370497LL);
10327 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370495LL);
10328 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370496LL);
10329 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370497LL);
10330#endif
10331
f964490f
RM		 10332 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740992LL);
10333 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740992LL);
10334 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740992LL);
10335 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740993LL);
10336 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740994LL);
10337
10338 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740992LL);
10339 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740992LL);
10340 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740992LL);
10341 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740993LL);
10342 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740994LL);
10343
830fce04
RM		 10344# if LDBL_MANT_DIG > 100
10345 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740991LL);
10346 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740992LL);
10347 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740993LL);
10348 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740992LL);
10349 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740993LL);
10350 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740994LL);
10351
10352 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740991LL);
10353 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740992LL);
10354 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740993LL);
10355 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740992LL);
10356 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740993LL);
10357 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740994LL);
10358#endif
10359
f964490f
RM		 10360 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927936LL);
10361 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927936LL);
10362 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927936LL);
10363 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927937LL);
10364 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927938LL);
10365
10366 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927936LL);
10367 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927936LL);
10368 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927936LL);
10369 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927937LL);
10370 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927938LL);
830fce04
RM		 10371
10372# if LDBL_MANT_DIG > 100
10373 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775806LL);
10374 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775806LL);
10375 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
10376 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
10377 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775806LL);
10378 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775806LL);
10379 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775806L);
10380 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775806LL);
10381 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775807LL);
10382 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775807LL);
10383 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
10384 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
10385# endif
f964490f 10386#endif
8847214f
UD		 10387
10388 END (llrint);
10389}
10390
830fce04
RM		 10391static void
10392llrint_test_tonearest (void)
10393{
10394 int save_round_mode;
10395 START (llrint_tonearest);
10396
10397 save_round_mode = fegetround ();
10398
10399 if (!fesetround (FE_TONEAREST))
10400 {
10401 TEST_f_L (llrint, 0.0, 0);
10402 TEST_f_L (llrint, minus_zero, 0);
10403 TEST_f_L (llrint, 0.2L, 0);
10404 TEST_f_L (llrint, -0.2L, 0);
10405
10406 TEST_f_L (llrint, 1.4L, 1);
10407 TEST_f_L (llrint, -1.4L, -1);
10408
10409 TEST_f_L (llrint, 8388600.3L, 8388600);
10410 TEST_f_L (llrint, -8388600.3L, -8388600);
10411
10412 TEST_f_l (llrint, 1071930.0008, 1071930);
10413
10414 /* Test boundary conditions. */
10415 /* 0x1FFFFF */
10416 TEST_f_L (llrint, 2097151.0,2097151LL);
10417 /* 0x800000 */
10418 TEST_f_L (llrint, 8388608.0, 8388608LL);
10419 /* 0x1000000 */
10420 TEST_f_L (llrint, 16777216.0, 16777216LL);
10421 /* 0x20000000000 */
10422 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10423 /* 0x40000000000 */
10424 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
10425 /* 0x1000000000000 */
10426 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
10427 /* 0x10000000000000 */
10428 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10429 /* 0x10000080000000 */
10430 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10431 /* 0x20000000000000 */
10432 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10433 /* 0x80000000000000 */
10434 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10435 /* 0x100000000000000 */
10436 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
10437#ifdef TEST_LDOUBLE
10438 /* The input can only be represented in long double. */
10439 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370496LL);
10440 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370496LL);
10441 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370496LL);
10442 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370497LL);
10443 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370498LL);
10444
10445 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370496LL);
10446 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370496LL);
10447 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370496LL);
10448 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370497LL);
10449 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370498LL);
10450
10451# if LDBL_MANT_DIG > 100
10452 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370495LL);
10453 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370496LL);
10454 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370497LL);
10455 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370495LL);
10456 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370496LL);
10457 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370497LL);
10458
10459 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370495LL);
10460 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370496LL);
10461 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370497LL);
10462 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370495LL);
10463 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370496LL);
10464 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370497LL);
10465#endif
10466
10467 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740992LL);
10468 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740992LL);
10469 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740992LL);
10470 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740993LL);
10471 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740994LL);
10472
10473 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740992LL);
10474 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740992LL);
10475 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740992LL);
10476 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740993LL);
10477 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740994LL);
10478
10479# if LDBL_MANT_DIG > 100
10480 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740991LL);
10481 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740992LL);
10482 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740993LL);
10483 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740992LL);
10484 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740993LL);
10485 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740994LL);
10486
10487 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740991LL);
10488 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740992LL);
10489 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740993LL);
10490 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740992LL);
10491 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740993LL);
10492 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740994LL);
10493#endif
10494
10495 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927936LL);
10496 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927936LL);
10497 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927936LL);
10498 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927937LL);
10499 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927938LL);
10500
10501 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927936LL);
10502 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927936LL);
10503 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927936LL);
10504 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927937LL);
10505 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927938LL);
10506
10507# if LDBL_MANT_DIG > 100
10508 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775806LL);
10509 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775806LL);
10510 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
10511 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
10512 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775806LL);
10513 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775806LL);
10514 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775806L);
10515 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775806LL);
10516 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775807LL);
10517 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775807LL);
10518 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
10519 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
10520# endif
10521#endif
10522 }
10523
10524 fesetround (save_round_mode);
10525
10526 END (llrint_tonearest);
10527}
10528
10529static void
10530llrint_test_towardzero (void)
10531{
10532 int save_round_mode;
10533 START (llrint_towardzero);
10534
10535 save_round_mode = fegetround ();
10536
10537 if (!fesetround (FE_TOWARDZERO))
10538 {
10539 TEST_f_L (llrint, 0.0, 0);
10540 TEST_f_L (llrint, minus_zero, 0);
10541 TEST_f_L (llrint, 0.2L, 0);
10542 TEST_f_L (llrint, -0.2L, 0);
10543
10544 TEST_f_L (llrint, 1.4L, 1);
10545 TEST_f_L (llrint, -1.4L, -1);
10546
10547 TEST_f_L (llrint, 8388600.3L, 8388600);
10548 TEST_f_L (llrint, -8388600.3L, -8388600);
10549
10550 TEST_f_l (llrint, 1071930.0008, 1071930);
10551
10552 /* Test boundary conditions. */
10553 /* 0x1FFFFF */
10554 TEST_f_L (llrint, 2097151.0,2097151LL);
10555 /* 0x800000 */
10556 TEST_f_L (llrint, 8388608.0, 8388608LL);
10557 /* 0x1000000 */
10558 TEST_f_L (llrint, 16777216.0, 16777216LL);
10559 /* 0x20000000000 */
10560 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10561 /* 0x40000000000 */
10562 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
10563 /* 0x1000000000000 */
10564 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
10565 /* 0x10000000000000 */
10566 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10567 /* 0x10000080000000 */
10568 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10569 /* 0x20000000000000 */
10570 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10571 /* 0x80000000000000 */
10572 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10573 /* 0x100000000000000 */
10574 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
10575#ifdef TEST_LDOUBLE
10576 /* The input can only be represented in long double. */
10577 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370495LL);
10578 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370496LL);
10579 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370496LL);
10580 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370496LL);
10581 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370497LL);
10582
10583 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370495LL);
10584 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370496LL);
10585 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370496LL);
10586 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370496LL);
10587 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370497LL);
10588
10589# if LDBL_MANT_DIG > 100
10590 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370495LL);
10591 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370496LL);
10592 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370497LL);
10593 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370494LL);
10594 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370495LL);
10595 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370496LL);
10596
10597 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370495LL);
10598 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370496LL);
10599 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370497LL);
10600 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370494LL);
10601 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370495LL);
10602 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370496LL);
10603#endif
10604
10605 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740991LL);
10606 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740992LL);
10607 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740992LL);
10608 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740992LL);
10609 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740993LL);
10610
10611 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740991LL);
10612 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740992LL);
10613 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740992LL);
10614 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740992LL);
10615 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740993LL);
10616
10617# if LDBL_MANT_DIG > 100
10618 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740991LL);
10619 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740992LL);
10620 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740993LL);
10621 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740991LL);
10622 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740992LL);
10623 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740993LL);
10624
10625 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740991LL);
10626 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740992LL);
10627 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740993LL);
10628 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740991LL);
10629 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740992LL);
10630 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740993LL);
10631#endif
10632
10633 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927935LL);
10634 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927936LL);
10635 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927936LL);
10636 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927936LL);
10637 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927937LL);
10638
10639 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927935LL);
10640 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927936LL);
10641 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927936LL);
10642 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927936LL);
10643 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927937LL);
10644
10645# if LDBL_MANT_DIG > 100
10646 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775805LL);
10647 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775805LL);
10648 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
10649 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
10650 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775806LL);
10651 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775806LL);
10652 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775806L);
10653 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775806LL);
10654 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775806LL);
10655 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775806LL);
10656 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
10657 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
10658# endif
10659#endif
10660 }
10661
10662 fesetround (save_round_mode);
10663
10664 END (llrint_towardzero);
10665}
10666
10667static void
10668llrint_test_downward (void)
10669{
10670 int save_round_mode;
10671 START (llrint_downward);
10672
10673 save_round_mode = fegetround ();
10674
10675 if (!fesetround (FE_DOWNWARD))
10676 {
10677 TEST_f_L (llrint, 0.0, 0);
10678 TEST_f_L (llrint, minus_zero, 0);
10679 TEST_f_L (llrint, 0.2L, 0);
10680 TEST_f_L (llrint, -0.2L, -1);
10681
10682 TEST_f_L (llrint, 1.4L, 1);
10683 TEST_f_L (llrint, -1.4L, -2);
10684
10685 TEST_f_L (llrint, 8388600.3L, 8388600);
10686 TEST_f_L (llrint, -8388600.3L, -8388601);
10687
10688 TEST_f_l (llrint, 1071930.0008, 1071930);
10689
10690 /* Test boundary conditions. */
10691 /* 0x1FFFFF */
10692 TEST_f_L (llrint, 2097151.0,2097151LL);
10693 /* 0x800000 */
10694 TEST_f_L (llrint, 8388608.0, 8388608LL);
10695 /* 0x1000000 */
10696 TEST_f_L (llrint, 16777216.0, 16777216LL);
10697 /* 0x20000000000 */
10698 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10699 /* 0x40000000000 */
10700 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
10701 /* 0x1000000000000 */
10702 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
10703 /* 0x10000000000000 */
10704 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10705 /* 0x10000080000000 */
10706 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10707 /* 0x20000000000000 */
10708 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10709 /* 0x80000000000000 */
10710 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10711 /* 0x100000000000000 */
10712 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
10713#ifdef TEST_LDOUBLE
10714 /* The input can only be represented in long double. */
10715 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370495LL);
10716 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370496LL);
10717 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370496LL);
10718 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370496LL);
10719 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370497LL);
10720
10721 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370495LL);
10722 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370496LL);
10723 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370497LL);
10724 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370494LL);
10725 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370495LL);
10726 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370496LL);
10727
10728 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370496LL);
10729 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370497LL);
10730 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370497LL);
10731 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370497LL);
10732 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370498LL);
10733
10734 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370496LL);
10735 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370497LL);
10736 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370498LL);
10737 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370495LL);
10738 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370496LL);
10739 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370497LL);
10740
10741 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740991LL);
10742 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740992LL);
10743 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740992LL);
10744 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740992LL);
10745 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740993LL);
10746
10747 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740991LL);
10748 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740992LL);
10749 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740993LL);
10750 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740991LL);
10751 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740992LL);
10752 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740993LL);
10753
10754 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740992LL);
10755 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740993LL);
10756 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740993LL);
10757 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740993LL);
10758 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740994LL);
10759
10760 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740992LL);
10761 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740993LL);
10762 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740994LL);
10763 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740992LL);
10764 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740993LL);
10765 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740994LL);
10766
10767 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927935LL);
10768 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927936LL);
10769 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927936LL);
10770 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927936LL);
10771 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927937LL);
10772
10773 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927936LL);
10774 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927937LL);
10775 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927937LL);
10776 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927937LL);
10777 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927938LL);
10778
10779# if LDBL_MANT_DIG > 100
10780 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775805LL);
10781 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775806LL);
10782 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
10783 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
10784 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775806LL);
10785 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775807LL);
10786 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775806L);
10787 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775807LL);
10788 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775806LL);
10789 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775807LL);
10790 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
10791 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
10792# endif
10793#endif
10794 }
10795
10796 fesetround (save_round_mode);
10797
10798 END (llrint_downward);
10799}
10800
10801static void
10802llrint_test_upward (void)
10803{
10804 int save_round_mode;
10805 START (llrint_upward);
10806
10807 save_round_mode = fegetround ();
10808
10809 if (!fesetround (FE_UPWARD))
10810 {
10811 TEST_f_L (llrint, 0.0, 0);
10812 TEST_f_L (llrint, minus_zero, 0);
10813 TEST_f_L (llrint, 0.2L, 1);
10814 TEST_f_L (llrint, -0.2L, 0);
10815
10816 TEST_f_L (llrint, 1.4L, 2);
10817 TEST_f_L (llrint, -1.4L, -1);
10818
10819 TEST_f_L (llrint, 8388600.3L, 8388601);
10820 TEST_f_L (llrint, -8388600.3L, -8388600);
10821#ifndef TEST_FLOAT
10822 TEST_f_l (llrint, 1071930.0008, 1071931);
10823#endif
10824 /* Test boundary conditions. */
10825 /* 0x1FFFFF */
10826 TEST_f_L (llrint, 2097151.0,2097151LL);
10827 /* 0x800000 */
10828 TEST_f_L (llrint, 8388608.0, 8388608LL);
10829 /* 0x1000000 */
10830 TEST_f_L (llrint, 16777216.0, 16777216LL);
10831 /* 0x20000000000 */
10832 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10833 /* 0x40000000000 */
10834 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
10835 /* 0x1000000000000 */
10836 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
10837 /* 0x10000000000000 */
10838 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10839 /* 0x10000080000000 */
10840 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10841 /* 0x20000000000000 */
10842 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10843 /* 0x80000000000000 */
10844 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10845 /* 0x100000000000000 */
10846 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
10847#ifdef TEST_LDOUBLE
10848 /* The input can only be represented in long double. */
10849 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370496LL);
10850 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370497LL);
10851 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370497LL);
10852 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370497LL);
10853 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370498LL);
10854
10855 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370496LL);
10856 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370497LL);
10857 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370498LL);
10858 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370495LL);
10859 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370496LL);
10860 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370497LL);
10861
10862 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370495LL);
10863 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370496LL);
10864 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370496LL);
10865 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370496LL);
10866 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370497LL);
10867
10868 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370495LL);
10869 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370496LL);
10870 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370497LL);
10871 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370494LL);
10872 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370495LL);
10873 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370496LL);
10874
10875 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740992LL);
10876 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740993LL);
10877 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740993LL);
10878 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740993LL);
10879 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740994LL);
10880
10881 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740992LL);
10882 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740993LL);
10883 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740994LL);
10884 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740992LL);
10885 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740993LL);
10886 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740994LL);
10887
10888 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740991LL);
10889 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740992LL);
10890 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740992LL);
10891 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740992LL);
10892 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740993LL);
10893
10894 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740991LL);
10895 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740992LL);
10896 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740993LL);
10897 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740991LL);
10898 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740992LL);
10899 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740993LL);
10900
10901 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927936LL);
10902 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927937LL);
10903 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927937LL);
10904 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927937LL);
10905 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927938LL);
10906
10907 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927935LL);
10908 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927936LL);
10909 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927936LL);
10910 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927936LL);
10911 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927937LL);
10912
10913# if LDBL_MANT_DIG > 100
10914 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775806LL);
10915 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775805LL);
10916 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
10917 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
10918 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775807LL);
10919 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775806LL);
10920 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775807L);
10921 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775806LL);
10922 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775807LL);
10923 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775806LL);
10924 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
10925 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
10926# endif
10927#endif
10928 }
10929
10930 fesetround (save_round_mode);
10931
10932 END (llrint_upward);
10933}
10934
2550dfe9 10935
74c57478
JM		 10936static const struct test_f_f_data log_test_data[] =
10937 {
10938 START_DATA (log),
10939 TEST_f_f (log, 0, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
10940 TEST_f_f (log, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
10941
10942 TEST_f_f (log, 1, 0),
10943
10944 TEST_f_f (log, -1, qnan_value, INVALID_EXCEPTION),
10945 TEST_f_f (log, -max_value, qnan_value, INVALID_EXCEPTION),
10946 TEST_f_f (log, minus_infty, qnan_value, INVALID_EXCEPTION),
10947 TEST_f_f (log, plus_infty, plus_infty),
10948 TEST_f_f (log, qnan_value, qnan_value),
10949
10950 TEST_f_f (log, M_El, 1),
f98ece5f 10951 TEST_f_f (log, M_1_DIV_El, -1),
74c57478
JM		 10952 TEST_f_f (log, 2, M_LN2l),
10953 TEST_f_f (log, 10, M_LN10l),
10954 TEST_f_f (log, 0.75L, -0.287682072451780927439219005993827432L),
10955 END_DATA (log)
10956 };
10957
8847214f
UD		 10958static void
10959log_test (void)
10960{
e6d3c4a7
AJ		 10961 errno = 0;
10962 FUNC(log) (1);
10963 if (errno == ENOSYS)
10964 /* Function not implemented. */
10965 return;
8847214f 10966 START (log);
74c57478 10967 RUN_TEST_LOOP_f_f (log, log_test_data, );
8847214f
UD		 10968 END (log);
10969}
10970
10971
74c57478
JM		 10972static const struct test_f_f_data log10_test_data[] =
10973 {
10974 START_DATA (log10),
10975 TEST_f_f (log10, 0, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
10976 TEST_f_f (log10, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
10977
10978 TEST_f_f (log10, 1, 0),
10979
10980 /* log10 (x) == qNaN plus invalid exception if x < 0. */
10981 TEST_f_f (log10, -1, qnan_value, INVALID_EXCEPTION),
10982 TEST_f_f (log10, -max_value, qnan_value, INVALID_EXCEPTION),
10983 TEST_f_f (log10, minus_infty, qnan_value, INVALID_EXCEPTION),
10984
10985 TEST_f_f (log10, plus_infty, plus_infty),
10986 TEST_f_f (log10, qnan_value, qnan_value),
10987
10988 TEST_f_f (log10, 0.1L, -1),
10989 TEST_f_f (log10, 10.0, 1),
10990 TEST_f_f (log10, 100.0, 2),
10991 TEST_f_f (log10, 10000.0, 4),
10992 TEST_f_f (log10, M_El, M_LOG10El),
10993 TEST_f_f (log10, 0.75L, -0.124938736608299953132449886193870744L),
10994 END_DATA (log10)
10995 };
10996
8847214f
UD		 10997static void
10998log10_test (void)
10999{
e6d3c4a7
AJ		 11000 errno = 0;
11001 FUNC(log10) (1);
11002 if (errno == ENOSYS)
11003 /* Function not implemented. */
11004 return;
11005
8847214f 11006 START (log10);
74c57478
JM		 11007 RUN_TEST_LOOP_f_f (log10, log10_test_data, );
11008 END (log10);
11009}
8847214f 11010
8847214f 11011
74c57478
JM		 11012static const struct test_f_f_data log1p_test_data[] =
11013 {
11014 START_DATA (log1p),
11015 TEST_f_f (log1p, 0, 0),
11016 TEST_f_f (log1p, minus_zero, minus_zero),
8847214f 11017
74c57478
JM		 11018 TEST_f_f (log1p, -1, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11019 TEST_f_f (log1p, -2, qnan_value, INVALID_EXCEPTION),
11020 TEST_f_f (log1p, -max_value, qnan_value, INVALID_EXCEPTION),
11021 TEST_f_f (log1p, minus_infty, qnan_value, INVALID_EXCEPTION),
8847214f 11022
74c57478
JM		 11023 TEST_f_f (log1p, plus_infty, plus_infty),
11024 TEST_f_f (log1p, qnan_value, qnan_value),
8847214f 11025
74c57478 11026 TEST_f_f (log1p, M_El - 1.0, 1),
8847214f 11027
74c57478
JM		 11028 TEST_f_f (log1p, -0.25L, -0.287682072451780927439219005993827432L),
11029 TEST_f_f (log1p, -0.875, -2.07944154167983592825169636437452970L),
11030 END_DATA (log1p)
11031 };
8847214f
UD		 11032
11033static void
11034log1p_test (void)
11035{
e6d3c4a7
AJ		 11036 errno = 0;
11037 FUNC(log1p) (0);
11038 if (errno == ENOSYS)
11039 /* Function not implemented. */
11040 return;
11041
8847214f 11042 START (log1p);
74c57478
JM		 11043 RUN_TEST_LOOP_f_f (log1p, log1p_test_data, );
11044 END (log1p);
11045}
8847214f 11046
8847214f 11047
74c57478
JM		 11048static const struct test_f_f_data log2_test_data[] =
11049 {
11050 START_DATA (log2),
11051 TEST_f_f (log2, 0, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11052 TEST_f_f (log2, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 11053
74c57478 11054 TEST_f_f (log2, 1, 0),
8847214f 11055
74c57478
JM		 11056 TEST_f_f (log2, -1, qnan_value, INVALID_EXCEPTION),
11057 TEST_f_f (log2, -max_value, qnan_value, INVALID_EXCEPTION),
11058 TEST_f_f (log2, minus_infty, qnan_value, INVALID_EXCEPTION),
8847214f 11059
74c57478
JM		 11060 TEST_f_f (log2, plus_infty, plus_infty),
11061 TEST_f_f (log2, qnan_value, qnan_value),
8847214f 11062
74c57478
JM		 11063 TEST_f_f (log2, M_El, M_LOG2El),
11064 TEST_f_f (log2, 2.0, 1),
11065 TEST_f_f (log2, 16.0, 4),
11066 TEST_f_f (log2, 256.0, 8),
11067 TEST_f_f (log2, 0.75L, -.415037499278843818546261056052183492L),
11068 END_DATA (log2)
11069 };
8847214f
UD		 11070
11071static void
11072log2_test (void)
11073{
e6d3c4a7
AJ		 11074 errno = 0;
11075 FUNC(log2) (1);
11076 if (errno == ENOSYS)
11077 /* Function not implemented. */
11078 return;
11079
8847214f 11080 START (log2);
74c57478 11081 RUN_TEST_LOOP_f_f (log2, log2_test_data, );
8847214f
UD		 11082 END (log2);
11083}
11084
11085
74c57478
JM		 11086static const struct test_f_f_data logb_test_data[] =
11087 {
11088 START_DATA (logb),
11089 TEST_f_f (logb, plus_infty, plus_infty),
11090 TEST_f_f (logb, minus_infty, plus_infty),
8847214f 11091
74c57478 11092 TEST_f_f (logb, 0, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 11093
74c57478
JM		 11094 TEST_f_f (logb, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11095 TEST_f_f (logb, qnan_value, qnan_value),
8847214f 11096
74c57478
JM		 11097 TEST_f_f (logb, 1, 0),
11098 TEST_f_f (logb, M_El, 1),
11099 TEST_f_f (logb, 1024, 10),
11100 TEST_f_f (logb, -2000, 10),
8847214f 11101
74c57478
JM		 11102 TEST_f_f (logb, 0x0.1p-127, -131),
11103 TEST_f_f (logb, 0x0.01p-127, -135),
11104 TEST_f_f (logb, 0x0.011p-127, -135),
89c9aa49 11105#ifndef TEST_FLOAT
74c57478
JM		 11106 TEST_f_f (logb, 0x0.8p-1022, -1023),
11107 TEST_f_f (logb, 0x0.1p-1022, -1026),
11108 TEST_f_f (logb, 0x0.00111p-1022, -1034),
11109 TEST_f_f (logb, 0x0.00001p-1022, -1042),
11110 TEST_f_f (logb, 0x0.000011p-1022, -1042),
11111 TEST_f_f (logb, 0x0.0000000000001p-1022, -1074),
89c9aa49
AZ		 11112#endif
11113#if defined TEST_LDOUBLE && LDBL_MIN_EXP - LDBL_MANT_DIG <= -16400
74c57478
JM		 11114 TEST_f_f (logb, 0x1p-16400L, -16400),
11115 TEST_f_f (logb, 0x.00000000001p-16382L, -16426),
89c9aa49 11116#endif
74c57478
JM		 11117 END_DATA (logb)
11118 };
89c9aa49 11119
74c57478
JM		 11120static void
11121logb_test (void)
11122{
11123 START (logb);
11124 RUN_TEST_LOOP_f_f (logb, logb_test_data, );
8847214f
UD		 11125 END (logb);
11126}
11127
74c57478
JM		 11128static const struct test_f_f_data logb_downward_test_data[] =
11129 {
11130 START_DATA (logb_downward),
11131 /* IEEE 754-2008 says (section 5.3.3) that "logB(1) is +0.". Libm
11132 should not return -0 from logb in any rounding mode. PowerPC32 has
11133 failed with this test for power4 logb (and logbl on all PowerPC
11134 platforms) in the past due to instruction selection. GCC PR 52775
11135 provides the availability of the fcfid insn in 32-bit mode which
11136 eliminates the use of fsub in this instance and prevents the negative
11137 signed 0.0. */
11138
11139 /* BZ #887 */
11140 TEST_f_f (logb, 1.000e+0, plus_zero),
11141 END_DATA (logb_downward)
11142 };
11143
a462cb63
RA		 11144static void
11145logb_test_downward (void)
11146{
a462cb63
RA		 11147 errno = 0;
11148
11149 FUNC(logb) (0);
11150 if (errno == ENOSYS)
11151 /* Function not implemented. */
11152 return;
11153
11154 START (logb_downward);
74c57478 11155 RUN_TEST_LOOP_f_f (logb, logb_downward_test_data, FE_DOWNWARD);
a462cb63
RA		 11156 END (logb_downward);
11157}
2550dfe9 11158
8847214f
UD		 11159static void
11160lround_test (void)
11161{
64d063b8
TS		 11162 /* TODO: missing +/-Inf as well as qNaN tests. */
11163
8847214f
UD		 11164 START (lround);
11165
11166 TEST_f_l (lround, 0, 0);
11167 TEST_f_l (lround, minus_zero, 0);
3c6cad26
UD		 11168 TEST_f_l (lround, 0.2L, 0.0);
11169 TEST_f_l (lround, -0.2L, 0);
8847214f
UD		 11170 TEST_f_l (lround, 0.5, 1);
11171 TEST_f_l (lround, -0.5, -1);
3c6cad26
UD		 11172 TEST_f_l (lround, 0.8L, 1);
11173 TEST_f_l (lround, -0.8L, -1);
8847214f
UD		 11174 TEST_f_l (lround, 1.5, 2);
11175 TEST_f_l (lround, -1.5, -2);
11176 TEST_f_l (lround, 22514.5, 22515);
11177 TEST_f_l (lround, -22514.5, -22515);
3eb61415 11178 TEST_f_l (lround, 1071930.0008, 1071930);
8847214f 11179#ifndef TEST_FLOAT
3eb61415 11180 TEST_f_l (lround, 1073741824.01, 1073741824);
39007ae3
UD		 11181# if LONG_MAX > 281474976710656
11182 TEST_f_l (lround, 281474976710656.025, 281474976710656);
169d7f11 11183 TEST_f_l (lround, 18014398509481974, 18014398509481974);
39007ae3 11184# endif
8847214f
UD		 11185 TEST_f_l (lround, 2097152.5, 2097153);
11186 TEST_f_l (lround, -2097152.5, -2097153);
c1e6b459
UD		 11187 /* nextafter(0.5,-1) */
11188 TEST_f_l (lround, 0x1.fffffffffffffp-2, 0);
11189 /* nextafter(-0.5,1) */
11190 TEST_f_l (lround, -0x1.fffffffffffffp-2, 0);
11191#else
11192 /* nextafter(0.5,-1) */
11193 TEST_f_l (lround, 0x1.fffffp-2, 0);
11194 /* nextafter(-0.5,1) */
11195 TEST_f_l (lround, -0x1.fffffp-2, 0);
11196 TEST_f_l (lround, 0x1.fffffep+23, 16777215);
11197 TEST_f_l (lround, -0x1.fffffep+23, -16777215);
8847214f
UD		 11198#endif
11199 END (lround);
11200}
11201
11202
11203static void
11204llround_test (void)
11205{
64d063b8
TS		 11206 /* TODO: missing +/-Inf as well as qNaN tests. */
11207
8847214f
UD		 11208 START (llround);
11209
11210 TEST_f_L (llround, 0, 0);
11211 TEST_f_L (llround, minus_zero, 0);
3c6cad26
UD		 11212 TEST_f_L (llround, 0.2L, 0.0);
11213 TEST_f_L (llround, -0.2L, 0);
8847214f
UD		 11214 TEST_f_L (llround, 0.5, 1);
11215 TEST_f_L (llround, -0.5, -1);
3c6cad26
UD		 11216 TEST_f_L (llround, 0.8L, 1);
11217 TEST_f_L (llround, -0.8L, -1);
8847214f
UD		 11218 TEST_f_L (llround, 1.5, 2);
11219 TEST_f_L (llround, -1.5, -2);
11220 TEST_f_L (llround, 22514.5, 22515);
11221 TEST_f_L (llround, -22514.5, -22515);
3eb61415 11222 TEST_f_l (llround, 1071930.0008, 1071930);
8847214f
UD		 11223#ifndef TEST_FLOAT
11224 TEST_f_L (llround, 2097152.5, 2097153);
11225 TEST_f_L (llround, -2097152.5, -2097153);
11226 TEST_f_L (llround, 34359738368.5, 34359738369ll);
11227 TEST_f_L (llround, -34359738368.5, -34359738369ll);
169d7f11 11228 TEST_f_L (llround, -3.65309740835E17, -365309740835000000LL);
8847214f
UD		 11229#endif
11230
11231 /* Test boundary conditions. */
11232 /* 0x1FFFFF */
11233 TEST_f_L (llround, 2097151.0, 2097151LL);
11234 /* 0x800000 */
11235 TEST_f_L (llround, 8388608.0, 8388608LL);
11236 /* 0x1000000 */
11237 TEST_f_L (llround, 16777216.0, 16777216LL);
11238 /* 0x20000000000 */
11239 TEST_f_L (llround, 2199023255552.0, 2199023255552LL);
11240 /* 0x40000000000 */
11241 TEST_f_L (llround, 4398046511104.0, 4398046511104LL);
39007ae3
UD		 11242 /* 0x1000000000000 */
11243 TEST_f_L (llround, 281474976710656.0, 281474976710656LL);
8847214f
UD		 11244 /* 0x10000000000000 */
11245 TEST_f_L (llround, 4503599627370496.0, 4503599627370496LL);
11246 /* 0x10000080000000 */
3eb61415 11247 TEST_f_L (llround, 4503601774854144.0, 4503601774854144LL);
8847214f
UD		 11248 /* 0x20000000000000 */
11249 TEST_f_L (llround, 9007199254740992.0, 9007199254740992LL);
11250 /* 0x80000000000000 */
11251 TEST_f_L (llround, 36028797018963968.0, 36028797018963968LL);
11252 /* 0x100000000000000 */
11253 TEST_f_L (llround, 72057594037927936.0, 72057594037927936LL);
11254
601d2942
UD		 11255#ifndef TEST_FLOAT
11256 /* 0x100000000 */
11257 TEST_f_L (llround, 4294967295.5, 4294967296LL);
11258 /* 0x200000000 */
11259 TEST_f_L (llround, 8589934591.5, 8589934592LL);
c1e6b459
UD		 11260
11261 /* nextafter(0.5,-1) */
11262 TEST_f_L (llround, 0x1.fffffffffffffp-2, 0);
11263 /* nextafter(-0.5,1) */
11264 TEST_f_L (llround, -0x1.fffffffffffffp-2, 0);
11265 /* On PowerPC an exponent of '52' is the largest incrementally
11266 * representable sequence of whole-numbers in the 'double' range. We test
11267 * lround to make sure that a guard bit set during the lround operation
11268 * hasn't forced an erroneous shift giving us an incorrect result. The odd
11269 * numbers between +-(2^52+1 and 2^53-1) are affected since they have the
11270 * rightmost bit set. */
11271 /* +-(2^52+1) */
11272 TEST_f_L (llround, 0x1.0000000000001p+52,4503599627370497LL);
11273 TEST_f_L (llround, -0x1.0000000000001p+52,-4503599627370497LL);
11274 /* +-(2^53-1): Input is the last (positive and negative) incrementally
11275 * representable whole-number in the 'double' range that might round
11276 * erroneously. */
11277 TEST_f_L (llround, 0x1.fffffffffffffp+52, 9007199254740991LL);
11278 TEST_f_L (llround, -0x1.fffffffffffffp+52, -9007199254740991LL);
11279#else
11280 /* nextafter(0.5,-1) */
11281 TEST_f_L (llround, 0x1.fffffep-2, 0);
11282 /* nextafter(-0.5,1) */
11283 TEST_f_L (llround, -0x1.fffffep-2, 0);
11284 /* As above, on PowerPC an exponent of '23' is the largest incrementally
11285 * representable sequence of whole-numbers in the 'float' range.
11286 * Likewise, numbers between +-(2^23+1 and 2^24-1) are affected. */
11287 TEST_f_L (llround, 0x1.000002p+23,8388609);
11288 TEST_f_L (llround, -0x1.000002p+23,-8388609);
11289 TEST_f_L (llround, 0x1.fffffep+23, 16777215);
11290 TEST_f_L (llround, -0x1.fffffep+23, -16777215);
601d2942
UD		 11291#endif
11292
c1e6b459 11293
f964490f
RM		 11294#ifdef TEST_LDOUBLE
11295 /* The input can only be represented in long double. */
11296 TEST_f_L (llround, 4503599627370495.5L, 4503599627370496LL);
11297 TEST_f_L (llround, 4503599627370496.25L, 4503599627370496LL);
11298 TEST_f_L (llround, 4503599627370496.5L, 4503599627370497LL);
11299 TEST_f_L (llround, 4503599627370496.75L, 4503599627370497LL);
11300 TEST_f_L (llround, 4503599627370497.5L, 4503599627370498LL);
11301
830fce04
RM		 11302# if LDBL_MANT_DIG > 100
11303 TEST_f_L (llround, 4503599627370495.4999999999999L, 4503599627370495LL);
11304 TEST_f_L (llround, 4503599627370496.4999999999999L, 4503599627370496LL);
11305 TEST_f_L (llround, 4503599627370497.4999999999999L, 4503599627370497LL);
11306 TEST_f_L (llround, 4503599627370494.5000000000001L, 4503599627370495LL);
11307 TEST_f_L (llround, 4503599627370495.5000000000001L, 4503599627370496LL);
11308 TEST_f_L (llround, 4503599627370496.5000000000001L, 4503599627370497LL);
11309
11310 TEST_f_L (llround, -4503599627370495.4999999999999L, -4503599627370495LL);
11311 TEST_f_L (llround, -4503599627370496.4999999999999L, -4503599627370496LL);
11312 TEST_f_L (llround, -4503599627370497.4999999999999L, -4503599627370497LL);
11313 TEST_f_L (llround, -4503599627370494.5000000000001L, -4503599627370495LL);
11314 TEST_f_L (llround, -4503599627370495.5000000000001L, -4503599627370496LL);
11315 TEST_f_L (llround, -4503599627370496.5000000000001L, -4503599627370497LL);
11316# endif
11317
f964490f
RM		 11318 TEST_f_L (llround, -4503599627370495.5L, -4503599627370496LL);
11319 TEST_f_L (llround, -4503599627370496.25L, -4503599627370496LL);
11320 TEST_f_L (llround, -4503599627370496.5L, -4503599627370497LL);
11321 TEST_f_L (llround, -4503599627370496.75L, -4503599627370497LL);
11322 TEST_f_L (llround, -4503599627370497.5L, -4503599627370498LL);
11323
11324 TEST_f_L (llround, 9007199254740991.5L, 9007199254740992LL);
11325 TEST_f_L (llround, 9007199254740992.25L, 9007199254740992LL);
11326 TEST_f_L (llround, 9007199254740992.5L, 9007199254740993LL);
11327 TEST_f_L (llround, 9007199254740992.75L, 9007199254740993LL);
11328 TEST_f_L (llround, 9007199254740993.5L, 9007199254740994LL);
11329
830fce04
RM		 11330# if LDBL_MANT_DIG > 100
11331 TEST_f_L (llround, 9007199254740991.4999999999999L, 9007199254740991LL);
11332 TEST_f_L (llround, 9007199254740992.4999999999999L, 9007199254740992LL);
11333 TEST_f_L (llround, 9007199254740993.4999999999999L, 9007199254740993LL);
11334 TEST_f_L (llround, 9007199254740991.5000000000001L, 9007199254740992LL);
11335 TEST_f_L (llround, 9007199254740992.5000000000001L, 9007199254740993LL);
11336 TEST_f_L (llround, 9007199254740993.5000000000001L, 9007199254740994LL);
11337
11338 TEST_f_L (llround, -9007199254740991.4999999999999L, -9007199254740991LL);
11339 TEST_f_L (llround, -9007199254740992.4999999999999L, -9007199254740992LL);
11340 TEST_f_L (llround, -9007199254740993.4999999999999L, -9007199254740993LL);
11341 TEST_f_L (llround, -9007199254740991.5000000000001L, -9007199254740992LL);
11342 TEST_f_L (llround, -9007199254740992.5000000000001L, -9007199254740993LL);
11343 TEST_f_L (llround, -9007199254740993.5000000000001L, -9007199254740994LL);
11344# endif
11345
f964490f
RM		 11346 TEST_f_L (llround, -9007199254740991.5L, -9007199254740992LL);
11347 TEST_f_L (llround, -9007199254740992.25L, -9007199254740992LL);
11348 TEST_f_L (llround, -9007199254740992.5L, -9007199254740993LL);
11349 TEST_f_L (llround, -9007199254740992.75L, -9007199254740993LL);
11350 TEST_f_L (llround, -9007199254740993.5L, -9007199254740994LL);
11351
11352 TEST_f_L (llround, 72057594037927935.5L, 72057594037927936LL);
11353 TEST_f_L (llround, 72057594037927936.25L, 72057594037927936LL);
11354 TEST_f_L (llround, 72057594037927936.5L, 72057594037927937LL);
11355 TEST_f_L (llround, 72057594037927936.75L, 72057594037927937LL);
11356 TEST_f_L (llround, 72057594037927937.5L, 72057594037927938LL);
11357
11358 TEST_f_L (llround, -72057594037927935.5L, -72057594037927936LL);
11359 TEST_f_L (llround, -72057594037927936.25L, -72057594037927936LL);
11360 TEST_f_L (llround, -72057594037927936.5L, -72057594037927937LL);
11361 TEST_f_L (llround, -72057594037927936.75L, -72057594037927937LL);
11362 TEST_f_L (llround, -72057594037927937.5L, -72057594037927938LL);
1e832e37
RM		 11363
11364 TEST_f_L (llround, 9223372036854775806.25L, 9223372036854775806LL);
11365 TEST_f_L (llround, -9223372036854775806.25L, -9223372036854775806LL);
11366 TEST_f_L (llround, 9223372036854775806.5L, 9223372036854775807LL);
11367 TEST_f_L (llround, -9223372036854775806.5L, -9223372036854775807LL);
11368 TEST_f_L (llround, 9223372036854775807.0L, 9223372036854775807LL);
11369 TEST_f_L (llround, -9223372036854775807.0L, -9223372036854775807LL);
f964490f
RM		 11370#endif
11371
8847214f
UD		 11372 END (llround);
11373}
11374
11375static void
11376modf_test (void)
11377{
11378 FLOAT x;
11379
11380 START (modf);
11381
11382 TEST_fF_f1 (modf, plus_infty, 0, plus_infty);
11383 TEST_fF_f1 (modf, minus_infty, minus_zero, minus_infty);
67e971f1 11384 TEST_fF_f1 (modf, qnan_value, qnan_value, qnan_value);
8847214f
UD		 11385 TEST_fF_f1 (modf, 0, 0, 0);
11386 TEST_fF_f1 (modf, 1.5, 0.5, 1);
11387 TEST_fF_f1 (modf, 2.5, 0.5, 2);
11388 TEST_fF_f1 (modf, -2.5, -0.5, -2);
11389 TEST_fF_f1 (modf, 20, 0, 20);
11390 TEST_fF_f1 (modf, 21, 0, 21);
11391 TEST_fF_f1 (modf, 89.5, 0.5, 89);
11392
11393 END (modf);
11394}
11395
11396
74c57478
JM		 11397static const struct test_f_f_data nearbyint_test_data[] =
11398 {
11399 START_DATA (nearbyint),
11400
11401 TEST_f_f (nearbyint, 0.0, 0.0),
11402 TEST_f_f (nearbyint, minus_zero, minus_zero),
11403 TEST_f_f (nearbyint, plus_infty, plus_infty),
11404 TEST_f_f (nearbyint, minus_infty, minus_infty),
11405 TEST_f_f (nearbyint, qnan_value, qnan_value),
11406
11407 /* Subnormal values */
11408 TEST_f_f (nearbyint, -8.98847e+307, -8.98847e+307),
11409 TEST_f_f (nearbyint, -4.45015e-308, minus_zero),
11410
11411 /* Default rounding mode is round to nearest. */
11412 TEST_f_f (nearbyint, 0.5, 0.0),
11413 TEST_f_f (nearbyint, 1.5, 2.0),
11414 TEST_f_f (nearbyint, -0.5, minus_zero),
11415 TEST_f_f (nearbyint, -1.5, -2.0),
11416
11417 TEST_f_f (nearbyint, 262144.75, 262145.0),
11418 TEST_f_f (nearbyint, 262142.75, 262143.0),
11419 TEST_f_f (nearbyint, 524286.75, 524287.0),
11420 TEST_f_f (nearbyint, 524288.75, 524289.0),
11421
11422 TEST_f_f (nearbyint, 1048576.75, 1048577.0),
11423 TEST_f_f (nearbyint, 2097152.75, 2097153.0),
11424 TEST_f_f (nearbyint, 2492472.75, 2492473.0),
11425 TEST_f_f (nearbyint, 2886220.75, 2886221.0),
11426 TEST_f_f (nearbyint, 3058792.75, 3058793.0),
11427 TEST_f_f (nearbyint, -1048576.75, -1048577.0),
11428 TEST_f_f (nearbyint, -2097152.75, -2097153.0),
11429 TEST_f_f (nearbyint, -2492472.75, -2492473.0),
11430 TEST_f_f (nearbyint, -2886220.75, -2886221.0),
11431 TEST_f_f (nearbyint, -3058792.75, -3058793.0),
11432#ifndef TEST_FLOAT
11433 TEST_f_f (nearbyint, 70368744177664.75, 70368744177665.0),
11434 TEST_f_f (nearbyint, 140737488355328.75, 140737488355329.0),
11435 TEST_f_f (nearbyint, 281474976710656.75, 281474976710657.0),
11436 TEST_f_f (nearbyint, 562949953421312.75, 562949953421313.0),
11437 TEST_f_f (nearbyint, 1125899906842624.75, 1125899906842625.0),
11438 TEST_f_f (nearbyint, -70368744177664.75, -70368744177665.0),
11439 TEST_f_f (nearbyint, -140737488355328.75, -140737488355329.0),
11440 TEST_f_f (nearbyint, -281474976710656.75, -281474976710657.0),
11441 TEST_f_f (nearbyint, -562949953421312.75, -562949953421313.0),
11442 TEST_f_f (nearbyint, -1125899906842624.75, -1125899906842625.0),
11443#endif
11444
11445 END_DATA (nearbyint)
11446 };
11447
8847214f
UD		 11448static void
11449nearbyint_test (void)
11450{
11451 START (nearbyint);
74c57478 11452 RUN_TEST_LOOP_f_f (nearbyint, nearbyint_test_data, );
8847214f
UD		 11453 END (nearbyint);
11454}
11455
601a3a5f
JM		 11456static const struct test_ff_f_data nextafter_test_data[] =
11457 {
11458 START_DATA (nextafter),
8847214f 11459
601a3a5f
JM		 11460 TEST_ff_f (nextafter, 0, 0, 0),
11461 TEST_ff_f (nextafter, minus_zero, 0, 0),
11462 TEST_ff_f (nextafter, 0, minus_zero, minus_zero),
11463 TEST_ff_f (nextafter, minus_zero, minus_zero, minus_zero),
8847214f 11464
601a3a5f
JM		 11465 TEST_ff_f (nextafter, 9, 9, 9),
11466 TEST_ff_f (nextafter, -9, -9, -9),
11467 TEST_ff_f (nextafter, plus_infty, plus_infty, plus_infty),
11468 TEST_ff_f (nextafter, minus_infty, minus_infty, minus_infty),
8847214f 11469
601a3a5f
JM		 11470 TEST_ff_f (nextafter, qnan_value, 1.1L, qnan_value),
11471 TEST_ff_f (nextafter, 1.1L, qnan_value, qnan_value),
11472 TEST_ff_f (nextafter, qnan_value, qnan_value, qnan_value),
8847214f 11473
601a3a5f
JM		 11474 TEST_ff_f (nextafter, max_value, plus_infty, plus_infty, OVERFLOW_EXCEPTION),
11475 TEST_ff_f (nextafter, -max_value, minus_infty, minus_infty, OVERFLOW_EXCEPTION),
64b02fd2 11476
757de559 11477#ifdef TEST_LDOUBLE
601a3a5f
JM		 11478 // XXX Enable once gcc is fixed.
11479 //TEST_ff_f (nextafter, 0x0.00000040000000000000p-16385L, -0.1L, 0x0.0000003ffffffff00000p-16385L),
757de559
UD		 11480#endif
11481
601a3a5f
JM		 11482 /* XXX We need the hexadecimal FP number representation here for further
11483 tests. */
11484 END_DATA (nextafter)
11485 };
8847214f 11486
601a3a5f
JM		 11487static void
11488nextafter_test (void)
11489{
11490
11491 START (nextafter);
11492 RUN_TEST_LOOP_ff_f (nextafter, nextafter_test_data, );
8847214f
UD		 11493 END (nextafter);
11494}
11495
fe559c5e 11496
601a3a5f
JM		 11497static const struct test_ff_f_data_nexttoward nexttoward_test_data[] =
11498 {
11499 START_DATA (nexttoward),
11500 TEST_ff_f (nexttoward, 0, 0, 0),
11501 TEST_ff_f (nexttoward, minus_zero, 0, 0),
11502 TEST_ff_f (nexttoward, 0, minus_zero, minus_zero),
11503 TEST_ff_f (nexttoward, minus_zero, minus_zero, minus_zero),
8847214f 11504
601a3a5f
JM		 11505 TEST_ff_f (nexttoward, 9, 9, 9),
11506 TEST_ff_f (nexttoward, -9, -9, -9),
11507 TEST_ff_f (nexttoward, plus_infty, plus_infty, plus_infty),
11508 TEST_ff_f (nexttoward, minus_infty, minus_infty, minus_infty),
8847214f 11509
601a3a5f
JM		 11510 TEST_ff_f (nexttoward, qnan_value, 1.1L, qnan_value),
11511 TEST_ff_f (nexttoward, 1.1L, qnan_value, qnan_value),
11512 TEST_ff_f (nexttoward, qnan_value, qnan_value, qnan_value),
8847214f 11513
7cb029ee 11514#ifdef TEST_FLOAT
601a3a5f
JM		 11515 TEST_ff_f (nexttoward, 1.0, 1.1L, 0x1.000002p0),
11516 TEST_ff_f (nexttoward, 1.0, LDBL_MAX, 0x1.000002p0),
11517 TEST_ff_f (nexttoward, 1.0, 0x1.0000000000001p0, 0x1.000002p0),
11518 TEST_ff_f (nexttoward, 1.0, 0.9L, 0x0.ffffffp0),
11519 TEST_ff_f (nexttoward, 1.0, -LDBL_MAX, 0x0.ffffffp0),
11520 TEST_ff_f (nexttoward, 1.0, 0x0.fffffffffffff8p0, 0x0.ffffffp0),
11521 TEST_ff_f (nexttoward, -1.0, -1.1L, -0x1.000002p0),
11522 TEST_ff_f (nexttoward, -1.0, -LDBL_MAX, -0x1.000002p0),
11523 TEST_ff_f (nexttoward, -1.0, -0x1.0000000000001p0, -0x1.000002p0),
11524 TEST_ff_f (nexttoward, -1.0, -0.9L, -0x0.ffffffp0),
11525 TEST_ff_f (nexttoward, -1.0, LDBL_MAX, -0x0.ffffffp0),
11526 TEST_ff_f (nexttoward, -1.0, -0x0.fffffffffffff8p0, -0x0.ffffffp0),
11527 TEST_ff_f (nexttoward, -0x1.3p-145, -0xap-148L, -0x1.4p-145, UNDERFLOW_EXCEPTION),
7cb029ee 11528# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 11529 TEST_ff_f (nexttoward, 1.0, 0x1.000000000000002p0L, 0x1.000002p0),
11530 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffp0L, 0x0.ffffffp0),
11531 TEST_ff_f (nexttoward, -1.0, -0x1.000000000000002p0L, -0x1.000002p0),
11532 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffp0L, -0x0.ffffffp0),
7cb029ee
JM		 11533# endif
11534# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 11535 TEST_ff_f (nexttoward, 1.0, 0x1.000000000000000000000000008p0L, 0x1.000002p0),
11536 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffffffffffffcp0L, 0x0.ffffffp0),
11537 TEST_ff_f (nexttoward, -1.0, -0x1.000000000000000000000000008p0L, -0x1.000002p0),
11538 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffffffffffffcp0L, -0x0.ffffffp0),
7cb029ee
JM		 11539# endif
11540# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 11541 TEST_ff_f (nexttoward, 1.0, 0x1.0000000000000000000000000001p0L, 0x1.000002p0),
11542 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffp0),
11543 TEST_ff_f (nexttoward, -1.0, -0x1.0000000000000000000000000001p0L, -0x1.000002p0),
11544 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffp0),
7cb029ee
JM		 11545# endif
11546#endif
11547#ifdef TEST_DOUBLE
601a3a5f
JM		 11548 TEST_ff_f (nexttoward, 1.0, 1.1L, 0x1.0000000000001p0),
11549 TEST_ff_f (nexttoward, 1.0, LDBL_MAX, 0x1.0000000000001p0),
11550 TEST_ff_f (nexttoward, 1.0, 0x1.0000000000001p0, 0x1.0000000000001p0),
11551 TEST_ff_f (nexttoward, 1.0, 0.9L, 0x0.fffffffffffff8p0),
11552 TEST_ff_f (nexttoward, 1.0, -LDBL_MAX, 0x0.fffffffffffff8p0),
11553 TEST_ff_f (nexttoward, 1.0, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0),
11554 TEST_ff_f (nexttoward, -1.0, -1.1L, -0x1.0000000000001p0),
11555 TEST_ff_f (nexttoward, -1.0, -LDBL_MAX, -0x1.0000000000001p0),
11556 TEST_ff_f (nexttoward, -1.0, -0x1.0000000000001p0, -0x1.0000000000001p0),
11557 TEST_ff_f (nexttoward, -1.0, -0.9L, -0x0.fffffffffffff8p0),
11558 TEST_ff_f (nexttoward, -1.0, LDBL_MAX, -0x0.fffffffffffff8p0),
11559 TEST_ff_f (nexttoward, -1.0, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0),
11560 TEST_ff_f (nexttoward, -1.0, -0x8.00346dc5d6388p-3L, -0x1.0000000000001p0),
11561 TEST_ff_f (nexttoward, 0x1p-1074, 0x1p-1073L, 0x1p-1073, UNDERFLOW_EXCEPTION),
7cb029ee 11562# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 11563 TEST_ff_f (nexttoward, 1.0, 0x1.000000000000002p0L, 0x1.0000000000001p0),
11564 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffff8p0),
11565 TEST_ff_f (nexttoward, -1.0, -0x1.000000000000002p0L, -0x1.0000000000001p0),
11566 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffff8p0),
7cb029ee
JM		 11567# endif
11568# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 11569 TEST_ff_f (nexttoward, 1.0, 0x1.000000000000000000000000008p0L, 0x1.0000000000001p0),
11570 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffffffffffffcp0L, 0x0.fffffffffffff8p0),
11571 TEST_ff_f (nexttoward, -1.0, -0x1.000000000000000000000000008p0L, -0x1.0000000000001p0),
11572 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffffffffffffcp0L, -0x0.fffffffffffff8p0),
7cb029ee
JM		 11573# endif
11574# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 11575 TEST_ff_f (nexttoward, 1.0, 0x1.0000000000000000000000000001p0L, 0x1.0000000000001p0),
11576 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.fffffffffffff8p0),
11577 TEST_ff_f (nexttoward, -1.0, -0x1.0000000000000000000000000001p0L, -0x1.0000000000001p0),
11578 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.fffffffffffff8p0),
7cb029ee
JM		 11579# endif
11580#endif
601a3a5f
JM		 11581 END_DATA (nexttoward)
11582 };
8847214f
UD		 11583
11584static void
601a3a5f 11585nexttoward_test (void)
8847214f 11586{
601a3a5f
JM		 11587 START (nexttoward);
11588 RUN_TEST_LOOP_ff_f (nexttoward, nexttoward_test_data, );
11589 END (nexttoward);
11590}
8847214f 11591
8847214f 11592
601a3a5f
JM		 11593static const struct test_ff_f_data pow_test_data[] =
11594 {
11595 START_DATA (pow),
11596 TEST_ff_f (pow, 0, 0, 1),
11597 TEST_ff_f (pow, 0, minus_zero, 1),
11598 TEST_ff_f (pow, minus_zero, 0, 1),
11599 TEST_ff_f (pow, minus_zero, minus_zero, 1),
8847214f 11600
601a3a5f
JM		 11601 TEST_ff_f (pow, 10, 0, 1),
11602 TEST_ff_f (pow, 10, minus_zero, 1),
11603 TEST_ff_f (pow, -10, 0, 1),
11604 TEST_ff_f (pow, -10, minus_zero, 1),
8847214f 11605
601a3a5f
JM		 11606 TEST_ff_f (pow, qnan_value, 0, 1),
11607 TEST_ff_f (pow, qnan_value, minus_zero, 1),
8847214f 11608
15daa639 11609#ifndef TEST_INLINE
601a3a5f
JM		 11610 TEST_ff_f (pow, 1.1L, plus_infty, plus_infty),
11611 TEST_ff_f (pow, plus_infty, plus_infty, plus_infty),
11612 TEST_ff_f (pow, -1.1L, plus_infty, plus_infty),
11613 TEST_ff_f (pow, minus_infty, plus_infty, plus_infty),
11614
11615 TEST_ff_f (pow, 0.9L, plus_infty, 0),
11616 TEST_ff_f (pow, 1e-7L, plus_infty, 0),
11617 TEST_ff_f (pow, -0.9L, plus_infty, 0),
11618 TEST_ff_f (pow, -1e-7L, plus_infty, 0),
11619
11620 TEST_ff_f (pow, 1.1L, minus_infty, 0),
11621 TEST_ff_f (pow, plus_infty, minus_infty, 0),
11622 TEST_ff_f (pow, -1.1L, minus_infty, 0),
11623 TEST_ff_f (pow, minus_infty, minus_infty, 0),
11624
11625 TEST_ff_f (pow, 0.9L, minus_infty, plus_infty),
11626 TEST_ff_f (pow, 1e-7L, minus_infty, plus_infty),
11627 TEST_ff_f (pow, -0.9L, minus_infty, plus_infty),
11628 TEST_ff_f (pow, -1e-7L, minus_infty, plus_infty),
11629
11630 TEST_ff_f (pow, plus_infty, 1e-7L, plus_infty),
11631 TEST_ff_f (pow, plus_infty, 1, plus_infty),
11632 TEST_ff_f (pow, plus_infty, 1e7L, plus_infty),
11633 TEST_ff_f (pow, plus_infty, min_subnorm_value, plus_infty),
11634
11635 TEST_ff_f (pow, plus_infty, -1e-7L, 0),
11636 TEST_ff_f (pow, plus_infty, -1, 0),
11637 TEST_ff_f (pow, plus_infty, -1e7L, 0),
11638 TEST_ff_f (pow, plus_infty, -min_subnorm_value, 0),
11639
11640 TEST_ff_f (pow, minus_infty, 1, minus_infty),
11641 TEST_ff_f (pow, minus_infty, 11, minus_infty),
11642 TEST_ff_f (pow, minus_infty, 1001, minus_infty),
11643
11644 TEST_ff_f (pow, minus_infty, 2, plus_infty),
11645 TEST_ff_f (pow, minus_infty, 12, plus_infty),
11646 TEST_ff_f (pow, minus_infty, 1002, plus_infty),
11647 TEST_ff_f (pow, minus_infty, 0.1L, plus_infty),
11648 TEST_ff_f (pow, minus_infty, 1.1L, plus_infty),
11649 TEST_ff_f (pow, minus_infty, 11.1L, plus_infty),
11650 TEST_ff_f (pow, minus_infty, 1001.1L, plus_infty),
11651 TEST_ff_f (pow, minus_infty, min_subnorm_value, plus_infty),
11652
11653 TEST_ff_f (pow, minus_infty, -1, minus_zero),
11654 TEST_ff_f (pow, minus_infty, -11, minus_zero),
11655 TEST_ff_f (pow, minus_infty, -1001, minus_zero),
11656
11657 TEST_ff_f (pow, minus_infty, -2, 0),
11658 TEST_ff_f (pow, minus_infty, -12, 0),
11659 TEST_ff_f (pow, minus_infty, -1002, 0),
11660 TEST_ff_f (pow, minus_infty, -0.1L, 0),
11661 TEST_ff_f (pow, minus_infty, -1.1L, 0),
11662 TEST_ff_f (pow, minus_infty, -11.1L, 0),
11663 TEST_ff_f (pow, minus_infty, -1001.1L, 0),
11664 TEST_ff_f (pow, minus_infty, -min_subnorm_value, 0),
11665#endif
11666
11667 TEST_ff_f (pow, qnan_value, qnan_value, qnan_value),
11668 TEST_ff_f (pow, 0, qnan_value, qnan_value),
11669 TEST_ff_f (pow, 1, qnan_value, 1),
11670 TEST_ff_f (pow, -1, qnan_value, qnan_value),
11671 TEST_ff_f (pow, qnan_value, 1, qnan_value),
11672 TEST_ff_f (pow, qnan_value, -1, qnan_value),
11673
11674 /* pow (x, qNaN) == qNaN. */
11675 TEST_ff_f (pow, 3.0, qnan_value, qnan_value),
11676 TEST_ff_f (pow, minus_zero, qnan_value, qnan_value),
11677 TEST_ff_f (pow, plus_infty, qnan_value, qnan_value),
11678 TEST_ff_f (pow, -3.0, qnan_value, qnan_value),
11679 TEST_ff_f (pow, minus_infty, qnan_value, qnan_value),
11680
11681 TEST_ff_f (pow, qnan_value, 3.0, qnan_value),
11682 TEST_ff_f (pow, qnan_value, -3.0, qnan_value),
11683 TEST_ff_f (pow, qnan_value, plus_infty, qnan_value),
11684 TEST_ff_f (pow, qnan_value, minus_infty, qnan_value),
11685 TEST_ff_f (pow, qnan_value, 2.5, qnan_value),
11686 TEST_ff_f (pow, qnan_value, -2.5, qnan_value),
11687 TEST_ff_f (pow, qnan_value, min_subnorm_value, qnan_value),
11688 TEST_ff_f (pow, qnan_value, -min_subnorm_value, qnan_value),
11689
11690 TEST_ff_f (pow, 1, plus_infty, 1),
11691 TEST_ff_f (pow, -1, plus_infty, 1),
11692 TEST_ff_f (pow, 1, minus_infty, 1),
11693 TEST_ff_f (pow, -1, minus_infty, 1),
11694 TEST_ff_f (pow, 1, 1, 1),
11695 TEST_ff_f (pow, 1, -1, 1),
11696 TEST_ff_f (pow, 1, 1.25, 1),
11697 TEST_ff_f (pow, 1, -1.25, 1),
11698 TEST_ff_f (pow, 1, 0x1p62L, 1),
11699 TEST_ff_f (pow, 1, 0x1p63L, 1),
11700 TEST_ff_f (pow, 1, 0x1p64L, 1),
11701 TEST_ff_f (pow, 1, 0x1p72L, 1),
11702 TEST_ff_f (pow, 1, min_subnorm_value, 1),
11703 TEST_ff_f (pow, 1, -min_subnorm_value, 1),
11704
11705 /* pow (x, +-0) == 1. */
11706 TEST_ff_f (pow, plus_infty, 0, 1),
11707 TEST_ff_f (pow, plus_infty, minus_zero, 1),
11708 TEST_ff_f (pow, minus_infty, 0, 1),
11709 TEST_ff_f (pow, minus_infty, minus_zero, 1),
11710 TEST_ff_f (pow, 32.75L, 0, 1),
11711 TEST_ff_f (pow, 32.75L, minus_zero, 1),
11712 TEST_ff_f (pow, -32.75L, 0, 1),
11713 TEST_ff_f (pow, -32.75L, minus_zero, 1),
11714 TEST_ff_f (pow, 0x1p72L, 0, 1),
11715 TEST_ff_f (pow, 0x1p72L, minus_zero, 1),
11716 TEST_ff_f (pow, 0x1p-72L, 0, 1),
11717 TEST_ff_f (pow, 0x1p-72L, minus_zero, 1),
11718
11719 TEST_ff_f (pow, -0.1L, 1.1L, qnan_value, INVALID_EXCEPTION),
11720 TEST_ff_f (pow, -0.1L, -1.1L, qnan_value, INVALID_EXCEPTION),
11721 TEST_ff_f (pow, -10.1L, 1.1L, qnan_value, INVALID_EXCEPTION),
11722 TEST_ff_f (pow, -10.1L, -1.1L, qnan_value, INVALID_EXCEPTION),
11723 TEST_ff_f (pow, -1.01L, min_subnorm_value, qnan_value, INVALID_EXCEPTION),
11724 TEST_ff_f (pow, -1.01L, -min_subnorm_value, qnan_value, INVALID_EXCEPTION),
11725 TEST_ff_f (pow, -1.0L, min_subnorm_value, qnan_value, INVALID_EXCEPTION),
11726 TEST_ff_f (pow, -1.0L, -min_subnorm_value, qnan_value, INVALID_EXCEPTION),
11727
11728 TEST_ff_f (pow, 0, -1, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11729 TEST_ff_f (pow, 0, -11, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11730 TEST_ff_f (pow, 0, -0xffffff, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa 11731#ifndef TEST_FLOAT
601a3a5f 11732 TEST_ff_f (pow, 0, -0x1.fffffffffffffp+52L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 11733#endif
11734#ifdef TEST_LDOUBLE
11735# if LDBL_MANT_DIG >= 64
601a3a5f 11736 TEST_ff_f (pow, 0, -0x1.fffffffffffffffep+63L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 11737# endif
11738# if LDBL_MANT_DIG >= 106
601a3a5f 11739 TEST_ff_f (pow, 0, -0x1.ffffffffffffffffffffffffff8p+105L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 11740# endif
11741# if LDBL_MANT_DIG >= 113
601a3a5f 11742 TEST_ff_f (pow, 0, -0x1.ffffffffffffffffffffffffffffp+112L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 11743# endif
11744#endif
601a3a5f
JM		 11745 TEST_ff_f (pow, minus_zero, -1, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11746 TEST_ff_f (pow, minus_zero, -11L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11747 TEST_ff_f (pow, minus_zero, -0xffffff, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11748 TEST_ff_f (pow, minus_zero, -0x1fffffe, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa 11749#ifndef TEST_FLOAT
601a3a5f
JM		 11750 TEST_ff_f (pow, minus_zero, -0x1.fffffffffffffp+52L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11751 TEST_ff_f (pow, minus_zero, -0x1.fffffffffffffp+53L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 11752#endif
11753#ifdef TEST_LDOUBLE
11754# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 11755 TEST_ff_f (pow, minus_zero, -0x1.fffffffffffffffep+63L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11756 TEST_ff_f (pow, minus_zero, -0x1.fffffffffffffffep+64L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 11757# endif
11758# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 11759 TEST_ff_f (pow, minus_zero, -0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11760 TEST_ff_f (pow, minus_zero, -0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 11761# endif
11762# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 11763 TEST_ff_f (pow, minus_zero, -0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11764 TEST_ff_f (pow, minus_zero, -0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 11765# endif
11766#endif
8847214f 11767
601a3a5f
JM		 11768 TEST_ff_f (pow, 0, -2, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11769 TEST_ff_f (pow, 0, -11.1L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11770 TEST_ff_f (pow, 0, -min_subnorm_value, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11771 TEST_ff_f (pow, 0, -0x1p24, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11772 TEST_ff_f (pow, 0, -0x1p127, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11773 TEST_ff_f (pow, 0, -max_value, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11774 TEST_ff_f (pow, minus_zero, -2, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11775 TEST_ff_f (pow, minus_zero, -11.1L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11776 TEST_ff_f (pow, minus_zero, -min_subnorm_value, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11777 TEST_ff_f (pow, minus_zero, -0x1p24, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11778 TEST_ff_f (pow, minus_zero, -0x1p127, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11779 TEST_ff_f (pow, minus_zero, -max_value, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11780
11781 TEST_ff_f (pow, 0x1p72L, 0x1p72L, plus_infty, OVERFLOW_EXCEPTION),
11782 TEST_ff_f (pow, 10, -0x1p72L, 0, UNDERFLOW_EXCEPTION),
11783 TEST_ff_f (pow, max_value, max_value, plus_infty, OVERFLOW_EXCEPTION),
11784 TEST_ff_f (pow, 10, -max_value, 0, UNDERFLOW_EXCEPTION),
11785
11786 TEST_ff_f (pow, 0, 1, 0),
11787 TEST_ff_f (pow, 0, 11, 0),
11788
11789 TEST_ff_f (pow, minus_zero, 1, minus_zero),
11790 TEST_ff_f (pow, minus_zero, 11, minus_zero),
11791
11792 TEST_ff_f (pow, 0, 2, 0),
11793 TEST_ff_f (pow, 0, 11.1L, 0),
11794
11795 TEST_ff_f (pow, minus_zero, 2, 0),
11796 TEST_ff_f (pow, minus_zero, 11.1L, 0),
11797 TEST_ff_f (pow, 0, plus_infty, 0),
11798 TEST_ff_f (pow, minus_zero, plus_infty, 0),
11799 TEST_ff_f (pow, 0, minus_infty, plus_infty, DIVIDE_BY_ZERO_EXCEPTION_OK),
11800 TEST_ff_f (pow, minus_zero, minus_infty, plus_infty, DIVIDE_BY_ZERO_EXCEPTION_OK),
8847214f 11801
15daa639 11802#ifndef TEST_INLINE
601a3a5f
JM		 11803 /* pow (x, +inf) == +inf for |x| > 1. */
11804 TEST_ff_f (pow, 1.5, plus_infty, plus_infty),
8847214f 11805
601a3a5f
JM		 11806 /* pow (x, +inf) == +0 for |x| < 1. */
11807 TEST_ff_f (pow, 0.5, plus_infty, 0.0),
8847214f 11808
601a3a5f
JM		 11809 /* pow (x, -inf) == +0 for |x| > 1. */
11810 TEST_ff_f (pow, 1.5, minus_infty, 0.0),
8847214f 11811
601a3a5f
JM		 11812 /* pow (x, -inf) == +inf for |x| < 1. */
11813 TEST_ff_f (pow, 0.5, minus_infty, plus_infty),
15daa639 11814#endif
8847214f 11815
601a3a5f
JM		 11816 /* pow (+inf, y) == +inf for y > 0. */
11817 TEST_ff_f (pow, plus_infty, 2, plus_infty),
11818 TEST_ff_f (pow, plus_infty, 0xffffff, plus_infty),
2460d3aa 11819#ifndef TEST_FLOAT
601a3a5f 11820 TEST_ff_f (pow, plus_infty, 0x1.fffffffffffffp+52L, plus_infty),
2460d3aa
JM		 11821#endif
11822#ifdef TEST_LDOUBLE
11823# if LDBL_MANT_DIG >= 64
601a3a5f 11824 TEST_ff_f (pow, plus_infty, 0x1.fffffffffffffffep+63L, plus_infty),
2460d3aa
JM		 11825# endif
11826# if LDBL_MANT_DIG >= 106
601a3a5f 11827 TEST_ff_f (pow, plus_infty, 0x1.ffffffffffffffffffffffffff8p+105L, plus_infty),
2460d3aa
JM		 11828# endif
11829# if LDBL_MANT_DIG >= 113
601a3a5f 11830 TEST_ff_f (pow, plus_infty, 0x1.ffffffffffffffffffffffffffffp+112L, plus_infty),
2460d3aa
JM		 11831# endif
11832#endif
601a3a5f
JM		 11833 TEST_ff_f (pow, plus_infty, 0x1p24, plus_infty),
11834 TEST_ff_f (pow, plus_infty, 0x1p127, plus_infty),
11835 TEST_ff_f (pow, plus_infty, max_value, plus_infty),
8847214f 11836
601a3a5f
JM		 11837 /* pow (+inf, y) == +0 for y < 0. */
11838 TEST_ff_f (pow, plus_infty, -1, 0.0),
11839 TEST_ff_f (pow, plus_infty, -0xffffff, 0.0),
2460d3aa 11840#ifndef TEST_FLOAT
601a3a5f 11841 TEST_ff_f (pow, plus_infty, -0x1.fffffffffffffp+52L, 0.0),
2460d3aa
JM		 11842#endif
11843#ifdef TEST_LDOUBLE
11844# if LDBL_MANT_DIG >= 64
601a3a5f 11845 TEST_ff_f (pow, plus_infty, -0x1.fffffffffffffffep+63L, 0.0),
2460d3aa
JM		 11846# endif
11847# if LDBL_MANT_DIG >= 106
601a3a5f 11848 TEST_ff_f (pow, plus_infty, -0x1.ffffffffffffffffffffffffff8p+105L, 0.0),
2460d3aa
JM		 11849# endif
11850# if LDBL_MANT_DIG >= 113
601a3a5f 11851 TEST_ff_f (pow, plus_infty, -0x1.ffffffffffffffffffffffffffffp+112L, 0.0),
2460d3aa
JM		 11852# endif
11853#endif
601a3a5f
JM		 11854 TEST_ff_f (pow, plus_infty, -0x1p24, 0.0),
11855 TEST_ff_f (pow, plus_infty, -0x1p127, 0.0),
11856 TEST_ff_f (pow, plus_infty, -max_value, 0.0),
8847214f 11857
601a3a5f
JM		 11858 /* pow (-inf, y) == -inf for y an odd integer > 0. */
11859 TEST_ff_f (pow, minus_infty, 27, minus_infty),
11860 TEST_ff_f (pow, minus_infty, 0xffffff, minus_infty),
11861 TEST_ff_f (pow, minus_infty, 0x1fffffe, plus_infty),
2460d3aa 11862#ifndef TEST_FLOAT
601a3a5f
JM		 11863 TEST_ff_f (pow, minus_infty, 0x1.fffffffffffffp+52L, minus_infty),
11864 TEST_ff_f (pow, minus_infty, 0x1.fffffffffffffp+53L, plus_infty),
2460d3aa
JM		 11865#endif
11866#ifdef TEST_LDOUBLE
11867# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 11868 TEST_ff_f (pow, minus_infty, 0x1.fffffffffffffffep+63L, minus_infty),
11869 TEST_ff_f (pow, minus_infty, 0x1.fffffffffffffffep+64L, plus_infty),
2460d3aa
JM		 11870# endif
11871# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 11872 TEST_ff_f (pow, minus_infty, 0x1.ffffffffffffffffffffffffff8p+105L, minus_infty),
11873 TEST_ff_f (pow, minus_infty, 0x1.ffffffffffffffffffffffffff8p+106L, plus_infty),
2460d3aa
JM		 11874# endif
11875# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 11876 TEST_ff_f (pow, minus_infty, 0x1.ffffffffffffffffffffffffffffp+112L, minus_infty),
11877 TEST_ff_f (pow, minus_infty, 0x1.ffffffffffffffffffffffffffffp+113L, plus_infty),
2460d3aa
JM		 11878# endif
11879#endif
8847214f 11880
601a3a5f
JM		 11881 /* pow (-inf, y) == +inf for y > 0 and not an odd integer. */
11882 TEST_ff_f (pow, minus_infty, 28, plus_infty),
11883 TEST_ff_f (pow, minus_infty, 0x1p24, plus_infty),
11884 TEST_ff_f (pow, minus_infty, 0x1p127, plus_infty),
11885 TEST_ff_f (pow, minus_infty, max_value, plus_infty),
8847214f 11886
601a3a5f
JM		 11887 /* pow (-inf, y) == -0 for y an odd integer < 0. */
11888 TEST_ff_f (pow, minus_infty, -3, minus_zero),
11889 TEST_ff_f (pow, minus_infty, -0xffffff, minus_zero),
11890 TEST_ff_f (pow, minus_infty, -0x1fffffe, plus_zero),
2460d3aa 11891#ifndef TEST_FLOAT
601a3a5f
JM		 11892 TEST_ff_f (pow, minus_infty, -0x1.fffffffffffffp+52L, minus_zero),
11893 TEST_ff_f (pow, minus_infty, -0x1.fffffffffffffp+53L, plus_zero),
2460d3aa
JM		 11894#endif
11895#ifdef TEST_LDOUBLE
11896# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 11897 TEST_ff_f (pow, minus_infty, -0x1.fffffffffffffffep+63L, minus_zero),
11898 TEST_ff_f (pow, minus_infty, -0x1.fffffffffffffffep+64L, plus_zero),
2460d3aa
JM		 11899# endif
11900# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 11901 TEST_ff_f (pow, minus_infty, -0x1.ffffffffffffffffffffffffff8p+105L, minus_zero),
11902 TEST_ff_f (pow, minus_infty, -0x1.ffffffffffffffffffffffffff8p+106L, plus_zero),
2460d3aa
JM		 11903# endif
11904# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 11905 TEST_ff_f (pow, minus_infty, -0x1.ffffffffffffffffffffffffffffp+112L, minus_zero),
11906 TEST_ff_f (pow, minus_infty, -0x1.ffffffffffffffffffffffffffffp+113L, plus_zero),
2460d3aa
JM		 11907# endif
11908#endif
601a3a5f
JM		 11909 /* pow (-inf, y) == +0 for y < 0 and not an odd integer. */
11910 TEST_ff_f (pow, minus_infty, -2.0, 0.0),
11911 TEST_ff_f (pow, minus_infty, -0x1p24, 0.0),
11912 TEST_ff_f (pow, minus_infty, -0x1p127, 0.0),
11913 TEST_ff_f (pow, minus_infty, -max_value, 0.0),
8847214f 11914
601a3a5f
JM		 11915 /* pow (+0, y) == +0 for y an odd integer > 0. */
11916 TEST_ff_f (pow, 0.0, 27, 0.0),
11917 TEST_ff_f (pow, 0.0, 0xffffff, 0.0),
2460d3aa 11918#ifndef TEST_FLOAT
601a3a5f 11919 TEST_ff_f (pow, 0.0, 0x1.fffffffffffffp+52L, 0.0),
2460d3aa
JM		 11920#endif
11921#ifdef TEST_LDOUBLE
11922# if LDBL_MANT_DIG >= 64
601a3a5f 11923 TEST_ff_f (pow, 0.0, 0x1.fffffffffffffffep+63L, 0.0),
2460d3aa
JM		 11924# endif
11925# if LDBL_MANT_DIG >= 106
601a3a5f 11926 TEST_ff_f (pow, 0.0, 0x1.ffffffffffffffffffffffffff8p+105L, 0.0),
2460d3aa
JM		 11927# endif
11928# if LDBL_MANT_DIG >= 113
601a3a5f 11929 TEST_ff_f (pow, 0.0, 0x1.ffffffffffffffffffffffffffffp+112L, 0.0),
2460d3aa
JM		 11930# endif
11931#endif
8847214f 11932
601a3a5f
JM		 11933 /* pow (-0, y) == -0 for y an odd integer > 0. */
11934 TEST_ff_f (pow, minus_zero, 27, minus_zero),
11935 TEST_ff_f (pow, minus_zero, 0xffffff, minus_zero),
11936 TEST_ff_f (pow, minus_zero, 0x1fffffe, plus_zero),
2460d3aa 11937#ifndef TEST_FLOAT
601a3a5f
JM		 11938 TEST_ff_f (pow, minus_zero, 0x1.fffffffffffffp+52L, minus_zero),
11939 TEST_ff_f (pow, minus_zero, 0x1.fffffffffffffp+53L, plus_zero),
2460d3aa
JM		 11940#endif
11941#ifdef TEST_LDOUBLE
11942# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 11943 TEST_ff_f (pow, minus_zero, 0x1.fffffffffffffffep+63L, minus_zero),
11944 TEST_ff_f (pow, minus_zero, 0x1.fffffffffffffffep+64L, plus_zero),
2460d3aa
JM		 11945# endif
11946# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 11947 TEST_ff_f (pow, minus_zero, 0x1.ffffffffffffffffffffffffff8p+105L, minus_zero),
11948 TEST_ff_f (pow, minus_zero, 0x1.ffffffffffffffffffffffffff8p+106L, plus_zero),
2460d3aa
JM		 11949# endif
11950# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 11951 TEST_ff_f (pow, minus_zero, 0x1.ffffffffffffffffffffffffffffp+112L, minus_zero),
11952 TEST_ff_f (pow, minus_zero, 0x1.ffffffffffffffffffffffffffffp+113L, plus_zero),
2460d3aa
JM		 11953# endif
11954#endif
8847214f 11955
601a3a5f
JM		 11956 /* pow (+0, y) == +0 for y > 0 and not an odd integer. */
11957 TEST_ff_f (pow, 0.0, 4, 0.0),
11958 TEST_ff_f (pow, 0.0, 0x1p24, 0.0),
11959 TEST_ff_f (pow, 0.0, 0x1p127, 0.0),
11960 TEST_ff_f (pow, 0.0, max_value, 0.0),
11961 TEST_ff_f (pow, 0.0, min_subnorm_value, 0.0),
8847214f 11962
601a3a5f
JM		 11963 /* pow (-0, y) == +0 for y > 0 and not an odd integer. */
11964 TEST_ff_f (pow, minus_zero, 4, 0.0),
11965 TEST_ff_f (pow, minus_zero, 0x1p24, 0.0),
11966 TEST_ff_f (pow, minus_zero, 0x1p127, 0.0),
11967 TEST_ff_f (pow, minus_zero, max_value, 0.0),
11968 TEST_ff_f (pow, minus_zero, min_subnorm_value, 0.0),
8847214f 11969
601a3a5f
JM		 11970 TEST_ff_f (pow, 16, 0.25L, 2),
11971 TEST_ff_f (pow, 0x1p64L, 0.125L, 256),
11972 TEST_ff_f (pow, 2, 4, 16),
11973 TEST_ff_f (pow, 256, 8, 0x1p64L),
164f863e 11974
601a3a5f 11975 TEST_ff_f (pow, 0.75L, 1.25L, 0.697953644326574699205914060237425566L),
8847214f 11976
4c95adde 11977#if defined TEST_DOUBLE || defined TEST_LDOUBLE
601a3a5f 11978 TEST_ff_f (pow, -7.49321e+133, -9.80818e+16, 0, UNDERFLOW_EXCEPTION),
8847214f
UD		 11979#endif
11980
601a3a5f
JM		 11981 TEST_ff_f (pow, -1.0, -0xffffff, -1.0),
11982 TEST_ff_f (pow, -1.0, -0x1fffffe, 1.0),
d6270972 11983#ifndef TEST_FLOAT
601a3a5f
JM		 11984 TEST_ff_f (pow, -1.0, -0x1.fffffffffffffp+52L, -1.0),
11985 TEST_ff_f (pow, -1.0, -0x1.fffffffffffffp+53L, 1.0),
d6270972
JM		 11986#endif
11987#ifdef TEST_LDOUBLE
11988# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 11989 TEST_ff_f (pow, -1.0, -0x1.fffffffffffffffep+63L, -1.0),
11990 TEST_ff_f (pow, -1.0, -0x1.fffffffffffffffep+64L, 1.0),
d6270972
JM		 11991# endif
11992# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 11993 TEST_ff_f (pow, -1.0, -0x1.ffffffffffffffffffffffffff8p+105L, -1.0),
11994 TEST_ff_f (pow, -1.0, -0x1.ffffffffffffffffffffffffff8p+106L, 1.0),
d6270972
JM		 11995# endif
11996# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 11997 TEST_ff_f (pow, -1.0, -0x1.ffffffffffffffffffffffffffffp+112L, -1.0),
11998 TEST_ff_f (pow, -1.0, -0x1.ffffffffffffffffffffffffffffp+113L, 1.0),
d6270972
JM		 11999# endif
12000#endif
601a3a5f 12001 TEST_ff_f (pow, -1.0, -max_value, 1.0),
d6270972 12002
601a3a5f
JM		 12003 TEST_ff_f (pow, -1.0, 0xffffff, -1.0),
12004 TEST_ff_f (pow, -1.0, 0x1fffffe, 1.0),
d6270972 12005#ifndef TEST_FLOAT
601a3a5f
JM		 12006 TEST_ff_f (pow, -1.0, 0x1.fffffffffffffp+52L, -1.0),
12007 TEST_ff_f (pow, -1.0, 0x1.fffffffffffffp+53L, 1.0),
d6270972
JM		 12008#endif
12009#ifdef TEST_LDOUBLE
12010# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12011 TEST_ff_f (pow, -1.0, 0x1.fffffffffffffffep+63L, -1.0),
12012 TEST_ff_f (pow, -1.0, 0x1.fffffffffffffffep+64L, 1.0),
d6270972
JM		 12013# endif
12014# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12015 TEST_ff_f (pow, -1.0, 0x1.ffffffffffffffffffffffffff8p+105L, -1.0),
12016 TEST_ff_f (pow, -1.0, 0x1.ffffffffffffffffffffffffff8p+106L, 1.0),
d6270972
JM		 12017# endif
12018# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12019 TEST_ff_f (pow, -1.0, 0x1.ffffffffffffffffffffffffffffp+112L, -1.0),
12020 TEST_ff_f (pow, -1.0, 0x1.ffffffffffffffffffffffffffffp+113L, 1.0),
d6270972
JM		 12021# endif
12022#endif
601a3a5f 12023 TEST_ff_f (pow, -1.0, max_value, 1.0),
d6270972 12024
601a3a5f
JM		 12025 TEST_ff_f (pow, -2.0, 126, 0x1p126),
12026 TEST_ff_f (pow, -2.0, 127, -0x1p127),
12027 /* Allow inexact results for float to be considered to underflow. */
12028 TEST_ff_f (pow, -2.0, -126, 0x1p-126, UNDERFLOW_EXCEPTION_OK_FLOAT),
12029 TEST_ff_f (pow, -2.0, -127, -0x1p-127, UNDERFLOW_EXCEPTION_OK_FLOAT),
d6270972 12030
601a3a5f
JM		 12031 TEST_ff_f (pow, -2.0, -0xffffff, minus_zero, UNDERFLOW_EXCEPTION),
12032 TEST_ff_f (pow, -2.0, -0x1fffffe, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12033#ifndef TEST_FLOAT
601a3a5f
JM		 12034 TEST_ff_f (pow, -2.0, -0x1.fffffffffffffp+52L, minus_zero, UNDERFLOW_EXCEPTION),
12035 TEST_ff_f (pow, -2.0, -0x1.fffffffffffffp+53L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12036#endif
12037#ifdef TEST_LDOUBLE
12038# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12039 TEST_ff_f (pow, -2.0, -0x1.fffffffffffffffep+63L, minus_zero, UNDERFLOW_EXCEPTION),
12040 TEST_ff_f (pow, -2.0, -0x1.fffffffffffffffep+64L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12041# endif
12042# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12043 TEST_ff_f (pow, -2.0, -0x1.ffffffffffffffffffffffffff8p+105L, minus_zero, UNDERFLOW_EXCEPTION),
12044 TEST_ff_f (pow, -2.0, -0x1.ffffffffffffffffffffffffff8p+106L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12045# endif
12046# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12047 TEST_ff_f (pow, -2.0, -0x1.ffffffffffffffffffffffffffffp+112L, minus_zero, UNDERFLOW_EXCEPTION),
12048 TEST_ff_f (pow, -2.0, -0x1.ffffffffffffffffffffffffffffp+113L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12049# endif
12050#endif
601a3a5f 12051 TEST_ff_f (pow, -2.0, -max_value, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12052
601a3a5f
JM		 12053 TEST_ff_f (pow, -2.0, 0xffffff, minus_infty, OVERFLOW_EXCEPTION),
12054 TEST_ff_f (pow, -2.0, 0x1fffffe, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12055#ifndef TEST_FLOAT
601a3a5f
JM		 12056 TEST_ff_f (pow, -2.0, 0x1.fffffffffffffp+52L, minus_infty, OVERFLOW_EXCEPTION),
12057 TEST_ff_f (pow, -2.0, 0x1.fffffffffffffp+53L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12058#endif
12059#ifdef TEST_LDOUBLE
12060# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12061 TEST_ff_f (pow, -2.0, 0x1.fffffffffffffffep+63L, minus_infty, OVERFLOW_EXCEPTION),
12062 TEST_ff_f (pow, -2.0, 0x1.fffffffffffffffep+64L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12063# endif
12064# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12065 TEST_ff_f (pow, -2.0, 0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, OVERFLOW_EXCEPTION),
12066 TEST_ff_f (pow, -2.0, 0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12067# endif
12068# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12069 TEST_ff_f (pow, -2.0, 0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, OVERFLOW_EXCEPTION),
12070 TEST_ff_f (pow, -2.0, 0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12071# endif
12072#endif
601a3a5f 12073 TEST_ff_f (pow, -2.0, max_value, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12074
601a3a5f
JM		 12075 TEST_ff_f (pow, -max_value, 0.5, qnan_value, INVALID_EXCEPTION),
12076 TEST_ff_f (pow, -max_value, 1.5, qnan_value, INVALID_EXCEPTION),
12077 TEST_ff_f (pow, -max_value, 1000.5, qnan_value, INVALID_EXCEPTION),
12078 TEST_ff_f (pow, -max_value, -2, plus_zero, UNDERFLOW_EXCEPTION),
12079 TEST_ff_f (pow, -max_value, -3, minus_zero, UNDERFLOW_EXCEPTION),
12080 TEST_ff_f (pow, -max_value, 2, plus_infty, OVERFLOW_EXCEPTION),
12081 TEST_ff_f (pow, -max_value, 3, minus_infty, OVERFLOW_EXCEPTION),
d6270972 12082
601a3a5f
JM		 12083 TEST_ff_f (pow, -max_value, -0xffffff, minus_zero, UNDERFLOW_EXCEPTION),
12084 TEST_ff_f (pow, -max_value, -0x1fffffe, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12085#ifndef TEST_FLOAT
601a3a5f
JM		 12086 TEST_ff_f (pow, -max_value, -0x1.fffffffffffffp+52L, minus_zero, UNDERFLOW_EXCEPTION),
12087 TEST_ff_f (pow, -max_value, -0x1.fffffffffffffp+53L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12088#endif
12089#ifdef TEST_LDOUBLE
12090# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12091 TEST_ff_f (pow, -max_value, -0x1.fffffffffffffffep+63L, minus_zero, UNDERFLOW_EXCEPTION),
12092 TEST_ff_f (pow, -max_value, -0x1.fffffffffffffffep+64L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12093# endif
12094# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12095 TEST_ff_f (pow, -max_value, -0x1.ffffffffffffffffffffffffff8p+105L, minus_zero, UNDERFLOW_EXCEPTION),
12096 TEST_ff_f (pow, -max_value, -0x1.ffffffffffffffffffffffffff8p+106L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12097# endif
12098# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12099 TEST_ff_f (pow, -max_value, -0x1.ffffffffffffffffffffffffffffp+112L, minus_zero, UNDERFLOW_EXCEPTION),
12100 TEST_ff_f (pow, -max_value, -0x1.ffffffffffffffffffffffffffffp+113L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12101# endif
12102#endif
601a3a5f 12103 TEST_ff_f (pow, -max_value, -max_value, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12104
601a3a5f
JM		 12105 TEST_ff_f (pow, -max_value, 0xffffff, minus_infty, OVERFLOW_EXCEPTION),
12106 TEST_ff_f (pow, -max_value, 0x1fffffe, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12107#ifndef TEST_FLOAT
601a3a5f
JM		 12108 TEST_ff_f (pow, -max_value, 0x1.fffffffffffffp+52L, minus_infty, OVERFLOW_EXCEPTION),
12109 TEST_ff_f (pow, -max_value, 0x1.fffffffffffffp+53L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12110#endif
12111#ifdef TEST_LDOUBLE
12112# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12113 TEST_ff_f (pow, -max_value, 0x1.fffffffffffffffep+63L, minus_infty, OVERFLOW_EXCEPTION),
12114 TEST_ff_f (pow, -max_value, 0x1.fffffffffffffffep+64L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12115# endif
12116# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12117 TEST_ff_f (pow, -max_value, 0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, OVERFLOW_EXCEPTION),
12118 TEST_ff_f (pow, -max_value, 0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12119# endif
12120# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12121 TEST_ff_f (pow, -max_value, 0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, OVERFLOW_EXCEPTION),
12122 TEST_ff_f (pow, -max_value, 0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12123# endif
12124#endif
601a3a5f 12125 TEST_ff_f (pow, -max_value, max_value, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12126
601a3a5f
JM		 12127 TEST_ff_f (pow, -0.5, 126, 0x1p-126),
12128 TEST_ff_f (pow, -0.5, 127, -0x1p-127),
12129 TEST_ff_f (pow, -0.5, -126, 0x1p126),
12130 TEST_ff_f (pow, -0.5, -127, -0x1p127),
d6270972 12131
601a3a5f
JM		 12132 TEST_ff_f (pow, -0.5, -0xffffff, minus_infty, OVERFLOW_EXCEPTION),
12133 TEST_ff_f (pow, -0.5, -0x1fffffe, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12134#ifndef TEST_FLOAT
601a3a5f
JM		 12135 TEST_ff_f (pow, -0.5, -0x1.fffffffffffffp+52L, minus_infty, OVERFLOW_EXCEPTION),
12136 TEST_ff_f (pow, -0.5, -0x1.fffffffffffffp+53L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12137#endif
12138#ifdef TEST_LDOUBLE
12139# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12140 TEST_ff_f (pow, -0.5, -0x1.fffffffffffffffep+63L, minus_infty, OVERFLOW_EXCEPTION),
12141 TEST_ff_f (pow, -0.5, -0x1.fffffffffffffffep+64L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12142# endif
12143# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12144 TEST_ff_f (pow, -0.5, -0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, OVERFLOW_EXCEPTION),
12145 TEST_ff_f (pow, -0.5, -0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12146# endif
12147# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12148 TEST_ff_f (pow, -0.5, -0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, OVERFLOW_EXCEPTION),
12149 TEST_ff_f (pow, -0.5, -0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12150# endif
12151#endif
601a3a5f 12152 TEST_ff_f (pow, -0.5, -max_value, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12153
601a3a5f
JM		 12154 TEST_ff_f (pow, -0.5, 0xffffff, minus_zero, UNDERFLOW_EXCEPTION),
12155 TEST_ff_f (pow, -0.5, 0x1fffffe, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12156#ifndef TEST_FLOAT
601a3a5f
JM		 12157 TEST_ff_f (pow, -0.5, 0x1.fffffffffffffp+52L, minus_zero, UNDERFLOW_EXCEPTION),
12158 TEST_ff_f (pow, -0.5, 0x1.fffffffffffffp+53L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12159#endif
12160#ifdef TEST_LDOUBLE
12161# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12162 TEST_ff_f (pow, -0.5, 0x1.fffffffffffffffep+63L, minus_zero, UNDERFLOW_EXCEPTION),
12163 TEST_ff_f (pow, -0.5, 0x1.fffffffffffffffep+64L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12164# endif
12165# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12166 TEST_ff_f (pow, -0.5, 0x1.ffffffffffffffffffffffffff8p+105L, minus_zero, UNDERFLOW_EXCEPTION),
12167 TEST_ff_f (pow, -0.5, 0x1.ffffffffffffffffffffffffff8p+106L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12168# endif
12169# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12170 TEST_ff_f (pow, -0.5, 0x1.ffffffffffffffffffffffffffffp+112L, minus_zero, UNDERFLOW_EXCEPTION),
12171 TEST_ff_f (pow, -0.5, 0x1.ffffffffffffffffffffffffffffp+113L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12172# endif
12173#endif
601a3a5f 12174 TEST_ff_f (pow, -0.5, max_value, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12175
601a3a5f
JM		 12176 TEST_ff_f (pow, -min_value, 0.5, qnan_value, INVALID_EXCEPTION),
12177 TEST_ff_f (pow, -min_value, 1.5, qnan_value, INVALID_EXCEPTION),
12178 TEST_ff_f (pow, -min_value, 1000.5, qnan_value, INVALID_EXCEPTION),
12179 TEST_ff_f (pow, -min_value, -2, plus_infty, OVERFLOW_EXCEPTION),
12180 TEST_ff_f (pow, -min_value, -3, minus_infty, OVERFLOW_EXCEPTION),
12181 /* Allow inexact results to be considered to underflow. */
12182 TEST_ff_f (pow, -min_value, 1, -min_value, UNDERFLOW_EXCEPTION_OK),
12183 TEST_ff_f (pow, -min_value, 2, plus_zero, UNDERFLOW_EXCEPTION),
12184 TEST_ff_f (pow, -min_value, 3, minus_zero, UNDERFLOW_EXCEPTION),
d6270972 12185
601a3a5f
JM		 12186 TEST_ff_f (pow, -min_value, -0xffffff, minus_infty, OVERFLOW_EXCEPTION),
12187 TEST_ff_f (pow, -min_value, -0x1fffffe, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12188#ifndef TEST_FLOAT
601a3a5f
JM		 12189 TEST_ff_f (pow, -min_value, -0x1.fffffffffffffp+52L, minus_infty, OVERFLOW_EXCEPTION),
12190 TEST_ff_f (pow, -min_value, -0x1.fffffffffffffp+53L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12191#endif
12192#ifdef TEST_LDOUBLE
12193# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12194 TEST_ff_f (pow, -min_value, -0x1.fffffffffffffffep+63L, minus_infty, OVERFLOW_EXCEPTION),
12195 TEST_ff_f (pow, -min_value, -0x1.fffffffffffffffep+64L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12196# endif
12197# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12198 TEST_ff_f (pow, -min_value, -0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, OVERFLOW_EXCEPTION),
12199 TEST_ff_f (pow, -min_value, -0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12200# endif
12201# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12202 TEST_ff_f (pow, -min_value, -0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, OVERFLOW_EXCEPTION),
12203 TEST_ff_f (pow, -min_value, -0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12204# endif
12205#endif
601a3a5f 12206 TEST_ff_f (pow, -min_value, -max_value, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12207
601a3a5f
JM		 12208 TEST_ff_f (pow, -min_value, 0xffffff, minus_zero, UNDERFLOW_EXCEPTION),
12209 TEST_ff_f (pow, -min_value, 0x1fffffe, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12210#ifndef TEST_FLOAT
601a3a5f
JM		 12211 TEST_ff_f (pow, -min_value, 0x1.fffffffffffffp+52L, minus_zero, UNDERFLOW_EXCEPTION),
12212 TEST_ff_f (pow, -min_value, 0x1.fffffffffffffp+53L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12213#endif
12214#ifdef TEST_LDOUBLE
12215# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12216 TEST_ff_f (pow, -min_value, 0x1.fffffffffffffffep+63L, minus_zero, UNDERFLOW_EXCEPTION),
12217 TEST_ff_f (pow, -min_value, 0x1.fffffffffffffffep+64L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12218# endif
12219# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12220 TEST_ff_f (pow, -min_value, 0x1.ffffffffffffffffffffffffff8p+105L, minus_zero, UNDERFLOW_EXCEPTION),
12221 TEST_ff_f (pow, -min_value, 0x1.ffffffffffffffffffffffffff8p+106L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12222# endif
12223# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12224 TEST_ff_f (pow, -min_value, 0x1.ffffffffffffffffffffffffffffp+112L, minus_zero, UNDERFLOW_EXCEPTION),
12225 TEST_ff_f (pow, -min_value, 0x1.ffffffffffffffffffffffffffffp+113L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12226# endif
12227#endif
601a3a5f
JM		 12228 TEST_ff_f (pow, -min_value, max_value, plus_zero, UNDERFLOW_EXCEPTION),
12229
12230 TEST_ff_f (pow, 0x0.ffffffp0, 10, 0.999999403953712118183885036774764444747L),
12231 TEST_ff_f (pow, 0x0.ffffffp0, 100, 0.999994039553108359406305079606228341585L),
12232 TEST_ff_f (pow, 0x0.ffffffp0, 1000, 0.9999403971297699052276650144650733772182L),
12233 TEST_ff_f (pow, 0x0.ffffffp0, 0x1p24, 0.3678794302077803437135155590023422899744L),
12234 TEST_ff_f (pow, 0x0.ffffffp0, 0x1p30, 1.603807831524924233828134753069728224044e-28L),
12235 TEST_ff_f (pow, 0x0.ffffffp0, 0x1.234566p30, 2.374884712135295099971443365381007297732e-32L),
12236 TEST_ff_f (pow, 0x0.ffffffp0, -10, 1.000000596046643153205170848674671339688L),
12237 TEST_ff_f (pow, 0x0.ffffffp0, -100, 1.000005960482418779499387594989252621451L),
12238 TEST_ff_f (pow, 0x0.ffffffp0, -1000, 1.000059606422943986382898964231519867906L),
12239 TEST_ff_f (pow, 0x0.ffffffp0, -0x1p24, 2.7182819094701610539628664526874952929416L),
12240 TEST_ff_f (pow, 0x0.ffffffp0, -0x1p30, 6.2351609734265057988914412331288163636075e+27L),
12241 TEST_ff_f (pow, 0x0.ffffffp0, -0x1.234566p30, 4.2107307141696353498921307077142537353515e+31L),
12242 TEST_ff_f (pow, 0x1.000002p0, 0x1p24, 7.3890552180866447284268641248075832310141L),
12243 TEST_ff_f (pow, 0x1.000002p0, 0x1.234566p29, 4.2107033006507495188536371520637025716256e+31L),
12244 TEST_ff_f (pow, 0x1.000002p0, -0x1.234566p29, 2.3749001736727769098946062325205705312166e-32L),
c483f6b4 12245
1bead169 12246#if !defined TEST_FLOAT
601a3a5f
JM		 12247 TEST_ff_f (pow, 0x0.fffffffffffff8p0L, 0x1.23456789abcdfp62L, 1.0118762747827252817436395051178295138220e-253L),
12248 TEST_ff_f (pow, 0x0.fffffffffffff8p0L, -0x1.23456789abcdfp62L, 9.8826311568054561811190162420900667121992e+252L),
12249 TEST_ff_f (pow, 0x1.0000000000001p0L, 0x1.23456789abcdfp61L, 9.8826311568044974397135026217687399395481e+252L),
12250 TEST_ff_f (pow, 0x1.0000000000001p0L, -0x1.23456789abcdfp61L, 1.0118762747828234466621210689458255908670e-253L),
c483f6b4
JM		 12251#endif
12252
1bead169 12253#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64 && LDBL_MAX_EXP >= 16384
601a3a5f
JM		 12254 TEST_ff_f (pow, 0x0.ffffffffffffffffp0L, 0x1.23456789abcdef0ep77L, 1.2079212226420368189981778807634890018840e-4048L),
12255 TEST_ff_f (pow, 0x0.ffffffffffffffffp0L, -0x1.23456789abcdef0ep77L, 8.2786855736563746280496724205839522148001e+4047L),
12256 TEST_ff_f (pow, 0x1.0000000000000002p0L, 0x1.23456789abcdef0ep76L, 8.2786855736563683535324500168799315131570e+4047L),
12257 TEST_ff_f (pow, 0x1.0000000000000002p0L, -0x1.23456789abcdef0ep76L, 1.2079212226420377344964713407722652880280e-4048L),
1bead169
JM		 12258#endif
12259
12260#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
601a3a5f
JM		 12261 TEST_ff_f (pow, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.23456789abcdef0123456789abcdp126L, 1.2079212226420440237790185999151440179953e-4048L),
12262 TEST_ff_f (pow, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.23456789abcdef0123456789abcdp126L, 8.2786855736563252489063231915535105363602e+4047L),
12263 TEST_ff_f (pow, 0x1.0000000000000000000000000001p0L, 0x1.23456789abcdef0123456789abcdp125L, 8.2786855736563252489063231915423647547782e+4047L),
12264 TEST_ff_f (pow, 0x1.0000000000000000000000000001p0L, -0x1.23456789abcdef0123456789abcdp125L, 1.2079212226420440237790185999167702696503e-4048L),
1bead169
JM		 12265#endif
12266
12267#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
601a3a5f
JM		 12268 TEST_ff_f (pow, 1e4932L, 0.75L, 1e3699L),
12269 TEST_ff_f (pow, 1e4928L, 0.75L, 1e3696L),
12270 TEST_ff_f (pow, 1e4924L, 0.75L, 1e3693L),
12271 TEST_ff_f (pow, 1e4920L, 0.75L, 1e3690L),
12272 TEST_ff_f (pow, 10.0L, 4932.0L, 1e4932L),
12273 TEST_ff_f (pow, 10.0L, 4931.0L, 1e4931L),
12274 TEST_ff_f (pow, 10.0L, 4930.0L, 1e4930L),
12275 TEST_ff_f (pow, 10.0L, 4929.0L, 1e4929L),
12276 TEST_ff_f (pow, 10.0L, -4931.0L, 1e-4931L),
12277 TEST_ff_f (pow, 10.0L, -4930.0L, 1e-4930L),
12278 TEST_ff_f (pow, 10.0L, -4929.0L, 1e-4929L),
12279 TEST_ff_f (pow, 1e27L, 182.0L, 1e4914L),
12280 TEST_ff_f (pow, 1e27L, -182.0L, 1e-4914L),
12281#endif
12282
12283 TEST_ff_f (pow, min_subnorm_value, min_subnorm_value, 1.0L),
12284 TEST_ff_f (pow, min_subnorm_value, -min_subnorm_value, 1.0L),
12285 TEST_ff_f (pow, max_value, min_subnorm_value, 1.0L),
12286 TEST_ff_f (pow, max_value, -min_subnorm_value, 1.0L),
12287 TEST_ff_f (pow, 0.99L, min_subnorm_value, 1.0L),
12288 TEST_ff_f (pow, 0.99L, -min_subnorm_value, 1.0L),
12289 TEST_ff_f (pow, 1.01L, min_subnorm_value, 1.0L),
12290 TEST_ff_f (pow, 1.01L, -min_subnorm_value, 1.0L),
12291
12292 TEST_ff_f (pow, 2.0L, -100000.0L, plus_zero, UNDERFLOW_EXCEPTION),
12293 END_DATA (pow)
12294 };
7a25eb06 12295
601a3a5f
JM		 12296static void
12297pow_test (void)
12298{
12299
12300 errno = 0;
12301 FUNC(pow) (0, 0);
12302 if (errno == ENOSYS)
12303 /* Function not implemented. */
12304 return;
12305
12306 START (pow);
12307 RUN_TEST_LOOP_ff_f (pow, pow_test_data, );
8847214f
UD		 12308 END (pow);
12309}
12310
b7cd39e8 12311
601a3a5f
JM		 12312static const struct test_ff_f_data pow_tonearest_test_data[] =
12313 {
12314 START_DATA (pow_tonearest),
12315 TEST_ff_f (pow, 1.0625L, 1.125L, 1.070582293028761362162622578677070098674L),
12316 TEST_ff_f (pow, 1.5L, 1.03125L, 1.519127098714743184071644334163037684948L),
12317 END_DATA (pow_tonearest)
12318 };
12319
b7cd39e8
JM		 12320static void
12321pow_test_tonearest (void)
12322{
b7cd39e8
JM		 12323 errno = 0;
12324 FUNC(pow) (0, 0);
12325 if (errno == ENOSYS)
12326 /* Function not implemented. */
12327 return;
12328
12329 START (pow_tonearest);
601a3a5f 12330 RUN_TEST_LOOP_ff_f (pow, pow_tonearest_test_data, FE_TONEAREST);
b7cd39e8
JM		 12331 END (pow_tonearest);
12332}
12333
12334
601a3a5f
JM		 12335static const struct test_ff_f_data pow_towardzero_test_data[] =
12336 {
12337 START_DATA (pow_towardzero),
12338 TEST_ff_f (pow, 1.0625L, 1.125L, 1.070582293028761362162622578677070098674L),
12339 TEST_ff_f (pow, 1.5L, 1.03125L, 1.519127098714743184071644334163037684948L),
12340 END_DATA (pow_towardzero)
12341 };
12342
b7cd39e8
JM		 12343static void
12344pow_test_towardzero (void)
12345{
b7cd39e8
JM		 12346 errno = 0;
12347 FUNC(pow) (0, 0);
12348 if (errno == ENOSYS)
12349 /* Function not implemented. */
12350 return;
12351
12352 START (pow_towardzero);
601a3a5f 12353 RUN_TEST_LOOP_ff_f (pow, pow_towardzero_test_data, FE_TOWARDZERO);
b7cd39e8
JM		 12354 END (pow_towardzero);
12355}
12356
12357
601a3a5f
JM		 12358static const struct test_ff_f_data pow_downward_test_data[] =
12359 {
12360 START_DATA (pow_downward),
12361 TEST_ff_f (pow, 1.0625L, 1.125L, 1.070582293028761362162622578677070098674L),
12362 TEST_ff_f (pow, 1.5L, 1.03125L, 1.519127098714743184071644334163037684948L),
12363 END_DATA (pow_downward)
12364 };
12365
b7cd39e8
JM		 12366static void
12367pow_test_downward (void)
12368{
b7cd39e8
JM		 12369 errno = 0;
12370 FUNC(pow) (0, 0);
12371 if (errno == ENOSYS)
12372 /* Function not implemented. */
12373 return;
12374
12375 START (pow_downward);
601a3a5f 12376 RUN_TEST_LOOP_ff_f (pow, pow_downward_test_data, FE_DOWNWARD);
b7cd39e8
JM		 12377 END (pow_downward);
12378}
12379
12380
601a3a5f
JM		 12381static const struct test_ff_f_data pow_upward_test_data[] =
12382 {
12383 START_DATA (pow_upward),
12384 TEST_ff_f (pow, 1.0625L, 1.125L, 1.070582293028761362162622578677070098674L),
12385 TEST_ff_f (pow, 1.5L, 1.03125L, 1.519127098714743184071644334163037684948L),
12386 END_DATA (pow_upward)
12387 };
12388
b7cd39e8
JM		 12389static void
12390pow_test_upward (void)
12391{
b7cd39e8
JM		 12392 errno = 0;
12393 FUNC(pow) (0, 0);
12394 if (errno == ENOSYS)
12395 /* Function not implemented. */
12396 return;
12397
12398 START (pow_upward);
601a3a5f 12399 RUN_TEST_LOOP_ff_f (pow, pow_upward_test_data, FE_UPWARD);
b7cd39e8
JM		 12400 END (pow_upward);
12401}
12402
12403
601a3a5f
JM		 12404static const struct test_ff_f_data remainder_test_data[] =
12405 {
12406 START_DATA (remainder),
12407 TEST_ff_f (remainder, 1, 0, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12408 TEST_ff_f (remainder, 1, minus_zero, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12409 TEST_ff_f (remainder, plus_infty, minus_zero, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12410 TEST_ff_f (remainder, plus_infty, 0, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12411 TEST_ff_f (remainder, plus_infty, 1, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12412 TEST_ff_f (remainder, plus_infty, 2, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12413 TEST_ff_f (remainder, minus_infty, minus_zero, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12414 TEST_ff_f (remainder, minus_infty, 0, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12415 TEST_ff_f (remainder, minus_infty, 1, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12416 TEST_ff_f (remainder, minus_infty, 2, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12417 TEST_ff_f (remainder, qnan_value, qnan_value, qnan_value, ERRNO_UNCHANGED),
12418 TEST_ff_f (remainder, 0, qnan_value, qnan_value, ERRNO_UNCHANGED),
12419 TEST_ff_f (remainder, qnan_value, 0, qnan_value, ERRNO_UNCHANGED),
12420
12421 TEST_ff_f (remainder, 7.0, plus_infty, 7.0, ERRNO_UNCHANGED),
12422 TEST_ff_f (remainder, 7.0, minus_infty, 7.0, ERRNO_UNCHANGED),
12423
12424 TEST_ff_f (remainder, 1.625, 1.0, -0.375),
12425 TEST_ff_f (remainder, -1.625, 1.0, 0.375),
12426 TEST_ff_f (remainder, 1.625, -1.0, -0.375),
12427 TEST_ff_f (remainder, -1.625, -1.0, 0.375),
12428 TEST_ff_f (remainder, 5.0, 2.0, 1.0),
12429 TEST_ff_f (remainder, 3.0, 2.0, -1.0),
12430 END_DATA (remainder)
12431 };
12432
8847214f
UD		 12433static void
12434remainder_test (void)
12435{
aaca11d8
UD		 12436 errno = 0;
12437 FUNC(remainder) (1.625, 1.0);
12438 if (errno == ENOSYS)
12439 /* Function not implemented. */
12440 return;
8847214f
UD		 12441
12442 START (remainder);
601a3a5f 12443 RUN_TEST_LOOP_ff_f (remainder, remainder_test_data, );
8847214f
UD		 12444 END (remainder);
12445}
12446
12447static void
12448remquo_test (void)
12449{
12450 /* x is needed. */
12451 int x;
12452
aaca11d8
UD		 12453 errno = 0;
12454 FUNC(remquo) (1.625, 1.0, &x);
12455 if (errno == ENOSYS)
12456 /* Function not implemented. */
12457 return;
12458
8847214f
UD		 12459 START (remquo);
12460
67e971f1
TS		 12461 TEST_ffI_f1 (remquo, 1, 0, qnan_value, IGNORE, INVALID_EXCEPTION);
12462 TEST_ffI_f1 (remquo, 1, minus_zero, qnan_value, IGNORE, INVALID_EXCEPTION);
12463 TEST_ffI_f1 (remquo, plus_infty, 1, qnan_value, IGNORE, INVALID_EXCEPTION);
12464 TEST_ffI_f1 (remquo, minus_infty, 1, qnan_value, IGNORE, INVALID_EXCEPTION);
12465 TEST_ffI_f1 (remquo, qnan_value, qnan_value, qnan_value, IGNORE);
8847214f
UD		 12466
12467 TEST_ffI_f1 (remquo, 1.625, 1.0, -0.375, 2);
12468 TEST_ffI_f1 (remquo, -1.625, 1.0, 0.375, -2);
12469 TEST_ffI_f1 (remquo, 1.625, -1.0, -0.375, -2);
12470 TEST_ffI_f1 (remquo, -1.625, -1.0, 0.375, 2);
12471
12472 TEST_ffI_f1 (remquo, 5, 2, 1, 2);
12473 TEST_ffI_f1 (remquo, 3, 2, -1, 2);
12474
12475 END (remquo);
12476}
12477
74c57478
JM		 12478static const struct test_f_f_data rint_test_data[] =
12479 {
12480 START_DATA (rint),
12481 /* TODO: missing qNaN tests. */
12482
12483 TEST_f_f (rint, 0.0, 0.0),
12484 TEST_f_f (rint, minus_zero, minus_zero),
12485 TEST_f_f (rint, plus_infty, plus_infty),
12486 TEST_f_f (rint, minus_infty, minus_infty),
12487
12488 /* Default rounding mode is round to even. */
12489 TEST_f_f (rint, 0.5, 0.0),
12490 TEST_f_f (rint, 1.5, 2.0),
12491 TEST_f_f (rint, 2.5, 2.0),
12492 TEST_f_f (rint, 3.5, 4.0),
12493 TEST_f_f (rint, 4.5, 4.0),
12494 TEST_f_f (rint, -0.5, -0.0),
12495 TEST_f_f (rint, -1.5, -2.0),
12496 TEST_f_f (rint, -2.5, -2.0),
12497 TEST_f_f (rint, -3.5, -4.0),
12498 TEST_f_f (rint, -4.5, -4.0),
12499 TEST_f_f (rint, 0.1, 0.0),
12500 TEST_f_f (rint, 0.25, 0.0),
12501 TEST_f_f (rint, 0.625, 1.0),
12502 TEST_f_f (rint, -0.1, -0.0),
12503 TEST_f_f (rint, -0.25, -0.0),
12504 TEST_f_f (rint, -0.625, -1.0),
12505 TEST_f_f (rint, 262144.75, 262145.0),
12506 TEST_f_f (rint, 262142.75, 262143.0),
12507 TEST_f_f (rint, 524286.75, 524287.0),
12508 TEST_f_f (rint, 524288.75, 524289.0),
12509 TEST_f_f (rint, 1048576.75, 1048577.0),
12510 TEST_f_f (rint, 2097152.75, 2097153.0),
12511 TEST_f_f (rint, -1048576.75, -1048577.0),
12512 TEST_f_f (rint, -2097152.75, -2097153.0),
12513#ifndef TEST_FLOAT
12514 TEST_f_f (rint, 70368744177664.75, 70368744177665.0),
12515 TEST_f_f (rint, 140737488355328.75, 140737488355329.0),
12516 TEST_f_f (rint, 281474976710656.75, 281474976710657.0),
12517 TEST_f_f (rint, 562949953421312.75, 562949953421313.0),
12518 TEST_f_f (rint, 1125899906842624.75, 1125899906842625.0),
12519 TEST_f_f (rint, -70368744177664.75, -70368744177665.0),
12520 TEST_f_f (rint, -140737488355328.75, -140737488355329.0),
12521 TEST_f_f (rint, -281474976710656.75, -281474976710657.0),
12522 TEST_f_f (rint, -562949953421312.75, -562949953421313.0),
12523 TEST_f_f (rint, -1125899906842624.75, -1125899906842625.0),
fe45ce09 12524#endif
f964490f 12525#ifdef TEST_LDOUBLE
74c57478
JM		 12526 /* The result can only be represented in long double. */
12527 TEST_f_f (rint, 4503599627370495.5L, 4503599627370496.0L),
12528 TEST_f_f (rint, 4503599627370496.25L, 4503599627370496.0L),
12529 TEST_f_f (rint, 4503599627370496.5L, 4503599627370496.0L),
12530 TEST_f_f (rint, 4503599627370496.75L, 4503599627370497.0L),
12531 TEST_f_f (rint, 4503599627370497.5L, 4503599627370498.0L),
830fce04 12532
5c68d401 12533# if LDBL_MANT_DIG > 100
74c57478
JM		 12534 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370495.0L),
12535 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370496.0L),
12536 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370497.0L),
5c68d401 12537# endif
f964490f 12538
74c57478
JM		 12539 TEST_f_f (rint, -4503599627370495.5L, -4503599627370496.0L),
12540 TEST_f_f (rint, -4503599627370496.25L, -4503599627370496.0L),
12541 TEST_f_f (rint, -4503599627370496.5L, -4503599627370496.0L),
12542 TEST_f_f (rint, -4503599627370496.75L, -4503599627370497.0L),
12543 TEST_f_f (rint, -4503599627370497.5L, -4503599627370498.0L),
830fce04 12544
5c68d401 12545# if LDBL_MANT_DIG > 100
74c57478
JM		 12546 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370495.0L),
12547 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370496.0L),
12548 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370497.0L),
12549
12550 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740991.0L),
12551 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740992.0L),
12552 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740993.0L),
12553 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740992.0L),
12554 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740993.0L),
12555 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740994.0L),
12556
12557 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740991.0L),
12558 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740992.0L),
12559 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740993.0L),
12560 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740992.0L),
12561 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740993.0L),
12562 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740994.0L),
5c68d401 12563# endif
f964490f 12564
74c57478
JM		 12565 TEST_f_f (rint, 9007199254740991.5L, 9007199254740992.0L),
12566 TEST_f_f (rint, 9007199254740992.25L, 9007199254740992.0L),
12567 TEST_f_f (rint, 9007199254740992.5L, 9007199254740992.0L),
12568 TEST_f_f (rint, 9007199254740992.75L, 9007199254740993.0L),
12569 TEST_f_f (rint, 9007199254740993.5L, 9007199254740994.0L),
12570
12571 TEST_f_f (rint, -9007199254740991.5L, -9007199254740992.0L),
12572 TEST_f_f (rint, -9007199254740992.25L, -9007199254740992.0L),
12573 TEST_f_f (rint, -9007199254740992.5L, -9007199254740992.0L),
12574 TEST_f_f (rint, -9007199254740992.75L, -9007199254740993.0L),
12575 TEST_f_f (rint, -9007199254740993.5L, -9007199254740994.0L),
12576
12577 TEST_f_f (rint, 72057594037927935.5L, 72057594037927936.0L),
12578 TEST_f_f (rint, 72057594037927936.25L, 72057594037927936.0L),
12579 TEST_f_f (rint, 72057594037927936.5L, 72057594037927936.0L),
12580 TEST_f_f (rint, 72057594037927936.75L, 72057594037927937.0L),
12581 TEST_f_f (rint, 72057594037927937.5L, 72057594037927938.0L),
12582
12583 TEST_f_f (rint, -72057594037927935.5L, -72057594037927936.0L),
12584 TEST_f_f (rint, -72057594037927936.25L, -72057594037927936.0L),
12585 TEST_f_f (rint, -72057594037927936.5L, -72057594037927936.0L),
12586 TEST_f_f (rint, -72057594037927936.75L, -72057594037927937.0L),
12587 TEST_f_f (rint, -72057594037927937.5L, -72057594037927938.0L),
12588
12589 TEST_f_f (rint, 10141204801825835211973625643007.5L, 10141204801825835211973625643008.0L),
12590 TEST_f_f (rint, 10141204801825835211973625643008.25L, 10141204801825835211973625643008.0L),
12591 TEST_f_f (rint, 10141204801825835211973625643008.5L, 10141204801825835211973625643008.0L),
12592 TEST_f_f (rint, 10141204801825835211973625643008.75L, 10141204801825835211973625643009.0L),
12593 TEST_f_f (rint, 10141204801825835211973625643009.5L, 10141204801825835211973625643010.0L),
12594#endif
12595 END_DATA (rint)
12596 };
1dc23588 12597
74c57478
JM		 12598static void
12599rint_test (void)
12600{
12601 START (rint);
12602 RUN_TEST_LOOP_f_f (rint, rint_test_data, );
8847214f
UD		 12603 END (rint);
12604}
12605
74c57478
JM		 12606static const struct test_f_f_data rint_tonearest_test_data[] =
12607 {
12608 START_DATA (rint_tonearest),
12609 TEST_f_f (rint, 2.0, 2.0),
12610 TEST_f_f (rint, 1.5, 2.0),
12611 TEST_f_f (rint, 1.0, 1.0),
12612 TEST_f_f (rint, 0.5, 0.0),
12613 TEST_f_f (rint, 0.0, 0.0),
12614 TEST_f_f (rint, minus_zero, minus_zero),
12615 TEST_f_f (rint, -0.5, -0.0),
12616 TEST_f_f (rint, -1.0, -1.0),
12617 TEST_f_f (rint, -1.5, -2.0),
12618 TEST_f_f (rint, -2.0, -2.0),
12619 TEST_f_f (rint, 0.1, 0.0),
12620 TEST_f_f (rint, 0.25, 0.0),
12621 TEST_f_f (rint, 0.625, 1.0),
12622 TEST_f_f (rint, -0.1, -0.0),
12623 TEST_f_f (rint, -0.25, -0.0),
12624 TEST_f_f (rint, -0.625, -1.0),
12625 TEST_f_f (rint, 1048576.75, 1048577.0),
12626 TEST_f_f (rint, 2097152.75, 2097153.0),
12627 TEST_f_f (rint, -1048576.75, -1048577.0),
12628 TEST_f_f (rint, -2097152.75, -2097153.0),
12629#ifndef TEST_FLOAT
12630 TEST_f_f (rint, 70368744177664.75, 70368744177665.0),
12631 TEST_f_f (rint, 140737488355328.75, 140737488355329.0),
12632 TEST_f_f (rint, 281474976710656.75, 281474976710657.0),
12633 TEST_f_f (rint, 562949953421312.75, 562949953421313.0),
12634 TEST_f_f (rint, 1125899906842624.75, 1125899906842625.0),
12635 TEST_f_f (rint, -70368744177664.75, -70368744177665.0),
12636 TEST_f_f (rint, -140737488355328.75, -140737488355329.0),
12637 TEST_f_f (rint, -281474976710656.75, -281474976710657.0),
12638 TEST_f_f (rint, -562949953421312.75, -562949953421313.0),
12639 TEST_f_f (rint, -1125899906842624.75, -1125899906842625.0),
12640#endif
12641#ifdef TEST_LDOUBLE
12642 /* The result can only be represented in long double. */
12643 TEST_f_f (rint, 4503599627370495.5L, 4503599627370496.0L),
12644 TEST_f_f (rint, 4503599627370496.25L, 4503599627370496.0L),
12645 TEST_f_f (rint, 4503599627370496.5L, 4503599627370496.0L),
12646 TEST_f_f (rint, 4503599627370496.75L, 4503599627370497.0L),
12647 TEST_f_f (rint, 4503599627370497.5L, 4503599627370498.0L),
12648# if LDBL_MANT_DIG > 100
12649 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370495.0L),
12650 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370496.0L),
12651 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370497.0L),
12652# endif
12653 TEST_f_f (rint, -4503599627370495.5L, -4503599627370496.0L),
12654 TEST_f_f (rint, -4503599627370496.25L, -4503599627370496.0L),
12655 TEST_f_f (rint, -4503599627370496.5L, -4503599627370496.0L),
12656 TEST_f_f (rint, -4503599627370496.75L, -4503599627370497.0L),
12657 TEST_f_f (rint, -4503599627370497.5L, -4503599627370498.0L),
12658# if LDBL_MANT_DIG > 100
12659 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370495.0L),
12660 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370496.0L),
12661 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370497.0L),
12662
12663 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740991.0L),
12664 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740992.0L),
12665 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740993.0L),
12666 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740992.0L),
12667 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740993.0L),
12668 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740994.0L),
12669
12670 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740991.0L),
12671 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740992.0L),
12672 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740993.0L),
12673 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740992.0L),
12674 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740993.0L),
12675 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740994.0L),
12676# endif
12677#endif
12678 END_DATA (rint_tonearest)
12679 };
12680
4d37c8aa
UD		 12681static void
12682rint_test_tonearest (void)
12683{
4d37c8aa 12684 START (rint_tonearest);
74c57478
JM		 12685 RUN_TEST_LOOP_f_f (rint, rint_tonearest_test_data, FE_TONEAREST);
12686 END (rint_tonearest);
12687}
4d37c8aa 12688
74c57478
JM		 12689static const struct test_f_f_data rint_towardzero_test_data[] =
12690 {
12691 START_DATA (rint_towardzero),
12692 TEST_f_f (rint, 2.0, 2.0),
12693 TEST_f_f (rint, 1.5, 1.0),
12694 TEST_f_f (rint, 1.0, 1.0),
12695 TEST_f_f (rint, 0.5, 0.0),
12696 TEST_f_f (rint, 0.0, 0.0),
12697 TEST_f_f (rint, minus_zero, minus_zero),
12698 TEST_f_f (rint, -0.5, -0.0),
12699 TEST_f_f (rint, -1.0, -1.0),
12700 TEST_f_f (rint, -1.5, -1.0),
12701 TEST_f_f (rint, -2.0, -2.0),
12702 TEST_f_f (rint, 0.1, 0.0),
12703 TEST_f_f (rint, 0.25, 0.0),
12704 TEST_f_f (rint, 0.625, 0.0),
12705 TEST_f_f (rint, -0.1, -0.0),
12706 TEST_f_f (rint, -0.25, -0.0),
12707 TEST_f_f (rint, -0.625, -0.0),
12708 TEST_f_f (rint, 1048576.75, 1048576.0),
12709 TEST_f_f (rint, 2097152.75, 2097152.0),
12710 TEST_f_f (rint, -1048576.75, -1048576.0),
12711 TEST_f_f (rint, -2097152.75, -2097152.0),
12712#ifndef TEST_FLOAT
12713 TEST_f_f (rint, 70368744177664.75, 70368744177664.0),
12714 TEST_f_f (rint, 140737488355328.75, 140737488355328.0),
12715 TEST_f_f (rint, 281474976710656.75, 281474976710656.0),
12716 TEST_f_f (rint, 562949953421312.75, 562949953421312.0),
12717 TEST_f_f (rint, 1125899906842624.75, 1125899906842624.0),
12718 TEST_f_f (rint, -70368744177664.75, -70368744177664.0),
12719 TEST_f_f (rint, -140737488355328.75, -140737488355328.0),
12720 TEST_f_f (rint, -281474976710656.75, -281474976710656.0),
12721 TEST_f_f (rint, -562949953421312.75, -562949953421312.0),
12722 TEST_f_f (rint, -1125899906842624.75, -1125899906842624.0),
fe45ce09 12723#endif
5c68d401 12724#ifdef TEST_LDOUBLE
74c57478
JM		 12725 /* The result can only be represented in long double. */
12726 TEST_f_f (rint, 4503599627370495.5L, 4503599627370495.0L),
12727 TEST_f_f (rint, 4503599627370496.25L, 4503599627370496.0L),
12728 TEST_f_f (rint, 4503599627370496.5L, 4503599627370496.0L),
12729 TEST_f_f (rint, 4503599627370496.75L, 4503599627370496.0L),
12730 TEST_f_f (rint, 4503599627370497.5L, 4503599627370497.0L),
5c68d401 12731# if LDBL_MANT_DIG > 100
74c57478
JM		 12732 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370494.0L),
12733 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370495.0L),
12734 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370496.0L),
5c68d401 12735# endif
74c57478
JM		 12736 TEST_f_f (rint, -4503599627370495.5L, -4503599627370495.0L),
12737 TEST_f_f (rint, -4503599627370496.25L, -4503599627370496.0L),
12738 TEST_f_f (rint, -4503599627370496.5L, -4503599627370496.0L),
12739 TEST_f_f (rint, -4503599627370496.75L, -4503599627370496.0L),
12740 TEST_f_f (rint, -4503599627370497.5L, -4503599627370497.0L),
5c68d401 12741# if LDBL_MANT_DIG > 100
74c57478
JM		 12742 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370494.0L),
12743 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370495.0L),
12744 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370496.0L),
12745
12746 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740991.0L),
12747 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740992.0L),
12748 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740993.0L),
12749 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740991.0L),
12750 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740992.0L),
12751 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740993.0L),
12752
12753 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740991.0L),
12754 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740992.0L),
12755 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740993.0L),
12756 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740991.0L),
12757 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740992.0L),
12758 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740993.0L),
5c68d401
RM		 12759# endif
12760#endif
74c57478
JM		 12761 END_DATA (rint_towardzero)
12762 };
4d37c8aa
UD		 12763
12764static void
12765rint_test_towardzero (void)
12766{
4d37c8aa 12767 START (rint_towardzero);
74c57478
JM		 12768 RUN_TEST_LOOP_f_f (rint, rint_towardzero_test_data, FE_TOWARDZERO);
12769 END (rint_towardzero);
12770}
4d37c8aa 12771
74c57478
JM		 12772static const struct test_f_f_data rint_downward_test_data[] =
12773 {
12774 START_DATA (rint_downward),
12775 TEST_f_f (rint, 2.0, 2.0),
12776 TEST_f_f (rint, 1.5, 1.0),
12777 TEST_f_f (rint, 1.0, 1.0),
12778 TEST_f_f (rint, 0.5, 0.0),
12779 TEST_f_f (rint, 0.0, 0.0),
12780 TEST_f_f (rint, minus_zero, minus_zero),
12781 TEST_f_f (rint, -0.5, -1.0),
12782 TEST_f_f (rint, -1.0, -1.0),
12783 TEST_f_f (rint, -1.5, -2.0),
12784 TEST_f_f (rint, -2.0, -2.0),
12785 TEST_f_f (rint, 0.1, 0.0),
12786 TEST_f_f (rint, 0.25, 0.0),
12787 TEST_f_f (rint, 0.625, 0.0),
12788 TEST_f_f (rint, -0.1, -1.0),
12789 TEST_f_f (rint, -0.25, -1.0),
12790 TEST_f_f (rint, -0.625, -1.0),
12791 TEST_f_f (rint, 1048576.75, 1048576.0),
12792 TEST_f_f (rint, 2097152.75, 2097152.0),
12793 TEST_f_f (rint, -1048576.75, -1048577.0),
12794 TEST_f_f (rint, -2097152.75, -2097153.0),
12795#ifndef TEST_FLOAT
12796 TEST_f_f (rint, 70368744177664.75, 70368744177664.0),
12797 TEST_f_f (rint, 140737488355328.75, 140737488355328.0),
12798 TEST_f_f (rint, 281474976710656.75, 281474976710656.0),
12799 TEST_f_f (rint, 562949953421312.75, 562949953421312.0),
12800 TEST_f_f (rint, 1125899906842624.75, 1125899906842624.0),
12801 TEST_f_f (rint, -70368744177664.75, -70368744177665.0),
12802 TEST_f_f (rint, -140737488355328.75, -140737488355329.0),
12803 TEST_f_f (rint, -281474976710656.75, -281474976710657.0),
12804 TEST_f_f (rint, -562949953421312.75, -562949953421313.0),
12805 TEST_f_f (rint, -1125899906842624.75, -1125899906842625.0),
fe45ce09 12806#endif
5c68d401 12807#ifdef TEST_LDOUBLE
74c57478
JM		 12808 /* The result can only be represented in long double. */
12809 TEST_f_f (rint, 4503599627370495.5L, 4503599627370495.0L),
12810 TEST_f_f (rint, 4503599627370496.25L, 4503599627370496.0L),
12811 TEST_f_f (rint, 4503599627370496.5L, 4503599627370496.0L),
12812 TEST_f_f (rint, 4503599627370496.75L, 4503599627370496.0L),
12813 TEST_f_f (rint, 4503599627370497.5L, 4503599627370497.0L),
5c68d401 12814# if LDBL_MANT_DIG > 100
74c57478
JM		 12815 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370494.0L),
12816 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370495.0L),
12817 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370496.0L),
5c68d401 12818# endif
74c57478
JM		 12819 TEST_f_f (rint, -4503599627370495.5L, -4503599627370496.0L),
12820 TEST_f_f (rint, -4503599627370496.25L, -4503599627370497.0L),
12821 TEST_f_f (rint, -4503599627370496.5L, -4503599627370497.0L),
12822 TEST_f_f (rint, -4503599627370496.75L, -4503599627370497.0L),
12823 TEST_f_f (rint, -4503599627370497.5L, -4503599627370498.0L),
5c68d401 12824# if LDBL_MANT_DIG > 100
74c57478
JM		 12825 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370495.0L),
12826 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370496.0L),
12827 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370497.0L),
12828
12829 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740991.0L),
12830 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740992.0L),
12831 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740993.0L),
12832 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740991.0L),
12833 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740992.0L),
12834 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740993.0L),
12835
12836 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740992.0L),
12837 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740993.0L),
12838 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740994.0L),
12839 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740992.0L),
12840 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740993.0L),
12841 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740994.0L),
5c68d401
RM		 12842# endif
12843#endif
74c57478
JM		 12844 END_DATA (rint_downward)
12845 };
4d37c8aa
UD		 12846
12847static void
12848rint_test_downward (void)
12849{
4d37c8aa 12850 START (rint_downward);
74c57478
JM		 12851 RUN_TEST_LOOP_f_f (rint, rint_downward_test_data, FE_DOWNWARD);
12852 END (rint_downward);
12853}
4d37c8aa 12854
74c57478
JM		 12855static const struct test_f_f_data rint_upward_test_data[] =
12856 {
12857 START_DATA (rint_upward),
12858 TEST_f_f (rint, 2.0, 2.0),
12859 TEST_f_f (rint, 1.5, 2.0),
12860 TEST_f_f (rint, 1.0, 1.0),
12861 TEST_f_f (rint, 0.5, 1.0),
12862 TEST_f_f (rint, 0.0, 0.0),
12863 TEST_f_f (rint, minus_zero, minus_zero),
12864 TEST_f_f (rint, -0.5, -0.0),
12865 TEST_f_f (rint, -1.0, -1.0),
12866 TEST_f_f (rint, -1.5, -1.0),
12867 TEST_f_f (rint, -2.0, -2.0),
12868 TEST_f_f (rint, 0.1, 1.0),
12869 TEST_f_f (rint, 0.25, 1.0),
12870 TEST_f_f (rint, 0.625, 1.0),
12871 TEST_f_f (rint, -0.1, -0.0),
12872 TEST_f_f (rint, -0.25, -0.0),
12873 TEST_f_f (rint, -0.625, -0.0),
12874 TEST_f_f (rint, 1048576.75, 1048577.0),
12875 TEST_f_f (rint, 2097152.75, 2097153.0),
12876 TEST_f_f (rint, -1048576.75, -1048576.0),
12877 TEST_f_f (rint, -2097152.75, -2097152.0),
12878#ifndef TEST_FLOAT
12879 TEST_f_f (rint, 70368744177664.75, 70368744177665.0),
12880 TEST_f_f (rint, 140737488355328.75, 140737488355329.0),
12881 TEST_f_f (rint, 281474976710656.75, 281474976710657.0),
12882 TEST_f_f (rint, 562949953421312.75, 562949953421313.0),
12883 TEST_f_f (rint, 1125899906842624.75, 1125899906842625.0),
12884 TEST_f_f (rint, -70368744177664.75, -70368744177664.0),
12885 TEST_f_f (rint, -140737488355328.75, -140737488355328.0),
12886 TEST_f_f (rint, -281474976710656.75, -281474976710656.0),
12887 TEST_f_f (rint, -562949953421312.75, -562949953421312.0),
12888 TEST_f_f (rint, -1125899906842624.75, -1125899906842624.0),
fe45ce09 12889#endif
5c68d401 12890#ifdef TEST_LDOUBLE
74c57478
JM		 12891 /* The result can only be represented in long double. */
12892 TEST_f_f (rint, 4503599627370495.5L, 4503599627370496.0L),
12893 TEST_f_f (rint, 4503599627370496.25L, 4503599627370497.0L),
12894 TEST_f_f (rint, 4503599627370496.5L, 4503599627370497.0L),
12895 TEST_f_f (rint, 4503599627370496.75L, 4503599627370497.0L),
12896 TEST_f_f (rint, 4503599627370497.5L, 4503599627370498.0L),
5c68d401 12897# if LDBL_MANT_DIG > 100
74c57478
JM		 12898 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370495.0L),
12899 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370496.0L),
12900 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370497.0L),
5c68d401 12901# endif
74c57478
JM		 12902 TEST_f_f (rint, -4503599627370495.5L, -4503599627370495.0L),
12903 TEST_f_f (rint, -4503599627370496.25L, -4503599627370496.0L),
12904 TEST_f_f (rint, -4503599627370496.5L, -4503599627370496.0L),
12905 TEST_f_f (rint, -4503599627370496.75L, -4503599627370496.0L),
12906 TEST_f_f (rint, -4503599627370497.5L, -4503599627370497.0L),
5c68d401 12907# if LDBL_MANT_DIG > 100
74c57478
JM		 12908 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370494.0L),
12909 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370495.0L),
12910 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370496.0L),
12911
12912 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740992.0L),
12913 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740993.0L),
12914 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740994.0L),
12915 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740992.0L),
12916 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740993.0L),
12917 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740994.0L),
12918
12919 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740991.0L),
12920 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740992.0L),
12921 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740993.0L),
12922 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740991.0L),
12923 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740992.0L),
12924 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740993.0L),
5c68d401
RM		 12925# endif
12926#endif
74c57478
JM		 12927 END_DATA (rint_upward)
12928 };
4d37c8aa
UD		 12929
12930static void
12931rint_test_upward (void)
12932{
4d37c8aa 12933 START (rint_upward);
74c57478 12934 RUN_TEST_LOOP_f_f (rint, rint_upward_test_data, FE_UPWARD);
4d37c8aa
UD		 12935 END (rint_upward);
12936}
12937
74c57478
JM		 12938static const struct test_f_f_data round_test_data[] =
12939 {
12940 START_DATA (round),
12941 /* TODO: missing +/-Inf as well as qNaN tests. */
12942
12943 TEST_f_f (round, 0, 0),
12944 TEST_f_f (round, minus_zero, minus_zero),
12945 TEST_f_f (round, 0.2L, 0.0),
12946 TEST_f_f (round, -0.2L, minus_zero),
12947 TEST_f_f (round, 0.5, 1.0),
12948 TEST_f_f (round, -0.5, -1.0),
12949 TEST_f_f (round, 0.8L, 1.0),
12950 TEST_f_f (round, -0.8L, -1.0),
12951 TEST_f_f (round, 1.5, 2.0),
12952 TEST_f_f (round, -1.5, -2.0),
12953 TEST_f_f (round, 0.1, 0.0),
12954 TEST_f_f (round, 0.25, 0.0),
12955 TEST_f_f (round, 0.625, 1.0),
12956 TEST_f_f (round, -0.1, -0.0),
12957 TEST_f_f (round, -0.25, -0.0),
12958 TEST_f_f (round, -0.625, -1.0),
12959 TEST_f_f (round, 2097152.5, 2097153),
12960 TEST_f_f (round, -2097152.5, -2097153),
8847214f 12961
f964490f 12962#ifdef TEST_LDOUBLE
74c57478
JM		 12963 /* The result can only be represented in long double. */
12964 TEST_f_f (round, 4503599627370495.5L, 4503599627370496.0L),
12965 TEST_f_f (round, 4503599627370496.25L, 4503599627370496.0L),
12966 TEST_f_f (round, 4503599627370496.5L, 4503599627370497.0L),
12967 TEST_f_f (round, 4503599627370496.75L, 4503599627370497.0L),
12968 TEST_f_f (round, 4503599627370497.5L, 4503599627370498.0L),
5c68d401 12969# if LDBL_MANT_DIG > 100
74c57478
JM		 12970 TEST_f_f (round, 4503599627370494.5000000000001L, 4503599627370495.0L),
12971 TEST_f_f (round, 4503599627370495.5000000000001L, 4503599627370496.0L),
12972 TEST_f_f (round, 4503599627370496.5000000000001L, 4503599627370497.0L),
5c68d401 12973# endif
f964490f 12974
74c57478
JM		 12975 TEST_f_f (round, -4503599627370495.5L, -4503599627370496.0L),
12976 TEST_f_f (round, -4503599627370496.25L, -4503599627370496.0L),
12977 TEST_f_f (round, -4503599627370496.5L, -4503599627370497.0L),
12978 TEST_f_f (round, -4503599627370496.75L, -4503599627370497.0L),
12979 TEST_f_f (round, -4503599627370497.5L, -4503599627370498.0L),
5c68d401 12980# if LDBL_MANT_DIG > 100
74c57478
JM		 12981 TEST_f_f (round, -4503599627370494.5000000000001L, -4503599627370495.0L),
12982 TEST_f_f (round, -4503599627370495.5000000000001L, -4503599627370496.0L),
12983 TEST_f_f (round, -4503599627370496.5000000000001L, -4503599627370497.0L),
5c68d401 12984# endif
f964490f 12985
74c57478
JM		 12986 TEST_f_f (round, 9007199254740991.5L, 9007199254740992.0L),
12987 TEST_f_f (round, 9007199254740992.25L, 9007199254740992.0L),
12988 TEST_f_f (round, 9007199254740992.5L, 9007199254740993.0L),
12989 TEST_f_f (round, 9007199254740992.75L, 9007199254740993.0L),
12990 TEST_f_f (round, 9007199254740993.5L, 9007199254740994.0L),
f964490f 12991
74c57478
JM		 12992 TEST_f_f (round, -9007199254740991.5L, -9007199254740992.0L),
12993 TEST_f_f (round, -9007199254740992.25L, -9007199254740992.0L),
12994 TEST_f_f (round, -9007199254740992.5L, -9007199254740993.0L),
12995 TEST_f_f (round, -9007199254740992.75L, -9007199254740993.0L),
12996 TEST_f_f (round, -9007199254740993.5L, -9007199254740994.0L),
f964490f 12997
5c68d401 12998# if LDBL_MANT_DIG > 100
74c57478
JM		 12999 TEST_f_f (round, 9007199254740991.0000000000001L, 9007199254740991.0L),
13000 TEST_f_f (round, 9007199254740992.0000000000001L, 9007199254740992.0L),
13001 TEST_f_f (round, 9007199254740993.0000000000001L, 9007199254740993.0L),
13002 TEST_f_f (round, 9007199254740991.5000000000001L, 9007199254740992.0L),
13003 TEST_f_f (round, 9007199254740992.5000000000001L, 9007199254740993.0L),
13004 TEST_f_f (round, 9007199254740993.5000000000001L, 9007199254740994.0L),
13005
13006 TEST_f_f (round, -9007199254740991.0000000000001L, -9007199254740991.0L),
13007 TEST_f_f (round, -9007199254740992.0000000000001L, -9007199254740992.0L),
13008 TEST_f_f (round, -9007199254740993.0000000000001L, -9007199254740993.0L),
13009 TEST_f_f (round, -9007199254740991.5000000000001L, -9007199254740992.0L),
13010 TEST_f_f (round, -9007199254740992.5000000000001L, -9007199254740993.0L),
13011 TEST_f_f (round, -9007199254740993.5000000000001L, -9007199254740994.0L),
5c68d401
RM		 13012# endif
13013
74c57478
JM		 13014 TEST_f_f (round, 72057594037927935.5L, 72057594037927936.0L),
13015 TEST_f_f (round, 72057594037927936.25L, 72057594037927936.0L),
13016 TEST_f_f (round, 72057594037927936.5L, 72057594037927937.0L),
13017 TEST_f_f (round, 72057594037927936.75L, 72057594037927937.0L),
13018 TEST_f_f (round, 72057594037927937.5L, 72057594037927938.0L),
13019
13020 TEST_f_f (round, -72057594037927935.5L, -72057594037927936.0L),
13021 TEST_f_f (round, -72057594037927936.25L, -72057594037927936.0L),
13022 TEST_f_f (round, -72057594037927936.5L, -72057594037927937.0L),
13023 TEST_f_f (round, -72057594037927936.75L, -72057594037927937.0L),
13024 TEST_f_f (round, -72057594037927937.5L, -72057594037927938.0L),
13025
13026 TEST_f_f (round, 10141204801825835211973625643007.5L, 10141204801825835211973625643008.0L),
13027 TEST_f_f (round, 10141204801825835211973625643008.25L, 10141204801825835211973625643008.0L),
13028 TEST_f_f (round, 10141204801825835211973625643008.5L, 10141204801825835211973625643009.0L),
13029 TEST_f_f (round, 10141204801825835211973625643008.75L, 10141204801825835211973625643009.0L),
13030 TEST_f_f (round, 10141204801825835211973625643009.5L, 10141204801825835211973625643010.0L),
13031#endif
13032 END_DATA (round)
13033 };
f964490f 13034
74c57478
JM		 13035static void
13036round_test (void)
13037{
13038 START (round);
13039 RUN_TEST_LOOP_f_f (round, round_test_data, );
8847214f
UD		 13040 END (round);
13041}
13042
13043
601a3a5f
JM		 13044static const struct test_ff_f_data scalb_test_data[] =
13045 {
13046 START_DATA (scalb),
13047 TEST_ff_f (scalb, 2.0, 0.5, qnan_value, INVALID_EXCEPTION),
13048 TEST_ff_f (scalb, 3.0, -2.5, qnan_value, INVALID_EXCEPTION),
13049
13050 TEST_ff_f (scalb, 0, qnan_value, qnan_value),
13051 TEST_ff_f (scalb, 1, qnan_value, qnan_value),
13052
13053 TEST_ff_f (scalb, 1, 0, 1),
13054 TEST_ff_f (scalb, -1, 0, -1),
13055
13056 TEST_ff_f (scalb, 0, plus_infty, qnan_value, INVALID_EXCEPTION),
13057 TEST_ff_f (scalb, minus_zero, plus_infty, qnan_value, INVALID_EXCEPTION),
13058
13059 TEST_ff_f (scalb, 0, 2, 0),
13060 TEST_ff_f (scalb, minus_zero, -4, minus_zero),
13061 TEST_ff_f (scalb, 0, 0, 0),
13062 TEST_ff_f (scalb, minus_zero, 0, minus_zero),
13063 TEST_ff_f (scalb, 0, -1, 0),
13064 TEST_ff_f (scalb, minus_zero, -10, minus_zero),
13065 TEST_ff_f (scalb, 0, minus_infty, 0),
13066 TEST_ff_f (scalb, minus_zero, minus_infty, minus_zero),
13067
13068 TEST_ff_f (scalb, plus_infty, -1, plus_infty),
13069 TEST_ff_f (scalb, minus_infty, -10, minus_infty),
13070 TEST_ff_f (scalb, plus_infty, 0, plus_infty),
13071 TEST_ff_f (scalb, minus_infty, 0, minus_infty),
13072 TEST_ff_f (scalb, plus_infty, 2, plus_infty),
13073 TEST_ff_f (scalb, minus_infty, 100, minus_infty),
13074
13075 TEST_ff_f (scalb, 0.1L, minus_infty, 0.0),
13076 TEST_ff_f (scalb, -0.1L, minus_infty, minus_zero),
13077
13078 TEST_ff_f (scalb, 1, plus_infty, plus_infty),
13079 TEST_ff_f (scalb, -1, plus_infty, minus_infty),
13080 TEST_ff_f (scalb, plus_infty, plus_infty, plus_infty),
13081 TEST_ff_f (scalb, minus_infty, plus_infty, minus_infty),
13082
13083 TEST_ff_f (scalb, plus_infty, minus_infty, qnan_value, INVALID_EXCEPTION),
13084 TEST_ff_f (scalb, minus_infty, minus_infty, qnan_value, INVALID_EXCEPTION),
13085
13086 TEST_ff_f (scalb, qnan_value, 1, qnan_value),
13087 TEST_ff_f (scalb, 1, qnan_value, qnan_value),
13088 TEST_ff_f (scalb, qnan_value, 0, qnan_value),
13089 TEST_ff_f (scalb, 0, qnan_value, qnan_value),
13090 TEST_ff_f (scalb, qnan_value, plus_infty, qnan_value),
13091 TEST_ff_f (scalb, plus_infty, qnan_value, qnan_value),
13092 TEST_ff_f (scalb, qnan_value, qnan_value, qnan_value),
13093
13094 TEST_ff_f (scalb, 0.8L, 4, 12.8L),
13095 TEST_ff_f (scalb, -0.854375L, 5, -27.34L),
13096 END_DATA (scalb)
13097 };
13098
8847214f
UD		 13099static void
13100scalb_test (void)
13101{
13102
13103 START (scalb);
601a3a5f 13104 RUN_TEST_LOOP_ff_f (scalb, scalb_test_data, );
8847214f
UD		 13105 END (scalb);
13106}
13107
13108
13109static void
13110scalbn_test (void)
13111{
13112
13113 START (scalbn);
13114
13115 TEST_fi_f (scalbn, 0, 0, 0);
13116 TEST_fi_f (scalbn, minus_zero, 0, minus_zero);
13117
13118 TEST_fi_f (scalbn, plus_infty, 1, plus_infty);
13119 TEST_fi_f (scalbn, minus_infty, 1, minus_infty);
67e971f1 13120 TEST_fi_f (scalbn, qnan_value, 1, qnan_value);
8847214f
UD		 13121
13122 TEST_fi_f (scalbn, 0.8L, 4, 12.8L);
13123 TEST_fi_f (scalbn, -0.854375L, 5, -27.34L);
13124
13125 TEST_fi_f (scalbn, 1, 0L, 1);
13126
c135cc1b 13127 TEST_fi_f (scalbn, 1, INT_MAX, plus_infty, OVERFLOW_EXCEPTION);
80bad0cc 13128 TEST_fi_f (scalbn, 1, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION);
c135cc1b 13129 TEST_fi_f (scalbn, max_value, INT_MAX, plus_infty, OVERFLOW_EXCEPTION);
80bad0cc 13130 TEST_fi_f (scalbn, max_value, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION);
c135cc1b 13131 TEST_fi_f (scalbn, min_value, INT_MAX, plus_infty, OVERFLOW_EXCEPTION);
80bad0cc 13132 TEST_fi_f (scalbn, min_value, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION);
c135cc1b 13133 TEST_fi_f (scalbn, min_value / 4, INT_MAX, plus_infty, OVERFLOW_EXCEPTION);
80bad0cc 13134 TEST_fi_f (scalbn, min_value / 4, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION);
a6d06d7b 13135
8847214f
UD		 13136 END (scalbn);
13137}
13138
2550dfe9 13139
8847214f
UD		 13140static void
13141scalbln_test (void)
13142{
13143
13144 START (scalbln);
13145
13146 TEST_fl_f (scalbln, 0, 0, 0);
13147 TEST_fl_f (scalbln, minus_zero, 0, minus_zero);
13148
13149 TEST_fl_f (scalbln, plus_infty, 1, plus_infty);
13150 TEST_fl_f (scalbln, minus_infty, 1, minus_infty);
67e971f1 13151 TEST_fl_f (scalbln, qnan_value, 1, qnan_value);
8847214f
UD		 13152
13153 TEST_fl_f (scalbln, 0.8L, 4, 12.8L);
13154 TEST_fl_f (scalbln, -0.854375L, 5, -27.34L);
13155
13156 TEST_fl_f (scalbln, 1, 0L, 1);
13157
6d33265c
JM		 13158 TEST_fl_f (scalbln, 1, INT_MAX, plus_infty, OVERFLOW_EXCEPTION);
13159 TEST_fl_f (scalbln, 1, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION);
13160 TEST_fl_f (scalbln, max_value, INT_MAX, plus_infty, OVERFLOW_EXCEPTION);
13161 TEST_fl_f (scalbln, max_value, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION);
13162 TEST_fl_f (scalbln, min_value, INT_MAX, plus_infty, OVERFLOW_EXCEPTION);
13163 TEST_fl_f (scalbln, min_value, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION);
13164 TEST_fl_f (scalbln, min_value / 4, INT_MAX, plus_infty, OVERFLOW_EXCEPTION);
13165 TEST_fl_f (scalbln, min_value / 4, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION);
13166
13167 TEST_fl_f (scalbln, 1, LONG_MAX, plus_infty, OVERFLOW_EXCEPTION);
13168 TEST_fl_f (scalbln, 1, LONG_MIN, plus_zero, UNDERFLOW_EXCEPTION);
13169 TEST_fl_f (scalbln, max_value, LONG_MAX, plus_infty, OVERFLOW_EXCEPTION);
13170 TEST_fl_f (scalbln, max_value, LONG_MIN, plus_zero, UNDERFLOW_EXCEPTION);
13171 TEST_fl_f (scalbln, min_value, LONG_MAX, plus_infty, OVERFLOW_EXCEPTION);
13172 TEST_fl_f (scalbln, min_value, LONG_MIN, plus_zero, UNDERFLOW_EXCEPTION);
13173 TEST_fl_f (scalbln, min_value / 4, LONG_MAX, plus_infty, OVERFLOW_EXCEPTION);
13174 TEST_fl_f (scalbln, min_value / 4, LONG_MIN, plus_zero, UNDERFLOW_EXCEPTION);
a6d06d7b
JM		 13175
13176#if LONG_MAX >= 0x100000000
6d33265c
JM		 13177 TEST_fl_f (scalbln, 1, 0x88000000L, plus_infty, OVERFLOW_EXCEPTION);
13178 TEST_fl_f (scalbln, 1, -0x88000000L, plus_zero, UNDERFLOW_EXCEPTION);
13179 TEST_fl_f (scalbln, max_value, 0x88000000L, plus_infty, OVERFLOW_EXCEPTION);
13180 TEST_fl_f (scalbln, max_value, -0x88000000L, plus_zero, UNDERFLOW_EXCEPTION);
13181 TEST_fl_f (scalbln, min_value, 0x88000000L, plus_infty, OVERFLOW_EXCEPTION);
13182 TEST_fl_f (scalbln, min_value, -0x88000000L, plus_zero, UNDERFLOW_EXCEPTION);
13183 TEST_fl_f (scalbln, min_value / 4, 0x88000000L, plus_infty, OVERFLOW_EXCEPTION);
13184 TEST_fl_f (scalbln, min_value / 4, -0x88000000L, plus_zero, UNDERFLOW_EXCEPTION);
a6d06d7b
JM		 13185#endif
13186
8847214f
UD		 13187 END (scalbn);
13188}
13189
2550dfe9 13190
8847214f
UD		 13191static void
13192signbit_test (void)
13193{
64d063b8 13194 /* TODO: missing qNaN tests. */
8847214f
UD		 13195
13196 START (signbit);
13197
13198 TEST_f_b (signbit, 0, 0);
13199 TEST_f_b (signbit, minus_zero, 1);
13200 TEST_f_b (signbit, plus_infty, 0);
13201 TEST_f_b (signbit, minus_infty, 1);
13202
13203 /* signbit (x) != 0 for x < 0. */
13204 TEST_f_b (signbit, -1, 1);
13205 /* signbit (x) == 0 for x >= 0. */
13206 TEST_f_b (signbit, 1, 0);
13207
13208 END (signbit);
13209}
13210
2550dfe9 13211
74c57478
JM		 13212static const struct test_f_f_data sin_test_data[] =
13213 {
13214 START_DATA (sin),
13215 TEST_f_f (sin, 0, 0),
13216 TEST_f_f (sin, minus_zero, minus_zero),
13217 TEST_f_f (sin, plus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13218 TEST_f_f (sin, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13219 TEST_f_f (sin, qnan_value, qnan_value, ERRNO_UNCHANGED),
8847214f 13220
74c57478
JM		 13221 TEST_f_f (sin, M_PI_6l, 0.5),
13222 TEST_f_f (sin, -M_PI_6l, -0.5),
13223 TEST_f_f (sin, M_PI_2l, 1),
13224 TEST_f_f (sin, -M_PI_2l, -1),
13225 TEST_f_f (sin, 0.75L, 0.681638760023334166733241952779893935L),
8847214f 13226
74c57478
JM		 13227 TEST_f_f (sin, 0x1p65, -0.047183876212354673805106149805700013943218L),
13228 TEST_f_f (sin, -0x1p65, 0.047183876212354673805106149805700013943218L),
8c0247db 13229
74c57478 13230 TEST_f_f (sin, 0x1.7f4134p+103, -6.6703229329788657073304190650534846045235e-08L),
7a845b2c 13231
d32e4346 13232#ifdef TEST_DOUBLE
74c57478
JM		 13233 TEST_f_f (sin, 0.80190127184058835, 0.71867942238767868),
13234 TEST_f_f (sin, 2.522464e-1, 2.4957989804940911e-1),
8848d99d
JM		 13235#endif
13236
13237#ifndef TEST_FLOAT
74c57478
JM		 13238 TEST_f_f (sin, 1e22, -0.8522008497671888017727058937530293682618L),
13239 TEST_f_f (sin, 0x1p1023, 0.5631277798508840134529434079444683477104L),
8848d99d
JM		 13240#endif
13241
13242#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478 13243 TEST_f_f (sin, 0x1p16383L, 0.3893629985894208126948115852610595405563L),
d32e4346
RM		 13244#endif
13245
74c57478
JM		 13246 TEST_f_f (sin, 0x1p+120, 3.77820109360752022655548470056922991960587e-01L),
13247 TEST_f_f (sin, 0x1p+127, 6.23385512955870240370428801097126489001833e-01L),
13248 TEST_f_f (sin, 0x1.fffff8p+127, 4.85786063130487339701113680434728152037092e-02L),
13249 TEST_f_f (sin, 0x1.fffffep+127, -5.21876523333658540551505357019806722935726e-01L),
13250 TEST_f_f (sin, 0x1p+50, 4.96396515208940840876821859865411368093356e-01L),
13251 TEST_f_f (sin, 0x1p+28, -9.86198211836975655703110310527108292055548e-01L),
13252 END_DATA (sin)
13253 };
4ffffbd2 13254
74c57478
JM		 13255static void
13256sin_test (void)
13257{
13258 errno = 0;
13259 FUNC(sin) (0);
13260 if (errno == ENOSYS)
13261 /* Function not implemented. */
13262 return;
8847214f 13263
74c57478
JM		 13264 START (sin);
13265 RUN_TEST_LOOP_f_f (sin, sin_test_data, );
13266 END (sin);
8847214f
UD		 13267}
13268
2550dfe9 13269
74c57478
JM		 13270static const struct test_f_f_data sin_tonearest_test_data[] =
13271 {
13272 START_DATA (sin_tonearest),
13273 TEST_f_f (sin, 1, 0.8414709848078965066525023216302989996226L),
13274 TEST_f_f (sin, 2, 0.9092974268256816953960198659117448427023L),
13275 TEST_f_f (sin, 3, 0.1411200080598672221007448028081102798469L),
13276 TEST_f_f (sin, 4, -0.7568024953079282513726390945118290941359L),
13277 TEST_f_f (sin, 5, -0.9589242746631384688931544061559939733525L),
13278 TEST_f_f (sin, 6, -0.2794154981989258728115554466118947596280L),
13279 TEST_f_f (sin, 7, 0.6569865987187890903969990915936351779369L),
13280 TEST_f_f (sin, 8, 0.9893582466233817778081235982452886721164L),
13281 TEST_f_f (sin, 9, 0.4121184852417565697562725663524351793439L),
13282 TEST_f_f (sin, 10, -0.5440211108893698134047476618513772816836L),
13283 END_DATA (sin_tonearest)
13284 };
13285
804360ed
JM		 13286static void
13287sin_test_tonearest (void)
13288{
804360ed
JM		 13289 errno = 0;
13290 FUNC(sin) (0);
13291 if (errno == ENOSYS)
13292 /* Function not implemented. */
13293 return;
13294
13295 START (sin_tonearest);
74c57478 13296 RUN_TEST_LOOP_f_f (sin, sin_tonearest_test_data, FE_TONEAREST);
804360ed
JM		 13297 END (sin_tonearest);
13298}
13299
13300
74c57478
JM		 13301static const struct test_f_f_data sin_towardzero_test_data[] =
13302 {
13303 START_DATA (sin_towardzero),
13304 TEST_f_f (sin, 1, 0.8414709848078965066525023216302989996226L),
13305 TEST_f_f (sin, 2, 0.9092974268256816953960198659117448427023L),
13306 TEST_f_f (sin, 3, 0.1411200080598672221007448028081102798469L),
13307 TEST_f_f (sin, 4, -0.7568024953079282513726390945118290941359L),
13308 TEST_f_f (sin, 5, -0.9589242746631384688931544061559939733525L),
13309 TEST_f_f (sin, 6, -0.2794154981989258728115554466118947596280L),
13310 TEST_f_f (sin, 7, 0.6569865987187890903969990915936351779369L),
13311 TEST_f_f (sin, 8, 0.9893582466233817778081235982452886721164L),
13312 TEST_f_f (sin, 9, 0.4121184852417565697562725663524351793439L),
13313 TEST_f_f (sin, 10, -0.5440211108893698134047476618513772816836L),
13314 END_DATA (sin_towardzero)
13315 };
13316
804360ed
JM		 13317static void
13318sin_test_towardzero (void)
13319{
804360ed
JM		 13320 errno = 0;
13321 FUNC(sin) (0);
13322 if (errno == ENOSYS)
13323 /* Function not implemented. */
13324 return;
13325
13326 START (sin_towardzero);
74c57478 13327 RUN_TEST_LOOP_f_f (sin, sin_towardzero_test_data, FE_TOWARDZERO);
804360ed
JM		 13328 END (sin_towardzero);
13329}
13330
13331
74c57478
JM		 13332static const struct test_f_f_data sin_downward_test_data[] =
13333 {
13334 START_DATA (sin_downward),
13335 TEST_f_f (sin, 1, 0.8414709848078965066525023216302989996226L),
13336 TEST_f_f (sin, 2, 0.9092974268256816953960198659117448427023L),
13337 TEST_f_f (sin, 3, 0.1411200080598672221007448028081102798469L),
13338 TEST_f_f (sin, 4, -0.7568024953079282513726390945118290941359L),
13339 TEST_f_f (sin, 5, -0.9589242746631384688931544061559939733525L),
13340 TEST_f_f (sin, 6, -0.2794154981989258728115554466118947596280L),
13341 TEST_f_f (sin, 7, 0.6569865987187890903969990915936351779369L),
13342 TEST_f_f (sin, 8, 0.9893582466233817778081235982452886721164L),
13343 TEST_f_f (sin, 9, 0.4121184852417565697562725663524351793439L),
13344 TEST_f_f (sin, 10, -0.5440211108893698134047476618513772816836L),
13345 END_DATA (sin_downward)
13346 };
13347
804360ed
JM		 13348static void
13349sin_test_downward (void)
13350{
804360ed
JM		 13351 errno = 0;
13352 FUNC(sin) (0);
13353 if (errno == ENOSYS)
13354 /* Function not implemented. */
13355 return;
13356
13357 START (sin_downward);
74c57478 13358 RUN_TEST_LOOP_f_f (sin, sin_downward_test_data, FE_DOWNWARD);
804360ed
JM		 13359 END (sin_downward);
13360}
13361
13362
74c57478
JM		 13363static const struct test_f_f_data sin_upward_test_data[] =
13364 {
13365 START_DATA (sin_upward),
13366 TEST_f_f (sin, 1, 0.8414709848078965066525023216302989996226L),
13367 TEST_f_f (sin, 2, 0.9092974268256816953960198659117448427023L),
13368 TEST_f_f (sin, 3, 0.1411200080598672221007448028081102798469L),
13369 TEST_f_f (sin, 4, -0.7568024953079282513726390945118290941359L),
13370 TEST_f_f (sin, 5, -0.9589242746631384688931544061559939733525L),
13371 TEST_f_f (sin, 6, -0.2794154981989258728115554466118947596280L),
13372 TEST_f_f (sin, 7, 0.6569865987187890903969990915936351779369L),
13373 TEST_f_f (sin, 8, 0.9893582466233817778081235982452886721164L),
13374 TEST_f_f (sin, 9, 0.4121184852417565697562725663524351793439L),
13375 TEST_f_f (sin, 10, -0.5440211108893698134047476618513772816836L),
13376 END_DATA (sin_upward)
13377 };
13378
804360ed
JM		 13379static void
13380sin_test_upward (void)
13381{
804360ed
JM		 13382 errno = 0;
13383 FUNC(sin) (0);
13384 if (errno == ENOSYS)
13385 /* Function not implemented. */
13386 return;
13387
13388 START (sin_upward);
74c57478 13389 RUN_TEST_LOOP_f_f (sin, sin_upward_test_data, FE_UPWARD);
804360ed
JM		 13390 END (sin_upward);
13391}
13392
13393
8847214f
UD		 13394static void
13395sincos_test (void)
13396{
13397 FLOAT sin_res, cos_res;
13398
aaca11d8
UD		 13399 errno = 0;
13400 FUNC(sincos) (0, &sin_res, &cos_res);
13401 if (errno == ENOSYS)
13402 /* Function not implemented. */
13403 return;
13404
8847214f
UD		 13405 START (sincos);
13406
13407 /* sincos is treated differently because it returns void. */
13408 TEST_extra (sincos, 0, 0, 1);
13409
13410 TEST_extra (sincos, minus_zero, minus_zero, 1);
67e971f1
TS		 13411 TEST_extra (sincos, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION);
13412 TEST_extra (sincos, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION);
13413 TEST_extra (sincos, qnan_value, qnan_value, qnan_value);
8847214f 13414
aba5e333
CD		 13415 /* The value of M_PI_2l is never exactly PI/2, and therefore the
13416 answer is never exactly zero. The answer is equal to the error
13417 in rounding PI/2 for the type used. Thus the answer is unique
13418 to each type. */
13419#ifdef TEST_FLOAT
13420 /* 32-bit float. */
418601aa 13421 TEST_extra (sincos, M_PI_2l, 1, -0x1.777a5cp-25L);
aba5e333
CD		 13422#endif
13423#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MANT_DIG == 53)
13424 /* 64-bit double or 64-bit long double. */
418601aa 13425 TEST_extra (sincos, M_PI_2l, 1, 0x1.1a62633145c07p-54L);
aba5e333
CD		 13426#endif
13427#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 64
13428 /* 96-bit long double. */
418601aa 13429 TEST_extra (sincos, M_PI_2l, 1, -0xe.ce675d1fc8f8cbbp-69L);
aba5e333
CD		 13430#endif
13431#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 106
13432 /* 128-bit IBM long double. */
418601aa 13433 TEST_extra (sincos, M_PI_2l, 1, 0x1.c1cd129024e088a67cc74020bcp-107L);
aba5e333
CD		 13434#endif
13435#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 113
13436 /* 128-bit long double. */
418601aa 13437 TEST_extra (sincos, M_PI_2l, 1, 0x1.cd129024e088a67cc74020bbea64p-115L);
aba5e333
CD		 13438#endif
13439
3c6cad26
UD		 13440 TEST_extra (sincos, M_PI_6l, 0.5, 0.86602540378443864676372317075293616L);
13441 TEST_extra (sincos, M_PI_6l*2.0, 0.86602540378443864676372317075293616L, 0.5);
2550dfe9 13442 TEST_extra (sincos, 0.75L, 0.681638760023334166733241952779893935L, 0.731688868873820886311838753000084544L);
8847214f 13443
ea40808a
AJ		 13444 TEST_extra (sincos, 0x1p65, -0.047183876212354673805106149805700013943218L, 0.99888622066058013610642172179340364209972L);
13445 TEST_extra (sincos, -0x1p65, 0.047183876212354673805106149805700013943218L, 0.99888622066058013610642172179340364209972L);
8c0247db 13446
d32e4346
RM		 13447#ifdef TEST_DOUBLE
13448 TEST_extra (sincos, 0.80190127184058835, 0.71867942238767868, 0.69534156199418473);
8848d99d
JM		 13449#endif
13450
13451#ifndef TEST_FLOAT
13452 TEST_extra (sincos, 1e22, -0.8522008497671888017727058937530293682618L, 0.5232147853951389454975944733847094921409L);
13453 TEST_extra (sincos, 0x1p1023, 0.5631277798508840134529434079444683477104L, -0.826369834614147994500785680811743734805L);
13454#endif
13455
13456#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
13457 TEST_extra (sincos, 0x1p16383L, 0.3893629985894208126948115852610595405563L, 0.9210843909921906206874509522505756251609L);
d32e4346
RM		 13458#endif
13459
4ffffbd2
LD		 13460 TEST_extra (sincos, 0x1p+120, 3.77820109360752022655548470056922991960587e-01L, -9.25879022854837867303861764107414946730833e-01L);
13461 TEST_extra (sincos, 0x1p+127, 6.23385512955870240370428801097126489001833e-01L, 7.81914638714960072263910298466369236613162e-01L);
13462 TEST_extra (sincos, 0x1.fffff8p+127, 4.85786063130487339701113680434728152037092e-02L, 9.98819362551949040703862043664101081064641e-01L);
13463 TEST_extra (sincos, 0x1.fffffep+127, -5.21876523333658540551505357019806722935726e-01L, 8.53021039830304158051791467692161107353094e-01L);
13464 TEST_extra (sincos, 0x1p+50, 4.96396515208940840876821859865411368093356e-01L, 8.68095904660550604334592502063501320395739e-01L);
13465 TEST_extra (sincos, 0x1p+28, -9.86198211836975655703110310527108292055548e-01L, -1.65568979490578758865468278195361551113358e-01L);
13466
8847214f
UD		 13467 END (sincos);
13468}
13469
74c57478
JM		 13470static const struct test_f_f_data sinh_test_data[] =
13471 {
13472 START_DATA (sinh),
13473 TEST_f_f (sinh, 0, 0),
13474 TEST_f_f (sinh, minus_zero, minus_zero),
13475
13476#ifndef TEST_INLINE
13477 TEST_f_f (sinh, plus_infty, plus_infty),
13478 TEST_f_f (sinh, minus_infty, minus_infty),
13479#endif
13480 TEST_f_f (sinh, qnan_value, qnan_value),
13481
13482 TEST_f_f (sinh, 0.75L, 0.822316731935829980703661634446913849L),
13483 TEST_f_f (sinh, 0x8p-32L, 1.86264514923095703232705808926175479e-9L),
13484 END_DATA (sinh)
13485 };
13486
8847214f
UD		 13487static void
13488sinh_test (void)
13489{
aaca11d8 13490 errno = 0;
3c6cad26 13491 FUNC(sinh) (0.7L);
aaca11d8
UD		 13492 if (errno == ENOSYS)
13493 /* Function not implemented. */
13494 return;
13495
8847214f 13496 START (sinh);
74c57478 13497 RUN_TEST_LOOP_f_f (sinh, sinh_test_data, );
8847214f
UD		 13498 END (sinh);
13499}
13500
ca811b22 13501
74c57478
JM		 13502static const struct test_f_f_data sinh_tonearest_test_data[] =
13503 {
13504 START_DATA (sinh_tonearest),
13505 TEST_f_f (sinh, 22, 1792456423.065795780701106568345764104225L),
13506 TEST_f_f (sinh, 23, 4872401723.124451299966006944252978187305L),
13507 TEST_f_f (sinh, 24, 13244561064.92173614705070540368454568168L),
13508 END_DATA (sinh_tonearest)
13509 };
13510
ca811b22
JM		 13511static void
13512sinh_test_tonearest (void)
13513{
ca811b22
JM		 13514 errno = 0;
13515 FUNC(sinh) (0);
13516 if (errno == ENOSYS)
13517 /* Function not implemented. */
13518 return;
13519
13520 START (sinh_tonearest);
74c57478 13521 RUN_TEST_LOOP_f_f (sinh, sinh_tonearest_test_data, FE_TONEAREST);
ca811b22
JM		 13522 END (sinh_tonearest);
13523}
13524
13525
74c57478
JM		 13526static const struct test_f_f_data sinh_towardzero_test_data[] =
13527 {
13528 START_DATA (sinh_towardzero),
13529 TEST_f_f (sinh, 22, 1792456423.065795780701106568345764104225L),
13530 TEST_f_f (sinh, 23, 4872401723.124451299966006944252978187305L),
13531 TEST_f_f (sinh, 24, 13244561064.92173614705070540368454568168L),
13532 END_DATA (sinh_towardzero)
13533 };
13534
ca811b22
JM		 13535static void
13536sinh_test_towardzero (void)
13537{
ca811b22
JM		 13538 errno = 0;
13539 FUNC(sinh) (0);
13540 if (errno == ENOSYS)
13541 /* Function not implemented. */
13542 return;
13543
13544 START (sinh_towardzero);
74c57478 13545 RUN_TEST_LOOP_f_f (sinh, sinh_towardzero_test_data, FE_TOWARDZERO);
ca811b22
JM		 13546 END (sinh_towardzero);
13547}
13548
13549
74c57478
JM		 13550static const struct test_f_f_data sinh_downward_test_data[] =
13551 {
13552 START_DATA (sinh_downward),
13553 TEST_f_f (sinh, 22, 1792456423.065795780701106568345764104225L),
13554 TEST_f_f (sinh, 23, 4872401723.124451299966006944252978187305L),
13555 TEST_f_f (sinh, 24, 13244561064.92173614705070540368454568168L),
13556 END_DATA (sinh_downward)
13557 };
13558
ca811b22
JM		 13559static void
13560sinh_test_downward (void)
13561{
ca811b22
JM		 13562 errno = 0;
13563 FUNC(sinh) (0);
13564 if (errno == ENOSYS)
13565 /* Function not implemented. */
13566 return;
13567
13568 START (sinh_downward);
74c57478 13569 RUN_TEST_LOOP_f_f (sinh, sinh_downward_test_data, FE_DOWNWARD);
ca811b22
JM		 13570 END (sinh_downward);
13571}
13572
13573
74c57478
JM		 13574static const struct test_f_f_data sinh_upward_test_data[] =
13575 {
13576 START_DATA (sinh_upward),
13577 TEST_f_f (sinh, 22, 1792456423.065795780701106568345764104225L),
13578 TEST_f_f (sinh, 23, 4872401723.124451299966006944252978187305L),
13579 TEST_f_f (sinh, 24, 13244561064.92173614705070540368454568168L),
13580 END_DATA (sinh_upward)
13581 };
13582
ca811b22
JM		 13583static void
13584sinh_test_upward (void)
13585{
ca811b22
JM		 13586 errno = 0;
13587 FUNC(sinh) (0);
13588 if (errno == ENOSYS)
13589 /* Function not implemented. */
13590 return;
13591
13592 START (sinh_upward);
74c57478 13593 RUN_TEST_LOOP_f_f (sinh, sinh_upward_test_data, FE_UPWARD);
ca811b22
JM		 13594 END (sinh_upward);
13595}
13596
13597
74c57478
JM		 13598static const struct test_f_f_data sqrt_test_data[] =
13599 {
13600 START_DATA (sqrt),
13601 TEST_f_f (sqrt, 0, 0),
13602 TEST_f_f (sqrt, qnan_value, qnan_value),
13603 TEST_f_f (sqrt, plus_infty, plus_infty),
13604
13605 TEST_f_f (sqrt, minus_zero, minus_zero),
13606
13607 /* sqrt (x) == qNaN plus invalid exception for x < 0. */
13608 TEST_f_f (sqrt, -1, qnan_value, INVALID_EXCEPTION),
13609 TEST_f_f (sqrt, -max_value, qnan_value, INVALID_EXCEPTION),
13610 TEST_f_f (sqrt, minus_infty, qnan_value, INVALID_EXCEPTION),
13611
13612 TEST_f_f (sqrt, 2209, 47),
13613 TEST_f_f (sqrt, 4, 2),
13614 TEST_f_f (sqrt, 2, M_SQRT2l),
13615 TEST_f_f (sqrt, 0.25, 0.5),
13616 TEST_f_f (sqrt, 6642.25, 81.5),
13617 TEST_f_f (sqrt, 15190.5625L, 123.25L),
13618 TEST_f_f (sqrt, 0.75L, 0.866025403784438646763723170752936183L),
13619 END_DATA (sqrt)
13620 };
13621
8847214f
UD		 13622static void
13623sqrt_test (void)
13624{
e6d3c4a7
AJ		 13625 errno = 0;
13626 FUNC(sqrt) (1);
13627 if (errno == ENOSYS)
13628 /* Function not implemented. */
13629 return;
13630
8847214f 13631 START (sqrt);
74c57478 13632 RUN_TEST_LOOP_f_f (sqrt, sqrt_test_data, );
8847214f
UD		 13633 END (sqrt);
13634}
13635
2550dfe9 13636
74c57478
JM		 13637static const struct test_f_f_data tan_test_data[] =
13638 {
13639 START_DATA (tan),
13640 TEST_f_f (tan, 0, 0),
13641 TEST_f_f (tan, minus_zero, minus_zero),
13642 TEST_f_f (tan, plus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13643 TEST_f_f (tan, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13644 TEST_f_f (tan, qnan_value, qnan_value, ERRNO_UNCHANGED),
13645
13646 TEST_f_f (tan, M_PI_4l, 1),
13647 TEST_f_f (tan, 0.75L, 0.931596459944072461165202756573936428L),
13648
13649 TEST_f_f (tan, 0x1p65, -0.0472364872359047946798414219288370688827L),
13650 TEST_f_f (tan, -0x1p65, 0.0472364872359047946798414219288370688827L),
13651
13652 TEST_f_f (tan, 0xc.9p-4, 0.9995162902115457818029468900654150261381L),
13653 TEST_f_f (tan, 0xc.908p-4, 0.9997603425502441410973077452249560802034L),
13654 TEST_f_f (tan, 0xc.90cp-4, 0.9998823910588060302788513970802357770031L),
13655 TEST_f_f (tan, 0xc.90ep-4, 0.9999434208994808753305784795924711152508L),
13656 TEST_f_f (tan, 0xc.90fp-4, 0.9999739372166156702433266059635165160515L),
13657 TEST_f_f (tan, 0xc.90f8p-4, 0.9999891957244072765118898375645469865764L),
13658 TEST_f_f (tan, 0xc.90fcp-4, 0.9999968250656122402859679132395522927393L),
13659 TEST_f_f (tan, 0xc.90fdp-4, 0.9999987324100083358016192309006353329444L),
13660 TEST_f_f (tan, 0xc.90fd8p-4, 0.9999996860835706212861509874451585282616L),
13661 TEST_f_f (tan, 0xc.90fdap-4, 0.9999999245021033010474530133665235922808L),
13662 TEST_f_f (tan, 0xc.ap-4, 1.0073556597407272165371804539701396631519L),
13663 TEST_f_f (tan, 0xc.98p-4, 1.0034282930863044654045449407466962736255L),
13664 TEST_f_f (tan, 0xc.94p-4, 1.0014703786820082237342656561856877993328L),
13665 TEST_f_f (tan, 0xc.92p-4, 1.0004928571392300571266638743539017593717L),
13666 TEST_f_f (tan, 0xc.91p-4, 1.0000044544650244953647966900221905361131L),
13667 TEST_f_f (tan, 0xc.90fep-4, 1.0000006397580424009014454926842136804016L),
13668 TEST_f_f (tan, 0xc.90fdcp-4, 1.0000001629206928242190327320047489394217L),
13669 TEST_f_f (tan, 0xc.90fdbp-4, 1.0000000437113909572052640953950483705005L),
13670
13671 TEST_f_f (tan, -0xc.9p-4, -0.9995162902115457818029468900654150261381L),
13672 TEST_f_f (tan, -0xc.908p-4, -0.9997603425502441410973077452249560802034L),
13673 TEST_f_f (tan, -0xc.90cp-4, -0.9998823910588060302788513970802357770031L),
13674 TEST_f_f (tan, -0xc.90ep-4, -0.9999434208994808753305784795924711152508L),
13675 TEST_f_f (tan, -0xc.90fp-4, -0.9999739372166156702433266059635165160515L),
13676 TEST_f_f (tan, -0xc.90f8p-4, -0.9999891957244072765118898375645469865764L),
13677 TEST_f_f (tan, -0xc.90fcp-4, -0.9999968250656122402859679132395522927393L),
13678 TEST_f_f (tan, -0xc.90fdp-4, -0.9999987324100083358016192309006353329444L),
13679 TEST_f_f (tan, -0xc.90fd8p-4, -0.9999996860835706212861509874451585282616L),
13680 TEST_f_f (tan, -0xc.90fdap-4, -0.9999999245021033010474530133665235922808L),
13681 TEST_f_f (tan, -0xc.ap-4, -1.0073556597407272165371804539701396631519L),
13682 TEST_f_f (tan, -0xc.98p-4, -1.0034282930863044654045449407466962736255L),
13683 TEST_f_f (tan, -0xc.94p-4, -1.0014703786820082237342656561856877993328L),
13684 TEST_f_f (tan, -0xc.92p-4, -1.0004928571392300571266638743539017593717L),
13685 TEST_f_f (tan, -0xc.91p-4, -1.0000044544650244953647966900221905361131L),
13686 TEST_f_f (tan, -0xc.90fep-4, -1.0000006397580424009014454926842136804016L),
13687 TEST_f_f (tan, -0xc.90fdcp-4, -1.0000001629206928242190327320047489394217L),
13688 TEST_f_f (tan, -0xc.90fdbp-4, -1.0000000437113909572052640953950483705005L),
13689
13690#ifndef TEST_FLOAT
13691 TEST_f_f (tan, 1e22, -1.628778225606898878549375936939548513545L),
13692 TEST_f_f (tan, 0x1p1023, -0.6814476476066215012854144040167365190368L),
13693#endif
13694
13695#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
13696 TEST_f_f (tan, 0x1p16383L, 0.422722393732022337800504160054440141575L),
13697#endif
13698 END_DATA (tan)
13699 };
13700
8847214f
UD		 13701static void
13702tan_test (void)
13703{
e6d3c4a7
AJ		 13704 errno = 0;
13705 FUNC(tan) (0);
13706 if (errno == ENOSYS)
13707 /* Function not implemented. */
13708 return;
13709
8847214f 13710 START (tan);
74c57478 13711 RUN_TEST_LOOP_f_f (tan, tan_test_data, );
8847214f
UD		 13712 END (tan);
13713}
13714
804360ed 13715
74c57478
JM		 13716static const struct test_f_f_data tan_tonearest_test_data[] =
13717 {
13718 START_DATA (tan_tonearest),
13719 TEST_f_f (tan, 1, 1.5574077246549022305069748074583601730873L),
13720 TEST_f_f (tan, 2, -2.1850398632615189916433061023136825434320L),
13721 TEST_f_f (tan, 3, -0.1425465430742778052956354105339134932261L),
13722 TEST_f_f (tan, 4, 1.1578212823495775831373424182673239231198L),
13723 TEST_f_f (tan, 5, -3.3805150062465856369827058794473439087096L),
13724 TEST_f_f (tan, 6, -0.2910061913847491570536995888681755428312L),
13725 TEST_f_f (tan, 7, 0.8714479827243187364564508896003135663222L),
13726 TEST_f_f (tan, 8, -6.7997114552203786999252627596086333648814L),
13727 TEST_f_f (tan, 9, -0.4523156594418098405903708757987855343087L),
13728 TEST_f_f (tan, 10, 0.6483608274590866712591249330098086768169L),
13729 END_DATA (tan_tonearest)
13730 };
13731
804360ed
JM		 13732static void
13733tan_test_tonearest (void)
13734{
804360ed
JM		 13735 errno = 0;
13736 FUNC(tan) (0);
13737 if (errno == ENOSYS)
13738 /* Function not implemented. */
13739 return;
13740
13741 START (tan_tonearest);
74c57478 13742 RUN_TEST_LOOP_f_f (tan, tan_tonearest_test_data, FE_TONEAREST);
804360ed
JM		 13743 END (tan_tonearest);
13744}
13745
13746
74c57478
JM		 13747static const struct test_f_f_data tan_towardzero_test_data[] =
13748 {
13749 START_DATA (tan_towardzero),
13750 TEST_f_f (tan, 1, 1.5574077246549022305069748074583601730873L),
13751 TEST_f_f (tan, 2, -2.1850398632615189916433061023136825434320L),
13752 TEST_f_f (tan, 3, -0.1425465430742778052956354105339134932261L),
13753 TEST_f_f (tan, 4, 1.1578212823495775831373424182673239231198L),
13754 TEST_f_f (tan, 5, -3.3805150062465856369827058794473439087096L),
13755 TEST_f_f (tan, 6, -0.2910061913847491570536995888681755428312L),
13756 TEST_f_f (tan, 7, 0.8714479827243187364564508896003135663222L),
13757 TEST_f_f (tan, 8, -6.7997114552203786999252627596086333648814L),
13758 TEST_f_f (tan, 9, -0.4523156594418098405903708757987855343087L),
13759 TEST_f_f (tan, 10, 0.6483608274590866712591249330098086768169L),
13760 END_DATA (tan_towardzero)
13761 };
13762
804360ed
JM		 13763static void
13764tan_test_towardzero (void)
13765{
804360ed
JM		 13766 errno = 0;
13767 FUNC(tan) (0);
13768 if (errno == ENOSYS)
13769 /* Function not implemented. */
13770 return;
13771
13772 START (tan_towardzero);
74c57478 13773 RUN_TEST_LOOP_f_f (tan, tan_towardzero_test_data, FE_TOWARDZERO);
804360ed
JM		 13774 END (tan_towardzero);
13775}
13776
13777
74c57478
JM		 13778static const struct test_f_f_data tan_downward_test_data[] =
13779 {
13780 START_DATA (tan_downward),
13781 TEST_f_f (tan, 1, 1.5574077246549022305069748074583601730873L),
13782 TEST_f_f (tan, 2, -2.1850398632615189916433061023136825434320L),
13783 TEST_f_f (tan, 3, -0.1425465430742778052956354105339134932261L),
13784 TEST_f_f (tan, 4, 1.1578212823495775831373424182673239231198L),
13785 TEST_f_f (tan, 5, -3.3805150062465856369827058794473439087096L),
13786 TEST_f_f (tan, 6, -0.2910061913847491570536995888681755428312L),
13787 TEST_f_f (tan, 7, 0.8714479827243187364564508896003135663222L),
13788 TEST_f_f (tan, 8, -6.7997114552203786999252627596086333648814L),
13789 TEST_f_f (tan, 9, -0.4523156594418098405903708757987855343087L),
13790 TEST_f_f (tan, 10, 0.6483608274590866712591249330098086768169L),
13791 END_DATA (tan_downward)
13792 };
13793
804360ed
JM		 13794static void
13795tan_test_downward (void)
13796{
804360ed
JM		 13797 errno = 0;
13798 FUNC(tan) (0);
13799 if (errno == ENOSYS)
13800 /* Function not implemented. */
13801 return;
13802
13803 START (tan_downward);
74c57478 13804 RUN_TEST_LOOP_f_f (tan, tan_downward_test_data, FE_DOWNWARD);
804360ed
JM		 13805 END (tan_downward);
13806}
13807
13808
74c57478
JM		 13809static const struct test_f_f_data tan_upward_test_data[] =
13810 {
13811 START_DATA (tan_upward),
13812 TEST_f_f (tan, 1, 1.5574077246549022305069748074583601730873L),
13813 TEST_f_f (tan, 2, -2.1850398632615189916433061023136825434320L),
13814 TEST_f_f (tan, 3, -0.1425465430742778052956354105339134932261L),
13815 TEST_f_f (tan, 4, 1.1578212823495775831373424182673239231198L),
13816 TEST_f_f (tan, 5, -3.3805150062465856369827058794473439087096L),
13817 TEST_f_f (tan, 6, -0.2910061913847491570536995888681755428312L),
13818 TEST_f_f (tan, 7, 0.8714479827243187364564508896003135663222L),
13819 TEST_f_f (tan, 8, -6.7997114552203786999252627596086333648814L),
13820 TEST_f_f (tan, 9, -0.4523156594418098405903708757987855343087L),
13821 TEST_f_f (tan, 10, 0.6483608274590866712591249330098086768169L),
13822 END_DATA (tan_upward)
13823 };
13824
804360ed
JM		 13825static void
13826tan_test_upward (void)
13827{
804360ed
JM		 13828 errno = 0;
13829 FUNC(tan) (0);
13830 if (errno == ENOSYS)
13831 /* Function not implemented. */
13832 return;
13833
13834 START (tan_upward);
74c57478 13835 RUN_TEST_LOOP_f_f (tan, tan_upward_test_data, FE_UPWARD);
804360ed
JM		 13836 END (tan_upward);
13837}
13838
13839
74c57478
JM		 13840static const struct test_f_f_data tanh_test_data[] =
13841 {
13842 START_DATA (tanh),
13843 TEST_f_f (tanh, 0, 0),
13844 TEST_f_f (tanh, minus_zero, minus_zero),
8847214f 13845
15daa639 13846#ifndef TEST_INLINE
74c57478
JM		 13847 TEST_f_f (tanh, plus_infty, 1),
13848 TEST_f_f (tanh, minus_infty, -1),
15daa639 13849#endif
74c57478 13850 TEST_f_f (tanh, qnan_value, qnan_value),
3eab00bd 13851
74c57478
JM		 13852 TEST_f_f (tanh, 0.75L, 0.635148952387287319214434357312496495L),
13853 TEST_f_f (tanh, -0.75L, -0.635148952387287319214434357312496495L),
8847214f 13854
74c57478
JM		 13855 TEST_f_f (tanh, 1.0L, 0.7615941559557648881194582826047935904L),
13856 TEST_f_f (tanh, -1.0L, -0.7615941559557648881194582826047935904L),
30e5dcb7 13857
74c57478
JM		 13858 /* 2^-57 */
13859 TEST_f_f (tanh, 0x1p-57L, 6.938893903907228377647697925567626953125e-18L),
13860 END_DATA (tanh)
13861 };
8847214f
UD		 13862
13863static void
74c57478 13864tanh_test (void)
8847214f
UD		 13865{
13866 errno = 0;
74c57478 13867 FUNC(tanh) (0.7L);
8847214f
UD		 13868 if (errno == ENOSYS)
13869 /* Function not implemented. */
13870 return;
8847214f 13871
74c57478
JM		 13872 START (tanh);
13873 RUN_TEST_LOOP_f_f (tanh, tanh_test_data, );
13874 END (tanh);
13875}
8847214f 13876
74c57478
JM		 13877static const struct test_f_f_data tgamma_test_data[] =
13878 {
13879 START_DATA (tgamma),
13880 TEST_f_f (tgamma, plus_infty, plus_infty),
13881 TEST_f_f (tgamma, max_value, plus_infty, OVERFLOW_EXCEPTION),
13882 TEST_f_f (tgamma, 0, plus_infty, DIVIDE_BY_ZERO_EXCEPTION),
13883 TEST_f_f (tgamma, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
13884 /* tgamma (x) == qNaN plus invalid exception for integer x <= 0. */
13885 TEST_f_f (tgamma, -2, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13886 TEST_f_f (tgamma, -max_value, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13887 TEST_f_f (tgamma, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13888 TEST_f_f (tgamma, qnan_value, qnan_value),
13889
13890 TEST_f_f (tgamma, 0.5, M_SQRT_PIl),
13891 TEST_f_f (tgamma, -0.5, -M_2_SQRT_PIl),
13892
13893 TEST_f_f (tgamma, 1, 1),
13894 TEST_f_f (tgamma, 2, 1),
13895 TEST_f_f (tgamma, 3, 2),
13896 TEST_f_f (tgamma, 4, 6),
13897 TEST_f_f (tgamma, 5, 24),
13898 TEST_f_f (tgamma, 6, 120),
13899 TEST_f_f (tgamma, 7, 720),
13900 TEST_f_f (tgamma, 8, 5040),
13901 TEST_f_f (tgamma, 9, 40320),
13902 TEST_f_f (tgamma, 10, 362880),
13903
13904 TEST_f_f (tgamma, 0.7L, 1.29805533264755778568117117915281162L),
13905 TEST_f_f (tgamma, 1.2L, 0.918168742399760610640951655185830401L),
13906
13907 TEST_f_f (tgamma, 1.5L, 8.8622692545275801364908374167057259139877e-01L),
13908 TEST_f_f (tgamma, 2.5L, 1.3293403881791370204736256125058588870982e+00L),
13909 TEST_f_f (tgamma, 3.5L, 3.3233509704478425511840640312646472177454e+00L),
13910 TEST_f_f (tgamma, 4.5L, 1.1631728396567448929144224109426265262109e+01L),
13911 TEST_f_f (tgamma, 5.5L, 5.2342777784553520181149008492418193679490e+01L),
13912 TEST_f_f (tgamma, 6.5L, 2.8788527781504436099631954670830006523720e+02L),
13913 TEST_f_f (tgamma, 7.5L, 1.8712543057977883464760770536039504240418e+03L),
13914 TEST_f_f (tgamma, 8.5L, 1.4034407293483412598570577902029628180313e+04L),
13915 TEST_f_f (tgamma, 9.5L, 1.1929246199460900708784991216725183953266e+05L),
13916 TEST_f_f (tgamma, -1.5L, 2.3632718012073547030642233111215269103967e+00L),
13917 TEST_f_f (tgamma, -2.5L, -9.4530872048294188122568932444861076415869e-01L),
13918 TEST_f_f (tgamma, -3.5L, 2.7008820585226910892162552127103164690248e-01L),
13919 TEST_f_f (tgamma, -4.5L, -6.0019601300504246427027893615784810422774e-02L),
13920 TEST_f_f (tgamma, -5.5L, 1.0912654781909862986732344293779056440504e-02L),
13921 TEST_f_f (tgamma, -6.5L, -1.6788699664476712287280529682737009908468e-03L),
13922 TEST_f_f (tgamma, -7.5L, 2.2384932885968949716374039576982679877958e-04L),
13923 TEST_f_f (tgamma, -8.5L, -2.6335215159963470254557693619979623385833e-05L),
13924 TEST_f_f (tgamma, -9.5L, 2.7721279115751021320587045915768024616666e-06L),
13925 TEST_f_f (tgamma, 0x1p-24L, 1.6777215422784394050795179874582764575261e+07L),
13926 TEST_f_f (tgamma, -0x1p-24L, -1.6777216577215723853867349114260580375249e+07L),
13927 TEST_f_f (tgamma, 0x1p-53L, 9.0071992547409914227843350984672492007618e+15L),
13928 TEST_f_f (tgamma, -0x1p-53L, -9.0071992547409925772156649015329704137860e+15L),
13929 TEST_f_f (tgamma, 0x1p-64L, 1.8446744073709551615422784335098467139447e+19L),
13930 TEST_f_f (tgamma, -0x1p-64L, -1.8446744073709551616577215664901532860660e+19L),
13931 TEST_f_f (tgamma, 0x1p-106L, 8.1129638414606681695789005144063422784335e+31L),
13932 TEST_f_f (tgamma, -0x1p-106L, -8.1129638414606681695789005144064577215665e+31L),
13933 TEST_f_f (tgamma, 0x1p-113L, 1.0384593717069655257060992658440191422784e+34L),
13934 TEST_f_f (tgamma, -0x1p-113L, -1.0384593717069655257060992658440192577216e+34L),
13935 TEST_f_f (tgamma, 0x1p-127L, 1.7014118346046923173168730371588410572742e+38L),
13936 TEST_f_f (tgamma, -0x1p-127L, -1.7014118346046923173168730371588410572858e+38L),
d8cd06db 13937#ifdef TEST_FLOAT
74c57478
JM		 13938 TEST_f_f (tgamma, 0x1p-128L, plus_infty, OVERFLOW_EXCEPTION),
13939 TEST_f_f (tgamma, -0x1p-128L, minus_infty, OVERFLOW_EXCEPTION),
13940 TEST_f_f (tgamma, 0x1p-149L, plus_infty, OVERFLOW_EXCEPTION),
13941 TEST_f_f (tgamma, -0x1p-149L, minus_infty, OVERFLOW_EXCEPTION),
d8cd06db 13942#else
74c57478
JM		 13943 TEST_f_f (tgamma, 0x1p-128L, 3.4028236692093846346337460743176821145542e+38L),
13944 TEST_f_f (tgamma, -0x1p-128L, -3.4028236692093846346337460743176821145658e+38L),
13945 TEST_f_f (tgamma, 0x1p-149L, 7.1362384635297994052914298472474756819137e+44L),
13946 TEST_f_f (tgamma, -0x1p-149L, -7.1362384635297994052914298472474756819137e+44L),
d8cd06db
JM		 13947#endif
13948#ifndef TEST_FLOAT
74c57478
JM		 13949 TEST_f_f (tgamma, 0x1p-1023L, 8.9884656743115795386465259539451236680899e+307L),
13950 TEST_f_f (tgamma, -0x1p-1023L, -8.9884656743115795386465259539451236680899e+307L),
d8cd06db 13951# if !defined TEST_LDOUBLE || LDBL_MAX_EXP <= 1024
74c57478
JM		 13952 TEST_f_f (tgamma, 0x1p-1024L, plus_infty, OVERFLOW_EXCEPTION),
13953 TEST_f_f (tgamma, -0x1p-1024L, minus_infty, OVERFLOW_EXCEPTION),
13954 TEST_f_f (tgamma, 0x1p-1074L, plus_infty, OVERFLOW_EXCEPTION),
13955 TEST_f_f (tgamma, -0x1p-1074L, minus_infty, OVERFLOW_EXCEPTION),
d8cd06db 13956# else
74c57478
JM		 13957 TEST_f_f (tgamma, 0x1p-1024L, 1.7976931348623159077293051907890247336180e+308L),
13958 TEST_f_f (tgamma, -0x1p-1024L, -1.7976931348623159077293051907890247336180e+308L),
13959 TEST_f_f (tgamma, 0x1p-1074L, 2.0240225330731061835249534671891730704956e+323L),
13960 TEST_f_f (tgamma, -0x1p-1074L, -2.0240225330731061835249534671891730704956e+323L),
d8cd06db
JM		 13961# endif
13962#endif
13963#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
74c57478
JM		 13964 TEST_f_f (tgamma, 0x1p-16383L, 5.9486574767861588254287966331400356538172e+4931L),
13965 TEST_f_f (tgamma, -0x1p-16383L, -5.9486574767861588254287966331400356538172e+4931L),
13966 TEST_f_f (tgamma, 0x1p-16384L, plus_infty, OVERFLOW_EXCEPTION),
13967 TEST_f_f (tgamma, -0x1p-16384L, minus_infty, OVERFLOW_EXCEPTION),
13968 TEST_f_f (tgamma, 0x1p-16445L, plus_infty, OVERFLOW_EXCEPTION),
13969 TEST_f_f (tgamma, -0x1p-16445L, minus_infty, OVERFLOW_EXCEPTION),
d8cd06db 13970# if LDBL_MANT_DIG >= 113
74c57478
JM		 13971 TEST_f_f (tgamma, 0x1p-16494L, plus_infty, OVERFLOW_EXCEPTION),
13972 TEST_f_f (tgamma, -0x1p-16494L, minus_infty, OVERFLOW_EXCEPTION),
d8cd06db
JM		 13973# endif
13974#endif
74c57478
JM		 13975 TEST_f_f (tgamma, 0x8.00001p0L, 5.0400096882277802019946778420223050233915e+03L),
13976 TEST_f_f (tgamma, 0x7.fffff8p0L, 5.0399951558933225045148935487583089307135e+03L),
13977 TEST_f_f (tgamma, 0x7.000008p0L, 7.2000064296977505705636258629805621178587e+02L),
13978 TEST_f_f (tgamma, 0x6.fffff8p0L, 7.1999935703082425988147448928288557689866e+02L),
13979 TEST_f_f (tgamma, 0x6.000008p0L, 1.2000009762487825358530770343720418162783e+02L),
13980 TEST_f_f (tgamma, 0x5.fffff8p0L, 1.1999990237520611552119807476573441975106e+02L),
13981 TEST_f_f (tgamma, 0x5.000008p0L, 2.4000017236155647574166073485628713443799e+01L),
13982 TEST_f_f (tgamma, 0x4.fffff8p0L, 2.3999982763857938712639837029547357501709e+01L),
13983 TEST_f_f (tgamma, 0x4.000008p0L, 6.0000035937827461765660468073471093546129e+00L),
13984 TEST_f_f (tgamma, 0x3.fffffcp0L, 5.9999982031095793171233994481968816873643e+00L),
13985 TEST_f_f (tgamma, 0x3.000004p0L, 2.0000004400179308360529417942462250547999e+00L),
13986 TEST_f_f (tgamma, 0x2.fffffcp0L, 1.9999995599822108706107786027549565954046e+00L),
13987 TEST_f_f (tgamma, 0x2.000004p0L, 1.0000001007996638509889062631687945799175e+00L),
13988 TEST_f_f (tgamma, 0x1.fffffep0L, 9.9999994960018563231526611134590489120697e-01L),
13989 TEST_f_f (tgamma, 0x1.000002p0L, 9.9999993119054472483596471908942669644327e-01L),
13990 TEST_f_f (tgamma, 0x0.ffffffp0L, 1.0000000344047381790797322460568297132998e+00L),
13991 TEST_f_f (tgamma, -0x0.ffffffp0L, -1.6777216422784419250710305882992376932423e+07L),
13992 TEST_f_f (tgamma, -0x1.000002p0L, 8.3886075772158332060084424806449513922858e+06L),
13993 TEST_f_f (tgamma, -0x1.fffffep0L, 4.1943044613922792026014320172298377770578e+06L),
13994 TEST_f_f (tgamma, -0x2.000004p0L, -2.0971515386080557574407223895988378776747e+06L),
13995 TEST_f_f (tgamma, -0x2.fffffcp0L, -6.9905087601970247876992248591045142913324e+05L),
13996 TEST_f_f (tgamma, -0x3.000004p0L, 6.9905045731381300146131914617735687322025e+05L),
13997 TEST_f_f (tgamma, -0x3.fffffcp0L, 1.7476272942159602684441970627092458855771e+05L),
13998 TEST_f_f (tgamma, -0x4.000008p0L, -8.7381270578483499672965708923121931082305e+04L),
13999 TEST_f_f (tgamma, -0x4.fffff8p0L, -1.7476280884325863043793087474680780379554e+04L),
14000 TEST_f_f (tgamma, -0x5.000008p0L, 1.7476252449031389167286893378510439443844e+04L),
14001 TEST_f_f (tgamma, -0x5.fffff8p0L, 2.9127137122026653716311560165769071985443e+03L),
14002 TEST_f_f (tgamma, -0x6.000008p0L, -2.9127085100239567622341538102130981196910e+03L),
14003 TEST_f_f (tgamma, -0x6.fffff8p0L, -4.1610198723079349791939054365613377035519e+02L),
14004 TEST_f_f (tgamma, -0x7.000008p0L, 4.1610118737306415004517215226199741948733e+02L),
14005 TEST_f_f (tgamma, -0x7.fffff8p0L, 5.2012751504050764429534086402871289946986e+01L),
14006 TEST_f_f (tgamma, -0x8.00001p0L, -2.6006296115134418896533598545925084576702e+01L),
14007 TEST_f_f (tgamma, -0x9.fffffp0L, 2.8896008370721717567612135720915723136310e-01L),
14008 TEST_f_f (tgamma, -0xa.00001p0L, -2.8895878754728051776830454190076999107021e-01L),
14009 TEST_f_f (tgamma, -0x13.ffffep0L, 2.1550026214525536756224040483579183652119e-13L),
14010 TEST_f_f (tgamma, -0x14.00002p0L, -2.1549777908265594916405421768142757507179e-13L),
14011 TEST_f_f (tgamma, -0x1d.ffffep0L, 1.9765721589464867957912772592816027583176e-27L),
14012 TEST_f_f (tgamma, -0x1e.00002p0L, -1.9765463890341964384070157599286498212650e-27L),
14013 TEST_f_f (tgamma, -0x27.ffffcp0L, 3.2129279441390812141195076945616975790225e-43L, UNDERFLOW_EXCEPTION_FLOAT),
14014 TEST_f_f (tgamma, -0x28.00004p0L, -3.2128372159115252365699015758097981155793e-43L, UNDERFLOW_EXCEPTION_FLOAT),
14015 TEST_f_f (tgamma, -0x28.ffffcp0L, -7.8364103489619817539676737414096652170685e-45L, UNDERFLOW_EXCEPTION_FLOAT),
14016 TEST_f_f (tgamma, -0x29.00004p0L, 7.8361876024016854597745353972619195760515e-45L, UNDERFLOW_EXCEPTION_FLOAT),
d8cd06db 14017#ifdef TEST_FLOAT
74c57478
JM		 14018 TEST_f_f (tgamma, -0x29.ffffcp0L, plus_zero, UNDERFLOW_EXCEPTION_FLOAT),
14019 TEST_f_f (tgamma, -0x2a.00004p0L, minus_zero, UNDERFLOW_EXCEPTION_FLOAT),
d8cd06db 14020#else
74c57478
JM		 14021 TEST_f_f (tgamma, -0x29.ffffcp0L, 1.8658121573125798145204120066590953505132e-46L),
14022 TEST_f_f (tgamma, -0x2a.00004p0L, -1.8657587834931410688246126853566488626385e-46L),
14023#endif
14024#ifndef TEST_FLOAT
14025 TEST_f_f (tgamma, 0x8.0000000000008p0L, 5.0400000000000180457125667322294144477136e+03L),
14026 TEST_f_f (tgamma, 0x7.ffffffffffffcp0L, 5.0399999999999909771437166339103165198442e+03L),
14027 TEST_f_f (tgamma, 0x7.0000000000004p0L, 7.2000000000000119762397445457359071259652e+02L),
14028 TEST_f_f (tgamma, 0x6.ffffffffffffcp0L, 7.1999999999999880237602554542848858572672e+02L),
14029 TEST_f_f (tgamma, 0x6.0000000000004p0L, 1.2000000000000018184042734842640022086408e+02L),
14030 TEST_f_f (tgamma, 0x5.ffffffffffffcp0L, 1.1999999999999981815957265157389249327533e+02L),
14031 TEST_f_f (tgamma, 0x5.0000000000004p0L, 2.4000000000000032104829055124673225982803e+01L),
14032 TEST_f_f (tgamma, 0x4.ffffffffffffcp0L, 2.3999999999999967895170944875373910918544e+01L),
14033 TEST_f_f (tgamma, 0x4.0000000000004p0L, 6.0000000000000066939396342309789716341613e+00L),
14034 TEST_f_f (tgamma, 0x3.ffffffffffffep0L, 5.9999999999999966530301828845138185025345e+00L),
14035 TEST_f_f (tgamma, 0x3.0000000000002p0L, 2.0000000000000008195971324717875960213536e+00L),
14036 TEST_f_f (tgamma, 0x2.ffffffffffffep0L, 1.9999999999999991804028675282128956223990e+00L),
14037 TEST_f_f (tgamma, 0x2.0000000000002p0L, 1.0000000000000001877539613108624482361963e+00L),
14038 TEST_f_f (tgamma, 0x1.fffffffffffffp0L, 9.9999999999999990612301934456883679778984e-01L),
14039 TEST_f_f (tgamma, 0x1.0000000000001p0L, 9.9999999999999987183237573039992418700531e-01L),
14040 TEST_f_f (tgamma, 0x0.fffffffffffff8p0L, 1.0000000000000000640838121348000744796665e+00L),
14041 TEST_f_f (tgamma, -0x0.fffffffffffff8p0L, -9.0071992547409924227843350984672961392521e+15L),
14042 TEST_f_f (tgamma, -0x1.0000000000001p0L, 4.5035996273704955772156649015331740980405e+15L),
14043 TEST_f_f (tgamma, -0x1.fffffffffffffp0L, 2.2517998136852484613921675492337776673289e+15L),
14044 TEST_f_f (tgamma, -0x2.0000000000002p0L, -1.1258999068426235386078324507668462444260e+15L),
14045 TEST_f_f (tgamma, -0x2.ffffffffffffep0L, -3.7529996894754154268627807196691509198813e+14L),
14046 TEST_f_f (tgamma, -0x3.0000000000002p0L, 3.7529996894754112398038859470009084971438e+14L),
14047 TEST_f_f (tgamma, -0x3.ffffffffffffep0L, 9.3824992236885396088236184658402406857503e+13L),
14048 TEST_f_f (tgamma, -0x4.0000000000004p0L, -4.6912496118442603911763815341745722862351e+13L),
14049 TEST_f_f (tgamma, -0x4.ffffffffffffcp0L, -9.3824992236885475509805702650262155809819e+12L),
14050 TEST_f_f (tgamma, -0x5.0000000000004p0L, 9.3824992236885191156860964016850034672946e+12L),
14051 TEST_f_f (tgamma, -0x5.ffffffffffffcp0L, 1.5637498706147581566449098589862357835505e+12L),
14052 TEST_f_f (tgamma, -0x6.0000000000004p0L, -1.5637498706147529544662012521330708016396e+12L),
14053 TEST_f_f (tgamma, -0x6.ffffffffffffcp0L, -2.2339283865925119357965832452642909859289e+11L),
14054 TEST_f_f (tgamma, -0x7.0000000000004p0L, 2.2339283865925039372192897706214475877342e+11L),
14055 TEST_f_f (tgamma, -0x7.ffffffffffffcp0L, 2.7924104832406402297655703264222230055898e+10L),
14056 TEST_f_f (tgamma, -0x8.0000000000008p0L, -1.3962052416203121511868106259843527348026e+10L),
14057 TEST_f_f (tgamma, -0x9.ffffffffffff8p0L, 1.5513391573559147700413058496716749249803e+08L),
14058 TEST_f_f (tgamma, -0xa.0000000000008p0L, -1.5513391573559018084419393002828541166901e+08L),
14059 TEST_f_f (tgamma, -0x13.ffffffffffffp0L, 1.1569515572952029402736625857313236848570e-04L),
14060 TEST_f_f (tgamma, -0x14.000000000001p0L, -1.1569515572951781096476686854873801225397e-04L),
14061 TEST_f_f (tgamma, -0x1d.ffffffffffffp0L, 1.0611571800204311628217068863959963842891e-18L),
14062 TEST_f_f (tgamma, -0x1e.000000000001p0L, -1.0611571800204053929094168642022073530425e-18L),
14063 TEST_f_f (tgamma, -0x27.fffffffffffep0L, 1.7249032006742266376460389310340465554361e-34L),
14064 TEST_f_f (tgamma, -0x28.000000000002p0L, -1.7249032006741359094184881234822934593822e-34L),
14065 TEST_f_f (tgamma, -0x28.fffffffffffep0L, -4.2070809772542120404320040128839297118648e-36L),
14066 TEST_f_f (tgamma, -0x29.000000000002p0L, 4.2070809772539892938717205103652583609422e-36L),
14067 TEST_f_f (tgamma, -0x29.fffffffffffep0L, 1.0016859469652887505173040814397197718981e-37L),
14068 TEST_f_f (tgamma, -0x2a.000000000002p0L, -1.0016859469652353766978684241048308120274e-37L),
14069 TEST_f_f (tgamma, -0x31.fffffffffffep0L, 4.6273774273632946947805289899230181990085e-51L),
14070 TEST_f_f (tgamma, -0x32.000000000002p0L, -4.6273774273630367887073532197576655720178e-51L),
14071 TEST_f_f (tgamma, -0x63.fffffffffffcp0L, 7.5400833348840965463348754984345825364294e-145L),
14072 TEST_f_f (tgamma, -0x64.000000000004p0L, -7.5400833348831085791638490135462230991587e-145L),
14073 TEST_f_f (tgamma, -0x95.fffffffffff8p0L, 6.1582369322723207086020016423767264008839e-250L),
14074 TEST_f_f (tgamma, -0x96.000000000008p0L, -6.1582369322705655439003240743176243138734e-250L),
14075 TEST_f_f (tgamma, -0xb4.fffffffffff8p0L, -9.6760879059917574597728750098636253931457e-319L, UNDERFLOW_EXCEPTION_DOUBLE),
14076 TEST_f_f (tgamma, -0xb5.000000000008p0L, 9.6760879059888966544677044221698800670218e-319L, UNDERFLOW_EXCEPTION_DOUBLE),
14077 TEST_f_f (tgamma, -0xb5.fffffffffff8p0L, 5.3165318164789884455066481673086605454904e-321L, UNDERFLOW_EXCEPTION_DOUBLE),
14078 TEST_f_f (tgamma, -0xb6.000000000008p0L, -5.3165318164774149139661976747137185876909e-321L, UNDERFLOW_EXCEPTION_DOUBLE),
14079 TEST_f_f (tgamma, -0xb6.fffffffffff8p0L, -2.9052086428846935908287469917922960610289e-323L, UNDERFLOW_EXCEPTION_DOUBLE),
14080 TEST_f_f (tgamma, -0xb7.000000000008p0L, 2.9052086428838328351126988236541632950925e-323L, UNDERFLOW_EXCEPTION_DOUBLE),
d8cd06db 14081# if !defined TEST_LDOUBLE || LDBL_MAX_EXP <= 1024
74c57478
JM		 14082 TEST_f_f (tgamma, -0xb7.fffffffffff8p0L, plus_zero, UNDERFLOW_EXCEPTION_DOUBLE),
14083 TEST_f_f (tgamma, -0xb8.000000000008p0L, minus_zero, UNDERFLOW_EXCEPTION_DOUBLE),
d8cd06db 14084# else
74c57478
JM		 14085 TEST_f_f (tgamma, -0xb7.fffffffffff8p0L, 1.5789177406982032823826953250736039527543e-325L),
14086 TEST_f_f (tgamma, -0xb8.000000000008p0L, -1.5789177406977349925854817486109369828857e-325L),
d8cd06db
JM		 14087# endif
14088#endif
14089#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
74c57478
JM		 14090 TEST_f_f (tgamma, 0x8.00000000000000000000000004p0L, 5.0400000000000000000000000000020034765587e+03L),
14091 TEST_f_f (tgamma, 0x7.fffffffffffffffffffffffffep0L, 5.0399999999999999999999999999989982617206e+03L),
14092 TEST_f_f (tgamma, 0x7.00000000000000000000000002p0L, 7.2000000000000000000000000000013296297113e+02L),
14093 TEST_f_f (tgamma, 0x6.fffffffffffffffffffffffffep0L, 7.1999999999999999999999999999986703702887e+02L),
14094 TEST_f_f (tgamma, 0x6.00000000000000000000000002p0L, 1.2000000000000000000000000000002018834292e+02L),
14095 TEST_f_f (tgamma, 0x5.fffffffffffffffffffffffffep0L, 1.1999999999999999999999999999997981165708e+02L),
14096 TEST_f_f (tgamma, 0x5.00000000000000000000000002p0L, 2.4000000000000000000000000000003564352042e+01L),
14097 TEST_f_f (tgamma, 0x4.fffffffffffffffffffffffffep0L, 2.3999999999999999999999999999996435647958e+01L),
14098 TEST_f_f (tgamma, 0x4.00000000000000000000000002p0L, 6.0000000000000000000000000000007431765907e+00L),
14099 TEST_f_f (tgamma, 0x3.ffffffffffffffffffffffffffp0L, 5.9999999999999999999999999999996284117046e+00L),
14100 TEST_f_f (tgamma, 0x3.00000000000000000000000001p0L, 2.0000000000000000000000000000000909935607e+00L),
14101 TEST_f_f (tgamma, 0x2.ffffffffffffffffffffffffffp0L, 1.9999999999999999999999999999999090064393e+00L),
14102 TEST_f_f (tgamma, 0x2.00000000000000000000000001p0L, 1.0000000000000000000000000000000208448771e+00L),
14103 TEST_f_f (tgamma, 0x1.ffffffffffffffffffffffffff8p0L, 9.9999999999999999999999999999998957756146e-01L),
14104 TEST_f_f (tgamma, 0x1.000000000000000000000000008p0L, 9.9999999999999999999999999999998577053525e-01L),
14105 TEST_f_f (tgamma, 0x0.ffffffffffffffffffffffffffcp0L, 1.0000000000000000000000000000000071147324e+00L),
14106 TEST_f_f (tgamma, -0x0.ffffffffffffffffffffffffffcp0L, -8.1129638414606681695789005144064422784335e+31L),
14107 TEST_f_f (tgamma, -0x1.000000000000000000000000008p0L, 4.0564819207303340847894502572031577215665e+31L),
14108 TEST_f_f (tgamma, -0x1.ffffffffffffffffffffffffff8p0L, 2.0282409603651670423947251286016461392168e+31L),
14109 TEST_f_f (tgamma, -0x2.00000000000000000000000001p0L, -1.0141204801825835211973625643007538607832e+31L),
14110 TEST_f_f (tgamma, -0x2.ffffffffffffffffffffffffffp0L, -3.3804016006086117373245418810028760196114e+30L),
14111 TEST_f_f (tgamma, -0x3.00000000000000000000000001p0L, 3.3804016006086117373245418810024573137219e+30L),
14112 TEST_f_f (tgamma, -0x3.ffffffffffffffffffffffffffp0L, 8.4510040015215293433113547025072942156952e+29L),
14113 TEST_f_f (tgamma, -0x4.00000000000000000000000002p0L, -4.2255020007607646716556773512527057843048e+29L),
14114 TEST_f_f (tgamma, -0x4.fffffffffffffffffffffffffep0L, -8.4510040015215293433113547025080884313904e+28L),
14115 TEST_f_f (tgamma, -0x5.00000000000000000000000002p0L, 8.4510040015215293433113547025052449019430e+28L),
14116 TEST_f_f (tgamma, -0x5.fffffffffffffffffffffffffep0L, 1.4085006669202548905518924504180378867132e+28L),
14117 TEST_f_f (tgamma, -0x6.00000000000000000000000002p0L, -1.4085006669202548905518924504175176688423e+28L),
14118 TEST_f_f (tgamma, -0x6.fffffffffffffffffffffffffep0L, -2.0121438098860784150741320720257967542615e+27L),
14119 TEST_f_f (tgamma, -0x7.00000000000000000000000002p0L, 2.0121438098860784150741320720249968965322e+27L),
14120 TEST_f_f (tgamma, -0x7.fffffffffffffffffffffffffep0L, 2.5151797623575980188426650900322769448110e+26L),
14121 TEST_f_f (tgamma, -0x8.00000000000000000000000004p0L, -1.2575898811787990094213325450153421028080e+26L),
14122 TEST_f_f (tgamma, -0x9.fffffffffffffffffffffffffcp0L, 1.3973220901986655660237028277960625420495e+24L),
14123 TEST_f_f (tgamma, -0xa.00000000000000000000000004p0L, -1.3973220901986655660237028277947663821128e+24L),
14124 TEST_f_f (tgamma, -0x13.fffffffffffffffffffffffff8p0L, 1.0420893204640670202556853709074896123293e+12L),
14125 TEST_f_f (tgamma, -0x14.00000000000000000000000008p0L, -1.0420893204640670202556853709050065497299e+12L),
14126 TEST_f_f (tgamma, -0x1d.fffffffffffffffffffffffff8p0L, 9.5580541610429641982963434151488827190079e-03L),
14127 TEST_f_f (tgamma, -0x1e.00000000000000000000000008p0L, -9.5580541610429641982963434151231128067179e-03L),
14128 TEST_f_f (tgamma, -0x27.fffffffffffffffffffffffffp0L, 1.5536546823612837336494536911280147806523e-18L),
14129 TEST_f_f (tgamma, -0x28.0000000000000000000000001p0L, -1.5536546823612837336494536911189419578973e-18L),
14130 TEST_f_f (tgamma, -0x28.fffffffffffffffffffffffffp0L, -3.7894016642958139845108626612879138384405e-20L),
14131 TEST_f_f (tgamma, -0x29.0000000000000000000000001p0L, 3.7894016642958139845108626612656391824122e-20L),
14132 TEST_f_f (tgamma, -0x29.fffffffffffffffffffffffffp0L, 9.0223849149900332964544349078285357440663e-22L),
14133 TEST_f_f (tgamma, -0x2a.0000000000000000000000001p0L, -9.0223849149900332964544349077751619246306e-22L),
14134 TEST_f_f (tgamma, -0x31.fffffffffffffffffffffffffp0L, 4.1679710515150795310771069868348482819424e-35L),
14135 TEST_f_f (tgamma, -0x32.0000000000000000000000001p0L, -4.1679710515150795310771069868090576746248e-35L),
14136 TEST_f_f (tgamma, -0x63.ffffffffffffffffffffffffep0L, 6.7915032994648558610510614163560656864280e-129L),
14137 TEST_f_f (tgamma, -0x64.0000000000000000000000002p0L, -6.7915032994648558610510614162572689693253e-129L),
14138 TEST_f_f (tgamma, -0x95.ffffffffffffffffffffffffcp0L, 5.5468467106873795353190582463444660395353e-234L),
14139 TEST_f_f (tgamma, -0x96.0000000000000000000000004p0L, -5.5468467106873795353190582461689495693675e-234L),
14140 TEST_f_f (tgamma, -0xb4.ffffffffffffffffffffffffcp0L, -8.7154451775644399729745472278589884205029e-303L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14141 TEST_f_f (tgamma, -0xb5.0000000000000000000000004p0L, 8.7154451775644399729745472275729078899858e-303L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14142 TEST_f_f (tgamma, -0xb5.ffffffffffffffffffffffffcp0L, 4.7887061415189230620739270482742524864974e-305L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14143 TEST_f_f (tgamma, -0xb6.0000000000000000000000004p0L, -4.7887061415189230620739270481168993324524e-305L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14144 TEST_f_f (tgamma, -0xb6.ffffffffffffffffffffffffcp0L, -2.6167793123054224382917634143575601407067e-307L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14145 TEST_f_f (tgamma, -0xb7.0000000000000000000000004p0L, 2.6167793123054224382917634142714845691019e-307L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14146 TEST_f_f (tgamma, -0xb7.ffffffffffffffffffffffffcp0L, 1.4221626697312078468976975078030462044826e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
14147 TEST_f_f (tgamma, -0xb8.0000000000000000000000004p0L, -1.4221626697312078468976975077562172247612e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
14148 TEST_f_f (tgamma, -0xbb.ffffffffffffffffffffffffcp0L, 1.1756150745511026776007338998283058108448e-318L, UNDERFLOW_EXCEPTION_DOUBLE),
14149 TEST_f_f (tgamma, -0xbc.0000000000000000000000004p0L, -1.1756150745511026776007338997894360215107e-318L, UNDERFLOW_EXCEPTION_DOUBLE),
14150 TEST_f_f (tgamma, -0xbc.ffffffffffffffffffffffffcp0L, -6.2201855796354639026493857133773832713743e-321L, UNDERFLOW_EXCEPTION_DOUBLE),
14151 TEST_f_f (tgamma, -0xbd.0000000000000000000000004p0L, 6.2201855796354639026493857131715153125175e-321L, UNDERFLOW_EXCEPTION_DOUBLE),
14152 TEST_f_f (tgamma, -0xbd.ffffffffffffffffffffffffcp0L, 3.2737818840186652119207293228302560914295e-323L, UNDERFLOW_EXCEPTION_DOUBLE),
14153 TEST_f_f (tgamma, -0xbe.0000000000000000000000004p0L, -3.2737818840186652119207293227217957948294e-323L, UNDERFLOW_EXCEPTION_DOUBLE),
d8cd06db 14154# if LDBL_MAX_EXP <= 1024
74c57478
JM		 14155 TEST_f_f (tgamma, -0xbe.ffffffffffffffffffffffffcp0L, minus_zero, UNDERFLOW_EXCEPTION_DOUBLE),
14156 TEST_f_f (tgamma, -0xbf.0000000000000000000000004p0L, plus_zero, UNDERFLOW_EXCEPTION_DOUBLE),
d8cd06db 14157# else
74c57478
JM		 14158 TEST_f_f (tgamma, -0xbe.ffffffffffffffffffffffffcp0L, -1.7140219288055838805867692789687487834686e-325L),
14159 TEST_f_f (tgamma, -0xbf.0000000000000000000000004p0L, 1.7140219288055838805867692789119066543632e-325L),
d8cd06db
JM		 14160# endif
14161#endif
14162#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM		 14163 TEST_f_f (tgamma, 0x8.000000000000001p0L, 5.0400000000000000088113830892247051102283e+03L),
14164 TEST_f_f (tgamma, 0x7.fffffffffffffff8p0L, 5.0399999999999999955943084553876474508520e+03L),
14165 TEST_f_f (tgamma, 0x7.0000000000000008p0L, 7.2000000000000000058477733127664675369681e+02L),
14166 TEST_f_f (tgamma, 0x6.fffffffffffffff8p0L, 7.1999999999999999941522266872335324679893e+02L),
14167 TEST_f_f (tgamma, 0x6.0000000000000008p0L, 1.2000000000000000008878927116622375680433e+02L),
14168 TEST_f_f (tgamma, 0x5.fffffffffffffff8p0L, 1.1999999999999999991121072883377624326546e+02L),
14169 TEST_f_f (tgamma, 0x5.0000000000000008p0L, 2.4000000000000000015676186062072582846211e+01L),
14170 TEST_f_f (tgamma, 0x4.fffffffffffffff8p0L, 2.3999999999999999984323813937927417165027e+01L),
14171 TEST_f_f (tgamma, 0x4.0000000000000008p0L, 6.0000000000000000032685252120268430507939e+00L),
14172 TEST_f_f (tgamma, 0x3.fffffffffffffffcp0L, 5.9999999999999999983657373939865784753909e+00L),
14173 TEST_f_f (tgamma, 0x3.0000000000000004p0L, 2.0000000000000000004001939123397399171482e+00L),
14174 TEST_f_f (tgamma, 0x2.fffffffffffffffcp0L, 1.9999999999999999995998060876602600829690e+00L),
14175 TEST_f_f (tgamma, 0x2.0000000000000004p0L, 1.0000000000000000000916767389213195151634e+00L),
14176 TEST_f_f (tgamma, 0x1.fffffffffffffffep0L, 9.9999999999999999995416163053934024243282e-01L),
14177 TEST_f_f (tgamma, 0x1.0000000000000002p0L, 9.9999999999999999993741815221210931418291e-01L),
14178 TEST_f_f (tgamma, 0x0.ffffffffffffffffp0L, 1.0000000000000000000312909238939453429173e+00L),
14179 TEST_f_f (tgamma, -0x0.ffffffffffffffffp0L, -1.8446744073709551616422784335098467139470e+19L),
14180 TEST_f_f (tgamma, -0x1.0000000000000002p0L, 9.2233720368547758075772156649015328607596e+18L),
14181 TEST_f_f (tgamma, -0x1.fffffffffffffffep0L, 4.6116860184273879044613921675492335697983e+18L),
14182 TEST_f_f (tgamma, -0x2.0000000000000004p0L, -2.3058430092136939515386078324507664305064e+18L),
14183 TEST_f_f (tgamma, -0x2.fffffffffffffffcp0L, -7.6861433640456465087601961140530007887063e+17L),
14184 TEST_f_f (tgamma, -0x3.0000000000000004p0L, 7.6861433640456465045731372192803325462836e+17L),
14185 TEST_f_f (tgamma, -0x3.fffffffffffffffcp0L, 1.9215358410114116272942156951799168638773e+17L),
14186 TEST_f_f (tgamma, -0x4.0000000000000008p0L, -9.6076792050570581270578430482008313684602e+16L),
14187 TEST_f_f (tgamma, -0x4.fffffffffffffff8p0L, -1.9215358410114116280884313903598337283601e+16L),
14188 TEST_f_f (tgamma, -0x5.0000000000000008p0L, 1.9215358410114116252449019429734996071487e+16L),
14189 TEST_f_f (tgamma, -0x5.fffffffffffffff8p0L, 3.2025597350190193803788671320812043622696e+15L),
14190 TEST_f_f (tgamma, -0x6.0000000000000008p0L, -3.2025597350190193751766884234743511972877e+15L),
14191 TEST_f_f (tgamma, -0x6.fffffffffffffff8p0L, -4.5750853357414562579675426149912896787735e+14L),
14192 TEST_f_f (tgamma, -0x7.0000000000000008p0L, 4.5750853357414562499689653215166468353753e+14L),
14193 TEST_f_f (tgamma, -0x7.fffffffffffffff8p0L, 5.7188566696768203227694481100089533685959e+13L),
14194 TEST_f_f (tgamma, -0x8.000000000000001p0L, -2.8594283348384101534210280804672371201060e+13L),
14195 TEST_f_f (tgamma, -0x9.fffffffffffffffp0L, 3.1771425942649001828476427167843945971988e+11L),
14196 TEST_f_f (tgamma, -0xa.000000000000001p0L, -3.1771425942649001698860433502350057763905e+11L),
14197 TEST_f_f (tgamma, -0x13.ffffffffffffffep0L, 2.3694367893405502075347562184931828448654e-01L),
14198 TEST_f_f (tgamma, -0x14.000000000000002p0L, -2.3694367893405501827041302245929389013031e-01L),
14199 TEST_f_f (tgamma, -0x1d.ffffffffffffffep0L, 2.1732499046818166459536268654187775086902e-15L),
14200 TEST_f_f (tgamma, -0x1e.000000000000002p0L, -2.1732499046818166201837145753965837196590e-15L),
14201 TEST_f_f (tgamma, -0x27.ffffffffffffffcp0L, 3.5326017549807232935581894777156474496719e-31L),
14202 TEST_f_f (tgamma, -0x28.000000000000004p0L, -3.5326017549807232028299619269080956965758e-31L),
14203 TEST_f_f (tgamma, -0x28.ffffffffffffffcp0L, -8.6161018414163982777002940498289948893044e-33L),
14204 TEST_f_f (tgamma, -0x29.000000000000004p0L, 8.6161018414163980549537337663264762179535e-33L),
14205 TEST_f_f (tgamma, -0x29.ffffffffffffffcp0L, 2.0514528193848567329552463626090806737389e-34L),
14206 TEST_f_f (tgamma, -0x2a.000000000000004p0L, -2.0514528193848566795814269269517457847791e-34L),
14207 TEST_f_f (tgamma, -0x31.ffffffffffffffcp0L, 9.4768689712397635680446279661359728835046e-48L),
14208 TEST_f_f (tgamma, -0x32.000000000000004p0L, -9.4768689712397633101385547903658075308777e-48L),
14209 TEST_f_f (tgamma, -0x63.ffffffffffffff8p0L, 1.5442090669841618542494279375256856430049e-141L),
14210 TEST_f_f (tgamma, -0x64.000000000000008p0L, -1.5442090669841617554527108348771968070612e-141L),
14211 TEST_f_f (tgamma, -0x95.ffffffffffffffp0L, 1.2612069237291916400144732227892704713839e-246L),
14212 TEST_f_f (tgamma, -0x96.00000000000001p0L, -1.2612069237291914644980030550324645611752e-246L),
14213 TEST_f_f (tgamma, -0xb4.ffffffffffffffp0L, -1.9816628031468191243385005680879281767694e-315L),
14214 TEST_f_f (tgamma, -0xb5.00000000000001p0L, 1.9816628031468188382579700510291588022368e-315L),
14215 TEST_f_f (tgamma, -0xb5.ffffffffffffffp0L, 1.0888257160147357826865964233809723297472e-317L),
14216 TEST_f_f (tgamma, -0xb6.00000000000001p0L, -1.0888257160147356253334423783317128355514e-317L),
14217 TEST_f_f (tgamma, -0xb6.ffffffffffffffp0L, -5.9498673006269714905418984659220067091260e-320L),
14218 TEST_f_f (tgamma, -0xb7.00000000000001p0L, 5.9498673006269706297861824177538685763601e-320L),
14219 TEST_f_f (tgamma, -0xb7.ffffffffffffffp0L, 3.2336235329494410277123118903958061569834e-322L),
14220 TEST_f_f (tgamma, -0xb8.00000000000001p0L, -3.2336235329494405594225146768193434900135e-322L),
14221 TEST_f_f (tgamma, -0xbb.ffffffffffffffp0L, 2.6730392040715350119087465463119939092815e-331L),
14222 TEST_f_f (tgamma, -0xbc.00000000000001p0L, -2.6730392040715346232108532050343031951651e-331L),
14223 TEST_f_f (tgamma, -0xbc.ffffffffffffffp0L, -1.4143064571807063556111222197839950086445e-333L),
14224 TEST_f_f (tgamma, -0xbd.00000000000001p0L, 1.4143064571807061497431633629389135273431e-333L),
14225 TEST_f_f (tgamma, -0xbd.ffffffffffffffp0L, 7.4437181956879281879706555863416819210399e-336L),
14226 TEST_f_f (tgamma, -0xbe.00000000000001p0L, -7.4437181956879271033676895858841525581153e-336L),
14227 TEST_f_f (tgamma, -0xbe.ffffffffffffffp0L, -3.8972346574282346536709453101948570578636e-338L),
14228 TEST_f_f (tgamma, -0xbf.00000000000001p0L, 3.8972346574282340852496542564155275274974e-338L),
14229 TEST_f_f (tgamma, -0xf9.ffffffffffffffp0L, 2.2289142548411573883553287678043297937797e-476L),
14230 TEST_f_f (tgamma, -0xfa.00000000000001p0L, -2.2289142548411570466476165308364665814265e-476L),
14231 TEST_f_f (tgamma, -0x1f3.fffffffffffffep0L, 2.9528489142763141594943668922610562530068e-1118L),
14232 TEST_f_f (tgamma, -0x1f4.00000000000002p0L, -2.9528489142763131406565394149878256133744e-1118L),
14233 TEST_f_f (tgamma, -0x2ed.fffffffffffffcp0L, 6.9801511765871818502006905472380418430269e-1817L),
14234 TEST_f_f (tgamma, -0x2ee.00000000000004p0L, -6.9801511765871767194421856376592926002995e-1817L),
14235 TEST_f_f (tgamma, -0x3e7.fffffffffffffcp0L, 4.4768809295877296071892611539415773519036e-2552L),
14236 TEST_f_f (tgamma, -0x3e8.00000000000004p0L, -4.4768809295877261735541135972060089530309e-2552L),
14237 TEST_f_f (tgamma, -0x4e1.fffffffffffff8p0L, 5.4651488569236507565341414077911790252381e-3315L),
14238 TEST_f_f (tgamma, -0x4e2.00000000000008p0L, -5.4651488569236421026544487194247355967789e-3315L),
14239 TEST_f_f (tgamma, -0x5db.fffffffffffff8p0L, 1.8718211510339187689122114747834510481993e-4099L),
14240 TEST_f_f (tgamma, -0x5dc.00000000000008p0L, -1.8718211510339157291960718369454861898499e-4099L),
14241 TEST_f_f (tgamma, -0x6d5.fffffffffffff8p0L, 4.2925786447266492555651378780094011518063e-4902L),
14242 TEST_f_f (tgamma, -0x6d6.00000000000008p0L, -4.2925786447266421378134368786479937285900e-4902L),
14243 TEST_f_f (tgamma, -0x6e2.fffffffffffff8p0L, -2.8229173528168668283609231628661510187536e-4944L, UNDERFLOW_EXCEPTION),
14244 TEST_f_f (tgamma, -0x6e3.00000000000008p0L, 2.8229173528168621428945467532322397890424e-4944L, UNDERFLOW_EXCEPTION),
14245 TEST_f_f (tgamma, -0x6e3.fffffffffffff8p0L, 1.6002932839097884515524894602387278842659e-4947L, UNDERFLOW_EXCEPTION),
14246 TEST_f_f (tgamma, -0x6e4.00000000000008p0L, -1.6002932839097857951909742110188634438017e-4947L, UNDERFLOW_EXCEPTION),
14247 TEST_f_f (tgamma, -0x6e4.fffffffffffff8p0L, -9.0668174725767051085164382743343408095146e-4951L, UNDERFLOW_EXCEPTION),
14248 TEST_f_f (tgamma, -0x6e5.00000000000008p0L, 9.0668174725766900571689083050287838090189e-4951L, UNDERFLOW_EXCEPTION),
d8cd06db 14249# if LDBL_MANT_DIG <= 64
74c57478
JM		 14250 TEST_f_f (tgamma, -0x6e5.fffffffffffff8p0L, plus_zero, UNDERFLOW_EXCEPTION),
14251 TEST_f_f (tgamma, -0x6e6.00000000000008p0L, minus_zero, UNDERFLOW_EXCEPTION),
d8cd06db 14252# else
74c57478
JM		 14253 TEST_f_f (tgamma, -0x6e5.fffffffffffff8p0L, 5.1340982290921319983501912122292601780326e-4954L, UNDERFLOW_EXCEPTION),
14254 TEST_f_f (tgamma, -0x6e6.00000000000008p0L, -5.1340982290921234748578193083614111497314e-4954L, UNDERFLOW_EXCEPTION),
d8cd06db
JM		 14255# endif
14256# if LDBL_MANT_DIG >= 113
74c57478
JM		 14257 TEST_f_f (tgamma, 0x8.0000000000000000000000000008p0L, 5.0400000000000000000000000000000156521606e+03L),
14258 TEST_f_f (tgamma, 0x7.fffffffffffffffffffffffffffcp0L, 5.0399999999999999999999999999999921739197e+03L),
14259 TEST_f_f (tgamma, 0x7.0000000000000000000000000004p0L, 7.2000000000000000000000000000000103877321e+02L),
14260 TEST_f_f (tgamma, 0x6.fffffffffffffffffffffffffffcp0L, 7.1999999999999999999999999999999896122679e+02L),
14261 TEST_f_f (tgamma, 0x6.0000000000000000000000000004p0L, 1.2000000000000000000000000000000015772143e+02L),
14262 TEST_f_f (tgamma, 0x5.fffffffffffffffffffffffffffcp0L, 1.1999999999999999999999999999999984227857e+02L),
14263 TEST_f_f (tgamma, 0x5.0000000000000000000000000004p0L, 2.4000000000000000000000000000000027846500e+01L),
14264 TEST_f_f (tgamma, 0x4.fffffffffffffffffffffffffffcp0L, 2.3999999999999999999999999999999972153500e+01L),
14265 TEST_f_f (tgamma, 0x4.0000000000000000000000000004p0L, 6.0000000000000000000000000000000058060671e+00L),
14266 TEST_f_f (tgamma, 0x3.fffffffffffffffffffffffffffep0L, 5.9999999999999999999999999999999970969664e+00L),
14267 TEST_f_f (tgamma, 0x3.0000000000000000000000000002p0L, 2.0000000000000000000000000000000007108872e+00L),
14268 TEST_f_f (tgamma, 0x2.fffffffffffffffffffffffffffep0L, 1.9999999999999999999999999999999992891128e+00L),
14269 TEST_f_f (tgamma, 0x2.0000000000000000000000000002p0L, 1.0000000000000000000000000000000001628506e+00L),
14270 TEST_f_f (tgamma, 0x1.ffffffffffffffffffffffffffffp0L, 9.9999999999999999999999999999999991857470e-01L),
14271 TEST_f_f (tgamma, 0x1.0000000000000000000000000001p0L, 9.9999999999999999999999999999999988883231e-01L),
14272 TEST_f_f (tgamma, 0x0.ffffffffffffffffffffffffffff8p0L, 1.0000000000000000000000000000000000555838e+00L),
14273 TEST_f_f (tgamma, -0x0.ffffffffffffffffffffffffffff8p0L, -1.0384593717069655257060992658440192422784e+34L),
14274 TEST_f_f (tgamma, -0x1.0000000000000000000000000001p0L, 5.1922968585348276285304963292200955772157e+33L),
14275 TEST_f_f (tgamma, -0x1.ffffffffffffffffffffffffffffp0L, 2.5961484292674138142652481646100484613922e+33L),
14276 TEST_f_f (tgamma, -0x2.0000000000000000000000000002p0L, -1.2980742146337069071326240823050235386078e+33L),
14277 TEST_f_f (tgamma, -0x2.fffffffffffffffffffffffffffep0L, -4.3269140487790230237754136076834154268628e+32L),
14278 TEST_f_f (tgamma, -0x3.0000000000000000000000000002p0L, 4.3269140487790230237754136076834112398039e+32L),
14279 TEST_f_f (tgamma, -0x3.fffffffffffffffffffffffffffep0L, 1.0817285121947557559438534019208539608824e+32L),
14280 TEST_f_f (tgamma, -0x4.0000000000000000000000000004p0L, -5.4086425609737787797192670096042603911764e+31L),
14281 TEST_f_f (tgamma, -0x4.fffffffffffffffffffffffffffcp0L, -1.0817285121947557559438534019208547550981e+31L),
14282 TEST_f_f (tgamma, -0x5.0000000000000000000000000004p0L, 1.0817285121947557559438534019208519115686e+31L),
14283 TEST_f_f (tgamma, -0x5.fffffffffffffffffffffffffffcp0L, 1.8028808536579262599064223365347581566449e+30L),
14284 TEST_f_f (tgamma, -0x6.0000000000000000000000000004p0L, -1.8028808536579262599064223365347529544662e+30L),
14285 TEST_f_f (tgamma, -0x6.fffffffffffffffffffffffffffcp0L, -2.5755440766541803712948890521925119357966e+29L),
14286 TEST_f_f (tgamma, -0x7.0000000000000000000000000004p0L, 2.5755440766541803712948890521925039372193e+29L),
14287 TEST_f_f (tgamma, -0x7.fffffffffffffffffffffffffffcp0L, 3.2194300958177254641186113152406402297656e+28L),
14288 TEST_f_f (tgamma, -0x8.0000000000000000000000000008p0L, -1.6097150479088627320593056576203121511868e+28L),
14289 TEST_f_f (tgamma, -0x9.fffffffffffffffffffffffffff8p0L, 1.7885722754542919245103396195781369922635e+26L),
14290 TEST_f_f (tgamma, -0xa.0000000000000000000000000008p0L, -1.7885722754542919245103396195781240306642e+26L),
14291 TEST_f_f (tgamma, -0x13.fffffffffffffffffffffffffffp0L, 1.3338743301940057859272772747600099590309e+14L),
14292 TEST_f_f (tgamma, -0x14.000000000000000000000000001p0L, -1.3338743301940057859272772747599851284049e+14L),
14293 TEST_f_f (tgamma, -0x1d.fffffffffffffffffffffffffffp0L, 1.2234309326134994173819319571374205986026e+00L),
14294 TEST_f_f (tgamma, -0x1e.000000000000000000000000001p0L, -1.2234309326134994173819319571373948286903e+00L),
14295 TEST_f_f (tgamma, -0x27.ffffffffffffffffffffffffffep0L, 1.9886779934224431790713007246380976767855e-16L),
14296 TEST_f_f (tgamma, -0x28.000000000000000000000000002p0L, -1.9886779934224431790713007246380069485580e-16L),
14297 TEST_f_f (tgamma, -0x28.ffffffffffffffffffffffffffep0L, -4.8504341302986419001739042064343853066259e-18L),
14298 TEST_f_f (tgamma, -0x29.000000000000000000000000002p0L, 4.8504341302986419001739042064341625600656e-18L),
14299 TEST_f_f (tgamma, -0x29.ffffffffffffffffffffffffffep0L, 1.1548652691187242619461676681986633377063e-19L),
14300 TEST_f_f (tgamma, -0x2a.000000000000000000000000002p0L, -1.1548652691187242619461676681986099638869e-19L),
14301 TEST_f_f (tgamma, -0x31.ffffffffffffffffffffffffffep0L, 5.3350029459393017997786969431322287652396e-33L),
14302 TEST_f_f (tgamma, -0x32.000000000000000000000000002p0L, -5.3350029459393017997786969431319708591664e-33L),
14303 TEST_f_f (tgamma, -0x63.ffffffffffffffffffffffffffcp0L, 8.6931242233150155021453586128730281632676e-127L),
14304 TEST_f_f (tgamma, -0x64.000000000000000000000000004p0L, -8.6931242233150155021453586128720401960966e-127L),
14305 TEST_f_f (tgamma, -0x95.ffffffffffffffffffffffffff8p0L, 7.0999637896798458052083945552094635720486e-232L),
14306 TEST_f_f (tgamma, -0x96.000000000000000000000000008p0L, -7.0999637896798458052083945552077084073470e-232L),
14307 TEST_f_f (tgamma, -0xb4.ffffffffffffffffffffffffff8p0L, -1.1155769827282483165407420451477844041365e-300L),
14308 TEST_f_f (tgamma, -0xb5.000000000000000000000000008p0L, 1.1155769827282483165407420451474983236060e-300L),
14309 TEST_f_f (tgamma, -0xb5.ffffffffffffffffffffffffff8p0L, 6.1295438611442215194546266216911239298981e-303L),
14310 TEST_f_f (tgamma, -0xb6.000000000000000000000000008p0L, -6.1295438611442215194546266216895503983577e-303L),
14311 TEST_f_f (tgamma, -0xb6.ffffffffffffffffffffffffff8p0L, -3.3494775197509407210134571703230189921356e-305L),
14312 TEST_f_f (tgamma, -0xb7.000000000000000000000000008p0L, 3.3494775197509407210134571703221582364195e-305L),
14313 TEST_f_f (tgamma, -0xb7.ffffffffffffffffffffffffff8p0L, 1.8203682172559460440290528099581627396147e-307L),
14314 TEST_f_f (tgamma, -0xb8.000000000000000000000000008p0L, -1.8203682172559460440290528099576944498174e-307L),
14315 TEST_f_f (tgamma, -0xbb.ffffffffffffffffffffffffff8p0L, 1.5047872954254114273289393917555491216542e-316L),
14316 TEST_f_f (tgamma, -0xbc.000000000000000000000000008p0L, -1.5047872954254114273289393917551604237609e-316L),
14317 TEST_f_f (tgamma, -0xbc.ffffffffffffffffffffffffff8p0L, -7.9618375419333937953912137129923244334851e-319L),
14318 TEST_f_f (tgamma, -0xbd.000000000000000000000000008p0L, 7.9618375419333937953912137129902657538965e-319L),
14319 TEST_f_f (tgamma, -0xbd.ffffffffffffffffffffffffff8p0L, 4.1904408115438914712585335331538555086887e-321L),
14320 TEST_f_f (tgamma, -0xbe.000000000000000000000000008p0L, -4.1904408115438914712585335331527709057227e-321L),
14321 TEST_f_f (tgamma, -0xbe.ffffffffffffffffffffffffff8p0L, -2.1939480688711473671510646770439036908579e-323L),
14322 TEST_f_f (tgamma, -0xbf.000000000000000000000000008p0L, 2.1939480688711473671510646770433352695669e-323L),
14323 TEST_f_f (tgamma, -0xf9.ffffffffffffffffffffffffff8p0L, 1.2547671759429278005937024349858508569625e-461L),
14324 TEST_f_f (tgamma, -0xfa.000000000000000000000000008p0L, -1.2547671759429278005937024349855091492502e-461L),
14325 TEST_f_f (tgamma, -0x1f3.ffffffffffffffffffffffffffp0L, 1.6623061587520224800948170558276526986560e-1103L),
14326 TEST_f_f (tgamma, -0x1f4.00000000000000000000000001p0L, -1.6623061587520224800948170558266338608285e-1103L),
14327 TEST_f_f (tgamma, -0x2ed.fffffffffffffffffffffffffep0L, 3.9294757797334687313030998663853566763041e-1802L),
14328 TEST_f_f (tgamma, -0x2ee.00000000000000000000000002p0L, -3.9294757797334687313030998663802259177992e-1802L),
14329 TEST_f_f (tgamma, -0x3e7.fffffffffffffffffffffffffep0L, 2.5202599107841713834679953735597552855978e-2537L),
14330 TEST_f_f (tgamma, -0x3e8.00000000000000000000000002p0L, -2.5202599107841713834679953735563216504503e-2537L),
14331 TEST_f_f (tgamma, -0x4e1.fffffffffffffffffffffffffcp0L, 3.0766052944457032773369415396747635242705e-3300L),
14332 TEST_f_f (tgamma, -0x4e2.00000000000000000000000004p0L, -3.0766052944457032773369415396661096445778e-3300L),
14333 TEST_f_f (tgamma, -0x5db.fffffffffffffffffffffffffcp0L, 1.0537416297875703295453200836588944487917e-4084L),
14334 TEST_f_f (tgamma, -0x5dc.00000000000000000000000004p0L, -1.0537416297875703295453200836558547326520e-4084L),
14335 TEST_f_f (tgamma, -0x6d5.fffffffffffffffffffffffffcp0L, 2.4165069481061837867659591369998698607387e-4887L),
14336 TEST_f_f (tgamma, -0x6d6.00000000000000000000000004p0L, -2.4165069481061837867659591369927521090377e-4887L),
14337 TEST_f_f (tgamma, -0x6e2.fffffffffffffffffffffffffcp0L, -1.5891611922804672355414813803008070609431e-4929L),
14338 TEST_f_f (tgamma, -0x6e3.00000000000000000000000004p0L, 1.5891611922804672355414813802961215945667e-4929L),
14339 TEST_f_f (tgamma, -0x6e3.fffffffffffffffffffffffffcp0L, 9.0088502963745308137272187091882496519917e-4933L, UNDERFLOW_EXCEPTION),
14340 TEST_f_f (tgamma, -0x6e4.00000000000000000000000004p0L, -9.0088502963745308137272187091616860368392e-4933L, UNDERFLOW_EXCEPTION),
14341 TEST_f_f (tgamma, -0x6e4.fffffffffffffffffffffffffcp0L, -5.1041644738665896961627301468488672286746e-4936L, UNDERFLOW_EXCEPTION),
14342 TEST_f_f (tgamma, -0x6e5.00000000000000000000000004p0L, 5.1041644738665896961627301468338158811446e-4936L, UNDERFLOW_EXCEPTION),
14343 TEST_f_f (tgamma, -0x6e5.fffffffffffffffffffffffffcp0L, 2.8902403589278537350864836618623260468143e-4939L, UNDERFLOW_EXCEPTION),
14344 TEST_f_f (tgamma, -0x6e6.00000000000000000000000004p0L, -2.8902403589278537350864836618538025544424e-4939L, UNDERFLOW_EXCEPTION),
14345 TEST_f_f (tgamma, -0x6eb.fffffffffffffffffffffffffcp0L, 9.4152481960798287090819640211017219042636e-4959L, UNDERFLOW_EXCEPTION),
14346 TEST_f_f (tgamma, -0x6ec.00000000000000000000000004p0L, -9.4152481960798287090819640210739431797168e-4959L, UNDERFLOW_EXCEPTION),
14347 TEST_f_f (tgamma, -0x6ec.fffffffffffffffffffffffffcp0L, -5.3103486723518492437010513373388172315540e-4962L, UNDERFLOW_EXCEPTION),
14348 TEST_f_f (tgamma, -0x6ed.00000000000000000000000004p0L, 5.3103486723518492437010513373231484108489e-4962L, UNDERFLOW_EXCEPTION),
14349 TEST_f_f (tgamma, -0x6ed.fffffffffffffffffffffffffcp0L, 2.9934321715624854812294539669328172615019e-4965L, UNDERFLOW_EXCEPTION),
14350 TEST_f_f (tgamma, -0x6ee.00000000000000000000000004p0L, -2.9934321715624854812294539669239841152754e-4965L, UNDERFLOW_EXCEPTION),
14351 TEST_f_f (tgamma, -0x6ee.fffffffffffffffffffffffffcp0L, minus_zero, UNDERFLOW_EXCEPTION),
14352 TEST_f_f (tgamma, -0x6ef.00000000000000000000000004p0L, plus_zero, UNDERFLOW_EXCEPTION),
d8cd06db
JM		 14353# endif
14354#endif
74c57478 14355 TEST_f_f (tgamma, -0x1.0a32a2p+5L, 1.8125267978155035272941154746083439329912e-37L),
d8cd06db 14356#ifndef TEST_FLOAT
74c57478 14357 TEST_f_f (tgamma, -0x1.5800000080001p+7L, -3.1439271448823567326093363350637118195240e-304L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d8cd06db 14358#endif
74c57478
JM		 14359 TEST_f_f (tgamma, 18.5L, 1.4986120533153361177371791123515513270334e+15L),
14360 TEST_f_f (tgamma, 19.5L, 2.7724322986333718178137813578503699550119e+16L),
14361 TEST_f_f (tgamma, 23.5L, 5.3613035875444147334274983856108155717836e+21L),
14362 TEST_f_f (tgamma, 29.5L, 1.6348125198274266444378807806868221866931e+30L),
14363 TEST_f_f (tgamma, 30.5L, 4.8226969334909086010917483030261254507447e+31L),
14364 TEST_f_f (tgamma, 31.5L, 1.4709225647147271233329832324229682624771e+33L),
14365 TEST_f_f (tgamma, 32.5L, 4.6334060788513904384988971821323500268029e+34L),
14366 TEST_f_f (tgamma, 33.5L, 1.5058569756267018925121415841930137587110e+36L),
14367 TEST_f_f (tgamma, 34.5L, 5.0446208683494513399156743070465960916817e+37L),
14368 TEST_f_f (tgamma, 0x2.30a43cp+4L, 3.4027979115654976101247558405326779640190e+38L),
d8cd06db 14369#ifdef TEST_FLOAT
74c57478 14370 TEST_f_f (tgamma, 0x2.30a44p+4L, plus_infty, OVERFLOW_EXCEPTION),
d8cd06db 14371#else
74c57478 14372 TEST_f_f (tgamma, 0x2.30a44p+4L, 3.4028438913396451054667218138127983367181e+38L),
d8cd06db
JM		 14373#endif
14374#ifndef TEST_FLOAT
74c57478 14375 TEST_f_f (tgamma, 0xa.b9fd72b0fb238p+4L, 1.7976931348622298700886249281842651388250e+308L),
d8cd06db 14376# if !defined TEST_LDOUBLE || LDBL_MAX_EXP <= 1024
74c57478 14377 TEST_f_f (tgamma, 0xa.b9fd72b0fb24p+4L, plus_infty, OVERFLOW_EXCEPTION),
d8cd06db 14378# else
74c57478 14379 TEST_f_f (tgamma, 0xa.b9fd72b0fb24p+4L, 1.7976931348624926129589466917917870782484e+308L),
d8cd06db
JM		 14380# endif
14381#endif
14382#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
74c57478 14383 TEST_f_f (tgamma, 0xa.b9fd72b0fb23a9ddbf0d3804f4p+4L, 1.7976931348623158079372897140307719334857e+308L),
d8cd06db 14384# if LDBL_MAX_EXP <= 1024
74c57478 14385 TEST_f_f (tgamma, 0xa.b9fd72b0fb23a9ddbf0d3804f8p+4L, plus_infty, OVERFLOW_EXCEPTION),
d8cd06db 14386# else
74c57478 14387 TEST_f_f (tgamma, 0xa.b9fd72b0fb23a9ddbf0d3804f8p+4L, 1.7976931348623158079372897140599422519044e+308L),
d8cd06db
JM		 14388# endif
14389#endif
14390#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM		 14391 TEST_f_f (tgamma, 0x6.db8c603359a97108p+8L, 1.1897314953572317517071551278058233700012e+4932L),
14392 TEST_f_f (tgamma, 0x6.db8c603359a9711p+8L, plus_infty, OVERFLOW_EXCEPTION),
d8cd06db 14393# if LDBL_MANT_DIG >= 113
74c57478
JM		 14394 TEST_f_f (tgamma, 0x6.db8c603359a971081bc4a2e9dfdp+8L, 1.1897314953572317650857593266265995494998e+4932L),
14395 TEST_f_f (tgamma, 0x6.db8c603359a971081bc4a2e9dfd4p+8L, plus_infty, OVERFLOW_EXCEPTION),
d8cd06db
JM		 14396# endif
14397#endif
74c57478
JM		 14398 END_DATA (tgamma)
14399 };
2550dfe9 14400
8847214f 14401static void
74c57478 14402tgamma_test (void)
8847214f 14403{
74c57478
JM		 14404 errno = 0;
14405 FUNC(tgamma) (1);
14406 if (errno == ENOSYS)
14407 /* Function not implemented. */
14408 return;
8847214f 14409
74c57478
JM		 14410 START (tgamma);
14411 RUN_TEST_LOOP_f_f (tgamma, tgamma_test_data, );
14412 END (tgamma);
14413}
8847214f 14414
8847214f 14415
74c57478
JM		 14416static const struct test_f_f_data trunc_test_data[] =
14417 {
14418 START_DATA (trunc),
14419 TEST_f_f (trunc, plus_infty, plus_infty),
14420 TEST_f_f (trunc, minus_infty, minus_infty),
14421 TEST_f_f (trunc, qnan_value, qnan_value),
14422
14423 TEST_f_f (trunc, 0, 0),
14424 TEST_f_f (trunc, minus_zero, minus_zero),
14425 TEST_f_f (trunc, 0.1, 0),
14426 TEST_f_f (trunc, 0.25, 0),
14427 TEST_f_f (trunc, 0.625, 0),
14428 TEST_f_f (trunc, -0.1, minus_zero),
14429 TEST_f_f (trunc, -0.25, minus_zero),
14430 TEST_f_f (trunc, -0.625, minus_zero),
14431 TEST_f_f (trunc, 1, 1),
14432 TEST_f_f (trunc, -1, -1),
14433 TEST_f_f (trunc, 1.625, 1),
14434 TEST_f_f (trunc, -1.625, -1),
14435
14436 TEST_f_f (trunc, 1048580.625L, 1048580L),
14437 TEST_f_f (trunc, -1048580.625L, -1048580L),
14438
14439 TEST_f_f (trunc, 8388610.125L, 8388610.0L),
14440 TEST_f_f (trunc, -8388610.125L, -8388610.0L),
14441
14442 TEST_f_f (trunc, 4294967296.625L, 4294967296.0L),
14443 TEST_f_f (trunc, -4294967296.625L, -4294967296.0L),
8847214f 14444
f964490f 14445#ifdef TEST_LDOUBLE
74c57478
JM		 14446 /* The result can only be represented in long double. */
14447 TEST_f_f (trunc, 4503599627370495.5L, 4503599627370495.0L),
14448 TEST_f_f (trunc, 4503599627370496.25L, 4503599627370496.0L),
14449 TEST_f_f (trunc, 4503599627370496.5L, 4503599627370496.0L),
14450 TEST_f_f (trunc, 4503599627370496.75L, 4503599627370496.0L),
14451 TEST_f_f (trunc, 4503599627370497.5L, 4503599627370497.0L),
f964490f 14452
5c68d401 14453# if LDBL_MANT_DIG > 100
74c57478
JM		 14454 TEST_f_f (trunc, 4503599627370494.5000000000001L, 4503599627370494.0L),
14455 TEST_f_f (trunc, 4503599627370495.5000000000001L, 4503599627370495.0L),
14456 TEST_f_f (trunc, 4503599627370496.5000000000001L, 4503599627370496.0L),
5c68d401 14457# endif
830fce04 14458
74c57478
JM		 14459 TEST_f_f (trunc, -4503599627370495.5L, -4503599627370495.0L),
14460 TEST_f_f (trunc, -4503599627370496.25L, -4503599627370496.0L),
14461 TEST_f_f (trunc, -4503599627370496.5L, -4503599627370496.0L),
14462 TEST_f_f (trunc, -4503599627370496.75L, -4503599627370496.0L),
14463 TEST_f_f (trunc, -4503599627370497.5L, -4503599627370497.0L),
830fce04 14464
5c68d401 14465# if LDBL_MANT_DIG > 100
74c57478
JM		 14466 TEST_f_f (trunc, -4503599627370494.5000000000001L, -4503599627370494.0L),
14467 TEST_f_f (trunc, -4503599627370495.5000000000001L, -4503599627370495.0L),
14468 TEST_f_f (trunc, -4503599627370496.5000000000001L, -4503599627370496.0L),
5c68d401 14469# endif
f964490f 14470
74c57478
JM		 14471 TEST_f_f (trunc, 9007199254740991.5L, 9007199254740991.0L),
14472 TEST_f_f (trunc, 9007199254740992.25L, 9007199254740992.0L),
14473 TEST_f_f (trunc, 9007199254740992.5L, 9007199254740992.0L),
14474 TEST_f_f (trunc, 9007199254740992.75L, 9007199254740992.0L),
14475 TEST_f_f (trunc, 9007199254740993.5L, 9007199254740993.0L),
f964490f 14476
5c68d401 14477# if LDBL_MANT_DIG > 100
74c57478
JM		 14478 TEST_f_f (trunc, 9007199254740991.0000000000001L, 9007199254740991.0L),
14479 TEST_f_f (trunc, 9007199254740992.0000000000001L, 9007199254740992.0L),
14480 TEST_f_f (trunc, 9007199254740993.0000000000001L, 9007199254740993.0L),
14481 TEST_f_f (trunc, 9007199254740991.5000000000001L, 9007199254740991.0L),
14482 TEST_f_f (trunc, 9007199254740992.5000000000001L, 9007199254740992.0L),
14483 TEST_f_f (trunc, 9007199254740993.5000000000001L, 9007199254740993.0L),
5c68d401
RM		 14484# endif
14485
74c57478
JM		 14486 TEST_f_f (trunc, -9007199254740991.5L, -9007199254740991.0L),
14487 TEST_f_f (trunc, -9007199254740992.25L, -9007199254740992.0L),
14488 TEST_f_f (trunc, -9007199254740992.5L, -9007199254740992.0L),
14489 TEST_f_f (trunc, -9007199254740992.75L, -9007199254740992.0L),
14490 TEST_f_f (trunc, -9007199254740993.5L, -9007199254740993.0L),
f964490f 14491
5c68d401 14492# if LDBL_MANT_DIG > 100
74c57478
JM		 14493 TEST_f_f (trunc, -9007199254740991.0000000000001L, -9007199254740991.0L),
14494 TEST_f_f (trunc, -9007199254740992.0000000000001L, -9007199254740992.0L),
14495 TEST_f_f (trunc, -9007199254740993.0000000000001L, -9007199254740993.0L),
14496 TEST_f_f (trunc, -9007199254740991.5000000000001L, -9007199254740991.0L),
14497 TEST_f_f (trunc, -9007199254740992.5000000000001L, -9007199254740992.0L),
14498 TEST_f_f (trunc, -9007199254740993.5000000000001L, -9007199254740993.0L),
5c68d401
RM		 14499# endif
14500
74c57478
JM		 14501 TEST_f_f (trunc, 72057594037927935.5L, 72057594037927935.0L),
14502 TEST_f_f (trunc, 72057594037927936.25L, 72057594037927936.0L),
14503 TEST_f_f (trunc, 72057594037927936.5L, 72057594037927936.0L),
14504 TEST_f_f (trunc, 72057594037927936.75L, 72057594037927936.0L),
14505 TEST_f_f (trunc, 72057594037927937.5L, 72057594037927937.0L),
14506
14507 TEST_f_f (trunc, -72057594037927935.5L, -72057594037927935.0L),
14508 TEST_f_f (trunc, -72057594037927936.25L, -72057594037927936.0L),
14509 TEST_f_f (trunc, -72057594037927936.5L, -72057594037927936.0L),
14510 TEST_f_f (trunc, -72057594037927936.75L, -72057594037927936.0L),
14511 TEST_f_f (trunc, -72057594037927937.5L, -72057594037927937.0L),
14512
14513 TEST_f_f (trunc, 10141204801825835211973625643007.5L, 10141204801825835211973625643007.0L),
14514 TEST_f_f (trunc, 10141204801825835211973625643008.25L, 10141204801825835211973625643008.0L),
14515 TEST_f_f (trunc, 10141204801825835211973625643008.5L, 10141204801825835211973625643008.0L),
14516 TEST_f_f (trunc, 10141204801825835211973625643008.75L, 10141204801825835211973625643008.0L),
14517 TEST_f_f (trunc, 10141204801825835211973625643009.5L, 10141204801825835211973625643009.0L),
14518#endif
14519 END_DATA (trunc)
14520 };
14521
14522static void
14523trunc_test (void)
14524{
14525 START (trunc);
14526 RUN_TEST_LOOP_f_f (trunc, trunc_test_data, );
14527 END (trunc);
14528}
14529
14530static const struct test_f_f_data y0_test_data[] =
14531 {
14532 START_DATA (y0),
14533 /* y0 is the Bessel function of the second kind of order 0 */
14534 TEST_f_f (y0, -1.0, minus_infty, INVALID_EXCEPTION),
14535 TEST_f_f (y0, -max_value, minus_infty, INVALID_EXCEPTION),
14536 TEST_f_f (y0, 0.0, minus_infty),
14537 TEST_f_f (y0, qnan_value, qnan_value),
14538 TEST_f_f (y0, plus_infty, 0),
14539
14540 TEST_f_f (y0, 0.125L, -1.38968062514384052915582277745018693L),
14541 TEST_f_f (y0, 0.75L, -0.137172769385772397522814379396581855L),
14542 TEST_f_f (y0, 1.0, 0.0882569642156769579829267660235151628L),
14543 TEST_f_f (y0, 1.5, 0.382448923797758843955068554978089862L),
14544 TEST_f_f (y0, 2.0, 0.510375672649745119596606592727157873L),
14545 TEST_f_f (y0, 8.0, 0.223521489387566220527323400498620359L),
14546 TEST_f_f (y0, 10.0, 0.0556711672835993914244598774101900481L),
f964490f 14547
74c57478 14548 TEST_f_f (y0, 0x1.3ffp+74L, 1.818984347516051243459467456433028748678e-12L),
f964490f 14549
74c57478
JM		 14550#ifndef TEST_FLOAT
14551 TEST_f_f (y0, 0x1.ff00000000002p+840L, 1.846591691699331493194965158699937660696e-127L),
14552 TEST_f_f (y0, 0x1p1023L, 8.2687542933709649327986678723012001545638e-155L),
f964490f 14553#endif
8847214f 14554
74c57478
JM		 14555#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
14556 TEST_f_f (y0, 0x1p16382L, 8.0839224448726336195866026476176740513439e-2467L),
14557 TEST_f_f (y0, 0x1p16383L, -3.8895531955766020648617743624167352352217e-2467L),
14558#endif
14559
14560 TEST_f_f (y0, 0x1p-10L, -4.4865150767109739412411806297168793661098L),
14561 TEST_f_f (y0, 0x1p-20L, -8.8992283012125827603076426611387876938160L),
14562 TEST_f_f (y0, 0x1p-30L, -1.3311940304267782826037118027401817264906e+1L),
14563 TEST_f_f (y0, 0x1p-40L, -1.7724652307320814696990854700366226762563e+1L),
14564 TEST_f_f (y0, 0x1p-50L, -2.2137364310373846564919987139743760738155e+1L),
14565 TEST_f_f (y0, 0x1p-60L, -2.6550076313426878432849115782108205929120e+1L),
14566 TEST_f_f (y0, 0x1p-70L, -3.0962788316479910300778244424468159753887e+1L),
14567 TEST_f_f (y0, 0x1p-80L, -3.5375500319532942168707373066828113573541e+1L),
14568 TEST_f_f (y0, 0x1p-90L, -3.9788212322585974036636501709188067393195e+1L),
14569 TEST_f_f (y0, 0x1p-100L, -4.420092432563900590456563035154802121284e+1L),
14570 TEST_f_f (y0, 0x1p-110L, -4.861363632869203777249475899390797503250e+1L),
14571 END_DATA (y0)
14572 };
8847214f
UD		 14573
14574static void
14575y0_test (void)
14576{
8a216c1b 14577 FLOAT s, c;
8847214f 14578 errno = 0;
cd53c157
UD		 14579 FUNC (sincos) (0, &s, &c);
14580 if (errno == ENOSYS)
14581 /* Required function not implemented. */
14582 return;
8847214f
UD		 14583 FUNC(y0) (1);
14584 if (errno == ENOSYS)
14585 /* Function not implemented. */
14586 return;
14587
8847214f 14588 START (y0);
74c57478
JM		 14589 RUN_TEST_LOOP_f_f (y0, y0_test_data, );
14590 END (y0);
14591}
14592
8847214f 14593
74c57478
JM		 14594static const struct test_f_f_data y1_test_data[] =
14595 {
14596 START_DATA (y1),
14597 /* y1 is the Bessel function of the second kind of order 1 */
14598 TEST_f_f (y1, -1.0, minus_infty, INVALID_EXCEPTION),
14599 TEST_f_f (y1, -max_value, minus_infty, INVALID_EXCEPTION),
14600 TEST_f_f (y1, 0.0, minus_infty),
14601 TEST_f_f (y1, plus_infty, 0),
14602 TEST_f_f (y1, qnan_value, qnan_value),
8847214f 14603
74c57478
JM		 14604 TEST_f_f (y1, 0.125L, -5.19993611253477499595928744876579921L),
14605 TEST_f_f (y1, 0.75L, -1.03759455076928541973767132140642198L),
14606 TEST_f_f (y1, 1.0, -0.781212821300288716547150000047964821L),
14607 TEST_f_f (y1, 1.5, -0.412308626973911295952829820633445323L),
14608 TEST_f_f (y1, 2.0, -0.107032431540937546888370772277476637L),
14609 TEST_f_f (y1, 8.0, -0.158060461731247494255555266187483550L),
14610 TEST_f_f (y1, 10.0, 0.249015424206953883923283474663222803L),
8847214f 14611
74c57478 14612 TEST_f_f (y1, 0x1.27e204p+99L, -8.881610148467797208469612080785210013461e-16L),
c36e1d23
JM		 14613
14614#ifndef TEST_FLOAT
74c57478
JM		 14615 TEST_f_f (y1, 0x1.001000001p+593L, 3.927269966354206207832593635798954916263e-90L),
14616 TEST_f_f (y1, 0x1p1023L, 1.5665258060609012834424478437196679802783e-155L),
c36e1d23
JM		 14617#endif
14618
d2f9799e 14619#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM		 14620 TEST_f_f (y1, 0x1p16382L, 1.2193782500509000574176799046642541129387e-2466L),
14621 TEST_f_f (y1, 0x1p16383L, -9.5859502826270374691362975419147645151233e-2467L),
14622#endif
14623
14624 TEST_f_f (y1, 0x1p-10L, -6.5190099301063115047395187618929589514382e+02L),
14625 TEST_f_f (y1, 0x1p-20L, -6.6754421443450423911167962313100637952285e+05L),
14626 TEST_f_f (y1, 0x1p-30L, -6.8356527557643159612937462812258975438856e+08L),
14627 TEST_f_f (y1, 0x1p-40L, -6.9997084219026594793707805777425993547887e+11L),
14628 TEST_f_f (y1, 0x1p-50L, -7.1677014240283233068755952926181262431559e+14L),
14629 TEST_f_f (y1, 0x1p-60L, -7.3397262582050030662406095795388448059822e+17L),
14630 TEST_f_f (y1, 0x1p-70L, -7.5158796884019231398303842094477769620063e+20L),
14631 TEST_f_f (y1, 0x1p-80L, -7.6962608009235692951863134304745236090943e+23L),
14632 TEST_f_f (y1, 0x1p-90L, -7.8809710601457349582707849528059121757126e+26L),
14633 TEST_f_f (y1, 0x1p-100L, -8.0701143655892325972692837916732540679297e+29L),
14634 TEST_f_f (y1, 0x1p-110L, -8.2637971103633741796037466026734121655600e+32L),
14635 END_DATA (y1)
14636 };
8847214f
UD		 14637
14638static void
14639y1_test (void)
14640{
8a216c1b 14641 FLOAT s, c;
8847214f 14642 errno = 0;
cd53c157
UD		 14643 FUNC (sincos) (0, &s, &c);
14644 if (errno == ENOSYS)
14645 /* Required function not implemented. */
14646 return;
8847214f
UD		 14647 FUNC(y1) (1);
14648 if (errno == ENOSYS)
14649 /* Function not implemented. */
14650 return;
14651
8847214f 14652 START (y1);
74c57478 14653 RUN_TEST_LOOP_f_f (y1, y1_test_data, );
8847214f
UD		 14654 END (y1);
14655}
14656
2550dfe9 14657
0e400df5
JM		 14658static const struct test_if_f_data yn_test_data[] =
14659 {
14660 START_DATA (yn),
14661 /* yn is the Bessel function of the second kind of order n */
14662 /* yn (0, x) == y0 (x) */
14663 TEST_if_f (yn, 0, -1.0, minus_infty, INVALID_EXCEPTION),
14664 TEST_if_f (yn, 0, -max_value, minus_infty, INVALID_EXCEPTION),
14665 TEST_if_f (yn, 0, 0.0, minus_infty),
14666 TEST_if_f (yn, 0, qnan_value, qnan_value),
14667 TEST_if_f (yn, 0, plus_infty, 0),
14668
14669 TEST_if_f (yn, 0, 0.125L, -1.38968062514384052915582277745018693L),
14670 TEST_if_f (yn, 0, 0.75L, -0.137172769385772397522814379396581855L),
14671 TEST_if_f (yn, 0, 1.0, 0.0882569642156769579829267660235151628L),
14672 TEST_if_f (yn, 0, 1.5, 0.382448923797758843955068554978089862L),
14673 TEST_if_f (yn, 0, 2.0, 0.510375672649745119596606592727157873L),
14674 TEST_if_f (yn, 0, 8.0, 0.223521489387566220527323400498620359L),
14675 TEST_if_f (yn, 0, 10.0, 0.0556711672835993914244598774101900481L),
14676
14677 /* yn (1, x) == y1 (x) */
14678 TEST_if_f (yn, 1, -1.0, minus_infty, INVALID_EXCEPTION),
14679 TEST_if_f (yn, 1, 0.0, minus_infty),
14680 TEST_if_f (yn, 1, plus_infty, 0),
14681 TEST_if_f (yn, 1, qnan_value, qnan_value),
14682
14683 TEST_if_f (yn, 1, 0.125L, -5.19993611253477499595928744876579921L),
14684 TEST_if_f (yn, 1, 0.75L, -1.03759455076928541973767132140642198L),
14685 TEST_if_f (yn, 1, 1.0, -0.781212821300288716547150000047964821L),
14686 TEST_if_f (yn, 1, 1.5, -0.412308626973911295952829820633445323L),
14687 TEST_if_f (yn, 1, 2.0, -0.107032431540937546888370772277476637L),
14688 TEST_if_f (yn, 1, 8.0, -0.158060461731247494255555266187483550L),
14689 TEST_if_f (yn, 1, 10.0, 0.249015424206953883923283474663222803L),
14690
14691 /* yn (3, x) */
14692 TEST_if_f (yn, 3, plus_infty, 0),
14693 TEST_if_f (yn, 3, qnan_value, qnan_value),
14694
14695 TEST_if_f (yn, 3, 0.125L, -2612.69757350066712600220955744091741L),
14696 TEST_if_f (yn, 3, 0.75L, -12.9877176234475433186319774484809207L),
14697 TEST_if_f (yn, 3, 1.0, -5.82151760596472884776175706442981440L),
14698 TEST_if_f (yn, 3, 2.0, -1.12778377684042778608158395773179238L),
14699 TEST_if_f (yn, 3, 10.0, -0.251362657183837329779204747654240998L),
14700
14701 /* yn (10, x) */
14702 TEST_if_f (yn, 10, plus_infty, 0),
14703 TEST_if_f (yn, 10, qnan_value, qnan_value),
14704
14705 TEST_if_f (yn, 10, 0.125L, -127057845771019398.252538486899753195L),
14706 TEST_if_f (yn, 10, 0.75L, -2133501638.90573424452445412893839236L),
14707 TEST_if_f (yn, 10, 1.0, -121618014.278689189288130426667971145L),
14708 TEST_if_f (yn, 10, 2.0, -129184.542208039282635913145923304214L),
14709 TEST_if_f (yn, 10, 10.0, -0.359814152183402722051986577343560609L),
14710
14711 /* Check whether yn returns correct value for LDBL_MIN, DBL_MIN,
14712 and FLT_MIN. See Bug 14173. */
14713 TEST_if_f (yn, 10, min_value, minus_infty, OVERFLOW_EXCEPTION),
14714
14715 TEST_if_f (yn, 10, min_value, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
14716 END_DATA (yn)
14717 };
14718
8847214f
UD		 14719static void
14720yn_test (void)
14721{
8a216c1b 14722 FLOAT s, c;
8847214f 14723 errno = 0;
cd53c157
UD		 14724 FUNC (sincos) (0, &s, &c);
14725 if (errno == ENOSYS)
14726 /* Required function not implemented. */
14727 return;
8847214f
UD		 14728 FUNC(yn) (1, 1);
14729 if (errno == ENOSYS)
14730 /* Function not implemented. */
14731 return;
14732
8847214f 14733 START (yn);
0e400df5 14734 RUN_TEST_LOOP_if_f (yn, yn_test_data, );
541428fe 14735 END (yn);
8847214f
UD		 14736}
14737
14738
74c57478
JM		 14739static const struct test_f_f_data significand_test_data[] =
14740 {
14741 START_DATA (significand),
14742 /* significand returns the mantissa of the exponential representation. */
14743 /* TODO: missing +/-Inf as well as qNaN tests. */
14744 TEST_f_f (significand, 4.0, 1.0),
14745 TEST_f_f (significand, 6.0, 1.5),
14746 TEST_f_f (significand, 8.0, 1.0),
14747 END_DATA (significand)
14748 };
14749
f5c8f285
UD		 14750static void
14751significand_test (void)
14752{
f5c8f285 14753 START (significand);
74c57478 14754 RUN_TEST_LOOP_f_f (significand, significand_test_data, );
f5c8f285
UD		 14755 END (significand);
14756}
14757
14758
8847214f
UD		 14759static void
14760initialize (void)
14761{
14762 fpstack_test ("start *init*");
8847214f 14763
8847214f
UD		 14764 /* Clear all exceptions. From now on we must not get random exceptions. */
14765 feclearexcept (FE_ALL_EXCEPT);
f2da7793 14766 errno = 0;
8847214f
UD		 14767
14768 /* Test to make sure we start correctly. */
14769 fpstack_test ("end *init*");
14770}
14771
14772/* Definitions of arguments for argp functions. */
14773static const struct argp_option options[] =
14774{
14775 { "verbose", 'v', "NUMBER", 0, "Level of verbosity (0..3)"},
14776 { "ulps-file", 'u', NULL, 0, "Output ulps to file ULPs"},
14777 { "no-max-error", 'f', NULL, 0,
14778 "Don't output maximal errors of functions"},
14779 { "no-points", 'p', NULL, 0,
14780 "Don't output results of functions invocations"},
cd33623e
UD		 14781 { "ignore-max-ulp", 'i', "yes/no", 0,
14782 "Ignore given maximal errors"},
26510bdd
CD		 14783 { "output-dir", 'o', "DIR", 0,
14784 "Directory where generated files will be placed"},
8847214f
UD		 14785 { NULL, 0, NULL, 0, NULL }
14786};
14787
14788/* Short description of program. */
14789static const char doc[] = "Math test suite: " TEST_MSG ;
14790
14791/* Prototype for option handler. */
fe559c5e 14792static error_t parse_opt (int key, char *arg, struct argp_state *state);
8847214f
UD		 14793
14794/* Data structure to communicate with argp functions. */
14795static struct argp argp =
14796{
14797 options, parse_opt, NULL, doc,
14798};
14799
14800
14801/* Handle program arguments. */
14802static error_t
14803parse_opt (int key, char *arg, struct argp_state *state)
14804{
14805 switch (key)
14806 {
14807 case 'f':
6815fabc 14808 output_max_error = 0;
8847214f 14809 break;
cd33623e
UD		 14810 case 'i':
14811 if (strcmp (arg, "yes") == 0)
14812 ignore_max_ulp = 1;
14813 else if (strcmp (arg, "no") == 0)
14814 ignore_max_ulp = 0;
14815 break;
26510bdd
CD		 14816 case 'o':
14817 output_dir = (char *) malloc (strlen (arg) + 1);
14818 if (output_dir != NULL)
14819 strcpy (output_dir, arg);
14820 else
14821 return errno;
14822 break;
8847214f 14823 case 'p':
6815fabc 14824 output_points = 0;
8847214f
UD		 14825 break;
14826 case 'u':
14827 output_ulps = 1;
14828 break;
14829 case 'v':
14830 if (optarg)
14831 verbose = (unsigned int) strtoul (optarg, NULL, 0);
14832 else
14833 verbose = 3;
14834 break;
14835 default:
14836 return ARGP_ERR_UNKNOWN;
14837 }
14838 return 0;
14839}
14840
14841#if 0
14842/* function to check our ulp calculation. */
14843void
14844check_ulp (void)
14845{
14846 int i;
14847
14848 FLOAT u, diff, ulp;
14849 /* This gives one ulp. */
14850 u = FUNC(nextafter) (10, 20);
14851 check_equal (10.0, u, 1, &diff, &ulp);
14852 printf ("One ulp: % .4" PRINTF_NEXPR "\n", ulp);
14853
14854 /* This gives one more ulp. */
14855 u = FUNC(nextafter) (u, 20);
14856 check_equal (10.0, u, 2, &diff, &ulp);
14857 printf ("two ulp: % .4" PRINTF_NEXPR "\n", ulp);
14858
14859 /* And now calculate 100 ulp. */
14860 for (i = 2; i < 100; i++)
14861 u = FUNC(nextafter) (u, 20);
14862 check_equal (10.0, u, 100, &diff, &ulp);
14863 printf ("100 ulp: % .4" PRINTF_NEXPR "\n", ulp);
14864}
14865#endif
14866
14867int
14868main (int argc, char **argv)
14869{
14870
14871 int remaining;
26510bdd
CD		 14872 char *ulps_file_path;
14873 size_t dir_len = 0;
8847214f
UD		 14874
14875 verbose = 1;
14876 output_ulps = 0;
14877 output_max_error = 1;
14878 output_points = 1;
26510bdd 14879 output_dir = NULL;
cd33623e
UD		 14880 /* XXX set to 0 for releases. */
14881 ignore_max_ulp = 0;
bdf09fab 14882
8847214f
UD		 14883 /* Parse and process arguments. */
14884 argp_parse (&argp, argc, argv, 0, &remaining, NULL);
14885
14886 if (remaining != argc)
14887 {
14888 fprintf (stderr, "wrong number of arguments");
14889 argp_help (&argp, stdout, ARGP_HELP_SEE, program_invocation_short_name);
14890 exit (EXIT_FAILURE);
14891 }
14892
14893 if (output_ulps)
14894 {
26510bdd
CD		 14895 if (output_dir != NULL)
14896 dir_len = strlen (output_dir);
14897 ulps_file_path = (char *) malloc (dir_len + strlen (ulps_file_name) + 1);
14898 if (ulps_file_path == NULL)
14899 {
14900 perror ("can't allocate path for `ULPs' file: ");
14901 exit (1);
14902 }
14903 sprintf (ulps_file_path, "%s%s", output_dir == NULL ? "" : output_dir, ulps_file_name);
14904 ulps_file = fopen (ulps_file_path, "a");
8847214f
UD		 14905 if (ulps_file == NULL)
14906 {
14907 perror ("can't open file `ULPs' for writing: ");
14908 exit (1);
14909 }
14910 }
14911
14912
14913 initialize ();
14914 printf (TEST_MSG);
14915
14916#if 0
14917 check_ulp ();
14918#endif
14919
ec751a23 14920 /* Keep the tests a wee bit ordered (according to ISO C99). */
8847214f 14921 /* Classification macros: */
ef1bb361 14922 finite_test ();
8847214f
UD		 14923 fpclassify_test ();
14924 isfinite_test ();
ef1bb361
JM		 14925 isinf_test ();
14926 isnan_test ();
8847214f 14927 isnormal_test ();
57267616 14928 issignaling_test ();
8847214f
UD		 14929 signbit_test ();
14930
14931 /* Trigonometric functions: */
14932 acos_test ();
5ba3cc69
JM		 14933 acos_test_tonearest ();
14934 acos_test_towardzero ();
14935 acos_test_downward ();
14936 acos_test_upward ();
8847214f 14937 asin_test ();
5ba3cc69
JM		 14938 asin_test_tonearest ();
14939 asin_test_towardzero ();
14940 asin_test_downward ();
14941 asin_test_upward ();
8847214f
UD		 14942 atan_test ();
14943 atan2_test ();
14944 cos_test ();
804360ed
JM		 14945 cos_test_tonearest ();
14946 cos_test_towardzero ();
14947 cos_test_downward ();
14948 cos_test_upward ();
8847214f 14949 sin_test ();
804360ed
JM		 14950 sin_test_tonearest ();
14951 sin_test_towardzero ();
14952 sin_test_downward ();
14953 sin_test_upward ();
8847214f
UD		 14954 sincos_test ();
14955 tan_test ();
804360ed
JM		 14956 tan_test_tonearest ();
14957 tan_test_towardzero ();
14958 tan_test_downward ();
14959 tan_test_upward ();
8847214f
UD		 14960
14961 /* Hyperbolic functions: */
14962 acosh_test ();
14963 asinh_test ();
14964 atanh_test ();
14965 cosh_test ();
ca811b22
JM		 14966 cosh_test_tonearest ();
14967 cosh_test_towardzero ();
14968 cosh_test_downward ();
14969 cosh_test_upward ();
8847214f 14970 sinh_test ();
ca811b22
JM		 14971 sinh_test_tonearest ();
14972 sinh_test_towardzero ();
14973 sinh_test_downward ();
14974 sinh_test_upward ();
8847214f
UD		 14975 tanh_test ();
14976
14977 /* Exponential and logarithmic functions: */
14978 exp_test ();
28afd92d
JM		 14979 exp_test_tonearest ();
14980 exp_test_towardzero ();
14981 exp_test_downward ();
14982 exp_test_upward ();
8847214f
UD		 14983 exp10_test ();
14984 exp2_test ();
14985 expm1_test ();
14986 frexp_test ();
14987 ldexp_test ();
14988 log_test ();
14989 log10_test ();
14990 log1p_test ();
14991 log2_test ();
14992 logb_test ();
a462cb63 14993 logb_test_downward ();
8847214f
UD		 14994 modf_test ();
14995 ilogb_test ();
14996 scalb_test ();
14997 scalbn_test ();
14998 scalbln_test ();
f5c8f285 14999 significand_test ();
8847214f
UD		 15000
15001 /* Power and absolute value functions: */
15002 cbrt_test ();
15003 fabs_test ();
15004 hypot_test ();
15005 pow_test ();
b7cd39e8
JM		 15006 pow_test_tonearest ();
15007 pow_test_towardzero ();
15008 pow_test_downward ();
15009 pow_test_upward ();
8847214f
UD		 15010 sqrt_test ();
15011
15012 /* Error and gamma functions: */
15013 erf_test ();
15014 erfc_test ();
15015 gamma_test ();
15016 lgamma_test ();
15017 tgamma_test ();
15018
15019 /* Nearest integer functions: */
15020 ceil_test ();
15021 floor_test ();
15022 nearbyint_test ();
15023 rint_test ();
4d37c8aa
UD		 15024 rint_test_tonearest ();
15025 rint_test_towardzero ();
15026 rint_test_downward ();
15027 rint_test_upward ();
8847214f 15028 lrint_test ();
6624dbc0
UD		 15029 lrint_test_tonearest ();
15030 lrint_test_towardzero ();
15031 lrint_test_downward ();
15032 lrint_test_upward ();
8847214f 15033 llrint_test ();
830fce04
RM		 15034 llrint_test_tonearest ();
15035 llrint_test_towardzero ();
15036 llrint_test_downward ();
15037 llrint_test_upward ();
8847214f
UD		 15038 round_test ();
15039 lround_test ();
15040 llround_test ();
15041 trunc_test ();
15042
15043 /* Remainder functions: */
15044 fmod_test ();
15045 remainder_test ();
15046 remquo_test ();
15047
15048 /* Manipulation functions: */
15049 copysign_test ();
15050 nextafter_test ();
fe559c5e 15051 nexttoward_test ();
8847214f
UD		 15052
15053 /* maximum, minimum and positive difference functions */
15054 fdim_test ();
15055 fmax_test ();
15056 fmin_test ();
15057
15058 /* Multiply and add: */
15059 fma_test ();
8ec5b013
JM		 15060 fma_test_towardzero ();
15061 fma_test_downward ();
15062 fma_test_upward ();
8847214f 15063
0e8e0c1c
JM		 15064 /* Comparison macros: */
15065 isgreater_test ();
15066 isgreaterequal_test ();
15067 isless_test ();
15068 islessequal_test ();
15069 islessgreater_test ();
15070 isunordered_test ();
15071
8847214f
UD		 15072 /* Complex functions: */
15073 cabs_test ();
15074 cacos_test ();
15075 cacosh_test ();
15076 carg_test ();
15077 casin_test ();
15078 casinh_test ();
15079 catan_test ();
15080 catanh_test ();
15081 ccos_test ();
15082 ccosh_test ();
15083 cexp_test ();
0cdc8e6f 15084 cimag_test ();
8847214f
UD		 15085 clog10_test ();
15086 clog_test ();
0cdc8e6f 15087 conj_test ();
8847214f
UD		 15088 cpow_test ();
15089 cproj_test ();
0cdc8e6f 15090 creal_test ();
8847214f
UD		 15091 csin_test ();
15092 csinh_test ();
15093 csqrt_test ();
15094 ctan_test ();
ca61cf32
JM		 15095 ctan_test_tonearest ();
15096 ctan_test_towardzero ();
15097 ctan_test_downward ();
15098 ctan_test_upward ();
8847214f 15099 ctanh_test ();
ca61cf32
JM		 15100 ctanh_test_tonearest ();
15101 ctanh_test_towardzero ();
15102 ctanh_test_downward ();
15103 ctanh_test_upward ();
8847214f
UD		 15104
15105 /* Bessel functions: */
15106 j0_test ();
15107 j1_test ();
15108 jn_test ();
15109 y0_test ();
15110 y1_test ();
15111 yn_test ();
15112
15113 if (output_ulps)
15114 fclose (ulps_file);
15115
15116 printf ("\nTest suite completed:\n");
f2da7793
JM		 15117 printf (" %d test cases plus %d tests for exception flags and\n"
15118 " %d tests for errno executed.\n",
15119 noTests, noExcTests, noErrnoTests);
8847214f
UD		 15120 if (noErrors)
15121 {
a9a56960 15122 printf (" %d errors occurred.\n", noErrors);
cf3141a5 15123 return 1;
8847214f
UD		 15124 }
15125 printf (" All tests passed successfully.\n");
cf3141a5
AJ		 15126
15127 return 0;
8847214f
UD		 15128}
15129
15130/*
15131 * Local Variables:
15132 * mode:c
15133 * End:
15134 */
A mirror of the official glibc repository