]> 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
De-stringify constants in math/atest-exp2.c.
[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
8847214f 85 NaN values: There exist signalling and quiet NaNs. This implementation
57267616
TS		 86 only uses quiet NaN as parameter. Where the sign of a NaN is
87 significant, this is not tested. The payload of NaNs is not examined.
8847214f
UD		 88
89 Inline functions: Inlining functions should give an improvement in
90 speed - but not in precission. The inlined functions return
91 reasonable values for a reasonable range of input values. The
92 result is not necessarily correct for all values and exceptions are
93 not correctly raised in all cases. Problematic input and return
94 values are infinity, not-a-number and minus zero. This suite
95 therefore does not check these specific inputs and the exception
96 handling for inlined mathematical functions - just the "reasonable"
97 values are checked.
98
99 Beware: The tests might fail for any of the following reasons:
100 - Tests are wrong
101 - Functions are wrong
102 - Floating Point Unit not working properly
103 - Compiler has errors
104
105 With e.g. gcc 2.7.2.2 the test for cexp fails because of a compiler error.
33996419
AJ		 106
107
108 To Do: All parameter should be numbers that can be represented as
2550dfe9
AJ		 109 exact floating point values. Currently some values cannot be
110 represented exactly and therefore the result is not the expected
111 result. For this we will use 36 digits so that numbers can be
112 represented exactly. */
8847214f
UD		 113
114#ifndef _GNU_SOURCE
115# define _GNU_SOURCE
116#endif
117
118#include "libm-test-ulps.h"
119#include <complex.h>
120#include <math.h>
121#include <float.h>
122#include <fenv.h>
601d2942 123#include <limits.h>
8847214f
UD		 124
125#include <errno.h>
126#include <stdlib.h>
127#include <stdio.h>
bdf09fab 128#include <string.h>
8847214f 129#include <argp.h>
ef82f4da 130#include <tininess.h>
8847214f 131
0af797de
CM		 132/* Allow platforms without all rounding modes to test properly,
133 assuming they provide an __FE_UNDEFINED in <bits/fenv.h> which
134 causes fesetround() to return failure. */
135#ifndef FE_TONEAREST
136# define FE_TONEAREST __FE_UNDEFINED
137#endif
138#ifndef FE_TOWARDZERO
139# define FE_TOWARDZERO __FE_UNDEFINED
140#endif
141#ifndef FE_UPWARD
142# define FE_UPWARD __FE_UNDEFINED
143#endif
144#ifndef FE_DOWNWARD
145# define FE_DOWNWARD __FE_UNDEFINED
146#endif
147
8847214f
UD		 148/* Possible exceptions */
149#define NO_EXCEPTION 0x0
150#define INVALID_EXCEPTION 0x1
151#define DIVIDE_BY_ZERO_EXCEPTION 0x2
c135cc1b 152#define OVERFLOW_EXCEPTION 0x4
80bad0cc 153#define UNDERFLOW_EXCEPTION 0x8
105a07df 154#define INEXACT_EXCEPTION 0x10
8847214f 155/* The next flags signals that those exceptions are allowed but not required. */
105a07df
JM		 156#define INVALID_EXCEPTION_OK 0x20
157#define DIVIDE_BY_ZERO_EXCEPTION_OK 0x40
158#define OVERFLOW_EXCEPTION_OK 0x80
159#define UNDERFLOW_EXCEPTION_OK 0x100
160/* For "inexact" exceptions, the default is allowed but not required
161 unless INEXACT_EXCEPTION or NO_INEXACT_EXCEPTION is specified. */
162#define NO_INEXACT_EXCEPTION 0x200
8847214f 163#define EXCEPTIONS_OK INVALID_EXCEPTION_OK+DIVIDE_BY_ZERO_EXCEPTION_OK
80bad0cc 164/* Some special test flags, passed together with exceptions. */
105a07df 165#define IGNORE_ZERO_INF_SIGN 0x400
f2da7793 166/* Indicate errno settings required or disallowed. */
105a07df
JM		 167#define ERRNO_UNCHANGED 0x800
168#define ERRNO_EDOM 0x1000
169#define ERRNO_ERANGE 0x2000
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");
105a07df
JM		 553#endif
554#ifdef FE_INEXACT
555 if ((exception & (INEXACT_EXCEPTION | NO_INEXACT_EXCEPTION)) != 0)
556 test_single_exception (test_name, exception, INEXACT_EXCEPTION,
557 FE_INEXACT, "Inexact");
8847214f
UD		 558#endif
559 feclearexcept (FE_ALL_EXCEPT);
560}
561
f2da7793
JM		 562/* Test whether errno for TEST_NAME, set to ERRNO_VALUE, has value
563 EXPECTED_VALUE (description EXPECTED_NAME). */
564static void
565test_single_errno (const char *test_name, int errno_value,
566 int expected_value, const char *expected_name)
567{
5575c0e5 568#ifndef TEST_INLINE
f2da7793
JM		 569 if (errno_value == expected_value)
570 {
b7dab1e4 571 if (print_screen (1))
f2da7793
JM		 572 printf ("Pass: %s: errno set to %d (%s)\n", test_name, errno_value,
573 expected_name);
574 }
575 else
576 {
577 ++noErrors;
b7dab1e4 578 if (print_screen (0))
f2da7793
JM		 579 printf ("Failure: %s: errno set to %d, expected %d (%s)\n",
580 test_name, errno_value, expected_value, expected_name);
581 }
5575c0e5 582#endif
f2da7793
JM		 583}
584
585/* Test whether errno (value ERRNO_VALUE) has been for TEST_NAME set
586 as required by EXCEPTIONS. */
587static void
588test_errno (const char *test_name, int errno_value, int exceptions)
589{
590 ++noErrnoTests;
591 if (exceptions & ERRNO_UNCHANGED)
592 test_single_errno (test_name, errno_value, 0, "unchanged");
593 if (exceptions & ERRNO_EDOM)
594 test_single_errno (test_name, errno_value, EDOM, "EDOM");
595 if (exceptions & ERRNO_ERANGE)
596 test_single_errno (test_name, errno_value, ERANGE, "ERANGE");
597}
8847214f
UD		 598
599static void
6815fabc 600check_float_internal (const char *test_name, FLOAT computed, FLOAT expected,
b7dab1e4 601 FLOAT max_ulp, int exceptions,
6815fabc 602 FLOAT *curr_max_error)
8847214f
UD		 603{
604 int ok = 0;
605 int print_diff = 0;
606 FLOAT diff = 0;
607 FLOAT ulp = 0;
f2da7793 608 int errno_value = errno;
8847214f
UD		 609
610 test_exceptions (test_name, exceptions);
f2da7793 611 test_errno (test_name, errno_value, exceptions);
57267616
TS		 612 if (issignaling (computed) && issignaling (expected))
613 ok = 1;
614 else if (issignaling (computed) || issignaling (expected))
615 ok = 0;
616 else if (isnan (computed) && isnan (expected))
8847214f
UD		 617 ok = 1;
618 else if (isinf (computed) && isinf (expected))
619 {
620 /* Test for sign of infinities. */
ba3752d5
UD		 621 if ((exceptions & IGNORE_ZERO_INF_SIGN) == 0
622 && signbit (computed) != signbit (expected))
8847214f
UD		 623 {
624 ok = 0;
625 printf ("infinity has wrong sign.\n");
626 }
627 else
628 ok = 1;
629 }
57267616
TS		 630 /* Don't calculate ULPs for infinities or any kind of NaNs. */
631 else if (isinf (computed) || isnan (computed)
632 || isinf (expected) || isnan (expected))
8847214f
UD		 633 ok = 0;
634 else
635 {
636 diff = FUNC(fabs) (computed - expected);
e6b29af8
UD		 637 switch (fpclassify (expected))
638 {
639 case FP_ZERO:
640 /* ilogb (0) isn't allowed. */
641 ulp = diff / FUNC(ldexp) (1.0, - MANT_DIG);
642 break;
643 case FP_NORMAL:
644 ulp = diff / FUNC(ldexp) (1.0, FUNC(ilogb) (expected) - MANT_DIG);
645 break;
646 case FP_SUBNORMAL:
6c23e11c
JM		 647 /* 1ulp for a subnormal value, shifted by MANT_DIG, is the
648 least normal value. */
649 ulp = (FUNC(ldexp) (diff, MANT_DIG) / min_value);
e6b29af8
UD		 650 break;
651 default:
652 /* It should never happen. */
653 abort ();
654 break;
655 }
6815fabc 656 set_max_error (ulp, curr_max_error);
8847214f 657 print_diff = 1;
ba3752d5
UD		 658 if ((exceptions & IGNORE_ZERO_INF_SIGN) == 0
659 && computed == 0.0 && expected == 0.0
660 && signbit(computed) != signbit (expected))
3a8e65a0 661 ok = 0;
f964490f 662 else if (ulp <= 0.5 || (ulp <= max_ulp && !ignore_max_ulp))
8847214f
UD		 663 ok = 1;
664 else
665 {
666 ok = 0;
667 print_ulps (test_name, ulp);
668 }
669
670 }
b7dab1e4 671 if (print_screen (ok))
8847214f
UD		 672 {
673 if (!ok)
674 printf ("Failure: ");
675 printf ("Test: %s\n", test_name);
676 printf ("Result:\n");
57267616
TS		 677 printf (" is: ");
678 print_float (computed);
679 printf (" should be: ");
680 print_float (expected);
8847214f
UD		 681 if (print_diff)
682 {
683 printf (" difference: % .20" PRINTF_EXPR " % .20" PRINTF_XEXPR
684 "\n", diff, diff);
685 printf (" ulp : % .4" PRINTF_NEXPR "\n", ulp);
686 printf (" max.ulp : % .4" PRINTF_NEXPR "\n", max_ulp);
687 }
688 }
b7dab1e4 689 update_stats (ok);
8847214f
UD		 690
691 fpstack_test (test_name);
f2da7793 692 errno = 0;
8847214f
UD		 693}
694
695
696static void
6815fabc 697check_float (const char *test_name, FLOAT computed, FLOAT expected,
b7dab1e4 698 FLOAT max_ulp, int exceptions)
6815fabc 699{
b7dab1e4 700 check_float_internal (test_name, computed, expected, max_ulp,
6815fabc
UD		 701 exceptions, &max_error);
702}
703
704
705static void
706check_complex (const char *test_name, __complex__ FLOAT computed,
707 __complex__ FLOAT expected,
b7dab1e4 708 __complex__ FLOAT max_ulp,
6815fabc 709 int exception)
8847214f 710{
6815fabc 711 FLOAT part_comp, part_exp, part_max_ulp;
2fd89785
MS		 712 char *str;
713
714 if (asprintf (&str, "Real part of: %s", test_name) == -1)
715 abort ();
8847214f 716
8847214f
UD		 717 part_comp = __real__ computed;
718 part_exp = __real__ expected;
6815fabc 719 part_max_ulp = __real__ max_ulp;
15daa639 720
b7dab1e4 721 check_float_internal (str, part_comp, part_exp, part_max_ulp,
6815fabc 722 exception, &real_max_error);
2fd89785
MS		 723 free (str);
724
725 if (asprintf (&str, "Imaginary part of: %s", test_name) == -1)
726 abort ();
8847214f 727
8847214f
UD		 728 part_comp = __imag__ computed;
729 part_exp = __imag__ expected;
6815fabc 730 part_max_ulp = __imag__ max_ulp;
15daa639 731
f2da7793 732 /* Don't check again for exceptions or errno, just pass through the
8847214f 733 zero/inf sign test. */
b7dab1e4 734 check_float_internal (str, part_comp, part_exp, part_max_ulp,
6815fabc
UD		 735 exception & IGNORE_ZERO_INF_SIGN,
736 &imag_max_error);
2fd89785 737 free (str);
8847214f
UD		 738}
739
740
741/* Check that computed and expected values are equal (int values). */
742static void
743check_int (const char *test_name, int computed, int expected, int max_ulp,
b7dab1e4 744 int exceptions)
8847214f
UD		 745{
746 int diff = computed - expected;
747 int ok = 0;
f2da7793 748 int errno_value = errno;
8847214f
UD		 749
750 test_exceptions (test_name, exceptions);
f2da7793 751 test_errno (test_name, errno_value, exceptions);
8847214f
UD		 752 noTests++;
753 if (abs (diff) <= max_ulp)
754 ok = 1;
755
756 if (!ok)
757 print_ulps (test_name, diff);
758
b7dab1e4 759 if (print_screen (ok))
8847214f
UD		 760 {
761 if (!ok)
762 printf ("Failure: ");
763 printf ("Test: %s\n", test_name);
764 printf ("Result:\n");
765 printf (" is: %d\n", computed);
766 printf (" should be: %d\n", expected);
767 }
768
b7dab1e4 769 update_stats (ok);
8847214f 770 fpstack_test (test_name);
f2da7793 771 errno = 0;
8847214f
UD		 772}
773
774
775/* Check that computed and expected values are equal (long int values). */
776static void
777check_long (const char *test_name, long int computed, long int expected,
b7dab1e4 778 long int max_ulp, int exceptions)
8847214f
UD		 779{
780 long int diff = computed - expected;
781 int ok = 0;
f2da7793 782 int errno_value = errno;
8847214f
UD		 783
784 test_exceptions (test_name, exceptions);
f2da7793 785 test_errno (test_name, errno_value, exceptions);
8847214f
UD		 786 noTests++;
787 if (labs (diff) <= max_ulp)
788 ok = 1;
789
790 if (!ok)
791 print_ulps (test_name, diff);
792
b7dab1e4 793 if (print_screen (ok))
8847214f
UD		 794 {
795 if (!ok)
796 printf ("Failure: ");
797 printf ("Test: %s\n", test_name);
798 printf ("Result:\n");
799 printf (" is: %ld\n", computed);
800 printf (" should be: %ld\n", expected);
801 }
802
b7dab1e4 803 update_stats (ok);
8847214f 804 fpstack_test (test_name);
f2da7793 805 errno = 0;
8847214f
UD		 806}
807
808
809/* Check that computed value is true/false. */
810static void
811check_bool (const char *test_name, int computed, int expected,
b7dab1e4 812 long int max_ulp, int exceptions)
8847214f
UD		 813{
814 int ok = 0;
f2da7793 815 int errno_value = errno;
8847214f
UD		 816
817 test_exceptions (test_name, exceptions);
f2da7793 818 test_errno (test_name, errno_value, exceptions);
8847214f
UD		 819 noTests++;
820 if ((computed == 0) == (expected == 0))
821 ok = 1;
822
b7dab1e4 823 if (print_screen (ok))
8847214f
UD		 824 {
825 if (!ok)
826 printf ("Failure: ");
827 printf ("Test: %s\n", test_name);
828 printf ("Result:\n");
829 printf (" is: %d\n", computed);
830 printf (" should be: %d\n", expected);
831 }
832
b7dab1e4 833 update_stats (ok);
8847214f 834 fpstack_test (test_name);
f2da7793 835 errno = 0;
8847214f
UD		 836}
837
838
839/* check that computed and expected values are equal (long int values) */
840static void
841check_longlong (const char *test_name, long long int computed,
842 long long int expected,
b7dab1e4 843 long long int max_ulp,
8847214f
UD		 844 int exceptions)
845{
846 long long int diff = computed - expected;
847 int ok = 0;
f2da7793 848 int errno_value = errno;
8847214f
UD		 849
850 test_exceptions (test_name, exceptions);
f2da7793 851 test_errno (test_name, errno_value, exceptions);
8847214f
UD		 852 noTests++;
853 if (llabs (diff) <= max_ulp)
854 ok = 1;
855
856 if (!ok)
857 print_ulps (test_name, diff);
858
b7dab1e4 859 if (print_screen (ok))
8847214f
UD		 860 {
861 if (!ok)
862 printf ("Failure:");
863 printf ("Test: %s\n", test_name);
864 printf ("Result:\n");
865 printf (" is: %lld\n", computed);
866 printf (" should be: %lld\n", expected);
867 }
868
b7dab1e4 869 update_stats (ok);
8847214f 870 fpstack_test (test_name);
f2da7793 871 errno = 0;
8847214f
UD		 872}
873
51df539d
JM		 874/* Structures for each kind of test. */
875struct test_f_f_data
876{
877 const char *test_name;
878 FLOAT arg;
879 FLOAT expected;
880 FLOAT max_ulp;
881 int exceptions;
882};
601a3a5f
JM		 883struct test_ff_f_data
884{
885 const char *test_name;
886 FLOAT arg1, arg2;
887 FLOAT expected;
888 FLOAT max_ulp;
889 int exceptions;
890};
891struct test_ff_f_data_nexttoward
892{
893 const char *test_name;
894 FLOAT arg1;
895 long double arg2;
896 FLOAT expected;
897 FLOAT max_ulp;
898 int exceptions;
899};
243216e1
JM		 900struct test_fi_f_data
901{
902 const char *test_name;
903 FLOAT arg1;
904 int arg2;
905 FLOAT expected;
906 FLOAT max_ulp;
907 int exceptions;
908};
68fc074c
JM		 909struct test_fl_f_data
910{
911 const char *test_name;
912 FLOAT arg1;
913 long int arg2;
914 FLOAT expected;
915 FLOAT max_ulp;
916 int exceptions;
917};
0e400df5
JM		 918struct test_if_f_data
919{
920 const char *test_name;
921 int arg1;
922 FLOAT arg2;
923 FLOAT expected;
924 FLOAT max_ulp;
925 int exceptions;
926};
4f184d30
JM		 927struct test_fff_f_data
928{
929 const char *test_name;
930 FLOAT arg1, arg2, arg3;
931 FLOAT expected;
932 FLOAT max_ulp;
933 int exceptions;
934};
6a1992e2
JM		 935struct test_c_f_data
936{
937 const char *test_name;
938 FLOAT argr, argc;
939 FLOAT expected;
940 FLOAT max_ulp;
941 int exceptions;
942};
d9c2a0fd 943/* Used for both RUN_TEST_LOOP_f_f1 and RUN_TEST_LOOP_fI_f1. */
87aa21df
JM		 944struct test_f_f1_data
945{
946 const char *test_name;
947 FLOAT arg;
948 FLOAT expected;
949 FLOAT max_ulp;
950 int exceptions;
951 const char *extra_name;
952 int extra_init;
953 int extra_test;
954 int extra_expected;
955 int extra_ulp;
956};
9dc9095d
JM		 957struct test_fF_f1_data
958{
959 const char *test_name;
960 FLOAT arg;
961 FLOAT expected;
962 FLOAT max_ulp;
963 int exceptions;
964 const char *extra_name;
965 FLOAT extra_init;
f71172e5 966 int extra_test;
9dc9095d
JM		 967 FLOAT extra_expected;
968 FLOAT extra_ulp;
969};
8cfa635a
JM		 970struct test_ffI_f1_data
971{
972 const char *test_name;
973 FLOAT arg1, arg2;
974 FLOAT expected;
975 FLOAT max_ulp;
976 int exceptions;
977 const char *extra_name;
978 int extra_init;
979 int extra_test;
980 int extra_expected;
981 int extra_ulp;
982};
08198877
JM		 983struct test_c_c_data
984{
985 const char *test_name;
986 FLOAT argr, argc;
987 FLOAT expr, expc;
988 __complex__ FLOAT max_ulp;
989 int exceptions;
990};
1c38ff73
JM		 991struct test_cc_c_data
992{
993 const char *test_name;
994 FLOAT arg1r, arg1c, arg2r, arg2c;
995 FLOAT expr, expc;
996 __complex__ FLOAT max_ulp;
997 int exceptions;
998};
7abeee12
JM		 999/* Used for all of RUN_TEST_LOOP_f_i, RUN_TEST_LOOP_f_i_tg,
1000 RUN_TEST_LOOP_f_b and RUN_TEST_LOOP_f_b_tg. */
acbd839a
JM		 1001struct test_f_i_data
1002{
1003 const char *test_name;
1004 FLOAT arg;
1005 int expected;
f71172e5 1006 int max_ulp;
acbd839a
JM		 1007 int exceptions;
1008};
d369f531
JM		 1009struct test_ff_i_data
1010{
1011 const char *test_name;
1012 FLOAT arg1, arg2;
1013 int expected;
1014 int max_ulp;
1015 int exceptions;
1016};
3608cb24
JM		 1017struct test_f_l_data
1018{
1019 const char *test_name;
1020 FLOAT arg;
1021 long int expected;
1022 long int max_ulp;
1023 int exceptions;
1024};
15c7c18d
JM		 1025struct test_f_L_data
1026{
1027 const char *test_name;
1028 FLOAT arg;
1029 long long int expected;
1030 long long int max_ulp;
1031 int exceptions;
1032};
51df539d
JM		 1033
1034/* Set the rounding mode, or restore the saved value. */
1035#define IF_ROUND_INIT_ /* Empty. */
1036#define IF_ROUND_INIT_FE_DOWNWARD \
1037 int save_round_mode = fegetround (); \
1038 if (fesetround (FE_DOWNWARD) == 0)
1039#define IF_ROUND_INIT_FE_TONEAREST \
1040 int save_round_mode = fegetround (); \
1041 if (fesetround (FE_TONEAREST) == 0)
1042#define IF_ROUND_INIT_FE_TOWARDZERO \
1043 int save_round_mode = fegetround (); \
1044 if (fesetround (FE_TOWARDZERO) == 0)
1045#define IF_ROUND_INIT_FE_UPWARD \
1046 int save_round_mode = fegetround (); \
1047 if (fesetround (FE_UPWARD) == 0)
1048#define ROUND_RESTORE_ /* Empty. */
1049#define ROUND_RESTORE_FE_DOWNWARD \
1050 fesetround (save_round_mode)
1051#define ROUND_RESTORE_FE_TONEAREST \
1052 fesetround (save_round_mode)
1053#define ROUND_RESTORE_FE_TOWARDZERO \
1054 fesetround (save_round_mode)
1055#define ROUND_RESTORE_FE_UPWARD \
1056 fesetround (save_round_mode)
1057
f44bf14a 1058/* Run an individual test, including any required setup and checking
51df539d 1059 of results, or loop over all tests in an array. */
f44bf14a
JM		 1060#define RUN_TEST_f_f(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1061 MAX_ULP, EXCEPTIONS) \
1062 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1063 MAX_ULP, EXCEPTIONS)
51df539d
JM		 1064#define RUN_TEST_LOOP_f_f(FUNC_NAME, ARRAY, ROUNDING_MODE) \
1065 IF_ROUND_INIT_ ## ROUNDING_MODE \
1066 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1067 RUN_TEST_f_f ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg, \
1068 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
1069 (ARRAY)[i].exceptions); \
1070 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 1071#define RUN_TEST_2_f(TEST_NAME, FUNC_NAME, ARG1, ARG2, EXPECTED, \
1072 MAX_ULP, EXCEPTIONS) \
1073 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG1, ARG2), EXPECTED, \
1074 MAX_ULP, EXCEPTIONS)
601a3a5f
JM		 1075#define RUN_TEST_LOOP_2_f(FUNC_NAME, ARRAY, ROUNDING_MODE) \
1076 IF_ROUND_INIT_ ## ROUNDING_MODE \
1077 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1078 RUN_TEST_2_f ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg1, \
1079 (ARRAY)[i].arg2, (ARRAY)[i].expected, \
5e908270 1080 (ARRAY)[i].max_ulp, (ARRAY)[i].exceptions); \
601a3a5f 1081 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a 1082#define RUN_TEST_ff_f RUN_TEST_2_f
601a3a5f 1083#define RUN_TEST_LOOP_ff_f RUN_TEST_LOOP_2_f
f44bf14a 1084#define RUN_TEST_fi_f RUN_TEST_2_f
243216e1 1085#define RUN_TEST_LOOP_fi_f RUN_TEST_LOOP_2_f
f44bf14a 1086#define RUN_TEST_fl_f RUN_TEST_2_f
68fc074c 1087#define RUN_TEST_LOOP_fl_f RUN_TEST_LOOP_2_f
ae08db3b 1088#define RUN_TEST_if_f RUN_TEST_2_f
0e400df5 1089#define RUN_TEST_LOOP_if_f RUN_TEST_LOOP_2_f
f44bf14a
JM		 1090#define RUN_TEST_fff_f(TEST_NAME, FUNC_NAME, ARG1, ARG2, ARG3, \
1091 EXPECTED, MAX_ULP, EXCEPTIONS) \
1092 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG1, ARG2, ARG3), \
1093 EXPECTED, MAX_ULP, EXCEPTIONS)
4f184d30
JM		 1094#define RUN_TEST_LOOP_fff_f(FUNC_NAME, ARRAY, ROUNDING_MODE) \
1095 IF_ROUND_INIT_ ## ROUNDING_MODE \
1096 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1097 RUN_TEST_fff_f ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg1, \
1098 (ARRAY)[i].arg2, (ARRAY)[i].arg3, \
1099 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
1100 (ARRAY)[i].exceptions); \
1101 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 1102#define RUN_TEST_c_f(TEST_NAME, FUNC_NAME, ARG1, ARG2, EXPECTED, \
1103 MAX_ULP, EXCEPTIONS) \
1104 check_float (TEST_NAME, \
1105 FUNC (FUNC_NAME) (BUILD_COMPLEX (ARG1, ARG2)), \
1106 EXPECTED, MAX_ULP, EXCEPTIONS)
6a1992e2
JM		 1107#define RUN_TEST_LOOP_c_f(FUNC_NAME, ARRAY, ROUNDING_MODE) \
1108 IF_ROUND_INIT_ ## ROUNDING_MODE \
1109 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1110 RUN_TEST_c_f ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].argr, \
1111 (ARRAY)[i].argc, (ARRAY)[i].expected, \
1112 (ARRAY)[i].max_ulp, (ARRAY)[i].exceptions); \
1113 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 1114#define RUN_TEST_f_f1(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1115 MAX_ULP, EXCEPTIONS, \
1116 EXTRA_NAME, EXTRA_VAR, EXTRA_INIT, EXTRA_TEST, \
1117 EXTRA_EXPECTED, EXTRA_ULP) \
1118 do \
1119 { \
1120 (EXTRA_VAR) = (EXTRA_INIT); \
1121 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1122 MAX_ULP, EXCEPTIONS); \
1123 if (EXTRA_TEST) \
1124 check_int (EXTRA_NAME, EXTRA_VAR, EXTRA_EXPECTED, \
1125 EXTRA_ULP, 0); \
1126 } \
1127 while (0)
87aa21df
JM		 1128#define RUN_TEST_LOOP_f_f1(FUNC_NAME, ARRAY, ROUNDING_MODE, EXTRA_VAR) \
1129 IF_ROUND_INIT_ ## ROUNDING_MODE \
1130 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1131 RUN_TEST_f_f1 ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg, \
1132 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
1133 (ARRAY)[i].exceptions, (ARRAY)[i].extra_name, \
1134 EXTRA_VAR, (ARRAY)[i].extra_init, \
1135 (ARRAY)[i].extra_test, (ARRAY)[i].extra_expected, \
1136 (ARRAY)[i].extra_ulp); \
1137 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 1138#define RUN_TEST_fF_f1(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1139 MAX_ULP, EXCEPTIONS, \
1140 EXTRA_NAME, EXTRA_VAR, EXTRA_INIT, EXTRA_TEST, \
1141 EXTRA_EXPECTED, EXTRA_ULP) \
1142 do \
1143 { \
1144 (EXTRA_VAR) = (EXTRA_INIT); \
1145 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG, &(EXTRA_VAR)), \
1146 EXPECTED, MAX_ULP, EXCEPTIONS); \
1147 if (EXTRA_TEST) \
1148 check_float (EXTRA_NAME, EXTRA_VAR, EXTRA_EXPECTED, \
1149 EXTRA_ULP, 0); \
1150 } \
1151 while (0)
9dc9095d
JM		 1152#define RUN_TEST_LOOP_fF_f1(FUNC_NAME, ARRAY, ROUNDING_MODE, EXTRA_VAR) \
1153 IF_ROUND_INIT_ ## ROUNDING_MODE \
1154 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1155 RUN_TEST_fF_f1 ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg, \
1156 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
1157 (ARRAY)[i].exceptions, (ARRAY)[i].extra_name, \
1158 EXTRA_VAR, (ARRAY)[i].extra_init, \
1159 (ARRAY)[i].extra_test, (ARRAY)[i].extra_expected, \
1160 (ARRAY)[i].extra_ulp); \
1161 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 1162#define RUN_TEST_fI_f1(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1163 MAX_ULP, EXCEPTIONS, \
1164 EXTRA_NAME, EXTRA_VAR, EXTRA_INIT, EXTRA_TEST, \
1165 EXTRA_EXPECTED, EXTRA_ULP) \
1166 do \
1167 { \
1168 (EXTRA_VAR) = (EXTRA_INIT); \
1169 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG, &(EXTRA_VAR)), \
1170 EXPECTED, MAX_ULP, EXCEPTIONS); \
1171 if (EXTRA_TEST) \
1172 check_int (EXTRA_NAME, EXTRA_VAR, EXTRA_EXPECTED, \
1173 EXTRA_ULP, 0); \
1174 } \
1175 while (0)
d9c2a0fd
JM		 1176#define RUN_TEST_LOOP_fI_f1(FUNC_NAME, ARRAY, ROUNDING_MODE, EXTRA_VAR) \
1177 IF_ROUND_INIT_ ## ROUNDING_MODE \
1178 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1179 RUN_TEST_fI_f1 ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg, \
1180 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
1181 (ARRAY)[i].exceptions, (ARRAY)[i].extra_name, \
1182 EXTRA_VAR, (ARRAY)[i].extra_init, \
1183 (ARRAY)[i].extra_test, (ARRAY)[i].extra_expected, \
1184 (ARRAY)[i].extra_ulp); \
1185 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 1186#define RUN_TEST_ffI_f1(TEST_NAME, FUNC_NAME, ARG1, ARG2, EXPECTED, \
1187 MAX_ULP, EXCEPTIONS, \
1188 EXTRA_NAME, EXTRA_VAR, EXTRA_INIT, EXTRA_TEST, \
1189 EXTRA_EXPECTED, EXTRA_ULP) \
1190 do \
1191 { \
1192 (EXTRA_VAR) = (EXTRA_INIT); \
1193 check_float (TEST_NAME, \
1194 FUNC (FUNC_NAME) (ARG1, ARG2, &(EXTRA_VAR)), \
1195 EXPECTED, MAX_ULP, EXCEPTIONS); \
1196 if (EXTRA_TEST) \
1197 check_int (EXTRA_NAME, EXTRA_VAR, EXTRA_EXPECTED, \
1198 EXTRA_ULP, 0); \
1199 } \
1200 while (0)
8cfa635a
JM		 1201#define RUN_TEST_LOOP_ffI_f1(FUNC_NAME, ARRAY, ROUNDING_MODE, \
1202 EXTRA_VAR) \
1203 IF_ROUND_INIT_ ## ROUNDING_MODE \
1204 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1205 RUN_TEST_ffI_f1 ((ARRAY)[i].test_name, FUNC_NAME, \
1206 (ARRAY)[i].arg1, (ARRAY)[i].arg2, \
1207 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
1208 (ARRAY)[i].exceptions, (ARRAY)[i].extra_name, \
1209 EXTRA_VAR, (ARRAY)[i].extra_init, \
1210 (ARRAY)[i].extra_test, \
1211 (ARRAY)[i].extra_expected, \
1212 (ARRAY)[i].extra_ulp); \
1213 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 1214#define RUN_TEST_c_c(TEST_NAME, FUNC_NAME, ARGR, ARGC, EXPR, EXPC, \
1215 MAX_ULP, EXCEPTIONS) \
1216 check_complex (TEST_NAME, \
1217 FUNC (FUNC_NAME) (BUILD_COMPLEX (ARGR, ARGC)), \
1218 BUILD_COMPLEX (EXPR, EXPC), \
1219 MAX_ULP, EXCEPTIONS)
08198877
JM		 1220#define RUN_TEST_LOOP_c_c(FUNC_NAME, ARRAY, ROUNDING_MODE) \
1221 IF_ROUND_INIT_ ## ROUNDING_MODE \
1222 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1223 RUN_TEST_c_c ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].argr, \
1224 (ARRAY)[i].argc, (ARRAY)[i].expr, (ARRAY)[i].expc, \
1225 (ARRAY)[i].max_ulp, (ARRAY)[i].exceptions); \
1226 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 1227#define RUN_TEST_cc_c(TEST_NAME, FUNC_NAME, ARG1R, ARG1C, ARG2R, ARG2C, \
1228 EXPR, EXPC, MAX_ULP, EXCEPTIONS) \
1229 check_complex (TEST_NAME, \
1230 FUNC (FUNC_NAME) (BUILD_COMPLEX (ARG1R, ARG1C), \
1231 BUILD_COMPLEX (ARG2R, ARG2C)), \
1232 BUILD_COMPLEX (EXPR, EXPC), \
1233 MAX_ULP, EXCEPTIONS)
1c38ff73
JM		 1234#define RUN_TEST_LOOP_cc_c(FUNC_NAME, ARRAY, ROUNDING_MODE) \
1235 IF_ROUND_INIT_ ## ROUNDING_MODE \
1236 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1237 RUN_TEST_cc_c ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg1r, \
1238 (ARRAY)[i].arg1c, (ARRAY)[i].arg2r, \
1239 (ARRAY)[i].arg2c, (ARRAY)[i].expr, \
1240 (ARRAY)[i].expc, (ARRAY)[i].max_ulp, \
1241 (ARRAY)[i].exceptions); \
1242 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 1243#define RUN_TEST_f_i(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1244 MAX_ULP, EXCEPTIONS) \
1245 check_int (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1246 MAX_ULP, EXCEPTIONS)
acbd839a
JM		 1247#define RUN_TEST_LOOP_f_i(FUNC_NAME, ARRAY, ROUNDING_MODE) \
1248 IF_ROUND_INIT_ ## ROUNDING_MODE \
1249 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1250 RUN_TEST_f_i ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg, \
1251 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
1252 (ARRAY)[i].exceptions); \
1253 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 1254#define RUN_TEST_f_i_tg(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1255 MAX_ULP, EXCEPTIONS) \
1256 check_int (TEST_NAME, FUNC_NAME (ARG), EXPECTED, \
1257 MAX_ULP, EXCEPTIONS)
acbd839a
JM		 1258#define RUN_TEST_LOOP_f_i_tg(FUNC_NAME, ARRAY, ROUNDING_MODE) \
1259 IF_ROUND_INIT_ ## ROUNDING_MODE \
1260 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1261 RUN_TEST_f_i_tg ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg, \
1262 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
1263 (ARRAY)[i].exceptions); \
1264 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 1265#define RUN_TEST_ff_i_tg(TEST_NAME, FUNC_NAME, ARG1, ARG2, EXPECTED, \
1266 MAX_ULP, EXCEPTIONS) \
1267 check_int (TEST_NAME, FUNC_NAME (ARG1, ARG2), EXPECTED, \
1268 MAX_ULP, EXCEPTIONS)
d369f531
JM		 1269#define RUN_TEST_LOOP_ff_i_tg(FUNC_NAME, ARRAY, ROUNDING_MODE) \
1270 IF_ROUND_INIT_ ## ROUNDING_MODE \
1271 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1272 RUN_TEST_ff_i_tg ((ARRAY)[i].test_name, FUNC_NAME, \
1273 (ARRAY)[i].arg1, (ARRAY)[i].arg2, \
1274 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
1275 (ARRAY)[i].exceptions); \
1276 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 1277#define RUN_TEST_f_b(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1278 MAX_ULP, EXCEPTIONS) \
1279 check_bool (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1280 MAX_ULP, EXCEPTIONS)
7abeee12
JM		 1281#define RUN_TEST_LOOP_f_b(FUNC_NAME, ARRAY, ROUNDING_MODE) \
1282 IF_ROUND_INIT_ ## ROUNDING_MODE \
1283 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1284 RUN_TEST_f_b ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg, \
1285 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
1286 (ARRAY)[i].exceptions); \
1287 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 1288#define RUN_TEST_f_b_tg(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1289 MAX_ULP, EXCEPTIONS) \
1290 check_bool (TEST_NAME, FUNC_NAME (ARG), EXPECTED, \
1291 MAX_ULP, EXCEPTIONS)
7abeee12
JM		 1292#define RUN_TEST_LOOP_f_b_tg(FUNC_NAME, ARRAY, ROUNDING_MODE) \
1293 IF_ROUND_INIT_ ## ROUNDING_MODE \
1294 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1295 RUN_TEST_f_b_tg ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg, \
1296 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
1297 (ARRAY)[i].exceptions); \
1298 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 1299#define RUN_TEST_f_l(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1300 MAX_ULP, EXCEPTIONS) \
1301 check_long (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1302 MAX_ULP, EXCEPTIONS)
3608cb24
JM		 1303#define RUN_TEST_LOOP_f_l(FUNC_NAME, ARRAY, ROUNDING_MODE) \
1304 IF_ROUND_INIT_ ## ROUNDING_MODE \
1305 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1306 RUN_TEST_f_l ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg, \
1307 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
1308 (ARRAY)[i].exceptions); \
1309 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 1310#define RUN_TEST_f_L(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1311 MAX_ULP, EXCEPTIONS) \
1312 check_longlong (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1313 MAX_ULP, EXCEPTIONS)
15c7c18d
JM		 1314#define RUN_TEST_LOOP_f_L(FUNC_NAME, ARRAY, ROUNDING_MODE) \
1315 IF_ROUND_INIT_ ## ROUNDING_MODE \
1316 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1317 RUN_TEST_f_L ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg, \
1318 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
1319 (ARRAY)[i].exceptions); \
1320 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 1321#define RUN_TEST_sincos(ARG, TEST_NAME_SIN, SIN_RES_VAR, EXPECTED_SIN, \
1322 MAX_ULP_SIN, TEST_NAME_COS, COS_RES_VAR, \
1323 EXPECTED_COS, MAX_ULP_COS, EXCEPTIONS) \
1324 do \
1325 { \
1326 FUNC (sincos) (ARG, &(SIN_RES_VAR), &(COS_RES_VAR)); \
1327 check_float (TEST_NAME_SIN, SIN_RES_VAR, \
1328 EXPECTED_SIN, MAX_ULP_SIN, EXCEPTIONS); \
1329 check_float (TEST_NAME_COS, COS_RES_VAR, \
1330 EXPECTED_COS, MAX_ULP_COS, 0); \
1331 } \
1332 while (0)
1333
8847214f
UD		 1334
1335
1336/* This is to prevent messages from the SVID libm emulation. */
1337int
1338matherr (struct exception *x __attribute__ ((unused)))
1339{
1340 return 1;
1341}
1342
1343
1344/****************************************************************************
1345 Tests for single functions of libm.
1346 Please keep them alphabetically sorted!
1347****************************************************************************/
1348
51df539d
JM		 1349static const struct test_f_f_data acos_test_data[] =
1350 {
1351 START_DATA (acos),
cbe8c4d3
JM		 1352 TEST_f_f (acos, plus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
1353 TEST_f_f (acos, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
51df539d
JM		 1354 TEST_f_f (acos, qnan_value, qnan_value),
1355
1356 /* |x| > 1: */
cbe8c4d3
JM		 1357 TEST_f_f (acos, 1.125L, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
1358 TEST_f_f (acos, -1.125L, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
1359 TEST_f_f (acos, max_value, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
1360 TEST_f_f (acos, -max_value, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
51df539d
JM		 1361
1362 TEST_f_f (acos, 0, M_PI_2l),
1363 TEST_f_f (acos, minus_zero, M_PI_2l),
1364 TEST_f_f (acos, 1, 0),
1365 TEST_f_f (acos, -1, M_PIl),
1366 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1367 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1368 TEST_f_f (acos, 0.75L, 0.722734247813415611178377352641333362L),
1369 TEST_f_f (acos, 2e-17L, 1.57079632679489659923132169163975144L),
1370 TEST_f_f (acos, 0.0625L, 1.50825556499840522843072005474337068L),
1371 TEST_f_f (acos, 0x0.ffffffp0L, 3.4526698471620358760324948263873649728491e-4L),
1372 TEST_f_f (acos, -0x0.ffffffp0L, 3.1412473866050770348750401337968641476999L),
1373#ifndef TEST_FLOAT
1374 TEST_f_f (acos, 0x0.ffffffff8p0L, 1.5258789062648029736620564947844627548516e-5L),
1375 TEST_f_f (acos, -0x0.ffffffff8p0L, 3.1415773948007305904329067627145550395696L),
1376 TEST_f_f (acos, 0x0.ffffffffffffp0L, 8.4293697021788088529885473244391795127130e-8L),
1377 TEST_f_f (acos, -0x0.ffffffffffffp0L, 3.1415925692960962166745548533940296398054L),
1378#endif
1379#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
1380 TEST_f_f (acos, 0x0.ffffffffffffffffp0L, 3.2927225399135962333718255320079907245059e-10L),
1381 TEST_f_f (acos, -0x0.ffffffffffffffffp0L, 3.1415926532605209844712837599423203309964L),
1382#endif
1383 END_DATA (acos)
1384 };
1385
8847214f
UD		 1386static void
1387acos_test (void)
1388{
e6d3c4a7
AJ		 1389 errno = 0;
1390 FUNC(acos) (0);
1391 if (errno == ENOSYS)
1392 /* Function not implemented. */
1393 return;
1394
8847214f 1395 START (acos);
51df539d 1396 RUN_TEST_LOOP_f_f (acos, acos_test_data, );
8847214f
UD		 1397 END (acos);
1398}
1399
5ba3cc69 1400
51df539d
JM		 1401static const struct test_f_f_data acos_tonearest_test_data[] =
1402 {
1403 START_DATA (acos_tonearest),
1404 TEST_f_f (acos, 0, M_PI_2l),
1405 TEST_f_f (acos, minus_zero, M_PI_2l),
1406 TEST_f_f (acos, 1, 0),
1407 TEST_f_f (acos, -1, M_PIl),
1408 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1409 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1410 END_DATA (acos_tonearest)
1411 };
1412
5ba3cc69
JM		 1413static void
1414acos_test_tonearest (void)
1415{
5ba3cc69
JM		 1416 errno = 0;
1417 FUNC(acos) (0);
1418 if (errno == ENOSYS)
1419 /* Function not implemented. */
1420 return;
1421
1422 START (acos_tonearest);
51df539d 1423 RUN_TEST_LOOP_f_f (acos, acos_tonearest_test_data, FE_TONEAREST);
5ba3cc69
JM		 1424 END (acos_tonearest);
1425}
1426
1427
74c57478
JM		 1428static const struct test_f_f_data acos_towardzero_test_data[] =
1429 {
1430 START_DATA (acos_towardzero),
1431 TEST_f_f (acos, 0, M_PI_2l),
1432 TEST_f_f (acos, minus_zero, M_PI_2l),
1433 TEST_f_f (acos, 1, 0),
1434 TEST_f_f (acos, -1, M_PIl),
1435 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1436 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1437 END_DATA (acos_towardzero)
1438 };
1439
5ba3cc69
JM		 1440static void
1441acos_test_towardzero (void)
1442{
5ba3cc69
JM		 1443 errno = 0;
1444 FUNC(acos) (0);
1445 if (errno == ENOSYS)
1446 /* Function not implemented. */
1447 return;
1448
1449 START (acos_towardzero);
74c57478 1450 RUN_TEST_LOOP_f_f (acos, acos_towardzero_test_data, FE_TOWARDZERO);
5ba3cc69
JM		 1451 END (acos_towardzero);
1452}
1453
1454
74c57478
JM		 1455static const struct test_f_f_data acos_downward_test_data[] =
1456 {
1457 START_DATA (acos_downward),
1458 TEST_f_f (acos, 0, M_PI_2l),
1459 TEST_f_f (acos, minus_zero, M_PI_2l),
1460 TEST_f_f (acos, 1, 0),
1461 TEST_f_f (acos, -1, M_PIl),
1462 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1463 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1464 END_DATA (acos_downward)
1465 };
1466
5ba3cc69
JM		 1467static void
1468acos_test_downward (void)
1469{
5ba3cc69
JM		 1470 errno = 0;
1471 FUNC(acos) (0);
1472 if (errno == ENOSYS)
1473 /* Function not implemented. */
1474 return;
1475
1476 START (acos_downward);
74c57478 1477 RUN_TEST_LOOP_f_f (acos, acos_downward_test_data, FE_DOWNWARD);
5ba3cc69
JM		 1478 END (acos_downward);
1479}
1480
1481
74c57478
JM		 1482static const struct test_f_f_data acos_upward_test_data[] =
1483 {
1484 START_DATA (acos_upward),
1485 TEST_f_f (acos, 0, M_PI_2l),
1486 TEST_f_f (acos, minus_zero, M_PI_2l),
1487 TEST_f_f (acos, 1, 0),
1488 TEST_f_f (acos, -1, M_PIl),
1489 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1490 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1491 END_DATA (acos_upward)
1492 };
1493
5ba3cc69
JM		 1494static void
1495acos_test_upward (void)
1496{
5ba3cc69
JM		 1497 errno = 0;
1498 FUNC(acos) (0);
1499 if (errno == ENOSYS)
1500 /* Function not implemented. */
1501 return;
1502
1503 START (acos_upward);
74c57478 1504 RUN_TEST_LOOP_f_f (acos, acos_upward_test_data, FE_UPWARD);
5ba3cc69
JM		 1505 END (acos_upward);
1506}
1507
74c57478
JM		 1508static const struct test_f_f_data acosh_test_data[] =
1509 {
1510 START_DATA (acosh),
1511 TEST_f_f (acosh, plus_infty, plus_infty),
cbe8c4d3 1512 TEST_f_f (acosh, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
74c57478
JM		 1513 TEST_f_f (acosh, qnan_value, qnan_value),
1514
1515 /* x < 1: */
cbe8c4d3
JM		 1516 TEST_f_f (acosh, -1.125L, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
1517 TEST_f_f (acosh, -max_value, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
74c57478
JM		 1518
1519 TEST_f_f (acosh, 1, 0),
1520 TEST_f_f (acosh, 7, 2.63391579384963341725009269461593689L),
1521 END_DATA (acosh)
1522 };
1523
8847214f
UD		 1524static void
1525acosh_test (void)
1526{
aaca11d8
UD		 1527 errno = 0;
1528 FUNC(acosh) (7);
1529 if (errno == ENOSYS)
1530 /* Function not implemented. */
1531 return;
1532
8847214f 1533 START (acosh);
74c57478 1534 RUN_TEST_LOOP_f_f (acosh, acosh_test_data, );
8847214f
UD		 1535 END (acosh);
1536}
1537
74c57478
JM		 1538static const struct test_f_f_data asin_test_data[] =
1539 {
1540 START_DATA (asin),
cbe8c4d3
JM		 1541 TEST_f_f (asin, plus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
1542 TEST_f_f (asin, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
74c57478
JM		 1543 TEST_f_f (asin, qnan_value, qnan_value),
1544
1545 /* asin x == qNaN plus invalid exception for |x| > 1. */
cbe8c4d3
JM		 1546 TEST_f_f (asin, 1.125L, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
1547 TEST_f_f (asin, -1.125L, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
1548 TEST_f_f (asin, max_value, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
1549 TEST_f_f (asin, -max_value, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
74c57478
JM		 1550
1551 TEST_f_f (asin, 0, 0),
1552 TEST_f_f (asin, minus_zero, minus_zero),
1553 TEST_f_f (asin, 0.5, M_PI_6l),
1554 TEST_f_f (asin, -0.5, -M_PI_6l),
1555 TEST_f_f (asin, 1.0, M_PI_2l),
1556 TEST_f_f (asin, -1.0, -M_PI_2l),
1557 TEST_f_f (asin, 0.75L, 0.848062078981481008052944338998418080L),
1558 TEST_f_f (asin, 0x0.ffffffp0L, 1.5704510598101804156437184421571127056013L),
1559 TEST_f_f (asin, -0x0.ffffffp0L, -1.5704510598101804156437184421571127056013L),
1560#ifndef TEST_FLOAT
1561 TEST_f_f (asin, 0x0.ffffffff8p0L, 1.5707810680058339712015850710748035974710L),
1562 TEST_f_f (asin, -0x0.ffffffff8p0L, -1.5707810680058339712015850710748035974710L),
1563 TEST_f_f (asin, 0x0.ffffffffffffp0L, 1.5707962425011995974432331617542781977068L),
1564 TEST_f_f (asin, -0x0.ffffffffffffp0L, -1.5707962425011995974432331617542781977068L),
1565#endif
1566#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
1567 TEST_f_f (asin, 0x0.ffffffffffffffffp0L, 1.5707963264656243652399620683025688888978L),
1568 TEST_f_f (asin, -0x0.ffffffffffffffffp0L, -1.5707963264656243652399620683025688888978L),
1569#endif
1570 END_DATA (asin)
1571 };
1572
8847214f
UD		 1573static void
1574asin_test (void)
1575{
e6d3c4a7
AJ		 1576 errno = 0;
1577 FUNC(asin) (0);
1578 if (errno == ENOSYS)
1579 /* Function not implemented. */
1580 return;
8847214f
UD		 1581
1582 START (asin);
74c57478 1583 RUN_TEST_LOOP_f_f (asin, asin_test_data, );
8847214f
UD		 1584 END (asin);
1585}
1586
5ba3cc69 1587
74c57478
JM		 1588static const struct test_f_f_data asin_tonearest_test_data[] =
1589 {
1590 START_DATA (asin_tonearest),
1591 TEST_f_f (asin, 0, 0),
1592 TEST_f_f (asin, minus_zero, minus_zero),
1593 TEST_f_f (asin, 0.5, M_PI_6l),
1594 TEST_f_f (asin, -0.5, -M_PI_6l),
1595 TEST_f_f (asin, 1.0, M_PI_2l),
1596 TEST_f_f (asin, -1.0, -M_PI_2l),
1597 END_DATA (asin_tonearest)
1598 };
1599
5ba3cc69
JM		 1600static void
1601asin_test_tonearest (void)
1602{
5ba3cc69
JM		 1603 errno = 0;
1604 FUNC(asin) (0);
1605 if (errno == ENOSYS)
1606 /* Function not implemented. */
1607 return;
1608
1609 START (asin_tonearest);
74c57478 1610 RUN_TEST_LOOP_f_f (asin, asin_tonearest_test_data, FE_TONEAREST);
5ba3cc69
JM		 1611 END (asin_tonearest);
1612}
1613
1614
74c57478
JM		 1615static const struct test_f_f_data asin_towardzero_test_data[] =
1616 {
1617 START_DATA (asin_towardzero),
1618 TEST_f_f (asin, 0, 0),
1619 TEST_f_f (asin, minus_zero, minus_zero),
1620 TEST_f_f (asin, 0.5, M_PI_6l),
1621 TEST_f_f (asin, -0.5, -M_PI_6l),
1622 TEST_f_f (asin, 1.0, M_PI_2l),
1623 TEST_f_f (asin, -1.0, -M_PI_2l),
1624 END_DATA (asin_towardzero)
1625 };
1626
5ba3cc69
JM		 1627static void
1628asin_test_towardzero (void)
1629{
5ba3cc69
JM		 1630 errno = 0;
1631 FUNC(asin) (0);
1632 if (errno == ENOSYS)
1633 /* Function not implemented. */
1634 return;
1635
1636 START (asin_towardzero);
74c57478 1637 RUN_TEST_LOOP_f_f (asin, asin_towardzero_test_data, FE_TOWARDZERO);
5ba3cc69
JM		 1638 END (asin_towardzero);
1639}
1640
1641
74c57478
JM		 1642static const struct test_f_f_data asin_downward_test_data[] =
1643 {
1644 START_DATA (asin_downward),
1645 TEST_f_f (asin, 0, 0),
1646 TEST_f_f (asin, minus_zero, minus_zero),
1647 TEST_f_f (asin, 0.5, M_PI_6l),
1648 TEST_f_f (asin, -0.5, -M_PI_6l),
1649 TEST_f_f (asin, 1.0, M_PI_2l),
1650 TEST_f_f (asin, -1.0, -M_PI_2l),
1651 END_DATA (asin_downward)
1652 };
1653
5ba3cc69
JM		 1654static void
1655asin_test_downward (void)
1656{
5ba3cc69
JM		 1657 errno = 0;
1658 FUNC(asin) (0);
1659 if (errno == ENOSYS)
1660 /* Function not implemented. */
1661 return;
1662
1663 START (asin_downward);
74c57478 1664 RUN_TEST_LOOP_f_f (asin, asin_downward_test_data, FE_DOWNWARD);
5ba3cc69
JM		 1665 END (asin_downward);
1666}
1667
1668
74c57478
JM		 1669static const struct test_f_f_data asin_upward_test_data[] =
1670 {
1671 START_DATA (asin_upward),
1672 TEST_f_f (asin, 0, 0),
1673 TEST_f_f (asin, minus_zero, minus_zero),
1674 TEST_f_f (asin, 0.5, M_PI_6l),
1675 TEST_f_f (asin, -0.5, -M_PI_6l),
1676 TEST_f_f (asin, 1.0, M_PI_2l),
1677 TEST_f_f (asin, -1.0, -M_PI_2l),
1678 END_DATA (asin_upward)
1679 };
1680
5ba3cc69
JM		 1681static void
1682asin_test_upward (void)
1683{
5ba3cc69
JM		 1684 errno = 0;
1685 FUNC(asin) (0);
1686 if (errno == ENOSYS)
1687 /* Function not implemented. */
1688 return;
1689
1690 START (asin_upward);
74c57478 1691 RUN_TEST_LOOP_f_f (asin, asin_upward_test_data, FE_UPWARD);
5ba3cc69
JM		 1692 END (asin_upward);
1693}
1694
74c57478
JM		 1695static const struct test_f_f_data asinh_test_data[] =
1696 {
1697 START_DATA (asinh),
1698 TEST_f_f (asinh, 0, 0),
1699 TEST_f_f (asinh, minus_zero, minus_zero),
1700#ifndef TEST_INLINE
1701 TEST_f_f (asinh, plus_infty, plus_infty),
1702 TEST_f_f (asinh, minus_infty, minus_infty),
1703#endif
1704 TEST_f_f (asinh, qnan_value, qnan_value),
1705 TEST_f_f (asinh, 0.75L, 0.693147180559945309417232121458176568L),
1706 END_DATA (asinh)
1707 };
1708
8847214f
UD		 1709static void
1710asinh_test (void)
1711{
aaca11d8 1712 errno = 0;
3c6cad26 1713 FUNC(asinh) (0.7L);
aaca11d8
UD		 1714 if (errno == ENOSYS)
1715 /* Function not implemented. */
1716 return;
1717
8847214f 1718 START (asinh);
74c57478 1719 RUN_TEST_LOOP_f_f (asinh, asinh_test_data, );
8847214f
UD		 1720 END (asinh);
1721}
1722
74c57478
JM		 1723static const struct test_f_f_data atan_test_data[] =
1724 {
1725 START_DATA (atan),
1726 TEST_f_f (atan, 0, 0),
1727 TEST_f_f (atan, minus_zero, minus_zero),
1728
1729 TEST_f_f (atan, plus_infty, M_PI_2l),
1730 TEST_f_f (atan, minus_infty, -M_PI_2l),
1731 TEST_f_f (atan, qnan_value, qnan_value),
1732 TEST_f_f (atan, max_value, M_PI_2l),
1733 TEST_f_f (atan, -max_value, -M_PI_2l),
1734
1735 TEST_f_f (atan, 1, M_PI_4l),
1736 TEST_f_f (atan, -1, -M_PI_4l),
1737
1738 TEST_f_f (atan, 0.75L, 0.643501108793284386802809228717322638L),
1739
1740 TEST_f_f (atan, 0x1p-100L, 0x1p-100L),
1741#ifndef TEST_FLOAT
1742 TEST_f_f (atan, 0x1p-600L, 0x1p-600L),
1743#endif
1744#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
1745 TEST_f_f (atan, 0x1p-10000L, 0x1p-10000L),
1746#endif
1747 END_DATA (atan)
1748 };
1749
8847214f
UD		 1750static void
1751atan_test (void)
1752{
e6d3c4a7
AJ		 1753 errno = 0;
1754 FUNC(atan) (0);
1755 if (errno == ENOSYS)
1756 /* Function not implemented. */
1757 return;
8847214f
UD		 1758
1759 START (atan);
74c57478 1760 RUN_TEST_LOOP_f_f (atan, atan_test_data, );
8847214f
UD		 1761 END (atan);
1762}
1763
1764
1765
74c57478
JM		 1766static const struct test_f_f_data atanh_test_data[] =
1767 {
1768 START_DATA (atanh),
1769 TEST_f_f (atanh, 0, 0),
1770 TEST_f_f (atanh, minus_zero, minus_zero),
1771
1772 TEST_f_f (atanh, 1, plus_infty, DIVIDE_BY_ZERO_EXCEPTION),
1773 TEST_f_f (atanh, -1, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
1774 TEST_f_f (atanh, qnan_value, qnan_value),
1775
1776 /* atanh (x) == qNaN plus invalid exception if |x| > 1. */
cbe8c4d3
JM		 1777 TEST_f_f (atanh, 1.125L, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
1778 TEST_f_f (atanh, -1.125L, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
1779 TEST_f_f (atanh, max_value, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
1780 TEST_f_f (atanh, -max_value, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
74c57478
JM		 1781
1782 TEST_f_f (atanh, 0.75L, 0.972955074527656652552676371721589865L),
1783 END_DATA (atanh)
1784 };
1785
8847214f
UD		 1786static void
1787atanh_test (void)
1788{
aaca11d8 1789 errno = 0;
3c6cad26 1790 FUNC(atanh) (0.7L);
aaca11d8
UD		 1791 if (errno == ENOSYS)
1792 /* Function not implemented. */
1793 return;
8847214f
UD		 1794
1795 START (atanh);
74c57478 1796 RUN_TEST_LOOP_f_f (atanh, atanh_test_data, );
8847214f
UD		 1797 END (atanh);
1798}
1799
601a3a5f
JM		 1800static const struct test_ff_f_data atan2_test_data[] =
1801 {
1802 START_DATA (atan2),
1803 /* atan2 (0,x) == 0 for x > 0. */
1804 TEST_ff_f (atan2, 0, 1, 0),
8847214f 1805
601a3a5f
JM		 1806 /* atan2 (-0,x) == -0 for x > 0. */
1807 TEST_ff_f (atan2, minus_zero, 1, minus_zero),
8847214f 1808
601a3a5f
JM		 1809 TEST_ff_f (atan2, 0, 0, 0),
1810 TEST_ff_f (atan2, minus_zero, 0, minus_zero),
8847214f 1811
601a3a5f
JM		 1812 /* atan2 (+0,x) == +pi for x < 0. */
1813 TEST_ff_f (atan2, 0, -1, M_PIl),
8847214f 1814
601a3a5f
JM		 1815 /* atan2 (-0,x) == -pi for x < 0. */
1816 TEST_ff_f (atan2, minus_zero, -1, -M_PIl),
8847214f 1817
601a3a5f
JM		 1818 TEST_ff_f (atan2, 0, minus_zero, M_PIl),
1819 TEST_ff_f (atan2, minus_zero, minus_zero, -M_PIl),
8847214f 1820
601a3a5f
JM		 1821 /* atan2 (y,+0) == pi/2 for y > 0. */
1822 TEST_ff_f (atan2, 1, 0, M_PI_2l),
8847214f 1823
601a3a5f
JM		 1824 /* atan2 (y,-0) == pi/2 for y > 0. */
1825 TEST_ff_f (atan2, 1, minus_zero, M_PI_2l),
8847214f 1826
601a3a5f
JM		 1827 /* atan2 (y,+0) == -pi/2 for y < 0. */
1828 TEST_ff_f (atan2, -1, 0, -M_PI_2l),
8847214f 1829
601a3a5f
JM		 1830 /* atan2 (y,-0) == -pi/2 for y < 0. */
1831 TEST_ff_f (atan2, -1, minus_zero, -M_PI_2l),
8847214f 1832
601a3a5f
JM		 1833 /* atan2 (y,inf) == +0 for finite y > 0. */
1834 TEST_ff_f (atan2, 1, plus_infty, 0),
8847214f 1835
601a3a5f
JM		 1836 /* atan2 (y,inf) == -0 for finite y < 0. */
1837 TEST_ff_f (atan2, -1, plus_infty, minus_zero),
8847214f 1838
601a3a5f
JM		 1839 /* atan2(+inf, x) == pi/2 for finite x. */
1840 TEST_ff_f (atan2, plus_infty, -1, M_PI_2l),
8847214f 1841
601a3a5f
JM		 1842 /* atan2(-inf, x) == -pi/2 for finite x. */
1843 TEST_ff_f (atan2, minus_infty, 1, -M_PI_2l),
8847214f 1844
601a3a5f
JM		 1845 /* atan2 (y,-inf) == +pi for finite y > 0. */
1846 TEST_ff_f (atan2, 1, minus_infty, M_PIl),
8847214f 1847
601a3a5f
JM		 1848 /* atan2 (y,-inf) == -pi for finite y < 0. */
1849 TEST_ff_f (atan2, -1, minus_infty, -M_PIl),
8847214f 1850
601a3a5f
JM		 1851 TEST_ff_f (atan2, plus_infty, plus_infty, M_PI_4l),
1852 TEST_ff_f (atan2, minus_infty, plus_infty, -M_PI_4l),
1853 TEST_ff_f (atan2, plus_infty, minus_infty, M_PI_34l),
1854 TEST_ff_f (atan2, minus_infty, minus_infty, -M_PI_34l),
1855 TEST_ff_f (atan2, qnan_value, qnan_value, qnan_value),
8847214f 1856
601a3a5f 1857 TEST_ff_f (atan2, max_value, max_value, M_PI_4l),
7726d6a9 1858
601a3a5f
JM		 1859 TEST_ff_f (atan2, max_value, min_value, M_PI_2l),
1860 TEST_ff_f (atan2, -max_value, -min_value, -M_PI_2l),
6d33cc9d 1861
601a3a5f
JM		 1862 TEST_ff_f (atan2, 0.75L, 1, 0.643501108793284386802809228717322638L),
1863 TEST_ff_f (atan2, -0.75L, 1.0L, -0.643501108793284386802809228717322638L),
1864 TEST_ff_f (atan2, 0.75L, -1.0L, 2.49809154479650885165983415456218025L),
1865 TEST_ff_f (atan2, -0.75L, -1.0L, -2.49809154479650885165983415456218025L),
1866 TEST_ff_f (atan2, 0.390625L, .00029L, 1.57005392693128974780151246612928941L),
1867 TEST_ff_f (atan2, 1.390625L, 0.9296875L, 0.981498387184244311516296577615519772L),
8847214f 1868
601a3a5f 1869 TEST_ff_f (atan2, -0.00756827042671106339L, -.001792735857538728036L, -1.80338464113663849327153994379639112L),
16a0e2ec 1870#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
601a3a5f 1871 TEST_ff_f (atan2, 0x1.00000000000001p0L, 0x1.00000000000001p0L, M_PI_4l),
16a0e2ec 1872#endif
601a3a5f
JM		 1873 END_DATA (atan2)
1874 };
bb3f4825 1875
601a3a5f
JM		 1876static void
1877atan2_test (void)
1878{
1879 errno = 0;
1880 FUNC(atan2) (-0, 1);
1881 if (errno == ENOSYS)
1882 /* Function not implemented. */
1883 return;
1884
1885 START (atan2);
1886 RUN_TEST_LOOP_ff_f (atan2, atan2_test_data, );
8847214f
UD		 1887 END (atan2);
1888}
1889
6a1992e2
JM		 1890static const struct test_c_f_data cabs_test_data[] =
1891 {
1892 START_DATA (cabs);
1893 /* cabs (x + iy) is specified as hypot (x,y) */
1894
1895 /* cabs (+inf + i x) == +inf. */
1896 TEST_c_f (cabs, plus_infty, 1.0, plus_infty),
1897 /* cabs (-inf + i x) == +inf. */
1898 TEST_c_f (cabs, minus_infty, 1.0, plus_infty),
1899
1900 TEST_c_f (cabs, minus_infty, qnan_value, plus_infty),
1901 TEST_c_f (cabs, minus_infty, qnan_value, plus_infty),
1902
1903 TEST_c_f (cabs, qnan_value, qnan_value, qnan_value),
1904
1905 /* cabs (x,y) == cabs (y,x). */
1906 TEST_c_f (cabs, 0.75L, 12.390625L, 12.4133028598606664302388810868156657L),
1907 /* cabs (x,y) == cabs (-x,y). */
1908 TEST_c_f (cabs, -12.390625L, 0.75L, 12.4133028598606664302388810868156657L),
1909 /* cabs (x,y) == cabs (-y,x). */
1910 TEST_c_f (cabs, -0.75L, 12.390625L, 12.4133028598606664302388810868156657L),
1911 /* cabs (x,y) == cabs (-x,-y). */
1912 TEST_c_f (cabs, -12.390625L, -0.75L, 12.4133028598606664302388810868156657L),
1913 /* cabs (x,y) == cabs (-y,-x). */
1914 TEST_c_f (cabs, -0.75L, -12.390625L, 12.4133028598606664302388810868156657L),
1915 /* cabs (x,0) == fabs (x). */
1916 TEST_c_f (cabs, -0.75L, 0, 0.75L),
1917 TEST_c_f (cabs, 0.75L, 0, 0.75L),
1918 TEST_c_f (cabs, -1.0L, 0, 1.0L),
1919 TEST_c_f (cabs, 1.0L, 0, 1.0L),
1920 TEST_c_f (cabs, -5.7e7L, 0, 5.7e7L),
1921 TEST_c_f (cabs, 5.7e7L, 0, 5.7e7L),
1922
1923 TEST_c_f (cabs, 0.75L, 1.25L, 1.45773797371132511771853821938639577L),
1924 END_DATA (cabs);
1925 };
1926
8847214f
UD		 1927static void
1928cabs_test (void)
1929{
aaca11d8 1930 errno = 0;
3c6cad26 1931 FUNC(cabs) (BUILD_COMPLEX (0.7L, 12.4L));
aaca11d8
UD		 1932 if (errno == ENOSYS)
1933 /* Function not implemented. */
1934 return;
1935
8847214f 1936 START (cabs);
6a1992e2 1937 RUN_TEST_LOOP_c_f (cabs, cabs_test_data, );
8847214f
UD		 1938 END (cabs);
1939}
1940
2550dfe9 1941
08198877
JM		 1942static const struct test_c_c_data cacos_test_data[] =
1943 {
1944 START_DATA (cacos),
1945 TEST_c_c (cacos, 0, 0, M_PI_2l, minus_zero),
1946 TEST_c_c (cacos, minus_zero, 0, M_PI_2l, minus_zero),
1947 TEST_c_c (cacos, minus_zero, minus_zero, M_PI_2l, 0.0),
1948 TEST_c_c (cacos, 0, minus_zero, M_PI_2l, 0.0),
1949
1950 TEST_c_c (cacos, minus_infty, plus_infty, M_PI_34l, minus_infty),
1951 TEST_c_c (cacos, minus_infty, minus_infty, M_PI_34l, plus_infty),
1952
1953 TEST_c_c (cacos, plus_infty, plus_infty, M_PI_4l, minus_infty),
1954 TEST_c_c (cacos, plus_infty, minus_infty, M_PI_4l, plus_infty),
1955
1956 TEST_c_c (cacos, -10.0, plus_infty, M_PI_2l, minus_infty),
1957 TEST_c_c (cacos, -10.0, minus_infty, M_PI_2l, plus_infty),
1958 TEST_c_c (cacos, 0, plus_infty, M_PI_2l, minus_infty),
1959 TEST_c_c (cacos, 0, minus_infty, M_PI_2l, plus_infty),
1960 TEST_c_c (cacos, 0.1L, plus_infty, M_PI_2l, minus_infty),
1961 TEST_c_c (cacos, 0.1L, minus_infty, M_PI_2l, plus_infty),
1962
1963 TEST_c_c (cacos, minus_infty, 0, M_PIl, minus_infty),
1964 TEST_c_c (cacos, minus_infty, minus_zero, M_PIl, plus_infty),
1965 TEST_c_c (cacos, minus_infty, 100, M_PIl, minus_infty),
1966 TEST_c_c (cacos, minus_infty, -100, M_PIl, plus_infty),
1967
1968 TEST_c_c (cacos, plus_infty, 0, 0.0, minus_infty),
1969 TEST_c_c (cacos, plus_infty, minus_zero, 0.0, plus_infty),
1970 TEST_c_c (cacos, plus_infty, 0.5, 0.0, minus_infty),
1971 TEST_c_c (cacos, plus_infty, -0.5, 0.0, plus_infty),
1972
1973 TEST_c_c (cacos, plus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
1974 TEST_c_c (cacos, minus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
1975
1976 TEST_c_c (cacos, 0, qnan_value, M_PI_2l, qnan_value),
1977 TEST_c_c (cacos, minus_zero, qnan_value, M_PI_2l, qnan_value),
1978
1979 TEST_c_c (cacos, qnan_value, plus_infty, qnan_value, minus_infty),
1980 TEST_c_c (cacos, qnan_value, minus_infty, qnan_value, plus_infty),
1981
1982 TEST_c_c (cacos, 10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
1983 TEST_c_c (cacos, -10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
1984
1985 TEST_c_c (cacos, qnan_value, 0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
1986 TEST_c_c (cacos, qnan_value, -0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
1987
1988 TEST_c_c (cacos, qnan_value, qnan_value, qnan_value, qnan_value),
1989
1990 TEST_c_c (cacos, plus_zero, -1.5L, M_PI_2l, 1.194763217287109304111930828519090523536L),
1991 TEST_c_c (cacos, minus_zero, -1.5L, M_PI_2l, 1.194763217287109304111930828519090523536L),
1992 TEST_c_c (cacos, plus_zero, -1.0L, M_PI_2l, 0.8813735870195430252326093249797923090282L),
1993 TEST_c_c (cacos, minus_zero, -1.0L, M_PI_2l, 0.8813735870195430252326093249797923090282L),
1994 TEST_c_c (cacos, plus_zero, -0.5L, M_PI_2l, 0.4812118250596034474977589134243684231352L),
1995 TEST_c_c (cacos, minus_zero, -0.5L, M_PI_2l, 0.4812118250596034474977589134243684231352L),
1996 TEST_c_c (cacos, plus_zero, 0.5L, M_PI_2l, -0.4812118250596034474977589134243684231352L),
1997 TEST_c_c (cacos, minus_zero, 0.5L, M_PI_2l, -0.4812118250596034474977589134243684231352L),
1998 TEST_c_c (cacos, plus_zero, 1.0L, M_PI_2l, -0.8813735870195430252326093249797923090282L),
1999 TEST_c_c (cacos, minus_zero, 1.0L, M_PI_2l, -0.8813735870195430252326093249797923090282L),
2000 TEST_c_c (cacos, plus_zero, 1.5L, M_PI_2l, -1.194763217287109304111930828519090523536L),
2001 TEST_c_c (cacos, minus_zero, 1.5L, M_PI_2l, -1.194763217287109304111930828519090523536L),
2002
2003 TEST_c_c (cacos, -1.5L, plus_zero, M_PIl, -0.9624236501192068949955178268487368462704L),
2004 TEST_c_c (cacos, -1.5L, minus_zero, M_PIl, 0.9624236501192068949955178268487368462704L),
2005 TEST_c_c (cacos, -1.0L, plus_zero, M_PIl, minus_zero),
2006 TEST_c_c (cacos, -1.0L, minus_zero, M_PIl, plus_zero),
2007 TEST_c_c (cacos, -0.5L, plus_zero, 2.094395102393195492308428922186335256131L, minus_zero),
2008 TEST_c_c (cacos, -0.5L, minus_zero, 2.094395102393195492308428922186335256131L, plus_zero),
2009 TEST_c_c (cacos, 0.5L, plus_zero, 1.047197551196597746154214461093167628066L, minus_zero),
2010 TEST_c_c (cacos, 0.5L, minus_zero, 1.047197551196597746154214461093167628066L, plus_zero),
2011 TEST_c_c (cacos, 1.0L, plus_zero, plus_zero, minus_zero),
2012 TEST_c_c (cacos, 1.0L, minus_zero, plus_zero, plus_zero),
2013 TEST_c_c (cacos, 1.5L, plus_zero, plus_zero, -0.9624236501192068949955178268487368462704L),
2014 TEST_c_c (cacos, 1.5L, minus_zero, plus_zero, 0.9624236501192068949955178268487368462704L),
2015
2016 TEST_c_c (cacos, 0x1p50L, 1.0L, 8.881784197001252323389053344727730248720e-16L, -3.535050620855721078027883819436720218708e1L),
2017 TEST_c_c (cacos, 0x1p50L, -1.0L, 8.881784197001252323389053344727730248720e-16L, 3.535050620855721078027883819436720218708e1L),
2018 TEST_c_c (cacos, -0x1p50L, 1.0L, 3.141592653589792350284223683154270545292L, -3.535050620855721078027883819436720218708e1L),
2019 TEST_c_c (cacos, -0x1p50L, -1.0L, 3.141592653589792350284223683154270545292L, 3.535050620855721078027883819436720218708e1L),
2020 TEST_c_c (cacos, 1.0L, 0x1p50L, 1.570796326794895731052901991514519103193L, -3.535050620855721078027883819436759661753e1L),
2021 TEST_c_c (cacos, -1.0L, 0x1p50L, 1.570796326794897507409741391764983781004L, -3.535050620855721078027883819436759661753e1L),
2022 TEST_c_c (cacos, 1.0L, -0x1p50L, 1.570796326794895731052901991514519103193L, 3.535050620855721078027883819436759661753e1L),
2023 TEST_c_c (cacos, -1.0L, -0x1p50L, 1.570796326794897507409741391764983781004L, 3.535050620855721078027883819436759661753e1L),
728d7b43 2024#ifndef TEST_FLOAT
08198877
JM		 2025 TEST_c_c (cacos, 0x1p500L, 1.0L, 3.054936363499604682051979393213617699789e-151L, -3.472667374605326000180332928505464606058e2L),
2026 TEST_c_c (cacos, 0x1p500L, -1.0L, 3.054936363499604682051979393213617699789e-151L, 3.472667374605326000180332928505464606058e2L),
2027 TEST_c_c (cacos, -0x1p500L, 1.0L, 3.141592653589793238462643383279502884197L, -3.472667374605326000180332928505464606058e2L),
2028 TEST_c_c (cacos, -0x1p500L, -1.0L, 3.141592653589793238462643383279502884197L, 3.472667374605326000180332928505464606058e2L),
2029 TEST_c_c (cacos, 1.0L, 0x1p500L, 1.570796326794896619231321691639751442099L, -3.472667374605326000180332928505464606058e2L),
2030 TEST_c_c (cacos, -1.0L, 0x1p500L, 1.570796326794896619231321691639751442099L, -3.472667374605326000180332928505464606058e2L),
2031 TEST_c_c (cacos, 1.0L, -0x1p500L, 1.570796326794896619231321691639751442099L, 3.472667374605326000180332928505464606058e2L),
2032 TEST_c_c (cacos, -1.0L, -0x1p500L, 1.570796326794896619231321691639751442099L, 3.472667374605326000180332928505464606058e2L),
728d7b43
JM		 2033#endif
2034#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 2035 TEST_c_c (cacos, 0x1p5000L, 1.0L, 7.079811261048172892385615158694057552948e-1506L, -3.466429049980286492395577839412341016946e3L),
2036 TEST_c_c (cacos, 0x1p5000L, -1.0L, 7.079811261048172892385615158694057552948e-1506L, 3.466429049980286492395577839412341016946e3L),
2037 TEST_c_c (cacos, -0x1p5000L, 1.0L, 3.141592653589793238462643383279502884197L, -3.466429049980286492395577839412341016946e3L),
2038 TEST_c_c (cacos, -0x1p5000L, -1.0L, 3.141592653589793238462643383279502884197L, 3.466429049980286492395577839412341016946e3L),
2039 TEST_c_c (cacos, 1.0L, 0x1p5000L, 1.570796326794896619231321691639751442099L, -3.466429049980286492395577839412341016946e3L),
2040 TEST_c_c (cacos, -1.0L, 0x1p5000L, 1.570796326794896619231321691639751442099L, -3.466429049980286492395577839412341016946e3L),
2041 TEST_c_c (cacos, 1.0L, -0x1p5000L, 1.570796326794896619231321691639751442099L, 3.466429049980286492395577839412341016946e3L),
2042 TEST_c_c (cacos, -1.0L, -0x1p5000L, 1.570796326794896619231321691639751442099L, 3.466429049980286492395577839412341016946e3L),
728d7b43
JM		 2043#endif
2044
08198877 2045 TEST_c_c (cacos, 0x1.fp127L, 0x1.fp127L, 7.853981633974483096156608458198757210493e-1L, -8.973081118419833726837456344608533993585e1L),
728d7b43 2046#ifndef TEST_FLOAT
08198877 2047 TEST_c_c (cacos, 0x1.fp1023L, 0x1.fp1023L, 7.853981633974483096156608458198757210493e-1L, -7.107906849659093345062145442726115449315e2L),
728d7b43
JM		 2048#endif
2049#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 2050 TEST_c_c (cacos, 0x1.fp16383L, 0x1.fp16383L, 7.853981633974483096156608458198757210493e-1L, -1.135753137836666928715489992987020363057e4L),
728d7b43
JM		 2051#endif
2052
08198877
JM		 2053 TEST_c_c (cacos, 0x1.fp-129L, 1.5L, 1.570796326794896619231321691639751442097L, -1.194763217287109304111930828519090523536L),
2054 TEST_c_c (cacos, 0x1.fp-129L, -1.5L, 1.570796326794896619231321691639751442097L, 1.194763217287109304111930828519090523536L),
2055 TEST_c_c (cacos, -0x1.fp-129L, 1.5L, 1.570796326794896619231321691639751442100L, -1.194763217287109304111930828519090523536L),
2056 TEST_c_c (cacos, -0x1.fp-129L, -1.5L, 1.570796326794896619231321691639751442100L, 1.194763217287109304111930828519090523536L),
2057 TEST_c_c (cacos, 1.5L, 0x1.fp-129L, 2.546345110742945032959687790021055102355e-39L, -9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION_FLOAT),
2058 TEST_c_c (cacos, -1.5L, 0x1.fp-129L, 3.141592653589793238462643383279502884195L, -9.624236501192068949955178268487368462704e-1L),
2059 TEST_c_c (cacos, 1.5L, -0x1.fp-129L, 2.546345110742945032959687790021055102355e-39L, 9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION_FLOAT),
2060 TEST_c_c (cacos, -1.5L, -0x1.fp-129L, 3.141592653589793238462643383279502884195L, 9.624236501192068949955178268487368462704e-1L),
8cf28c5e 2061#ifndef TEST_FLOAT
08198877
JM		 2062 TEST_c_c (cacos, 0x1.fp-1025L, 1.5L, 1.570796326794896619231321691639751442099L, -1.194763217287109304111930828519090523536L),
2063 TEST_c_c (cacos, 0x1.fp-1025L, -1.5L, 1.570796326794896619231321691639751442099L, 1.194763217287109304111930828519090523536L),
2064 TEST_c_c (cacos, -0x1.fp-1025L, 1.5L, 1.570796326794896619231321691639751442099L, -1.194763217287109304111930828519090523536L),
2065 TEST_c_c (cacos, -0x1.fp-1025L, -1.5L, 1.570796326794896619231321691639751442099L, 1.194763217287109304111930828519090523536L),
2066 TEST_c_c (cacos, 1.5L, 0x1.fp-1025L, 4.819934639999230680322935210539402497827e-309L, -9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
2067 TEST_c_c (cacos, -1.5L, 0x1.fp-1025L, 3.141592653589793238462643383279502884197L, -9.624236501192068949955178268487368462704e-1L),
2068 TEST_c_c (cacos, 1.5L, -0x1.fp-1025L, 4.819934639999230680322935210539402497827e-309L, 9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
2069 TEST_c_c (cacos, -1.5L, -0x1.fp-1025L, 3.141592653589793238462643383279502884197L, 9.624236501192068949955178268487368462704e-1L),
8cf28c5e
JM		 2070#endif
2071#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2072 TEST_c_c (cacos, 0x1.fp-16385L, 1.5L, 1.570796326794896619231321691639751442099L, -1.194763217287109304111930828519090523536L),
2073 TEST_c_c (cacos, 0x1.fp-16385L, -1.5L, 1.570796326794896619231321691639751442099L, 1.194763217287109304111930828519090523536L),
2074 TEST_c_c (cacos, -0x1.fp-16385L, 1.5L, 1.570796326794896619231321691639751442099L, -1.194763217287109304111930828519090523536L),
2075 TEST_c_c (cacos, -0x1.fp-16385L, -1.5L, 1.570796326794896619231321691639751442099L, 1.194763217287109304111930828519090523536L),
2076 TEST_c_c (cacos, 1.5L, 0x1.fp-16385L, 7.282957076134209141226696333885150260319e-4933L, -9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION),
2077 TEST_c_c (cacos, -1.5L, 0x1.fp-16385L, 3.141592653589793238462643383279502884197L, -9.624236501192068949955178268487368462704e-1L),
2078 TEST_c_c (cacos, 1.5L, -0x1.fp-16385L, 7.282957076134209141226696333885150260319e-4933L, 9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION),
2079 TEST_c_c (cacos, -1.5L, -0x1.fp-16385L, 3.141592653589793238462643383279502884197L, 9.624236501192068949955178268487368462704e-1L),
2080#endif
2081
2082 TEST_c_c (cacos, 0.5L, 1.0L, 1.221357263937683325603909865564381489366L, -9.261330313501824245501244453057873152694e-1L),
2083 TEST_c_c (cacos, 0.5L, -1.0L, 1.221357263937683325603909865564381489366L, 9.261330313501824245501244453057873152694e-1L),
2084 TEST_c_c (cacos, -0.5L, 1.0L, 1.920235389652109912858733517715121394831L, -9.261330313501824245501244453057873152694e-1L),
2085 TEST_c_c (cacos, -0.5L, -1.0L, 1.920235389652109912858733517715121394831L, 9.261330313501824245501244453057873152694e-1L),
2086 TEST_c_c (cacos, 1.0L, 0.5L, 6.748888455860063801646649673121744318756e-1L, -7.328576759736452608886724437653071523305e-1L),
2087 TEST_c_c (cacos, -1.0L, 0.5L, 2.466703808003786858297978415967328452322L, -7.328576759736452608886724437653071523305e-1L),
2088 TEST_c_c (cacos, 1.0L, -0.5L, 6.748888455860063801646649673121744318756e-1L, 7.328576759736452608886724437653071523305e-1L),
2089 TEST_c_c (cacos, -1.0L, -0.5L, 2.466703808003786858297978415967328452322L, 7.328576759736452608886724437653071523305e-1L),
2090 TEST_c_c (cacos, 0.25L, 1.0L, 1.394493894017929688812643125003661339452L, -8.924633639033482359562124741744951972772e-1L),
2091 TEST_c_c (cacos, 0.25L, -1.0L, 1.394493894017929688812643125003661339452L, 8.924633639033482359562124741744951972772e-1L),
2092 TEST_c_c (cacos, -0.25L, 1.0L, 1.747098759571863549650000258275841544745L, -8.924633639033482359562124741744951972772e-1L),
2093 TEST_c_c (cacos, -0.25L, -1.0L, 1.747098759571863549650000258275841544745L, 8.924633639033482359562124741744951972772e-1L),
2094 TEST_c_c (cacos, 1.0L, 0.25L, 4.890443302710802929202843732146540079124e-1L, -5.097911466811016354623559941115413499164e-1L),
2095 TEST_c_c (cacos, -1.0L, 0.25L, 2.652548323318712945542359010064848876285L, -5.097911466811016354623559941115413499164e-1L),
2096 TEST_c_c (cacos, 1.0L, -0.25L, 4.890443302710802929202843732146540079124e-1L, 5.097911466811016354623559941115413499164e-1L),
2097 TEST_c_c (cacos, -1.0L, -0.25L, 2.652548323318712945542359010064848876285L, 5.097911466811016354623559941115413499164e-1L),
2098 TEST_c_c (cacos, 0x1.fp-10L, 1.0L, 1.569458417435338878318763342108699202986L, -8.813742198809567991336704287826445879025e-1L),
2099 TEST_c_c (cacos, 0x1.fp-10L, -1.0L, 1.569458417435338878318763342108699202986L, 8.813742198809567991336704287826445879025e-1L),
2100 TEST_c_c (cacos, -0x1.fp-10L, 1.0L, 1.572134236154454360143880041170803681211L, -8.813742198809567991336704287826445879025e-1L),
2101 TEST_c_c (cacos, -0x1.fp-10L, -1.0L, 1.572134236154454360143880041170803681211L, 8.813742198809567991336704287826445879025e-1L),
2102 TEST_c_c (cacos, 1.0L, 0x1.fp-10L, 4.349129763101882771258049954181971959031e-2L, -4.350501469856803800217957402220976497152e-2L),
2103 TEST_c_c (cacos, -1.0L, 0x1.fp-10L, 3.098101355958774410750062883737683164607L, -4.350501469856803800217957402220976497152e-2L),
2104 TEST_c_c (cacos, 1.0L, -0x1.fp-10L, 4.349129763101882771258049954181971959031e-2L, 4.350501469856803800217957402220976497152e-2L),
2105 TEST_c_c (cacos, -1.0L, -0x1.fp-10L, 3.098101355958774410750062883737683164607L, 4.350501469856803800217957402220976497152e-2L),
2106 TEST_c_c (cacos, 0x1.fp-30L, 1.0L, 1.570796325518966635014803151387033957091L, -8.813735870195430258081932989769495326854e-1L),
2107 TEST_c_c (cacos, 0x1.fp-30L, -1.0L, 1.570796325518966635014803151387033957091L, 8.813735870195430258081932989769495326854e-1L),
2108 TEST_c_c (cacos, -0x1.fp-30L, 1.0L, 1.570796328070826603447840231892468927106L, -8.813735870195430258081932989769495326854e-1L),
2109 TEST_c_c (cacos, -0x1.fp-30L, -1.0L, 1.570796328070826603447840231892468927106L, 8.813735870195430258081932989769495326854e-1L),
2110 TEST_c_c (cacos, 1.0L, 0x1.fp-30L, 4.247867097467650115899790787875186617316e-5L, -4.247867098745151888768727039216644758847e-5L),
2111 TEST_c_c (cacos, -1.0L, 0x1.fp-30L, 3.141550174918818561961484385371624132331L, -4.247867098745151888768727039216644758847e-5L),
2112 TEST_c_c (cacos, 1.0L, -0x1.fp-30L, 4.247867097467650115899790787875186617316e-5L, 4.247867098745151888768727039216644758847e-5L),
2113 TEST_c_c (cacos, -1.0L, -0x1.fp-30L, 3.141550174918818561961484385371624132331L, 4.247867098745151888768727039216644758847e-5L),
2114 TEST_c_c (cacos, 0x1.fp-100L, 1.0L, 1.570796326794896619231321691638670687364L, -8.813735870195430252326093249797923090282e-1L),
2115 TEST_c_c (cacos, 0x1.fp-100L, -1.0L, 1.570796326794896619231321691638670687364L, 8.813735870195430252326093249797923090282e-1L),
2116 TEST_c_c (cacos, -0x1.fp-100L, 1.0L, 1.570796326794896619231321691640832196834L, -8.813735870195430252326093249797923090282e-1L),
2117 TEST_c_c (cacos, -0x1.fp-100L, -1.0L, 1.570796326794896619231321691640832196834L, 8.813735870195430252326093249797923090282e-1L),
2118 TEST_c_c (cacos, 1.0L, 0x1.fp-100L, 1.236292038260260888664514866456887257525e-15L, -1.236292038260260888664514866457202186027e-15L),
2119 TEST_c_c (cacos, -1.0L, 0x1.fp-100L, 3.141592653589792002170605123018614219682L, -1.236292038260260888664514866457202186027e-15L),
2120 TEST_c_c (cacos, 1.0L, -0x1.fp-100L, 1.236292038260260888664514866456887257525e-15L, 1.236292038260260888664514866457202186027e-15L),
2121 TEST_c_c (cacos, -1.0L, -0x1.fp-100L, 3.141592653589792002170605123018614219682L, 1.236292038260260888664514866457202186027e-15L),
2122 TEST_c_c (cacos, 0x1.fp-129L, 1.0L, 1.570796326794896619231321691639751442097L, -8.813735870195430252326093249797923090282e-1L),
2123 TEST_c_c (cacos, 0x1.fp-129L, -1.0L, 1.570796326794896619231321691639751442097L, 8.813735870195430252326093249797923090282e-1L),
2124 TEST_c_c (cacos, -0x1.fp-129L, 1.0L, 1.570796326794896619231321691639751442101L, -8.813735870195430252326093249797923090282e-1L),
2125 TEST_c_c (cacos, -0x1.fp-129L, -1.0L, 1.570796326794896619231321691639751442101L, 8.813735870195430252326093249797923090282e-1L),
2126 TEST_c_c (cacos, 1.0L, 0x1.fp-129L, 5.335635276982233498398987585285818977930e-20L, -5.335635276982233498398987585285818977933e-20L),
2127 TEST_c_c (cacos, -1.0L, 0x1.fp-129L, 3.141592653589793238409287030509680549213L, -5.335635276982233498398987585285818977933e-20L),
2128 TEST_c_c (cacos, 1.0L, -0x1.fp-129L, 5.335635276982233498398987585285818977930e-20L, 5.335635276982233498398987585285818977933e-20L),
2129 TEST_c_c (cacos, -1.0L, -0x1.fp-129L, 3.141592653589793238409287030509680549213L, 5.335635276982233498398987585285818977933e-20L),
0a1b2ae6 2130#ifndef TEST_FLOAT
08198877
JM		 2131 TEST_c_c (cacos, 0x1.fp-1000L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
2132 TEST_c_c (cacos, 0x1.fp-1000L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
2133 TEST_c_c (cacos, -0x1.fp-1000L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
2134 TEST_c_c (cacos, -0x1.fp-1000L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
2135 TEST_c_c (cacos, 1.0L, 0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, -4.252291453851660175550490409247739011867e-151L),
2136 TEST_c_c (cacos, -1.0L, 0x1.fp-1000L, 3.141592653589793238462643383279502884197L, -4.252291453851660175550490409247739011867e-151L),
2137 TEST_c_c (cacos, 1.0L, -0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, 4.252291453851660175550490409247739011867e-151L),
2138 TEST_c_c (cacos, -1.0L, -0x1.fp-1000L, 3.141592653589793238462643383279502884197L, 4.252291453851660175550490409247739011867e-151L),
2139 TEST_c_c (cacos, 0x1.fp-1025L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
2140 TEST_c_c (cacos, 0x1.fp-1025L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
2141 TEST_c_c (cacos, -0x1.fp-1025L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
2142 TEST_c_c (cacos, -0x1.fp-1025L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
2143 TEST_c_c (cacos, 1.0L, 0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, -7.340879205566679497036857179189356754017e-155L),
2144 TEST_c_c (cacos, -1.0L, 0x1.fp-1025L, 3.141592653589793238462643383279502884197L, -7.340879205566679497036857179189356754017e-155L),
2145 TEST_c_c (cacos, 1.0L, -0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, 7.340879205566679497036857179189356754017e-155L),
2146 TEST_c_c (cacos, -1.0L, -0x1.fp-1025L, 3.141592653589793238462643383279502884197L, 7.340879205566679497036857179189356754017e-155L),
0a1b2ae6
JM		 2147#endif
2148#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2149 TEST_c_c (cacos, 0x1.fp-10000L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
2150 TEST_c_c (cacos, 0x1.fp-10000L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
2151 TEST_c_c (cacos, -0x1.fp-10000L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
2152 TEST_c_c (cacos, -0x1.fp-10000L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
2153 TEST_c_c (cacos, 1.0L, 0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, -9.854680208706673586644342922051388714633e-1506L),
2154 TEST_c_c (cacos, -1.0L, 0x1.fp-10000L, 3.141592653589793238462643383279502884197L, -9.854680208706673586644342922051388714633e-1506L),
2155 TEST_c_c (cacos, 1.0L, -0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, 9.854680208706673586644342922051388714633e-1506L),
2156 TEST_c_c (cacos, -1.0L, -0x1.fp-10000L, 3.141592653589793238462643383279502884197L, 9.854680208706673586644342922051388714633e-1506L),
2157 TEST_c_c (cacos, 0x1.fp-16385L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
2158 TEST_c_c (cacos, 0x1.fp-16385L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
2159 TEST_c_c (cacos, -0x1.fp-16385L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
2160 TEST_c_c (cacos, -0x1.fp-16385L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
2161 TEST_c_c (cacos, 1.0L, 0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, -9.023632056840860275214893047597614177639e-2467L),
2162 TEST_c_c (cacos, -1.0L, 0x1.fp-16385L, 3.141592653589793238462643383279502884197L, -9.023632056840860275214893047597614177639e-2467L),
2163 TEST_c_c (cacos, 1.0L, -0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, 9.023632056840860275214893047597614177639e-2467L),
2164 TEST_c_c (cacos, -1.0L, -0x1.fp-16385L, 3.141592653589793238462643383279502884197L, 9.023632056840860275214893047597614177639e-2467L),
2165#endif
2166
2167 TEST_c_c (cacos, 0x1p-23L, 0x1.000002p0L, 1.570796242501204621739026081991856762292L, -8.813736713132400470205730751186547909968e-1L),
2168 TEST_c_c (cacos, 0x1p-23L, -0x1.000002p0L, 1.570796242501204621739026081991856762292L, 8.813736713132400470205730751186547909968e-1L),
2169 TEST_c_c (cacos, -0x1p-23L, 0x1.000002p0L, 1.570796411088588616723617301287646121905L, -8.813736713132400470205730751186547909968e-1L),
2170 TEST_c_c (cacos, -0x1p-23L, -0x1.000002p0L, 1.570796411088588616723617301287646121905L, 8.813736713132400470205730751186547909968e-1L),
2171 TEST_c_c (cacos, 0x1.000002p0L, 0x1p-23L, 2.222118384408546368406374049167636760903e-4L, -5.364668491573609633134147164031476452679e-4L),
2172 TEST_c_c (cacos, -0x1.000002p0L, 0x1p-23L, 3.141370441751352383825802745874586120521L, -5.364668491573609633134147164031476452679e-4L),
2173 TEST_c_c (cacos, 0x1.000002p0L, -0x1p-23L, 2.222118384408546368406374049167636760903e-4L, 5.364668491573609633134147164031476452679e-4L),
2174 TEST_c_c (cacos, -0x1.000002p0L, -0x1p-23L, 3.141370441751352383825802745874586120521L, 5.364668491573609633134147164031476452679e-4L),
2175 TEST_c_c (cacos, 0x1.fp-129L, 0x1.000002p0L, 1.570796326794896619231321691639751442097L, -8.813736713132375348727889167749389235161e-1L),
2176 TEST_c_c (cacos, 0x1.fp-129L, -0x1.000002p0L, 1.570796326794896619231321691639751442097L, 8.813736713132375348727889167749389235161e-1L),
2177 TEST_c_c (cacos, -0x1.fp-129L, 0x1.000002p0L, 1.570796326794896619231321691639751442101L, -8.813736713132375348727889167749389235161e-1L),
2178 TEST_c_c (cacos, -0x1.fp-129L, -0x1.000002p0L, 1.570796326794896619231321691639751442101L, 8.813736713132375348727889167749389235161e-1L),
2179 TEST_c_c (cacos, 0x1.000002p0L, 0x1.fp-129L, 5.830451806317544230969669308596361881467e-36L, -4.882812451493617206486388134172712975070e-4L),
2180 TEST_c_c (cacos, -0x1.000002p0L, 0x1.fp-129L, 3.141592653589793238462643383279502878367L, -4.882812451493617206486388134172712975070e-4L),
2181 TEST_c_c (cacos, 0x1.000002p0L, -0x1.fp-129L, 5.830451806317544230969669308596361881467e-36L, 4.882812451493617206486388134172712975070e-4L),
2182 TEST_c_c (cacos, -0x1.000002p0L, -0x1.fp-129L, 3.141592653589793238462643383279502878367L, 4.882812451493617206486388134172712975070e-4L),
2183 TEST_c_c (cacos, 0.0L, 0x1.000002p0L, 1.570796326794896619231321691639751442099L, -8.813736713132375348727889167749389235161e-1L),
2184 TEST_c_c (cacos, 0.0L, -0x1.000002p0L, 1.570796326794896619231321691639751442099L, 8.813736713132375348727889167749389235161e-1L),
2185 TEST_c_c (cacos, -0.0L, 0x1.000002p0L, 1.570796326794896619231321691639751442099L, -8.813736713132375348727889167749389235161e-1L),
2186 TEST_c_c (cacos, -0.0L, -0x1.000002p0L, 1.570796326794896619231321691639751442099L, 8.813736713132375348727889167749389235161e-1L),
2187 TEST_c_c (cacos, 0x1.000002p0L, 0.0L, 0.0L, -4.882812451493617206486388134172712975070e-4L),
2188 TEST_c_c (cacos, -0x1.000002p0L, 0.0L, 3.141592653589793238462643383279502884197L, -4.882812451493617206486388134172712975070e-4L),
2189 TEST_c_c (cacos, 0x1.000002p0L, -0.0L, 0.0L, 4.882812451493617206486388134172712975070e-4L),
2190 TEST_c_c (cacos, -0x1.000002p0L, -0.0L, 3.141592653589793238462643383279502884197L, 4.882812451493617206486388134172712975070e-4L),
3a7182a1 2191#ifndef TEST_FLOAT
08198877
JM		 2192 TEST_c_c (cacos, 0x1p-52L, 0x1.0000000000001p0L, 1.570796326794896462222075823262262934288L, -8.813735870195431822418551933572982483664e-1L),
2193 TEST_c_c (cacos, 0x1p-52L, -0x1.0000000000001p0L, 1.570796326794896462222075823262262934288L, 8.813735870195431822418551933572982483664e-1L),
2194 TEST_c_c (cacos, -0x1p-52L, 0x1.0000000000001p0L, 1.570796326794896776240567560017239949909L, -8.813735870195431822418551933572982483664e-1L),
2195 TEST_c_c (cacos, -0x1p-52L, -0x1.0000000000001p0L, 1.570796326794896776240567560017239949909L, 8.813735870195431822418551933572982483664e-1L),
2196 TEST_c_c (cacos, 0x1.0000000000001p0L, 0x1p-52L, 9.590301705980041385828904092662391018164e-9L, -2.315303644582684770975188768022139415020e-8L),
2197 TEST_c_c (cacos, -0x1.0000000000001p0L, 0x1p-52L, 3.141592643999491532482601997450598791535L, -2.315303644582684770975188768022139415020e-8L),
2198 TEST_c_c (cacos, 0x1.0000000000001p0L, -0x1p-52L, 9.590301705980041385828904092662391018164e-9L, 2.315303644582684770975188768022139415020e-8L),
2199 TEST_c_c (cacos, -0x1.0000000000001p0L, -0x1p-52L, 3.141592643999491532482601997450598791535L, 2.315303644582684770975188768022139415020e-8L),
2200 TEST_c_c (cacos, 0x1.fp-1025L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195431822418551933572895326024e-1L),
2201 TEST_c_c (cacos, 0x1.fp-1025L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195431822418551933572895326024e-1L),
2202 TEST_c_c (cacos, -0x1.fp-1025L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195431822418551933572895326024e-1L),
2203 TEST_c_c (cacos, -0x1.fp-1025L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195431822418551933572895326024e-1L),
2204 TEST_c_c (cacos, 0x1.0000000000001p0L, 0x1.fp-1025L, 2.557178503953494342609835913586108008322e-301L, -2.107342425544701550354780375182800088393e-8L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2205 TEST_c_c (cacos, -0x1.0000000000001p0L, 0x1.fp-1025L, 3.141592653589793238462643383279502884197L, -2.107342425544701550354780375182800088393e-8L),
2206 TEST_c_c (cacos, 0x1.0000000000001p0L, -0x1.fp-1025L, 2.557178503953494342609835913586108008322e-301L, 2.107342425544701550354780375182800088393e-8L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2207 TEST_c_c (cacos, -0x1.0000000000001p0L, -0x1.fp-1025L, 3.141592653589793238462643383279502884197L, 2.107342425544701550354780375182800088393e-8L),
2208 TEST_c_c (cacos, 0.0L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195431822418551933572895326024e-1L),
2209 TEST_c_c (cacos, 0.0L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195431822418551933572895326024e-1L),
2210 TEST_c_c (cacos, -0.0L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195431822418551933572895326024e-1L),
2211 TEST_c_c (cacos, -0.0L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195431822418551933572895326024e-1L),
2212 TEST_c_c (cacos, 0x1.0000000000001p0L, 0.0L, 0.0L, -2.107342425544701550354780375182800088393e-8L),
2213 TEST_c_c (cacos, -0x1.0000000000001p0L, 0.0L, 3.141592653589793238462643383279502884197L, -2.107342425544701550354780375182800088393e-8L),
2214 TEST_c_c (cacos, 0x1.0000000000001p0L, -0.0L, 0.0L, 2.107342425544701550354780375182800088393e-8L),
2215 TEST_c_c (cacos, -0x1.0000000000001p0L, -0.0L, 3.141592653589793238462643383279502884197L, 2.107342425544701550354780375182800088393e-8L),
3a7182a1
JM		 2216#endif
2217#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 2218 TEST_c_c (cacos, 0x1p-63L, 0x1.0000000000000002p0L, 1.570796326794896619154657020805582738031L, -8.813735870195430253092739958139610131001e-1L),
2219 TEST_c_c (cacos, 0x1p-63L, -0x1.0000000000000002p0L, 1.570796326794896619154657020805582738031L, 8.813735870195430253092739958139610131001e-1L),
2220 TEST_c_c (cacos, -0x1p-63L, 0x1.0000000000000002p0L, 1.570796326794896619307986362473920146166L, -8.813735870195430253092739958139610131001e-1L),
2221 TEST_c_c (cacos, -0x1p-63L, -0x1.0000000000000002p0L, 1.570796326794896619307986362473920146166L, 8.813735870195430253092739958139610131001e-1L),
2222 TEST_c_c (cacos, 0x1.0000000000000002p0L, 0x1p-63L, 2.119177303101063432592523199680782317447e-10L, -5.116146586219826555037807251857670783420e-10L),
2223 TEST_c_c (cacos, -0x1.0000000000000002p0L, 0x1p-63L, 3.141592653377875508152537040020250564229L, -5.116146586219826555037807251857670783420e-10L),
2224 TEST_c_c (cacos, 0x1.0000000000000002p0L, -0x1p-63L, 2.119177303101063432592523199680782317447e-10L, 5.116146586219826555037807251857670783420e-10L),
2225 TEST_c_c (cacos, -0x1.0000000000000002p0L, -0x1p-63L, 3.141592653377875508152537040020250564229L, 5.116146586219826555037807251857670783420e-10L),
3a7182a1 2226# if LDBL_MIN_EXP <= -16381
08198877
JM		 2227 TEST_c_c (cacos, 0x1.fp-16385L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430253092739958139610130980e-1L),
2228 TEST_c_c (cacos, 0x1.fp-16385L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430253092739958139610130980e-1L),
2229 TEST_c_c (cacos, -0x1.fp-16385L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430253092739958139610130980e-1L),
2230 TEST_c_c (cacos, -0x1.fp-16385L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430253092739958139610130980e-1L),
2231 TEST_c_c (cacos, 0x1.0000000000000002p0L, 0x1.fp-16385L, 1.748608650034385653922359120438227480943e-4923L, -4.656612873077392578082927418388212703712e-10L),
2232 TEST_c_c (cacos, -0x1.0000000000000002p0L, 0x1.fp-16385L, 3.141592653589793238462643383279502884197L, -4.656612873077392578082927418388212703712e-10L),
2233 TEST_c_c (cacos, 0x1.0000000000000002p0L, -0x1.fp-16385L, 1.748608650034385653922359120438227480943e-4923L, 4.656612873077392578082927418388212703712e-10L),
2234 TEST_c_c (cacos, -0x1.0000000000000002p0L, -0x1.fp-16385L, 3.141592653589793238462643383279502884197L, 4.656612873077392578082927418388212703712e-10L),
3a7182a1 2235# endif
08198877
JM		 2236 TEST_c_c (cacos, 0.0L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430253092739958139610130980e-1L),
2237 TEST_c_c (cacos, 0.0L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430253092739958139610130980e-1L),
2238 TEST_c_c (cacos, -0.0L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430253092739958139610130980e-1L),
2239 TEST_c_c (cacos, -0.0L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430253092739958139610130980e-1L),
2240 TEST_c_c (cacos, 0x1.0000000000000002p0L, 0.0L, 0.0L, -4.656612873077392578082927418388212703712e-10L),
2241 TEST_c_c (cacos, -0x1.0000000000000002p0L, 0.0L, 3.141592653589793238462643383279502884197L, -4.656612873077392578082927418388212703712e-10L),
2242 TEST_c_c (cacos, 0x1.0000000000000002p0L, -0.0L, 0.0L, 4.656612873077392578082927418388212703712e-10L),
2243 TEST_c_c (cacos, -0x1.0000000000000002p0L, -0.0L, 3.141592653589793238462643383279502884197L, 4.656612873077392578082927418388212703712e-10L),
3a7182a1
JM		 2244#endif
2245#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 2246 TEST_c_c (cacos, 0x1p-106L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639742726335L, -8.813735870195430252326093249798097405561e-1L),
2247 TEST_c_c (cacos, 0x1p-106L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639742726335L, 8.813735870195430252326093249798097405561e-1L),
2248 TEST_c_c (cacos, -0x1p-106L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639760157863L, -8.813735870195430252326093249798097405561e-1L),
2249 TEST_c_c (cacos, -0x1p-106L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639760157863L, 8.813735870195430252326093249798097405561e-1L),
2250 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, 0x1p-106L, 5.394221422390606848017034778914096659726e-17L, -2.285028863093221674154232933662774454211e-16L),
2251 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, 0x1p-106L, 3.141592653589793184520429159373434404027L, -2.285028863093221674154232933662774454211e-16L),
2252 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, -0x1p-106L, 5.394221422390606848017034778914096659726e-17L, 2.285028863093221674154232933662774454211e-16L),
2253 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, -0x1p-106L, 3.141592653589793184520429159373434404027L, 2.285028863093221674154232933662774454211e-16L),
2254 TEST_c_c (cacos, 0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249798097405561e-1L),
2255 TEST_c_c (cacos, 0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249798097405561e-1L),
2256 TEST_c_c (cacos, -0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249798097405561e-1L),
2257 TEST_c_c (cacos, -0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249798097405561e-1L),
2258 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 2.426922623448365473354662093431821897807e-293L, -2.220446049250313080847263336181636063482e-16L),
2259 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 3.141592653589793238462643383279502884197L, -2.220446049250313080847263336181636063482e-16L),
2260 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 2.426922623448365473354662093431821897807e-293L, 2.220446049250313080847263336181636063482e-16L),
2261 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 3.141592653589793238462643383279502884197L, 2.220446049250313080847263336181636063482e-16L),
2262 TEST_c_c (cacos, 0.0L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249798097405561e-1L),
2263 TEST_c_c (cacos, 0.0L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249798097405561e-1L),
2264 TEST_c_c (cacos, -0.0L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249798097405561e-1L),
2265 TEST_c_c (cacos, -0.0L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249798097405561e-1L),
2266 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, 0.0L, 0.0L, -2.220446049250313080847263336181636063482e-16L),
2267 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, 0.0L, 3.141592653589793238462643383279502884197L, -2.220446049250313080847263336181636063482e-16L),
2268 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, -0.0L, 0.0L, 2.220446049250313080847263336181636063482e-16L),
2269 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, -0.0L, 3.141592653589793238462643383279502884197L, 2.220446049250313080847263336181636063482e-16L),
3a7182a1
JM		 2270#endif
2271#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 2272 TEST_c_c (cacos, 0x1p-113L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751374007L, -8.813735870195430252326093249797924452120e-1L),
2273 TEST_c_c (cacos, 0x1p-113L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751374007L, 8.813735870195430252326093249797924452120e-1L),
2274 TEST_c_c (cacos, -0x1p-113L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751510190L, -8.813735870195430252326093249797924452120e-1L),
2275 TEST_c_c (cacos, -0x1p-113L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751510190L, 8.813735870195430252326093249797924452120e-1L),
2276 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, 0x1p-113L, 4.767863183742677481693563511435642755521e-18L, -2.019699255375255198156433710951064632386e-17L),
2277 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, 0x1p-113L, 3.141592653589793233694780199536825402504L, -2.019699255375255198156433710951064632386e-17L),
2278 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, -0x1p-113L, 4.767863183742677481693563511435642755521e-18L, 2.019699255375255198156433710951064632386e-17L),
2279 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, -0x1p-113L, 3.141592653589793233694780199536825402504L, 2.019699255375255198156433710951064632386e-17L),
2280 TEST_c_c (cacos, 0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797924452120e-1L),
2281 TEST_c_c (cacos, 0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797924452120e-1L),
2282 TEST_c_c (cacos, -0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797924452120e-1L),
2283 TEST_c_c (cacos, -0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797924452120e-1L),
2284 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 4.148847925325683229178506116378864361396e-4916L, -1.962615573354718824241727964954454332780e-17L),
2285 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 3.141592653589793238462643383279502884197L, -1.962615573354718824241727964954454332780e-17L),
2286 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 4.148847925325683229178506116378864361396e-4916L, 1.962615573354718824241727964954454332780e-17L),
2287 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 3.141592653589793238462643383279502884197L, 1.962615573354718824241727964954454332780e-17L),
2288 TEST_c_c (cacos, 0.0L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797924452120e-1L),
2289 TEST_c_c (cacos, 0.0L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797924452120e-1L),
2290 TEST_c_c (cacos, -0.0L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797924452120e-1L),
2291 TEST_c_c (cacos, -0.0L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797924452120e-1L),
2292 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, 0.0L, 0.0L, -1.962615573354718824241727964954454332780e-17L),
2293 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, 0.0L, 3.141592653589793238462643383279502884197L, -1.962615573354718824241727964954454332780e-17L),
2294 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, -0.0L, 0.0L, 1.962615573354718824241727964954454332780e-17L),
2295 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, -0.0L, 3.141592653589793238462643383279502884197L, 1.962615573354718824241727964954454332780e-17L),
2296#endif
2297
2298 TEST_c_c (cacos, 0x1p-23L, 0x0.ffffffp0L, 1.570796242501197085295336701632142060969L, -8.813735448726963984495965873956465777250e-1L),
2299 TEST_c_c (cacos, 0x1p-23L, -0x0.ffffffp0L, 1.570796242501197085295336701632142060969L, 8.813735448726963984495965873956465777250e-1L),
2300 TEST_c_c (cacos, -0x1p-23L, 0x0.ffffffp0L, 1.570796411088596153167306681647360823228L, -8.813735448726963984495965873956465777250e-1L),
2301 TEST_c_c (cacos, -0x1p-23L, -0x0.ffffffp0L, 1.570796411088596153167306681647360823228L, 8.813735448726963984495965873956465777250e-1L),
2302 TEST_c_c (cacos, 0x0.ffffffp0L, 0x1p-23L, 4.391863861910487109445187743978204002614e-4L, -2.714321200917194650737217746780928423385e-4L),
2303 TEST_c_c (cacos, -0x0.ffffffp0L, 0x1p-23L, 3.141153467203602189751698864505105063797L, -2.714321200917194650737217746780928423385e-4L),
2304 TEST_c_c (cacos, 0x0.ffffffp0L, -0x1p-23L, 4.391863861910487109445187743978204002614e-4L, 2.714321200917194650737217746780928423385e-4L),
2305 TEST_c_c (cacos, -0x0.ffffffp0L, -0x1p-23L, 3.141153467203602189751698864505105063797L, 2.714321200917194650737217746780928423385e-4L),
2306 TEST_c_c (cacos, 0x1.fp-129L, 0x0.ffffffp0L, 1.570796326794896619231321691639751442097L, -8.813735448726938863015878255140556727969e-1L),
2307 TEST_c_c (cacos, 0x1.fp-129L, -0x0.ffffffp0L, 1.570796326794896619231321691639751442097L, 8.813735448726938863015878255140556727969e-1L),
2308 TEST_c_c (cacos, -0x1.fp-129L, 0x0.ffffffp0L, 1.570796326794896619231321691639751442101L, -8.813735448726938863015878255140556727969e-1L),
2309 TEST_c_c (cacos, -0x1.fp-129L, -0x0.ffffffp0L, 1.570796326794896619231321691639751442101L, 8.813735448726938863015878255140556727969e-1L),
2310 TEST_c_c (cacos, 0x0.ffffffp0L, 0x1.fp-129L, 3.452669847162035876032494826387364972849e-4L, -8.245504387859737323891843603996428534945e-36L),
2311 TEST_c_c (cacos, -0x0.ffffffp0L, 0x1.fp-129L, 3.141247386605077034875040133796864147700L, -8.245504387859737323891843603996428534945e-36L),
2312 TEST_c_c (cacos, 0x0.ffffffp0L, -0x1.fp-129L, 3.452669847162035876032494826387364972849e-4L, 8.245504387859737323891843603996428534945e-36L),
2313 TEST_c_c (cacos, -0x0.ffffffp0L, -0x1.fp-129L, 3.141247386605077034875040133796864147700L, 8.245504387859737323891843603996428534945e-36L),
2314 TEST_c_c (cacos, 0.0L, 0x0.ffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735448726938863015878255140556727969e-1L),
2315 TEST_c_c (cacos, 0.0L, -0x0.ffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735448726938863015878255140556727969e-1L),
2316 TEST_c_c (cacos, -0.0L, 0x0.ffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735448726938863015878255140556727969e-1L),
2317 TEST_c_c (cacos, -0.0L, -0x0.ffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735448726938863015878255140556727969e-1L),
2318 TEST_c_c (cacos, 0x0.ffffffp0L, 0.0L, 3.452669847162035876032494826387364972849e-4L, -0.0L),
2319 TEST_c_c (cacos, -0x0.ffffffp0L, 0.0L, 3.141247386605077034875040133796864147700L, -0.0L),
2320 TEST_c_c (cacos, 0x0.ffffffp0L, -0.0L, 3.452669847162035876032494826387364972849e-4L, 0.0L),
2321 TEST_c_c (cacos, -0x0.ffffffp0L, -0.0L, 3.141247386605077034875040133796864147700L, 0.0L),
2322 TEST_c_c (cacos, 0x1p-23L, 0.5L, 1.570796220170866625230343643673321150378L, -4.812118250596059896127318386463676808798e-1L),
2323 TEST_c_c (cacos, 0x1p-23L, -0.5L, 1.570796220170866625230343643673321150378L, 4.812118250596059896127318386463676808798e-1L),
2324 TEST_c_c (cacos, -0x1p-23L, 0.5L, 1.570796433418926613232299739606181733819L, -4.812118250596059896127318386463676808798e-1L),
2325 TEST_c_c (cacos, -0x1p-23L, -0.5L, 1.570796433418926613232299739606181733819L, 4.812118250596059896127318386463676808798e-1L),
2326 TEST_c_c (cacos, 0.5L, 0x1p-23L, 1.047197551196603215914744618665204532273L, -1.376510308240943236356088341381173571841e-7L),
2327 TEST_c_c (cacos, -0.5L, 0x1p-23L, 2.094395102393190022547898764614298351924L, -1.376510308240943236356088341381173571841e-7L),
2328 TEST_c_c (cacos, 0.5L, -0x1p-23L, 1.047197551196603215914744618665204532273L, 1.376510308240943236356088341381173571841e-7L),
2329 TEST_c_c (cacos, -0.5L, -0x1p-23L, 2.094395102393190022547898764614298351924L, 1.376510308240943236356088341381173571841e-7L),
2330 TEST_c_c (cacos, 0x1.fp-129L, 0.5L, 1.570796326794896619231321691639751442096L, -4.812118250596034474977589134243684231352e-1L),
2331 TEST_c_c (cacos, 0x1.fp-129L, -0.5L, 1.570796326794896619231321691639751442096L, 4.812118250596034474977589134243684231352e-1L),
2332 TEST_c_c (cacos, -0x1.fp-129L, 0.5L, 1.570796326794896619231321691639751442101L, -4.812118250596034474977589134243684231352e-1L),
2333 TEST_c_c (cacos, -0x1.fp-129L, -0.5L, 1.570796326794896619231321691639751442101L, 4.812118250596034474977589134243684231352e-1L),
2334 TEST_c_c (cacos, 0.5L, 0x1.fp-129L, 1.047197551196597746154214461093167628066L, -3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2335 TEST_c_c (cacos, -0.5L, 0x1.fp-129L, 2.094395102393195492308428922186335256131L, -3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2336 TEST_c_c (cacos, 0.5L, -0x1.fp-129L, 1.047197551196597746154214461093167628066L, 3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2337 TEST_c_c (cacos, -0.5L, -0x1.fp-129L, 2.094395102393195492308428922186335256131L, 3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2338 TEST_c_c (cacos, 0x1p-23L, 0x1p-23L, 1.570796207585607068450636380271254316214L, -1.192092895507818146886315028596704749235e-7L),
2339 TEST_c_c (cacos, 0x1p-23L, -0x1p-23L, 1.570796207585607068450636380271254316214L, 1.192092895507818146886315028596704749235e-7L),
2340 TEST_c_c (cacos, -0x1p-23L, 0x1p-23L, 1.570796446004186170012007003008248567984L, -1.192092895507818146886315028596704749235e-7L),
2341 TEST_c_c (cacos, -0x1p-23L, -0x1p-23L, 1.570796446004186170012007003008248567984L, 1.192092895507818146886315028596704749235e-7L),
2342 TEST_c_c (cacos, 0x1.fp-129L, 0x1p-23L, 1.570796326794896619231321691639751442096L, -1.192092895507809676556842485683592032154e-7L),
2343 TEST_c_c (cacos, 0x1.fp-129L, -0x1p-23L, 1.570796326794896619231321691639751442096L, 1.192092895507809676556842485683592032154e-7L),
2344 TEST_c_c (cacos, -0x1.fp-129L, 0x1p-23L, 1.570796326794896619231321691639751442101L, -1.192092895507809676556842485683592032154e-7L),
2345 TEST_c_c (cacos, -0x1.fp-129L, -0x1p-23L, 1.570796326794896619231321691639751442101L, 1.192092895507809676556842485683592032154e-7L),
2346 TEST_c_c (cacos, 0x1p-23L, 0x1.fp-129L, 1.570796207585607068449789347324000006847L, -2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2347 TEST_c_c (cacos, -0x1p-23L, 0x1.fp-129L, 1.570796446004186170012854035955502877351L, -2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2348 TEST_c_c (cacos, 0x1p-23L, -0x1.fp-129L, 1.570796207585607068449789347324000006847L, 2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2349 TEST_c_c (cacos, -0x1p-23L, -0x1.fp-129L, 1.570796446004186170012854035955502877351L, 2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2350 TEST_c_c (cacos, 0.0L, 0x1p-23L, 1.570796326794896619231321691639751442099L, -1.192092895507809676556842485683592032154e-7L),
2351 TEST_c_c (cacos, 0.0L, -0x1p-23L, 1.570796326794896619231321691639751442099L, 1.192092895507809676556842485683592032154e-7L),
2352 TEST_c_c (cacos, -0.0L, 0x1p-23L, 1.570796326794896619231321691639751442099L, -1.192092895507809676556842485683592032154e-7L),
2353 TEST_c_c (cacos, -0.0L, -0x1p-23L, 1.570796326794896619231321691639751442099L, 1.192092895507809676556842485683592032154e-7L),
2354 TEST_c_c (cacos, 0x1p-23L, 0.0L, 1.570796207585607068449789347324000006847L, -0.0L),
2355 TEST_c_c (cacos, -0x1p-23L, 0.0L, 1.570796446004186170012854035955502877351L, -0.0L),
2356 TEST_c_c (cacos, 0x1p-23L, -0.0L, 1.570796207585607068449789347324000006847L, 0.0L),
2357 TEST_c_c (cacos, -0x1p-23L, -0.0L, 1.570796446004186170012854035955502877351L, 0.0L),
2358 TEST_c_c (cacos, 0x1.fp-129L, 0x1.fp-129L, 1.570796326794896619231321691639751442096L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2359 TEST_c_c (cacos, 0x1.fp-129L, -0x1.fp-129L, 1.570796326794896619231321691639751442096L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2360 TEST_c_c (cacos, -0x1.fp-129L, 0x1.fp-129L, 1.570796326794896619231321691639751442101L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2361 TEST_c_c (cacos, -0x1.fp-129L, -0x1.fp-129L, 1.570796326794896619231321691639751442101L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
ccc8cadf 2362#ifndef TEST_FLOAT
08198877
JM		 2363 TEST_c_c (cacos, 0x1p-52L, 0x0.fffffffffffff8p0L, 1.570796326794896462222075823262236786996L, -8.813735870195429467279863907910458761820e-1L),
2364 TEST_c_c (cacos, 0x1p-52L, -0x0.fffffffffffff8p0L, 1.570796326794896462222075823262236786996L, 8.813735870195429467279863907910458761820e-1L),
2365 TEST_c_c (cacos, -0x1p-52L, 0x0.fffffffffffff8p0L, 1.570796326794896776240567560017266097201L, -8.813735870195429467279863907910458761820e-1L),
2366 TEST_c_c (cacos, -0x1p-52L, -0x0.fffffffffffff8p0L, 1.570796326794896776240567560017266097201L, 8.813735870195429467279863907910458761820e-1L),
2367 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, 0x1p-52L, 1.895456983915074112227925127005564372844e-8L, -1.171456840272878582596796205397918831268e-8L),
2368 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, 0x1p-52L, 3.141592634635223399311902261000251614142L, -1.171456840272878582596796205397918831268e-8L),
2369 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, -0x1p-52L, 1.895456983915074112227925127005564372844e-8L, 1.171456840272878582596796205397918831268e-8L),
2370 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, -0x1p-52L, 3.141592634635223399311902261000251614142L, 1.171456840272878582596796205397918831268e-8L),
2371 TEST_c_c (cacos, 0x1.fp-1025L, 0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195429467279863907910371604180e-1L),
2372 TEST_c_c (cacos, 0x1.fp-1025L, -0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195429467279863907910371604180e-1L),
2373 TEST_c_c (cacos, -0x1.fp-1025L, 0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195429467279863907910371604180e-1L),
2374 TEST_c_c (cacos, -0x1.fp-1025L, -0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195429467279863907910371604180e-1L),
2375 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, 0x1.fp-1025L, 1.490116119384765638786343542550461592240e-8L, -3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2376 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, 0x1.fp-1025L, 3.141592638688632044614986995416067458693L, -3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2377 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, -0x1.fp-1025L, 1.490116119384765638786343542550461592240e-8L, 3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2378 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, -0x1.fp-1025L, 3.141592638688632044614986995416067458693L, 3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2379 TEST_c_c (cacos, 0.0L, 0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195429467279863907910371604180e-1L),
2380 TEST_c_c (cacos, 0.0L, -0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195429467279863907910371604180e-1L),
2381 TEST_c_c (cacos, -0.0L, 0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195429467279863907910371604180e-1L),
2382 TEST_c_c (cacos, -0.0L, -0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195429467279863907910371604180e-1L),
2383 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, 0.0L, 1.490116119384765638786343542550461592240e-8L, -0.0L),
2384 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, 0.0L, 3.141592638688632044614986995416067458693L, -0.0L),
2385 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, -0.0L, 1.490116119384765638786343542550461592240e-8L, 0.0L),
2386 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, -0.0L, 3.141592638688632044614986995416067458693L, 0.0L),
2387#endif
2388 TEST_c_c (cacos, 0x1p-52L, 0.5L, 1.570796326794896420628589431857911675917L, -4.812118250596034474977589134243772428682e-1L),
2389 TEST_c_c (cacos, 0x1p-52L, -0.5L, 1.570796326794896420628589431857911675917L, 4.812118250596034474977589134243772428682e-1L),
2390 TEST_c_c (cacos, -0x1p-52L, 0.5L, 1.570796326794896817834053951421591208280L, -4.812118250596034474977589134243772428682e-1L),
2391 TEST_c_c (cacos, -0x1p-52L, -0.5L, 1.570796326794896817834053951421591208280L, 4.812118250596034474977589134243772428682e-1L),
2392 TEST_c_c (cacos, 0.5L, 0x1p-52L, 1.047197551196597746154214461093186605110L, -2.563950248511418570403591756798643804971e-16L),
2393 TEST_c_c (cacos, -0.5L, 0x1p-52L, 2.094395102393195492308428922186316279087L, -2.563950248511418570403591756798643804971e-16L),
2394 TEST_c_c (cacos, 0.5L, -0x1p-52L, 1.047197551196597746154214461093186605110L, 2.563950248511418570403591756798643804971e-16L),
2395 TEST_c_c (cacos, -0.5L, -0x1p-52L, 2.094395102393195492308428922186316279087L, 2.563950248511418570403591756798643804971e-16L),
ccc8cadf 2396#ifndef TEST_FLOAT
08198877
JM		 2397 TEST_c_c (cacos, 0x1.fp-1025L, 0.5L, 1.570796326794896619231321691639751442099L, -4.812118250596034474977589134243684231352e-1L),
2398 TEST_c_c (cacos, 0x1.fp-1025L, -0.5L, 1.570796326794896619231321691639751442099L, 4.812118250596034474977589134243684231352e-1L),
2399 TEST_c_c (cacos, -0x1.fp-1025L, 0.5L, 1.570796326794896619231321691639751442099L, -4.812118250596034474977589134243684231352e-1L),
2400 TEST_c_c (cacos, -0x1.fp-1025L, -0.5L, 1.570796326794896619231321691639751442099L, 4.812118250596034474977589134243684231352e-1L),
2401 TEST_c_c (cacos, 0.5L, 0x1.fp-1025L, 1.047197551196597746154214461093167628066L, -6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2402 TEST_c_c (cacos, -0.5L, 0x1.fp-1025L, 2.094395102393195492308428922186335256131L, -6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2403 TEST_c_c (cacos, 0.5L, -0x1.fp-1025L, 1.047197551196597746154214461093167628066L, 6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2404 TEST_c_c (cacos, -0.5L, -0x1.fp-1025L, 2.094395102393195492308428922186335256131L, 6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2405#endif
2406 TEST_c_c (cacos, 0x1p-52L, 0x1p-52L, 1.570796326794896397186716766608443357372L, -2.220446049250313080847263336181677117148e-16L),
2407 TEST_c_c (cacos, 0x1p-52L, -0x1p-52L, 1.570796326794896397186716766608443357372L, 2.220446049250313080847263336181677117148e-16L),
2408 TEST_c_c (cacos, -0x1p-52L, 0x1p-52L, 1.570796326794896841275926616671059526825L, -2.220446049250313080847263336181677117148e-16L),
2409 TEST_c_c (cacos, -0x1p-52L, -0x1p-52L, 1.570796326794896841275926616671059526825L, 2.220446049250313080847263336181677117148e-16L),
ccc8cadf 2410#ifndef TEST_FLOAT
08198877
JM		 2411 TEST_c_c (cacos, 0x1.fp-1025L, 0x1p-52L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181622378926e-16L),
2412 TEST_c_c (cacos, 0x1.fp-1025L, -0x1p-52L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181622378926e-16L),
2413 TEST_c_c (cacos, -0x1.fp-1025L, 0x1p-52L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181622378926e-16L),
2414 TEST_c_c (cacos, -0x1.fp-1025L, -0x1p-52L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181622378926e-16L),
2415 TEST_c_c (cacos, 0x1p-52L, 0x1.fp-1025L, 1.570796326794896397186716766608443357372L, -5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2416 TEST_c_c (cacos, -0x1p-52L, 0x1.fp-1025L, 1.570796326794896841275926616671059526825L, -5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2417 TEST_c_c (cacos, 0x1p-52L, -0x1.fp-1025L, 1.570796326794896397186716766608443357372L, 5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2418 TEST_c_c (cacos, -0x1p-52L, -0x1.fp-1025L, 1.570796326794896841275926616671059526825L, 5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2419#endif
2420 TEST_c_c (cacos, 0.0L, 0x1p-52L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181622378926e-16L),
2421 TEST_c_c (cacos, 0.0L, -0x1p-52L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181622378926e-16L),
2422 TEST_c_c (cacos, -0.0L, 0x1p-52L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181622378926e-16L),
2423 TEST_c_c (cacos, -0.0L, -0x1p-52L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181622378926e-16L),
2424 TEST_c_c (cacos, 0x1p-52L, 0.0L, 1.570796326794896397186716766608443357372L, -0.0L),
2425 TEST_c_c (cacos, -0x1p-52L, 0.0L, 1.570796326794896841275926616671059526825L, -0.0L),
2426 TEST_c_c (cacos, 0x1p-52L, -0.0L, 1.570796326794896397186716766608443357372L, 0.0L),
2427 TEST_c_c (cacos, -0x1p-52L, -0.0L, 1.570796326794896841275926616671059526825L, 0.0L),
ccc8cadf 2428#ifndef TEST_FLOAT
08198877
JM		 2429 TEST_c_c (cacos, 0x1.fp-1025L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2430 TEST_c_c (cacos, 0x1.fp-1025L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2431 TEST_c_c (cacos, -0x1.fp-1025L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2432 TEST_c_c (cacos, -0x1.fp-1025L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
ccc8cadf
JM		 2433#endif
2434#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 2435 TEST_c_c (cacos, 0x1p-63L, 0x0.ffffffffffffffffp0L, 1.570796326794896619154657020805582738025L, -8.813735870195430251942769895627079569937e-1L),
2436 TEST_c_c (cacos, 0x1p-63L, -0x0.ffffffffffffffffp0L, 1.570796326794896619154657020805582738025L, 8.813735870195430251942769895627079569937e-1L),
2437 TEST_c_c (cacos, -0x1p-63L, 0x0.ffffffffffffffffp0L, 1.570796326794896619307986362473920146173L, -8.813735870195430251942769895627079569937e-1L),
2438 TEST_c_c (cacos, -0x1p-63L, -0x0.ffffffffffffffffp0L, 1.570796326794896619307986362473920146173L, 8.813735870195430251942769895627079569937e-1L),
2439 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, 0x1p-63L, 4.188407771167967636741951941902992986043e-10L, -2.588578361325995866221775673638805081337e-10L),
2440 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, 0x1p-63L, 3.141592653170952461345846619605307690007L, -2.588578361325995866221775673638805081337e-10L),
2441 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, -0x1p-63L, 4.188407771167967636741951941902992986043e-10L, 2.588578361325995866221775673638805081337e-10L),
2442 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, -0x1p-63L, 3.141592653170952461345846619605307690007L, 2.588578361325995866221775673638805081337e-10L),
ccc8cadf 2443# if LDBL_MIN_EXP <= -16381
08198877
JM		 2444 TEST_c_c (cacos, 0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430251942769895627079569917e-1L),
2445 TEST_c_c (cacos, 0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430251942769895627079569917e-1L),
2446 TEST_c_c (cacos, -0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430251942769895627079569917e-1L),
2447 TEST_c_c (cacos, -0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430251942769895627079569917e-1L),
2448 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 3.292722539913596233371825532007990724506e-10L, -2.472906068161537187835415298076415423459e-4923L),
2449 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 3.141592653260520984471283759942320330996L, -2.472906068161537187835415298076415423459e-4923L),
2450 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 3.292722539913596233371825532007990724506e-10L, 2.472906068161537187835415298076415423459e-4923L),
2451 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 3.141592653260520984471283759942320330996L, 2.472906068161537187835415298076415423459e-4923L),
ccc8cadf 2452# endif
08198877
JM		 2453 TEST_c_c (cacos, 0.0L, 0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430251942769895627079569917e-1L),
2454 TEST_c_c (cacos, 0.0L, -0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430251942769895627079569917e-1L),
2455 TEST_c_c (cacos, -0.0L, 0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430251942769895627079569917e-1L),
2456 TEST_c_c (cacos, -0.0L, -0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430251942769895627079569917e-1L),
2457 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, 0.0L, 3.292722539913596233371825532007990724506e-10L, -0.0L),
2458 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, 0.0L, 3.141592653260520984471283759942320330996L, -0.0L),
2459 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, -0.0L, 3.292722539913596233371825532007990724506e-10L, 0.0L),
2460 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, -0.0L, 3.141592653260520984471283759942320330996L, 0.0L),
2461#endif
2462 TEST_c_c (cacos, 0x1p-63L, 0.5L, 1.570796326794896619134347701278529840650L, -4.812118250596034474977589134243684231373e-1L),
2463 TEST_c_c (cacos, 0x1p-63L, -0.5L, 1.570796326794896619134347701278529840650L, 4.812118250596034474977589134243684231373e-1L),
2464 TEST_c_c (cacos, -0x1p-63L, 0.5L, 1.570796326794896619328295682000973043547L, -4.812118250596034474977589134243684231373e-1L),
2465 TEST_c_c (cacos, -0x1p-63L, -0.5L, 1.570796326794896619328295682000973043547L, 4.812118250596034474977589134243684231373e-1L),
2466 TEST_c_c (cacos, 0.5L, 0x1p-63L, 1.047197551196597746154214461093167628070L, -1.251928832280966098829878787499365228659e-19L),
2467 TEST_c_c (cacos, -0.5L, 0x1p-63L, 2.094395102393195492308428922186335256127L, -1.251928832280966098829878787499365228659e-19L),
2468 TEST_c_c (cacos, 0.5L, -0x1p-63L, 1.047197551196597746154214461093167628070L, 1.251928832280966098829878787499365228659e-19L),
2469 TEST_c_c (cacos, -0.5L, -0x1p-63L, 2.094395102393195492308428922186335256127L, 1.251928832280966098829878787499365228659e-19L),
ccc8cadf 2470#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2471 TEST_c_c (cacos, 0x1.fp-16385L, 0.5L, 1.570796326794896619231321691639751442099L, -4.812118250596034474977589134243684231352e-1L),
2472 TEST_c_c (cacos, 0x1.fp-16385L, -0.5L, 1.570796326794896619231321691639751442099L, 4.812118250596034474977589134243684231352e-1L),
2473 TEST_c_c (cacos, -0x1.fp-16385L, 0.5L, 1.570796326794896619231321691639751442099L, -4.812118250596034474977589134243684231352e-1L),
2474 TEST_c_c (cacos, -0x1.fp-16385L, -0.5L, 1.570796326794896619231321691639751442099L, 4.812118250596034474977589134243684231352e-1L),
2475 TEST_c_c (cacos, 0.5L, 0x1.fp-16385L, 1.047197551196597746154214461093167628066L, -9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
2476 TEST_c_c (cacos, -0.5L, 0x1.fp-16385L, 2.094395102393195492308428922186335256131L, -9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
2477 TEST_c_c (cacos, 0.5L, -0x1.fp-16385L, 1.047197551196597746154214461093167628066L, 9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
2478 TEST_c_c (cacos, -0.5L, -0x1.fp-16385L, 2.094395102393195492308428922186335256131L, 9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
2479#endif
2480 TEST_c_c (cacos, 0x1p-63L, 0x1p-63L, 1.570796326794896619122901474391200998698L, -1.084202172485504434007452800869941711430e-19L),
2481 TEST_c_c (cacos, 0x1p-63L, -0x1p-63L, 1.570796326794896619122901474391200998698L, 1.084202172485504434007452800869941711430e-19L),
2482 TEST_c_c (cacos, -0x1p-63L, 0x1p-63L, 1.570796326794896619339741908888301885499L, -1.084202172485504434007452800869941711430e-19L),
2483 TEST_c_c (cacos, -0x1p-63L, -0x1p-63L, 1.570796326794896619339741908888301885499L, 1.084202172485504434007452800869941711430e-19L),
ccc8cadf 2484#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2485 TEST_c_c (cacos, 0x1.fp-16385L, 0x1p-63L, 1.570796326794896619231321691639751442099L, -1.084202172485504434007452800869941711424e-19L),
2486 TEST_c_c (cacos, 0x1.fp-16385L, -0x1p-63L, 1.570796326794896619231321691639751442099L, 1.084202172485504434007452800869941711424e-19L),
2487 TEST_c_c (cacos, -0x1.fp-16385L, 0x1p-63L, 1.570796326794896619231321691639751442099L, -1.084202172485504434007452800869941711424e-19L),
2488 TEST_c_c (cacos, -0x1.fp-16385L, -0x1p-63L, 1.570796326794896619231321691639751442099L, 1.084202172485504434007452800869941711424e-19L),
2489 TEST_c_c (cacos, 0x1p-63L, 0x1.fp-16385L, 1.570796326794896619122901474391200998698L, -8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
2490 TEST_c_c (cacos, -0x1p-63L, 0x1.fp-16385L, 1.570796326794896619339741908888301885499L, -8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
2491 TEST_c_c (cacos, 0x1p-63L, -0x1.fp-16385L, 1.570796326794896619122901474391200998698L, 8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
2492 TEST_c_c (cacos, -0x1p-63L, -0x1.fp-16385L, 1.570796326794896619339741908888301885499L, 8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
2493#endif
2494 TEST_c_c (cacos, 0.0L, 0x1p-63L, 1.570796326794896619231321691639751442099L, -1.084202172485504434007452800869941711424e-19L),
2495 TEST_c_c (cacos, 0.0L, -0x1p-63L, 1.570796326794896619231321691639751442099L, 1.084202172485504434007452800869941711424e-19L),
2496 TEST_c_c (cacos, -0.0L, 0x1p-63L, 1.570796326794896619231321691639751442099L, -1.084202172485504434007452800869941711424e-19L),
2497 TEST_c_c (cacos, -0.0L, -0x1p-63L, 1.570796326794896619231321691639751442099L, 1.084202172485504434007452800869941711424e-19L),
2498 TEST_c_c (cacos, 0x1p-63L, 0.0L, 1.570796326794896619122901474391200998698L, -0.0L),
2499 TEST_c_c (cacos, -0x1p-63L, 0.0L, 1.570796326794896619339741908888301885499L, -0.0L),
2500 TEST_c_c (cacos, 0x1p-63L, -0.0L, 1.570796326794896619122901474391200998698L, 0.0L),
2501 TEST_c_c (cacos, -0x1p-63L, -0.0L, 1.570796326794896619339741908888301885499L, 0.0L),
ccc8cadf 2502#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2503 TEST_c_c (cacos, 0x1.fp-16385L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2504 TEST_c_c (cacos, 0x1.fp-16385L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2505 TEST_c_c (cacos, -0x1.fp-16385L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2506 TEST_c_c (cacos, -0x1.fp-16385L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
ccc8cadf
JM		 2507#endif
2508#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 2509 TEST_c_c (cacos, 0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639734010571L, -8.813735870195430252326093249797835932642e-1L),
2510 TEST_c_c (cacos, 0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639734010571L, 8.813735870195430252326093249797835932642e-1L),
2511 TEST_c_c (cacos, -0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639768873627L, -8.813735870195430252326093249797835932642e-1L),
2512 TEST_c_c (cacos, -0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639768873627L, 8.813735870195430252326093249797835932642e-1L),
2513 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 1.997188458999618357060632049675702684031e-16L, -1.234330349600789959989661887846005659983e-16L),
2514 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 3.141592653589793038743797483317667178134L, -1.234330349600789959989661887846005659983e-16L),
2515 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 1.997188458999618357060632049675702684031e-16L, 1.234330349600789959989661887846005659983e-16L),
2516 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 3.141592653589793038743797483317667178134L, 1.234330349600789959989661887846005659983e-16L),
2517 TEST_c_c (cacos, 0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797835932642e-1L),
2518 TEST_c_c (cacos, 0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797835932642e-1L),
2519 TEST_c_c (cacos, -0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797835932642e-1L),
2520 TEST_c_c (cacos, -0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797835932642e-1L),
2521 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 1.570092458683775059393382371963565104164e-16L, -3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2522 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 3.141592653589793081453397514901996944859L, -3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2523 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 1.570092458683775059393382371963565104164e-16L, 3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2524 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 3.141592653589793081453397514901996944859L, 3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2525 TEST_c_c (cacos, 0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797835932642e-1L),
2526 TEST_c_c (cacos, 0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797835932642e-1L),
2527 TEST_c_c (cacos, -0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797835932642e-1L),
2528 TEST_c_c (cacos, -0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797835932642e-1L),
2529 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 1.570092458683775059393382371963565104164e-16L, -0.0L),
2530 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 3.141592653589793081453397514901996944859L, -0.0L),
2531 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 1.570092458683775059393382371963565104164e-16L, 0.0L),
2532 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 3.141592653589793081453397514901996944859L, 0.0L),
2533#endif
2534 TEST_c_c (cacos, 0x1p-105L, 0.5L, 1.570796326794896619231321691639729392766L, -4.812118250596034474977589134243684231352e-1L),
2535 TEST_c_c (cacos, 0x1p-105L, -0.5L, 1.570796326794896619231321691639729392766L, 4.812118250596034474977589134243684231352e-1L),
2536 TEST_c_c (cacos, -0x1p-105L, 0.5L, 1.570796326794896619231321691639773491431L, -4.812118250596034474977589134243684231352e-1L),
2537 TEST_c_c (cacos, -0x1p-105L, -0.5L, 1.570796326794896619231321691639773491431L, 4.812118250596034474977589134243684231352e-1L),
2538 TEST_c_c (cacos, 0.5L, 0x1p-105L, 1.047197551196597746154214461093167628066L, -2.846556599890768890940941645338546615370e-32L),
2539 TEST_c_c (cacos, -0.5L, 0x1p-105L, 2.094395102393195492308428922186335256131L, -2.846556599890768890940941645338546615370e-32L),
2540 TEST_c_c (cacos, 0.5L, -0x1p-105L, 1.047197551196597746154214461093167628066L, 2.846556599890768890940941645338546615370e-32L),
2541 TEST_c_c (cacos, -0.5L, -0x1p-105L, 2.094395102393195492308428922186335256131L, 2.846556599890768890940941645338546615370e-32L),
2542 TEST_c_c (cacos, 0x1p-105L, 0x1p-105L, 1.570796326794896619231321691639726790195L, -2.465190328815661891911651766508706967729e-32L),
2543 TEST_c_c (cacos, 0x1p-105L, -0x1p-105L, 1.570796326794896619231321691639726790195L, 2.465190328815661891911651766508706967729e-32L),
2544 TEST_c_c (cacos, -0x1p-105L, 0x1p-105L, 1.570796326794896619231321691639776094002L, -2.465190328815661891911651766508706967729e-32L),
2545 TEST_c_c (cacos, -0x1p-105L, -0x1p-105L, 1.570796326794896619231321691639776094002L, 2.465190328815661891911651766508706967729e-32L),
ccc8cadf 2546#ifndef TEST_FLOAT
08198877
JM		 2547 TEST_c_c (cacos, 0x1.fp-1025L, 0x1p-105L, 1.570796326794896619231321691639751442099L, -2.465190328815661891911651766508706967729e-32L),
2548 TEST_c_c (cacos, 0x1.fp-1025L, -0x1p-105L, 1.570796326794896619231321691639751442099L, 2.465190328815661891911651766508706967729e-32L),
2549 TEST_c_c (cacos, -0x1.fp-1025L, 0x1p-105L, 1.570796326794896619231321691639751442099L, -2.465190328815661891911651766508706967729e-32L),
2550 TEST_c_c (cacos, -0x1.fp-1025L, -0x1p-105L, 1.570796326794896619231321691639751442099L, 2.465190328815661891911651766508706967729e-32L),
2551 TEST_c_c (cacos, 0x1p-105L, 0x1.fp-1025L, 1.570796326794896619231321691639726790195L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2552 TEST_c_c (cacos, -0x1p-105L, 0x1.fp-1025L, 1.570796326794896619231321691639776094002L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2553 TEST_c_c (cacos, 0x1p-105L, -0x1.fp-1025L, 1.570796326794896619231321691639726790195L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2554 TEST_c_c (cacos, -0x1p-105L, -0x1.fp-1025L, 1.570796326794896619231321691639776094002L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2555#endif
2556 TEST_c_c (cacos, 0.0L, 0x1p-105L, 1.570796326794896619231321691639751442099L, -2.465190328815661891911651766508706967729e-32L),
2557 TEST_c_c (cacos, 0.0L, -0x1p-105L, 1.570796326794896619231321691639751442099L, 2.465190328815661891911651766508706967729e-32L),
2558 TEST_c_c (cacos, -0.0L, 0x1p-105L, 1.570796326794896619231321691639751442099L, -2.465190328815661891911651766508706967729e-32L),
2559 TEST_c_c (cacos, -0.0L, -0x1p-105L, 1.570796326794896619231321691639751442099L, 2.465190328815661891911651766508706967729e-32L),
2560 TEST_c_c (cacos, 0x1p-105L, 0.0L, 1.570796326794896619231321691639726790195L, -0.0L),
2561 TEST_c_c (cacos, -0x1p-105L, 0.0L, 1.570796326794896619231321691639776094002L, -0.0L),
2562 TEST_c_c (cacos, 0x1p-105L, -0.0L, 1.570796326794896619231321691639726790195L, 0.0L),
2563 TEST_c_c (cacos, -0x1p-105L, -0.0L, 1.570796326794896619231321691639776094002L, 0.0L),
ccc8cadf 2564#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 2565 TEST_c_c (cacos, 0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751305915L, -8.813735870195430252326093249797922409363e-1L),
2566 TEST_c_c (cacos, 0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751305915L, 8.813735870195430252326093249797922409363e-1L),
2567 TEST_c_c (cacos, -0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751578282L, -8.813735870195430252326093249797922409363e-1L),
2568 TEST_c_c (cacos, -0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751578282L, 8.813735870195430252326093249797922409363e-1L),
2569 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 1.765281878332676474347460257221369818872e-17L, -1.091004200533850618345330909857103457781e-17L),
2570 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 3.141592653589793220809824599952738140723L, -1.091004200533850618345330909857103457781e-17L),
2571 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 1.765281878332676474347460257221369818872e-17L, 1.091004200533850618345330909857103457781e-17L),
2572 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 3.141592653589793220809824599952738140723L, 1.091004200533850618345330909857103457781e-17L),
2573 TEST_c_c (cacos, 0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797922409363e-1L),
2574 TEST_c_c (cacos, 0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797922409363e-1L),
2575 TEST_c_c (cacos, -0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797922409363e-1L),
2576 TEST_c_c (cacos, -0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797922409363e-1L),
2577 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 1.387778780781445675529539585113525401762e-17L, -5.867357004219059108790368268900490184505e-4916L),
2578 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 3.141592653589793224584855575465046128902L, -5.867357004219059108790368268900490184505e-4916L),
2579 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 1.387778780781445675529539585113525401762e-17L, 5.867357004219059108790368268900490184505e-4916L),
2580 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 3.141592653589793224584855575465046128902L, 5.867357004219059108790368268900490184505e-4916L),
2581 TEST_c_c (cacos, 0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797922409363e-1L),
2582 TEST_c_c (cacos, 0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797922409363e-1L),
2583 TEST_c_c (cacos, -0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797922409363e-1L),
2584 TEST_c_c (cacos, -0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797922409363e-1L),
2585 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 1.387778780781445675529539585113525401762e-17L, -0.0L),
2586 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 3.141592653589793224584855575465046128902L, -0.0L),
2587 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 1.387778780781445675529539585113525401762e-17L, 0.0L),
2588 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 3.141592653589793224584855575465046128902L, 0.0L),
2589#endif
2590 TEST_c_c (cacos, 0x1p-112L, 0.5L, 1.570796326794896619231321691639751269838L, -4.812118250596034474977589134243684231352e-1L),
2591 TEST_c_c (cacos, 0x1p-112L, -0.5L, 1.570796326794896619231321691639751269838L, 4.812118250596034474977589134243684231352e-1L),
2592 TEST_c_c (cacos, -0x1p-112L, 0.5L, 1.570796326794896619231321691639751614359L, -4.812118250596034474977589134243684231352e-1L),
2593 TEST_c_c (cacos, -0x1p-112L, -0.5L, 1.570796326794896619231321691639751614359L, 4.812118250596034474977589134243684231352e-1L),
2594 TEST_c_c (cacos, 0.5L, 0x1p-112L, 1.047197551196597746154214461093167628066L, -2.223872343664663196047610660420739543258e-34L),
2595 TEST_c_c (cacos, -0.5L, 0x1p-112L, 2.094395102393195492308428922186335256131L, -2.223872343664663196047610660420739543258e-34L),
2596 TEST_c_c (cacos, 0.5L, -0x1p-112L, 1.047197551196597746154214461093167628066L, 2.223872343664663196047610660420739543258e-34L),
2597 TEST_c_c (cacos, -0.5L, -0x1p-112L, 2.094395102393195492308428922186335256131L, 2.223872343664663196047610660420739543258e-34L),
2598 TEST_c_c (cacos, 0x1p-112L, 0x1p-112L, 1.570796326794896619231321691639751249506L, -1.925929944387235853055977942584927318538e-34L),
2599 TEST_c_c (cacos, 0x1p-112L, -0x1p-112L, 1.570796326794896619231321691639751249506L, 1.925929944387235853055977942584927318538e-34L),
2600 TEST_c_c (cacos, -0x1p-112L, 0x1p-112L, 1.570796326794896619231321691639751634692L, -1.925929944387235853055977942584927318538e-34L),
2601 TEST_c_c (cacos, -0x1p-112L, -0x1p-112L, 1.570796326794896619231321691639751634692L, 1.925929944387235853055977942584927318538e-34L),
ccc8cadf 2602#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2603 TEST_c_c (cacos, 0x1.fp-16385L, 0x1p-112L, 1.570796326794896619231321691639751442099L, -1.925929944387235853055977942584927318538e-34L),
2604 TEST_c_c (cacos, 0x1.fp-16385L, -0x1p-112L, 1.570796326794896619231321691639751442099L, 1.925929944387235853055977942584927318538e-34L),
2605 TEST_c_c (cacos, -0x1.fp-16385L, 0x1p-112L, 1.570796326794896619231321691639751442099L, -1.925929944387235853055977942584927318538e-34L),
2606 TEST_c_c (cacos, -0x1.fp-16385L, -0x1p-112L, 1.570796326794896619231321691639751442099L, 1.925929944387235853055977942584927318538e-34L),
2607 TEST_c_c (cacos, 0x1p-112L, 0x1.fp-16385L, 1.570796326794896619231321691639751249506L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2608 TEST_c_c (cacos, -0x1p-112L, 0x1.fp-16385L, 1.570796326794896619231321691639751634692L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2609 TEST_c_c (cacos, 0x1p-112L, -0x1.fp-16385L, 1.570796326794896619231321691639751249506L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2610 TEST_c_c (cacos, -0x1p-112L, -0x1.fp-16385L, 1.570796326794896619231321691639751634692L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2611#endif
2612 TEST_c_c (cacos, 0.0L, 0x1p-112L, 1.570796326794896619231321691639751442099L, -1.925929944387235853055977942584927318538e-34L),
2613 TEST_c_c (cacos, 0.0L, -0x1p-112L, 1.570796326794896619231321691639751442099L, 1.925929944387235853055977942584927318538e-34L),
2614 TEST_c_c (cacos, -0.0L, 0x1p-112L, 1.570796326794896619231321691639751442099L, -1.925929944387235853055977942584927318538e-34L),
2615 TEST_c_c (cacos, -0.0L, -0x1p-112L, 1.570796326794896619231321691639751442099L, 1.925929944387235853055977942584927318538e-34L),
2616 TEST_c_c (cacos, 0x1p-112L, 0.0L, 1.570796326794896619231321691639751249506L, -0.0L),
2617 TEST_c_c (cacos, -0x1p-112L, 0.0L, 1.570796326794896619231321691639751634692L, -0.0L),
2618 TEST_c_c (cacos, 0x1p-112L, -0.0L, 1.570796326794896619231321691639751249506L, 0.0L),
2619 TEST_c_c (cacos, -0x1p-112L, -0.0L, 1.570796326794896619231321691639751634692L, 0.0L),
2620
2621 TEST_c_c (cacos, 0.75L, 1.25L, 1.11752014915610270578240049553777969L, -1.13239363160530819522266333696834467L),
2622 TEST_c_c (cacos, -2, -3, 2.1414491111159960199416055713254211L, 1.9833870299165354323470769028940395L),
2623 END_DATA (cacos)
2624 };
8847214f 2625
8847214f 2626static void
08198877 2627cacos_test (void)
8847214f 2628{
aaca11d8 2629 errno = 0;
08198877 2630 FUNC(cacos) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD		 2631 if (errno == ENOSYS)
2632 /* Function not implemented. */
2633 return;
2634
08198877
JM		 2635 START (cacos);
2636 RUN_TEST_LOOP_c_c (cacos, cacos_test_data, );
2637 END (cacos, complex);
2638}
8847214f 2639
08198877
JM		 2640static const struct test_c_c_data cacosh_test_data[] =
2641 {
2642 START_DATA (cacosh),
2643 TEST_c_c (cacosh, 0, 0, 0.0, M_PI_2l),
2644 TEST_c_c (cacosh, minus_zero, 0, 0.0, M_PI_2l),
2645 TEST_c_c (cacosh, 0, minus_zero, 0.0, -M_PI_2l),
2646 TEST_c_c (cacosh, minus_zero, minus_zero, 0.0, -M_PI_2l),
2647 TEST_c_c (cacosh, minus_infty, plus_infty, plus_infty, M_PI_34l),
2648 TEST_c_c (cacosh, minus_infty, minus_infty, plus_infty, -M_PI_34l),
2649
2650 TEST_c_c (cacosh, plus_infty, plus_infty, plus_infty, M_PI_4l),
2651 TEST_c_c (cacosh, plus_infty, minus_infty, plus_infty, -M_PI_4l),
2652
2653 TEST_c_c (cacosh, -10.0, plus_infty, plus_infty, M_PI_2l),
2654 TEST_c_c (cacosh, -10.0, minus_infty, plus_infty, -M_PI_2l),
2655 TEST_c_c (cacosh, 0, plus_infty, plus_infty, M_PI_2l),
2656 TEST_c_c (cacosh, 0, minus_infty, plus_infty, -M_PI_2l),
2657 TEST_c_c (cacosh, 0.1L, plus_infty, plus_infty, M_PI_2l),
2658 TEST_c_c (cacosh, 0.1L, minus_infty, plus_infty, -M_PI_2l),
2659
2660 TEST_c_c (cacosh, minus_infty, 0, plus_infty, M_PIl),
2661 TEST_c_c (cacosh, minus_infty, minus_zero, plus_infty, -M_PIl),
2662 TEST_c_c (cacosh, minus_infty, 100, plus_infty, M_PIl),
2663 TEST_c_c (cacosh, minus_infty, -100, plus_infty, -M_PIl),
2664
2665 TEST_c_c (cacosh, plus_infty, 0, plus_infty, 0.0),
2666 TEST_c_c (cacosh, plus_infty, minus_zero, plus_infty, minus_zero),
2667 TEST_c_c (cacosh, plus_infty, 0.5, plus_infty, 0.0),
2668 TEST_c_c (cacosh, plus_infty, -0.5, plus_infty, minus_zero),
2669
2670 TEST_c_c (cacosh, plus_infty, qnan_value, plus_infty, qnan_value),
2671 TEST_c_c (cacosh, minus_infty, qnan_value, plus_infty, qnan_value),
2672
2673 TEST_c_c (cacosh, 0, qnan_value, qnan_value, qnan_value),
2674 TEST_c_c (cacosh, minus_zero, qnan_value, qnan_value, qnan_value),
2675
2676 TEST_c_c (cacosh, qnan_value, plus_infty, plus_infty, qnan_value),
2677 TEST_c_c (cacosh, qnan_value, minus_infty, plus_infty, qnan_value),
2678
2679 TEST_c_c (cacosh, 10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
2680 TEST_c_c (cacosh, -10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
2681
2682 TEST_c_c (cacosh, qnan_value, 0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
2683 TEST_c_c (cacosh, qnan_value, -0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
2684
2685 TEST_c_c (cacosh, qnan_value, qnan_value, qnan_value, qnan_value),
2686
2687 TEST_c_c (cacosh, plus_zero, -1.5L, 1.194763217287109304111930828519090523536L, -M_PI_2l),
2688 TEST_c_c (cacosh, minus_zero, -1.5L, 1.194763217287109304111930828519090523536L, -M_PI_2l),
2689 TEST_c_c (cacosh, plus_zero, -1.0L, 0.8813735870195430252326093249797923090282L, -M_PI_2l),
2690 TEST_c_c (cacosh, minus_zero, -1.0L, 0.8813735870195430252326093249797923090282L, -M_PI_2l),
2691 TEST_c_c (cacosh, plus_zero, -0.5L, 0.4812118250596034474977589134243684231352L, -M_PI_2l),
2692 TEST_c_c (cacosh, minus_zero, -0.5L, 0.4812118250596034474977589134243684231352L, -M_PI_2l),
2693 TEST_c_c (cacosh, plus_zero, 0.5L, 0.4812118250596034474977589134243684231352L, M_PI_2l),
2694 TEST_c_c (cacosh, minus_zero, 0.5L, 0.4812118250596034474977589134243684231352L, M_PI_2l),
2695 TEST_c_c (cacosh, plus_zero, 1.0L, 0.8813735870195430252326093249797923090282L, M_PI_2l),
2696 TEST_c_c (cacosh, minus_zero, 1.0L, 0.8813735870195430252326093249797923090282L, M_PI_2l),
2697 TEST_c_c (cacosh, plus_zero, 1.5L, 1.194763217287109304111930828519090523536L, M_PI_2l),
2698 TEST_c_c (cacosh, minus_zero, 1.5L, 1.194763217287109304111930828519090523536L, M_PI_2l),
2699
2700 TEST_c_c (cacosh, -1.5L, plus_zero, 0.9624236501192068949955178268487368462704L, M_PIl),
2701 TEST_c_c (cacosh, -1.5L, minus_zero, 0.9624236501192068949955178268487368462704L, -M_PIl),
2702 TEST_c_c (cacosh, -1.0L, plus_zero, plus_zero, M_PIl),
2703 TEST_c_c (cacosh, -1.0L, minus_zero, plus_zero, -M_PIl),
2704 TEST_c_c (cacosh, -0.5L, plus_zero, plus_zero, 2.094395102393195492308428922186335256131L),
2705 TEST_c_c (cacosh, -0.5L, minus_zero, plus_zero, -2.094395102393195492308428922186335256131L),
2706 TEST_c_c (cacosh, 0.5L, plus_zero, plus_zero, 1.047197551196597746154214461093167628066L),
2707 TEST_c_c (cacosh, 0.5L, minus_zero, plus_zero, -1.047197551196597746154214461093167628066L),
2708 TEST_c_c (cacosh, 1.0L, plus_zero, plus_zero, plus_zero),
2709 TEST_c_c (cacosh, 1.0L, minus_zero, plus_zero, minus_zero),
2710 TEST_c_c (cacosh, 1.5L, plus_zero, 0.9624236501192068949955178268487368462704L, plus_zero),
2711 TEST_c_c (cacosh, 1.5L, minus_zero, 0.9624236501192068949955178268487368462704L, minus_zero),
2712
2713 TEST_c_c (cacosh, 0x1p50L, 1.0L, 3.535050620855721078027883819436720218708e1L, 8.881784197001252323389053344727730248720e-16L),
2714 TEST_c_c (cacosh, 0x1p50L, -1.0L, 3.535050620855721078027883819436720218708e1L, -8.881784197001252323389053344727730248720e-16L),
2715 TEST_c_c (cacosh, -0x1p50L, 1.0L, 3.535050620855721078027883819436720218708e1L, 3.141592653589792350284223683154270545292L),
2716 TEST_c_c (cacosh, -0x1p50L, -1.0L, 3.535050620855721078027883819436720218708e1L, -3.141592653589792350284223683154270545292L),
2717 TEST_c_c (cacosh, 1.0L, 0x1p50L, 3.535050620855721078027883819436759661753e1L, 1.570796326794895731052901991514519103193L),
2718 TEST_c_c (cacosh, -1.0L, 0x1p50L, 3.535050620855721078027883819436759661753e1L, 1.570796326794897507409741391764983781004L),
2719 TEST_c_c (cacosh, 1.0L, -0x1p50L, 3.535050620855721078027883819436759661753e1L, -1.570796326794895731052901991514519103193L),
2720 TEST_c_c (cacosh, -1.0L, -0x1p50L, 3.535050620855721078027883819436759661753e1L, -1.570796326794897507409741391764983781004L),
52ce4860 2721#ifndef TEST_FLOAT
08198877
JM		 2722 TEST_c_c (cacosh, 0x1p500L, 1.0L, 3.472667374605326000180332928505464606058e2L, 3.054936363499604682051979393213617699789e-151L),
2723 TEST_c_c (cacosh, 0x1p500L, -1.0L, 3.472667374605326000180332928505464606058e2L, -3.054936363499604682051979393213617699789e-151L),
2724 TEST_c_c (cacosh, -0x1p500L, 1.0L, 3.472667374605326000180332928505464606058e2L, 3.141592653589793238462643383279502884197L),
2725 TEST_c_c (cacosh, -0x1p500L, -1.0L, 3.472667374605326000180332928505464606058e2L, -3.141592653589793238462643383279502884197L),
2726 TEST_c_c (cacosh, 1.0L, 0x1p500L, 3.472667374605326000180332928505464606058e2L, 1.570796326794896619231321691639751442099L),
2727 TEST_c_c (cacosh, -1.0L, 0x1p500L, 3.472667374605326000180332928505464606058e2L, 1.570796326794896619231321691639751442099L),
2728 TEST_c_c (cacosh, 1.0L, -0x1p500L, 3.472667374605326000180332928505464606058e2L, -1.570796326794896619231321691639751442099L),
2729 TEST_c_c (cacosh, -1.0L, -0x1p500L, 3.472667374605326000180332928505464606058e2L, -1.570796326794896619231321691639751442099L),
52ce4860
JM		 2730#endif
2731#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 2732 TEST_c_c (cacosh, 0x1p5000L, 1.0L, 3.466429049980286492395577839412341016946e3L, 7.079811261048172892385615158694057552948e-1506L),
2733 TEST_c_c (cacosh, 0x1p5000L, -1.0L, 3.466429049980286492395577839412341016946e3L, -7.079811261048172892385615158694057552948e-1506L),
2734 TEST_c_c (cacosh, -0x1p5000L, 1.0L, 3.466429049980286492395577839412341016946e3L, 3.141592653589793238462643383279502884197L),
2735 TEST_c_c (cacosh, -0x1p5000L, -1.0L, 3.466429049980286492395577839412341016946e3L, -3.141592653589793238462643383279502884197L),
2736 TEST_c_c (cacosh, 1.0L, 0x1p5000L, 3.466429049980286492395577839412341016946e3L, 1.570796326794896619231321691639751442099L),
2737 TEST_c_c (cacosh, -1.0L, 0x1p5000L, 3.466429049980286492395577839412341016946e3L, 1.570796326794896619231321691639751442099L),
2738 TEST_c_c (cacosh, 1.0L, -0x1p5000L, 3.466429049980286492395577839412341016946e3L, -1.570796326794896619231321691639751442099L),
2739 TEST_c_c (cacosh, -1.0L, -0x1p5000L, 3.466429049980286492395577839412341016946e3L, -1.570796326794896619231321691639751442099L),
2740#endif
2741 TEST_c_c (cacosh, 0x1.fp127L, 0x1.fp127L, 8.973081118419833726837456344608533993585e1L, 7.853981633974483096156608458198757210493e-1L),
52ce4860 2742#ifndef TEST_FLOAT
08198877 2743 TEST_c_c (cacosh, 0x1.fp1023L, 0x1.fp1023L, 7.107906849659093345062145442726115449315e2L, 7.853981633974483096156608458198757210493e-1L),
52ce4860
JM		 2744#endif
2745#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 2746 TEST_c_c (cacosh, 0x1.fp16383L, 0x1.fp16383L, 1.135753137836666928715489992987020363057e4L, 7.853981633974483096156608458198757210493e-1L),
2747#endif
2748 TEST_c_c (cacosh, 0x1.fp-129L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442097L),
2749 TEST_c_c (cacosh, 0x1.fp-129L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442097L),
2750 TEST_c_c (cacosh, -0x1.fp-129L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442100L),
2751 TEST_c_c (cacosh, -0x1.fp-129L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442100L),
2752 TEST_c_c (cacosh, 1.5L, 0x1.fp-129L, 9.624236501192068949955178268487368462704e-1L, 2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2753 TEST_c_c (cacosh, -1.5L, 0x1.fp-129L, 9.624236501192068949955178268487368462704e-1L, 3.141592653589793238462643383279502884195L),
2754 TEST_c_c (cacosh, 1.5L, -0x1.fp-129L, 9.624236501192068949955178268487368462704e-1L, -2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2755 TEST_c_c (cacosh, -1.5L, -0x1.fp-129L, 9.624236501192068949955178268487368462704e-1L, -3.141592653589793238462643383279502884195L),
52ce4860 2756#ifndef TEST_FLOAT
08198877
JM		 2757 TEST_c_c (cacosh, 0x1.fp-1025L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442099L),
2758 TEST_c_c (cacosh, 0x1.fp-1025L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442099L),
2759 TEST_c_c (cacosh, -0x1.fp-1025L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442099L),
2760 TEST_c_c (cacosh, -0x1.fp-1025L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442099L),
2761 TEST_c_c (cacosh, 1.5L, 0x1.fp-1025L, 9.624236501192068949955178268487368462704e-1L, 4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2762 TEST_c_c (cacosh, -1.5L, 0x1.fp-1025L, 9.624236501192068949955178268487368462704e-1L, 3.141592653589793238462643383279502884197L),
2763 TEST_c_c (cacosh, 1.5L, -0x1.fp-1025L, 9.624236501192068949955178268487368462704e-1L, -4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2764 TEST_c_c (cacosh, -1.5L, -0x1.fp-1025L, 9.624236501192068949955178268487368462704e-1L, -3.141592653589793238462643383279502884197L),
52ce4860
JM		 2765#endif
2766#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2767 TEST_c_c (cacosh, 0x1.fp-16385L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442099L),
2768 TEST_c_c (cacosh, 0x1.fp-16385L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442099L),
2769 TEST_c_c (cacosh, -0x1.fp-16385L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442099L),
2770 TEST_c_c (cacosh, -0x1.fp-16385L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442099L),
2771 TEST_c_c (cacosh, 1.5L, 0x1.fp-16385L, 9.624236501192068949955178268487368462704e-1L, 7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
2772 TEST_c_c (cacosh, -1.5L, 0x1.fp-16385L, 9.624236501192068949955178268487368462704e-1L, 3.141592653589793238462643383279502884197L),
2773 TEST_c_c (cacosh, 1.5L, -0x1.fp-16385L, 9.624236501192068949955178268487368462704e-1L, -7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
2774 TEST_c_c (cacosh, -1.5L, -0x1.fp-16385L, 9.624236501192068949955178268487368462704e-1L, -3.141592653589793238462643383279502884197L),
2775#endif
2776 TEST_c_c (cacosh, 0.5L, 1.0L, 9.261330313501824245501244453057873152694e-1L, 1.221357263937683325603909865564381489366L),
2777 TEST_c_c (cacosh, 0.5L, -1.0L, 9.261330313501824245501244453057873152694e-1L, -1.221357263937683325603909865564381489366L),
2778 TEST_c_c (cacosh, -0.5L, 1.0L, 9.261330313501824245501244453057873152694e-1L, 1.920235389652109912858733517715121394831L),
2779 TEST_c_c (cacosh, -0.5L, -1.0L, 9.261330313501824245501244453057873152694e-1L, -1.920235389652109912858733517715121394831L),
2780 TEST_c_c (cacosh, 1.0L, 0.5L, 7.328576759736452608886724437653071523305e-1L, 6.748888455860063801646649673121744318756e-1L),
2781 TEST_c_c (cacosh, -1.0L, 0.5L, 7.328576759736452608886724437653071523305e-1L, 2.466703808003786858297978415967328452322L),
2782 TEST_c_c (cacosh, 1.0L, -0.5L, 7.328576759736452608886724437653071523305e-1L, -6.748888455860063801646649673121744318756e-1L),
2783 TEST_c_c (cacosh, -1.0L, -0.5L, 7.328576759736452608886724437653071523305e-1L, -2.466703808003786858297978415967328452322L),
2784 TEST_c_c (cacosh, 0.25L, 1.0L, 8.924633639033482359562124741744951972772e-1L, 1.394493894017929688812643125003661339452L),
2785 TEST_c_c (cacosh, 0.25L, -1.0L, 8.924633639033482359562124741744951972772e-1L, -1.394493894017929688812643125003661339452L),
2786 TEST_c_c (cacosh, -0.25L, 1.0L, 8.924633639033482359562124741744951972772e-1L, 1.747098759571863549650000258275841544745L),
2787 TEST_c_c (cacosh, -0.25L, -1.0L, 8.924633639033482359562124741744951972772e-1L, -1.747098759571863549650000258275841544745L),
2788 TEST_c_c (cacosh, 1.0L, 0.25L, 5.097911466811016354623559941115413499164e-1L, 4.890443302710802929202843732146540079124e-1L),
2789 TEST_c_c (cacosh, -1.0L, 0.25L, 5.097911466811016354623559941115413499164e-1L, 2.652548323318712945542359010064848876285L),
2790 TEST_c_c (cacosh, 1.0L, -0.25L, 5.097911466811016354623559941115413499164e-1L, -4.890443302710802929202843732146540079124e-1L),
2791 TEST_c_c (cacosh, -1.0L, -0.25L, 5.097911466811016354623559941115413499164e-1L, -2.652548323318712945542359010064848876285L),
2792 TEST_c_c (cacosh, 0x1.fp-10L, 1.0L, 8.813742198809567991336704287826445879025e-1L, 1.569458417435338878318763342108699202986L),
2793 TEST_c_c (cacosh, 0x1.fp-10L, -1.0L, 8.813742198809567991336704287826445879025e-1L, -1.569458417435338878318763342108699202986L),
2794 TEST_c_c (cacosh, -0x1.fp-10L, 1.0L, 8.813742198809567991336704287826445879025e-1L, 1.572134236154454360143880041170803681211L),
2795 TEST_c_c (cacosh, -0x1.fp-10L, -1.0L, 8.813742198809567991336704287826445879025e-1L, -1.572134236154454360143880041170803681211L),
2796 TEST_c_c (cacosh, 1.0L, 0x1.fp-10L, 4.350501469856803800217957402220976497152e-2L, 4.349129763101882771258049954181971959031e-2L),
2797 TEST_c_c (cacosh, -1.0L, 0x1.fp-10L, 4.350501469856803800217957402220976497152e-2L, 3.098101355958774410750062883737683164607L),
2798 TEST_c_c (cacosh, 1.0L, -0x1.fp-10L, 4.350501469856803800217957402220976497152e-2L, -4.349129763101882771258049954181971959031e-2L),
2799 TEST_c_c (cacosh, -1.0L, -0x1.fp-10L, 4.350501469856803800217957402220976497152e-2L, -3.098101355958774410750062883737683164607L),
2800 TEST_c_c (cacosh, 0x1.fp-30L, 1.0L, 8.813735870195430258081932989769495326854e-1L, 1.570796325518966635014803151387033957091L),
2801 TEST_c_c (cacosh, 0x1.fp-30L, -1.0L, 8.813735870195430258081932989769495326854e-1L, -1.570796325518966635014803151387033957091L),
2802 TEST_c_c (cacosh, -0x1.fp-30L, 1.0L, 8.813735870195430258081932989769495326854e-1L, 1.570796328070826603447840231892468927106L),
2803 TEST_c_c (cacosh, -0x1.fp-30L, -1.0L, 8.813735870195430258081932989769495326854e-1L, -1.570796328070826603447840231892468927106L),
2804 TEST_c_c (cacosh, 1.0L, 0x1.fp-30L, 4.247867098745151888768727039216644758847e-5L, 4.247867097467650115899790787875186617316e-5L),
2805 TEST_c_c (cacosh, -1.0L, 0x1.fp-30L, 4.247867098745151888768727039216644758847e-5L, 3.141550174918818561961484385371624132331L),
2806 TEST_c_c (cacosh, 1.0L, -0x1.fp-30L, 4.247867098745151888768727039216644758847e-5L, -4.247867097467650115899790787875186617316e-5L),
2807 TEST_c_c (cacosh, -1.0L, -0x1.fp-30L, 4.247867098745151888768727039216644758847e-5L, -3.141550174918818561961484385371624132331L),
2808 TEST_c_c (cacosh, 0x1.fp-100L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691638670687364L),
2809 TEST_c_c (cacosh, 0x1.fp-100L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691638670687364L),
2810 TEST_c_c (cacosh, -0x1.fp-100L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691640832196834L),
2811 TEST_c_c (cacosh, -0x1.fp-100L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691640832196834L),
2812 TEST_c_c (cacosh, 1.0L, 0x1.fp-100L, 1.236292038260260888664514866457202186027e-15L, 1.236292038260260888664514866456887257525e-15L),
2813 TEST_c_c (cacosh, -1.0L, 0x1.fp-100L, 1.236292038260260888664514866457202186027e-15L, 3.141592653589792002170605123018614219682L),
2814 TEST_c_c (cacosh, 1.0L, -0x1.fp-100L, 1.236292038260260888664514866457202186027e-15L, -1.236292038260260888664514866456887257525e-15L),
2815 TEST_c_c (cacosh, -1.0L, -0x1.fp-100L, 1.236292038260260888664514866457202186027e-15L, -3.141592653589792002170605123018614219682L),
2816 TEST_c_c (cacosh, 0x1.fp-129L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442097L),
2817 TEST_c_c (cacosh, 0x1.fp-129L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442097L),
2818 TEST_c_c (cacosh, -0x1.fp-129L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442101L),
2819 TEST_c_c (cacosh, -0x1.fp-129L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442101L),
2820 TEST_c_c (cacosh, 1.0L, 0x1.fp-129L, 5.335635276982233498398987585285818977933e-20L, 5.335635276982233498398987585285818977930e-20L),
2821 TEST_c_c (cacosh, -1.0L, 0x1.fp-129L, 5.335635276982233498398987585285818977933e-20L, 3.141592653589793238409287030509680549213L),
2822 TEST_c_c (cacosh, 1.0L, -0x1.fp-129L, 5.335635276982233498398987585285818977933e-20L, -5.335635276982233498398987585285818977930e-20L),
2823 TEST_c_c (cacosh, -1.0L, -0x1.fp-129L, 5.335635276982233498398987585285818977933e-20L, -3.141592653589793238409287030509680549213L),
52ce4860 2824#ifndef TEST_FLOAT
08198877
JM		 2825 TEST_c_c (cacosh, 0x1.fp-1000L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2826 TEST_c_c (cacosh, 0x1.fp-1000L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2827 TEST_c_c (cacosh, -0x1.fp-1000L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2828 TEST_c_c (cacosh, -0x1.fp-1000L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2829 TEST_c_c (cacosh, 1.0L, 0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, 4.252291453851660175550490409247739011867e-151L),
2830 TEST_c_c (cacosh, -1.0L, 0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, 3.141592653589793238462643383279502884197L),
2831 TEST_c_c (cacosh, 1.0L, -0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, -4.252291453851660175550490409247739011867e-151L),
2832 TEST_c_c (cacosh, -1.0L, -0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, -3.141592653589793238462643383279502884197L),
2833 TEST_c_c (cacosh, 0x1.fp-1025L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2834 TEST_c_c (cacosh, 0x1.fp-1025L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2835 TEST_c_c (cacosh, -0x1.fp-1025L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2836 TEST_c_c (cacosh, -0x1.fp-1025L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2837 TEST_c_c (cacosh, 1.0L, 0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, 7.340879205566679497036857179189356754017e-155L),
2838 TEST_c_c (cacosh, -1.0L, 0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, 3.141592653589793238462643383279502884197L),
2839 TEST_c_c (cacosh, 1.0L, -0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, -7.340879205566679497036857179189356754017e-155L),
2840 TEST_c_c (cacosh, -1.0L, -0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, -3.141592653589793238462643383279502884197L),
52ce4860
JM		 2841#endif
2842#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2843 TEST_c_c (cacosh, 0x1.fp-10000L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2844 TEST_c_c (cacosh, 0x1.fp-10000L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2845 TEST_c_c (cacosh, -0x1.fp-10000L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2846 TEST_c_c (cacosh, -0x1.fp-10000L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2847 TEST_c_c (cacosh, 1.0L, 0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, 9.854680208706673586644342922051388714633e-1506L),
2848 TEST_c_c (cacosh, -1.0L, 0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, 3.141592653589793238462643383279502884197L),
2849 TEST_c_c (cacosh, 1.0L, -0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, -9.854680208706673586644342922051388714633e-1506L),
2850 TEST_c_c (cacosh, -1.0L, -0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, -3.141592653589793238462643383279502884197L),
2851 TEST_c_c (cacosh, 0x1.fp-16385L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2852 TEST_c_c (cacosh, 0x1.fp-16385L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2853 TEST_c_c (cacosh, -0x1.fp-16385L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2854 TEST_c_c (cacosh, -0x1.fp-16385L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2855 TEST_c_c (cacosh, 1.0L, 0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, 9.023632056840860275214893047597614177639e-2467L),
2856 TEST_c_c (cacosh, -1.0L, 0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, 3.141592653589793238462643383279502884197L),
2857 TEST_c_c (cacosh, 1.0L, -0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, -9.023632056840860275214893047597614177639e-2467L),
2858 TEST_c_c (cacosh, -1.0L, -0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, -3.141592653589793238462643383279502884197L),
2859#endif
2860 TEST_c_c (cacosh, 0x1p-23L, 0x1.000002p0L, 8.813736713132400470205730751186547909968e-1L, 1.570796242501204621739026081991856762292L),
2861 TEST_c_c (cacosh, 0x1p-23L, -0x1.000002p0L, 8.813736713132400470205730751186547909968e-1L, -1.570796242501204621739026081991856762292L),
2862 TEST_c_c (cacosh, -0x1p-23L, 0x1.000002p0L, 8.813736713132400470205730751186547909968e-1L, 1.570796411088588616723617301287646121905L),
2863 TEST_c_c (cacosh, -0x1p-23L, -0x1.000002p0L, 8.813736713132400470205730751186547909968e-1L, -1.570796411088588616723617301287646121905L),
2864 TEST_c_c (cacosh, 0x1.000002p0L, 0x1p-23L, 5.364668491573609633134147164031476452679e-4L, 2.222118384408546368406374049167636760903e-4L),
2865 TEST_c_c (cacosh, -0x1.000002p0L, 0x1p-23L, 5.364668491573609633134147164031476452679e-4L, 3.141370441751352383825802745874586120521L),
2866 TEST_c_c (cacosh, 0x1.000002p0L, -0x1p-23L, 5.364668491573609633134147164031476452679e-4L, -2.222118384408546368406374049167636760903e-4L),
2867 TEST_c_c (cacosh, -0x1.000002p0L, -0x1p-23L, 5.364668491573609633134147164031476452679e-4L, -3.141370441751352383825802745874586120521L),
2868 TEST_c_c (cacosh, 0x1.fp-129L, 0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, 1.570796326794896619231321691639751442097L),
2869 TEST_c_c (cacosh, 0x1.fp-129L, -0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, -1.570796326794896619231321691639751442097L),
2870 TEST_c_c (cacosh, -0x1.fp-129L, 0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, 1.570796326794896619231321691639751442101L),
2871 TEST_c_c (cacosh, -0x1.fp-129L, -0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, -1.570796326794896619231321691639751442101L),
2872 TEST_c_c (cacosh, 0x1.000002p0L, 0x1.fp-129L, 4.882812451493617206486388134172712975070e-4L, 5.830451806317544230969669308596361881467e-36L),
2873 TEST_c_c (cacosh, -0x1.000002p0L, 0x1.fp-129L, 4.882812451493617206486388134172712975070e-4L, 3.141592653589793238462643383279502878367L),
2874 TEST_c_c (cacosh, 0x1.000002p0L, -0x1.fp-129L, 4.882812451493617206486388134172712975070e-4L, -5.830451806317544230969669308596361881467e-36L),
2875 TEST_c_c (cacosh, -0x1.000002p0L, -0x1.fp-129L, 4.882812451493617206486388134172712975070e-4L, -3.141592653589793238462643383279502878367L),
2876 TEST_c_c (cacosh, 0.0L, 0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, 1.570796326794896619231321691639751442099L),
2877 TEST_c_c (cacosh, 0.0L, -0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, -1.570796326794896619231321691639751442099L),
2878 TEST_c_c (cacosh, -0.0L, 0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, 1.570796326794896619231321691639751442099L),
2879 TEST_c_c (cacosh, -0.0L, -0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, -1.570796326794896619231321691639751442099L),
2880 TEST_c_c (cacosh, 0x1.000002p0L, 0.0L, 4.882812451493617206486388134172712975070e-4L, 0.0L),
2881 TEST_c_c (cacosh, -0x1.000002p0L, 0.0L, 4.882812451493617206486388134172712975070e-4L, 3.141592653589793238462643383279502884197L),
2882 TEST_c_c (cacosh, 0x1.000002p0L, -0.0L, 4.882812451493617206486388134172712975070e-4L, -0.0L),
2883 TEST_c_c (cacosh, -0x1.000002p0L, -0.0L, 4.882812451493617206486388134172712975070e-4L, -3.141592653589793238462643383279502884197L),
52ce4860 2884#ifndef TEST_FLOAT
08198877
JM		 2885 TEST_c_c (cacosh, 0x1p-52L, 0x1.0000000000001p0L, 8.813735870195431822418551933572982483664e-1L, 1.570796326794896462222075823262262934288L),
2886 TEST_c_c (cacosh, 0x1p-52L, -0x1.0000000000001p0L, 8.813735870195431822418551933572982483664e-1L, -1.570796326794896462222075823262262934288L),
2887 TEST_c_c (cacosh, -0x1p-52L, 0x1.0000000000001p0L, 8.813735870195431822418551933572982483664e-1L, 1.570796326794896776240567560017239949909L),
2888 TEST_c_c (cacosh, -0x1p-52L, -0x1.0000000000001p0L, 8.813735870195431822418551933572982483664e-1L, -1.570796326794896776240567560017239949909L),
2889 TEST_c_c (cacosh, 0x1.0000000000001p0L, 0x1p-52L, 2.315303644582684770975188768022139415020e-8L, 9.590301705980041385828904092662391018164e-9L),
2890 TEST_c_c (cacosh, -0x1.0000000000001p0L, 0x1p-52L, 2.315303644582684770975188768022139415020e-8L, 3.141592643999491532482601997450598791535L),
2891 TEST_c_c (cacosh, 0x1.0000000000001p0L, -0x1p-52L, 2.315303644582684770975188768022139415020e-8L, -9.590301705980041385828904092662391018164e-9L),
2892 TEST_c_c (cacosh, -0x1.0000000000001p0L, -0x1p-52L, 2.315303644582684770975188768022139415020e-8L, -3.141592643999491532482601997450598791535L),
2893 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, 1.570796326794896619231321691639751442099L),
2894 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, -1.570796326794896619231321691639751442099L),
2895 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, 1.570796326794896619231321691639751442099L),
2896 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, -1.570796326794896619231321691639751442099L),
2897 TEST_c_c (cacosh, 0x1.0000000000001p0L, 0x1.fp-1025L, 2.107342425544701550354780375182800088393e-8L, 2.557178503953494342609835913586108008322e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2898 TEST_c_c (cacosh, -0x1.0000000000001p0L, 0x1.fp-1025L, 2.107342425544701550354780375182800088393e-8L, 3.141592653589793238462643383279502884197L),
2899 TEST_c_c (cacosh, 0x1.0000000000001p0L, -0x1.fp-1025L, 2.107342425544701550354780375182800088393e-8L, -2.557178503953494342609835913586108008322e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2900 TEST_c_c (cacosh, -0x1.0000000000001p0L, -0x1.fp-1025L, 2.107342425544701550354780375182800088393e-8L, -3.141592653589793238462643383279502884197L),
2901 TEST_c_c (cacosh, 0.0L, 0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, 1.570796326794896619231321691639751442099L),
2902 TEST_c_c (cacosh, 0.0L, -0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, -1.570796326794896619231321691639751442099L),
2903 TEST_c_c (cacosh, -0.0L, 0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, 1.570796326794896619231321691639751442099L),
2904 TEST_c_c (cacosh, -0.0L, -0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, -1.570796326794896619231321691639751442099L),
2905 TEST_c_c (cacosh, 0x1.0000000000001p0L, 0.0L, 2.107342425544701550354780375182800088393e-8L, 0.0L),
2906 TEST_c_c (cacosh, -0x1.0000000000001p0L, 0.0L, 2.107342425544701550354780375182800088393e-8L, 3.141592653589793238462643383279502884197L),
2907 TEST_c_c (cacosh, 0x1.0000000000001p0L, -0.0L, 2.107342425544701550354780375182800088393e-8L, -0.0L),
2908 TEST_c_c (cacosh, -0x1.0000000000001p0L, -0.0L, 2.107342425544701550354780375182800088393e-8L, -3.141592653589793238462643383279502884197L),
52ce4860
JM		 2909#endif
2910#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 2911 TEST_c_c (cacosh, 0x1p-63L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610131001e-1L, 1.570796326794896619154657020805582738031L),
2912 TEST_c_c (cacosh, 0x1p-63L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610131001e-1L, -1.570796326794896619154657020805582738031L),
2913 TEST_c_c (cacosh, -0x1p-63L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610131001e-1L, 1.570796326794896619307986362473920146166L),
2914 TEST_c_c (cacosh, -0x1p-63L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610131001e-1L, -1.570796326794896619307986362473920146166L),
2915 TEST_c_c (cacosh, 0x1.0000000000000002p0L, 0x1p-63L, 5.116146586219826555037807251857670783420e-10L, 2.119177303101063432592523199680782317447e-10L),
2916 TEST_c_c (cacosh, -0x1.0000000000000002p0L, 0x1p-63L, 5.116146586219826555037807251857670783420e-10L, 3.141592653377875508152537040020250564229L),
2917 TEST_c_c (cacosh, 0x1.0000000000000002p0L, -0x1p-63L, 5.116146586219826555037807251857670783420e-10L, -2.119177303101063432592523199680782317447e-10L),
2918 TEST_c_c (cacosh, -0x1.0000000000000002p0L, -0x1p-63L, 5.116146586219826555037807251857670783420e-10L, -3.141592653377875508152537040020250564229L),
52ce4860 2919# if LDBL_MIN_EXP <= -16381
08198877
JM		 2920 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, 1.570796326794896619231321691639751442099L),
2921 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, -1.570796326794896619231321691639751442099L),
2922 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, 1.570796326794896619231321691639751442099L),
2923 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, -1.570796326794896619231321691639751442099L),
2924 TEST_c_c (cacosh, 0x1.0000000000000002p0L, 0x1.fp-16385L, 4.656612873077392578082927418388212703712e-10L, 1.748608650034385653922359120438227480943e-4923L),
2925 TEST_c_c (cacosh, -0x1.0000000000000002p0L, 0x1.fp-16385L, 4.656612873077392578082927418388212703712e-10L, 3.141592653589793238462643383279502884197L),
2926 TEST_c_c (cacosh, 0x1.0000000000000002p0L, -0x1.fp-16385L, 4.656612873077392578082927418388212703712e-10L, -1.748608650034385653922359120438227480943e-4923L),
2927 TEST_c_c (cacosh, -0x1.0000000000000002p0L, -0x1.fp-16385L, 4.656612873077392578082927418388212703712e-10L, -3.141592653589793238462643383279502884197L),
52ce4860 2928# endif
08198877
JM		 2929 TEST_c_c (cacosh, 0.0L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, 1.570796326794896619231321691639751442099L),
2930 TEST_c_c (cacosh, 0.0L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, -1.570796326794896619231321691639751442099L),
2931 TEST_c_c (cacosh, -0.0L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, 1.570796326794896619231321691639751442099L),
2932 TEST_c_c (cacosh, -0.0L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, -1.570796326794896619231321691639751442099L),
2933 TEST_c_c (cacosh, 0x1.0000000000000002p0L, 0.0L, 4.656612873077392578082927418388212703712e-10L, 0.0L),
2934 TEST_c_c (cacosh, -0x1.0000000000000002p0L, 0.0L, 4.656612873077392578082927418388212703712e-10L, 3.141592653589793238462643383279502884197L),
2935 TEST_c_c (cacosh, 0x1.0000000000000002p0L, -0.0L, 4.656612873077392578082927418388212703712e-10L, -0.0L),
2936 TEST_c_c (cacosh, -0x1.0000000000000002p0L, -0.0L, 4.656612873077392578082927418388212703712e-10L, -3.141592653589793238462643383279502884197L),
52ce4860
JM		 2937#endif
2938#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 2939 TEST_c_c (cacosh, 0x1p-106L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639742726335L),
2940 TEST_c_c (cacosh, 0x1p-106L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639742726335L),
2941 TEST_c_c (cacosh, -0x1p-106L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639760157863L),
2942 TEST_c_c (cacosh, -0x1p-106L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639760157863L),
2943 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, 0x1p-106L, 2.285028863093221674154232933662774454211e-16L, 5.394221422390606848017034778914096659726e-17L),
2944 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, 0x1p-106L, 2.285028863093221674154232933662774454211e-16L, 3.141592653589793184520429159373434404027L),
2945 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, -0x1p-106L, 2.285028863093221674154232933662774454211e-16L, -5.394221422390606848017034778914096659726e-17L),
2946 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, -0x1p-106L, 2.285028863093221674154232933662774454211e-16L, -3.141592653589793184520429159373434404027L),
2947 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639751442099L),
2948 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639751442099L),
2949 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639751442099L),
2950 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639751442099L),
2951 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 2.220446049250313080847263336181636063482e-16L, 2.426922623448365473354662093431821897807e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2952 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 2.220446049250313080847263336181636063482e-16L, 3.141592653589793238462643383279502884197L),
2953 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 2.220446049250313080847263336181636063482e-16L, -2.426922623448365473354662093431821897807e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2954 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 2.220446049250313080847263336181636063482e-16L, -3.141592653589793238462643383279502884197L),
2955 TEST_c_c (cacosh, 0.0L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639751442099L),
2956 TEST_c_c (cacosh, 0.0L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639751442099L),
2957 TEST_c_c (cacosh, -0.0L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639751442099L),
2958 TEST_c_c (cacosh, -0.0L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639751442099L),
2959 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, 0.0L, 2.220446049250313080847263336181636063482e-16L, 0.0L),
2960 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, 0.0L, 2.220446049250313080847263336181636063482e-16L, 3.141592653589793238462643383279502884197L),
2961 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, -0.0L, 2.220446049250313080847263336181636063482e-16L, -0.0L),
2962 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, -0.0L, 2.220446049250313080847263336181636063482e-16L, -3.141592653589793238462643383279502884197L),
52ce4860
JM		 2963#endif
2964#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 2965 TEST_c_c (cacosh, 0x1p-113L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751374007L),
2966 TEST_c_c (cacosh, 0x1p-113L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751374007L),
2967 TEST_c_c (cacosh, -0x1p-113L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751510190L),
2968 TEST_c_c (cacosh, -0x1p-113L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751510190L),
2969 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, 0x1p-113L, 2.019699255375255198156433710951064632386e-17L, 4.767863183742677481693563511435642755521e-18L),
2970 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, 0x1p-113L, 2.019699255375255198156433710951064632386e-17L, 3.141592653589793233694780199536825402504L),
2971 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, -0x1p-113L, 2.019699255375255198156433710951064632386e-17L, -4.767863183742677481693563511435642755521e-18L),
2972 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, -0x1p-113L, 2.019699255375255198156433710951064632386e-17L, -3.141592653589793233694780199536825402504L),
2973 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751442099L),
2974 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751442099L),
2975 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751442099L),
2976 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751442099L),
2977 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 1.962615573354718824241727964954454332780e-17L, 4.148847925325683229178506116378864361396e-4916L),
2978 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 1.962615573354718824241727964954454332780e-17L, 3.141592653589793238462643383279502884197L),
2979 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 1.962615573354718824241727964954454332780e-17L, -4.148847925325683229178506116378864361396e-4916L),
2980 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 1.962615573354718824241727964954454332780e-17L, -3.141592653589793238462643383279502884197L),
2981 TEST_c_c (cacosh, 0.0L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751442099L),
2982 TEST_c_c (cacosh, 0.0L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751442099L),
2983 TEST_c_c (cacosh, -0.0L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751442099L),
2984 TEST_c_c (cacosh, -0.0L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751442099L),
2985 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, 0.0L, 1.962615573354718824241727964954454332780e-17L, 0.0L),
2986 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, 0.0L, 1.962615573354718824241727964954454332780e-17L, 3.141592653589793238462643383279502884197L),
2987 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, -0.0L, 1.962615573354718824241727964954454332780e-17L, -0.0L),
2988 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, -0.0L, 1.962615573354718824241727964954454332780e-17L, -3.141592653589793238462643383279502884197L),
2989#endif
2990 TEST_c_c (cacosh, 0x1p-23L, 0x0.ffffffp0L, 8.813735448726963984495965873956465777250e-1L, 1.570796242501197085295336701632142060969L),
2991 TEST_c_c (cacosh, 0x1p-23L, -0x0.ffffffp0L, 8.813735448726963984495965873956465777250e-1L, -1.570796242501197085295336701632142060969L),
2992 TEST_c_c (cacosh, -0x1p-23L, 0x0.ffffffp0L, 8.813735448726963984495965873956465777250e-1L, 1.570796411088596153167306681647360823228L),
2993 TEST_c_c (cacosh, -0x1p-23L, -0x0.ffffffp0L, 8.813735448726963984495965873956465777250e-1L, -1.570796411088596153167306681647360823228L),
2994 TEST_c_c (cacosh, 0x0.ffffffp0L, 0x1p-23L, 2.714321200917194650737217746780928423385e-4L, 4.391863861910487109445187743978204002614e-4L),
2995 TEST_c_c (cacosh, -0x0.ffffffp0L, 0x1p-23L, 2.714321200917194650737217746780928423385e-4L, 3.141153467203602189751698864505105063797L),
2996 TEST_c_c (cacosh, 0x0.ffffffp0L, -0x1p-23L, 2.714321200917194650737217746780928423385e-4L, -4.391863861910487109445187743978204002614e-4L),
2997 TEST_c_c (cacosh, -0x0.ffffffp0L, -0x1p-23L, 2.714321200917194650737217746780928423385e-4L, -3.141153467203602189751698864505105063797L),
2998 TEST_c_c (cacosh, 0x1.fp-129L, 0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, 1.570796326794896619231321691639751442097L),
2999 TEST_c_c (cacosh, 0x1.fp-129L, -0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, -1.570796326794896619231321691639751442097L),
3000 TEST_c_c (cacosh, -0x1.fp-129L, 0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, 1.570796326794896619231321691639751442101L),
3001 TEST_c_c (cacosh, -0x1.fp-129L, -0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, -1.570796326794896619231321691639751442101L),
3002 TEST_c_c (cacosh, 0x0.ffffffp0L, 0x1.fp-129L, 8.245504387859737323891843603996428534945e-36L, 3.452669847162035876032494826387364972849e-4L),
3003 TEST_c_c (cacosh, -0x0.ffffffp0L, 0x1.fp-129L, 8.245504387859737323891843603996428534945e-36L, 3.141247386605077034875040133796864147700L),
3004 TEST_c_c (cacosh, 0x0.ffffffp0L, -0x1.fp-129L, 8.245504387859737323891843603996428534945e-36L, -3.452669847162035876032494826387364972849e-4L),
3005 TEST_c_c (cacosh, -0x0.ffffffp0L, -0x1.fp-129L, 8.245504387859737323891843603996428534945e-36L, -3.141247386605077034875040133796864147700L),
3006 TEST_c_c (cacosh, 0.0L, 0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, 1.570796326794896619231321691639751442099L),
3007 TEST_c_c (cacosh, 0.0L, -0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, -1.570796326794896619231321691639751442099L),
3008 TEST_c_c (cacosh, -0.0L, 0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, 1.570796326794896619231321691639751442099L),
3009 TEST_c_c (cacosh, -0.0L, -0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, -1.570796326794896619231321691639751442099L),
3010 TEST_c_c (cacosh, 0x0.ffffffp0L, 0.0L, 0.0L, 3.452669847162035876032494826387364972849e-4L),
3011 TEST_c_c (cacosh, -0x0.ffffffp0L, 0.0L, 0.0L, 3.141247386605077034875040133796864147700L),
3012 TEST_c_c (cacosh, 0x0.ffffffp0L, -0.0L, 0.0L, -3.452669847162035876032494826387364972849e-4L),
3013 TEST_c_c (cacosh, -0x0.ffffffp0L, -0.0L, 0.0L, -3.141247386605077034875040133796864147700L),
3014 TEST_c_c (cacosh, 0x1p-23L, 0.5L, 4.812118250596059896127318386463676808798e-1L, 1.570796220170866625230343643673321150378L),
3015 TEST_c_c (cacosh, 0x1p-23L, -0.5L, 4.812118250596059896127318386463676808798e-1L, -1.570796220170866625230343643673321150378L),
3016 TEST_c_c (cacosh, -0x1p-23L, 0.5L, 4.812118250596059896127318386463676808798e-1L, 1.570796433418926613232299739606181733819L),
3017 TEST_c_c (cacosh, -0x1p-23L, -0.5L, 4.812118250596059896127318386463676808798e-1L, -1.570796433418926613232299739606181733819L),
3018 TEST_c_c (cacosh, 0.5L, 0x1p-23L, 1.376510308240943236356088341381173571841e-7L, 1.047197551196603215914744618665204532273L),
3019 TEST_c_c (cacosh, -0.5L, 0x1p-23L, 1.376510308240943236356088341381173571841e-7L, 2.094395102393190022547898764614298351924L),
3020 TEST_c_c (cacosh, 0.5L, -0x1p-23L, 1.376510308240943236356088341381173571841e-7L, -1.047197551196603215914744618665204532273L),
3021 TEST_c_c (cacosh, -0.5L, -0x1p-23L, 1.376510308240943236356088341381173571841e-7L, -2.094395102393190022547898764614298351924L),
3022 TEST_c_c (cacosh, 0x1.fp-129L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442096L),
3023 TEST_c_c (cacosh, 0x1.fp-129L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442096L),
3024 TEST_c_c (cacosh, -0x1.fp-129L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442101L),
3025 TEST_c_c (cacosh, -0x1.fp-129L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442101L),
3026 TEST_c_c (cacosh, 0.5L, 0x1.fp-129L, 3.287317402534702257036015056278368274737e-39L, 1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION_FLOAT),
3027 TEST_c_c (cacosh, -0.5L, 0x1.fp-129L, 3.287317402534702257036015056278368274737e-39L, 2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION_FLOAT),
3028 TEST_c_c (cacosh, 0.5L, -0x1.fp-129L, 3.287317402534702257036015056278368274737e-39L, -1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION_FLOAT),
3029 TEST_c_c (cacosh, -0.5L, -0x1.fp-129L, 3.287317402534702257036015056278368274737e-39L, -2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION_FLOAT),
3030 TEST_c_c (cacosh, 0x1p-23L, 0x1p-23L, 1.192092895507818146886315028596704749235e-7L, 1.570796207585607068450636380271254316214L),
3031 TEST_c_c (cacosh, 0x1p-23L, -0x1p-23L, 1.192092895507818146886315028596704749235e-7L, -1.570796207585607068450636380271254316214L),
3032 TEST_c_c (cacosh, -0x1p-23L, 0x1p-23L, 1.192092895507818146886315028596704749235e-7L, 1.570796446004186170012007003008248567984L),
3033 TEST_c_c (cacosh, -0x1p-23L, -0x1p-23L, 1.192092895507818146886315028596704749235e-7L, -1.570796446004186170012007003008248567984L),
3034 TEST_c_c (cacosh, 0x1.fp-129L, 0x1p-23L, 1.192092895507809676556842485683592032154e-7L, 1.570796326794896619231321691639751442096L),
3035 TEST_c_c (cacosh, 0x1.fp-129L, -0x1p-23L, 1.192092895507809676556842485683592032154e-7L, -1.570796326794896619231321691639751442096L),
3036 TEST_c_c (cacosh, -0x1.fp-129L, 0x1p-23L, 1.192092895507809676556842485683592032154e-7L, 1.570796326794896619231321691639751442101L),
3037 TEST_c_c (cacosh, -0x1.fp-129L, -0x1p-23L, 1.192092895507809676556842485683592032154e-7L, -1.570796326794896619231321691639751442101L),
3038 TEST_c_c (cacosh, 0x1p-23L, 0x1.fp-129L, 2.846900380897747786805634596726756660388e-39L, 1.570796207585607068449789347324000006847L, UNDERFLOW_EXCEPTION_FLOAT),
3039 TEST_c_c (cacosh, -0x1p-23L, 0x1.fp-129L, 2.846900380897747786805634596726756660388e-39L, 1.570796446004186170012854035955502877351L, UNDERFLOW_EXCEPTION_FLOAT),
3040 TEST_c_c (cacosh, 0x1p-23L, -0x1.fp-129L, 2.846900380897747786805634596726756660388e-39L, -1.570796207585607068449789347324000006847L, UNDERFLOW_EXCEPTION_FLOAT),
3041 TEST_c_c (cacosh, -0x1p-23L, -0x1.fp-129L, 2.846900380897747786805634596726756660388e-39L, -1.570796446004186170012854035955502877351L, UNDERFLOW_EXCEPTION_FLOAT),
3042 TEST_c_c (cacosh, 0.0L, 0x1p-23L, 1.192092895507809676556842485683592032154e-7L, 1.570796326794896619231321691639751442099L),
3043 TEST_c_c (cacosh, 0.0L, -0x1p-23L, 1.192092895507809676556842485683592032154e-7L, -1.570796326794896619231321691639751442099L),
3044 TEST_c_c (cacosh, -0.0L, 0x1p-23L, 1.192092895507809676556842485683592032154e-7L, 1.570796326794896619231321691639751442099L),
3045 TEST_c_c (cacosh, -0.0L, -0x1p-23L, 1.192092895507809676556842485683592032154e-7L, -1.570796326794896619231321691639751442099L),
3046 TEST_c_c (cacosh, 0x1p-23L, 0.0L, 0.0L, 1.570796207585607068449789347324000006847L),
3047 TEST_c_c (cacosh, -0x1p-23L, 0.0L, 0.0L, 1.570796446004186170012854035955502877351L),
3048 TEST_c_c (cacosh, 0x1p-23L, -0.0L, 0.0L, -1.570796207585607068449789347324000006847L),
3049 TEST_c_c (cacosh, -0x1p-23L, -0.0L, 0.0L, -1.570796446004186170012854035955502877351L),
3050 TEST_c_c (cacosh, 0x1.fp-129L, 0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, 1.570796326794896619231321691639751442096L, UNDERFLOW_EXCEPTION_FLOAT),
3051 TEST_c_c (cacosh, 0x1.fp-129L, -0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, -1.570796326794896619231321691639751442096L, UNDERFLOW_EXCEPTION_FLOAT),
3052 TEST_c_c (cacosh, -0x1.fp-129L, 0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, 1.570796326794896619231321691639751442101L, UNDERFLOW_EXCEPTION_FLOAT),
3053 TEST_c_c (cacosh, -0x1.fp-129L, -0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, -1.570796326794896619231321691639751442101L, UNDERFLOW_EXCEPTION_FLOAT),
52ce4860 3054#ifndef TEST_FLOAT
08198877
JM		 3055 TEST_c_c (cacosh, 0x1p-52L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910458761820e-1L, 1.570796326794896462222075823262236786996L),
3056 TEST_c_c (cacosh, 0x1p-52L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910458761820e-1L, -1.570796326794896462222075823262236786996L),
3057 TEST_c_c (cacosh, -0x1p-52L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910458761820e-1L, 1.570796326794896776240567560017266097201L),
3058 TEST_c_c (cacosh, -0x1p-52L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910458761820e-1L, -1.570796326794896776240567560017266097201L),
3059 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, 0x1p-52L, 1.171456840272878582596796205397918831268e-8L, 1.895456983915074112227925127005564372844e-8L),
3060 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, 0x1p-52L, 1.171456840272878582596796205397918831268e-8L, 3.141592634635223399311902261000251614142L),
3061 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, -0x1p-52L, 1.171456840272878582596796205397918831268e-8L, -1.895456983915074112227925127005564372844e-8L),
3062 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, -0x1p-52L, 1.171456840272878582596796205397918831268e-8L, -3.141592634635223399311902261000251614142L),
3063 TEST_c_c (cacosh, 0x1.fp-1025L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, 1.570796326794896619231321691639751442099L),
3064 TEST_c_c (cacosh, 0x1.fp-1025L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, -1.570796326794896619231321691639751442099L),
3065 TEST_c_c (cacosh, -0x1.fp-1025L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, 1.570796326794896619231321691639751442099L),
3066 TEST_c_c (cacosh, -0x1.fp-1025L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, -1.570796326794896619231321691639751442099L),
3067 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, 0x1.fp-1025L, 3.616396521699973256461764099945789620604e-301L, 1.490116119384765638786343542550461592240e-8L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3068 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, 0x1.fp-1025L, 3.616396521699973256461764099945789620604e-301L, 3.141592638688632044614986995416067458693L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3069 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, -0x1.fp-1025L, 3.616396521699973256461764099945789620604e-301L, -1.490116119384765638786343542550461592240e-8L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3070 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, -0x1.fp-1025L, 3.616396521699973256461764099945789620604e-301L, -3.141592638688632044614986995416067458693L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3071 TEST_c_c (cacosh, 0.0L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, 1.570796326794896619231321691639751442099L),
3072 TEST_c_c (cacosh, 0.0L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, -1.570796326794896619231321691639751442099L),
3073 TEST_c_c (cacosh, -0.0L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, 1.570796326794896619231321691639751442099L),
3074 TEST_c_c (cacosh, -0.0L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, -1.570796326794896619231321691639751442099L),
3075 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, 0.0L, 0.0L, 1.490116119384765638786343542550461592240e-8L),
3076 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, 0.0L, 0.0L, 3.141592638688632044614986995416067458693L),
3077 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, -0.0L, 0.0L, -1.490116119384765638786343542550461592240e-8L),
3078 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, -0.0L, 0.0L, -3.141592638688632044614986995416067458693L),
3079#endif
3080 TEST_c_c (cacosh, 0x1p-52L, 0.5L, 4.812118250596034474977589134243772428682e-1L, 1.570796326794896420628589431857911675917L),
3081 TEST_c_c (cacosh, 0x1p-52L, -0.5L, 4.812118250596034474977589134243772428682e-1L, -1.570796326794896420628589431857911675917L),
3082 TEST_c_c (cacosh, -0x1p-52L, 0.5L, 4.812118250596034474977589134243772428682e-1L, 1.570796326794896817834053951421591208280L),
3083 TEST_c_c (cacosh, -0x1p-52L, -0.5L, 4.812118250596034474977589134243772428682e-1L, -1.570796326794896817834053951421591208280L),
3084 TEST_c_c (cacosh, 0.5L, 0x1p-52L, 2.563950248511418570403591756798643804971e-16L, 1.047197551196597746154214461093186605110L),
3085 TEST_c_c (cacosh, -0.5L, 0x1p-52L, 2.563950248511418570403591756798643804971e-16L, 2.094395102393195492308428922186316279087L),
3086 TEST_c_c (cacosh, 0.5L, -0x1p-52L, 2.563950248511418570403591756798643804971e-16L, -1.047197551196597746154214461093186605110L),
3087 TEST_c_c (cacosh, -0.5L, -0x1p-52L, 2.563950248511418570403591756798643804971e-16L, -2.094395102393195492308428922186316279087L),
52ce4860 3088#ifndef TEST_FLOAT
08198877
JM		 3089 TEST_c_c (cacosh, 0x1.fp-1025L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442099L),
3090 TEST_c_c (cacosh, 0x1.fp-1025L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442099L),
3091 TEST_c_c (cacosh, -0x1.fp-1025L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442099L),
3092 TEST_c_c (cacosh, -0x1.fp-1025L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442099L),
3093 TEST_c_c (cacosh, 0.5L, 0x1.fp-1025L, 6.222508863508420569166420770843207333493e-309L, 1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION_DOUBLE),
3094 TEST_c_c (cacosh, -0.5L, 0x1.fp-1025L, 6.222508863508420569166420770843207333493e-309L, 2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION_DOUBLE),
3095 TEST_c_c (cacosh, 0.5L, -0x1.fp-1025L, 6.222508863508420569166420770843207333493e-309L, -1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION_DOUBLE),
3096 TEST_c_c (cacosh, -0.5L, -0x1.fp-1025L, 6.222508863508420569166420770843207333493e-309L, -2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION_DOUBLE),
3097#endif
3098 TEST_c_c (cacosh, 0x1p-52L, 0x1p-52L, 2.220446049250313080847263336181677117148e-16L, 1.570796326794896397186716766608443357372L),
3099 TEST_c_c (cacosh, 0x1p-52L, -0x1p-52L, 2.220446049250313080847263336181677117148e-16L, -1.570796326794896397186716766608443357372L),
3100 TEST_c_c (cacosh, -0x1p-52L, 0x1p-52L, 2.220446049250313080847263336181677117148e-16L, 1.570796326794896841275926616671059526825L),
3101 TEST_c_c (cacosh, -0x1p-52L, -0x1p-52L, 2.220446049250313080847263336181677117148e-16L, -1.570796326794896841275926616671059526825L),
52ce4860 3102#ifndef TEST_FLOAT
08198877
JM		 3103 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1p-52L, 2.220446049250313080847263336181622378926e-16L, 1.570796326794896619231321691639751442099L),
3104 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1p-52L, 2.220446049250313080847263336181622378926e-16L, -1.570796326794896619231321691639751442099L),
3105 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1p-52L, 2.220446049250313080847263336181622378926e-16L, 1.570796326794896619231321691639751442099L),
3106 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1p-52L, 2.220446049250313080847263336181622378926e-16L, -1.570796326794896619231321691639751442099L),
3107 TEST_c_c (cacosh, 0x1p-52L, 0x1.fp-1025L, 5.388850751072128349671657362289548938458e-309L, 1.570796326794896397186716766608443357372L, UNDERFLOW_EXCEPTION_DOUBLE),
3108 TEST_c_c (cacosh, -0x1p-52L, 0x1.fp-1025L, 5.388850751072128349671657362289548938458e-309L, 1.570796326794896841275926616671059526825L, UNDERFLOW_EXCEPTION_DOUBLE),
3109 TEST_c_c (cacosh, 0x1p-52L, -0x1.fp-1025L, 5.388850751072128349671657362289548938458e-309L, -1.570796326794896397186716766608443357372L, UNDERFLOW_EXCEPTION_DOUBLE),
3110 TEST_c_c (cacosh, -0x1p-52L, -0x1.fp-1025L, 5.388850751072128349671657362289548938458e-309L, -1.570796326794896841275926616671059526825L, UNDERFLOW_EXCEPTION_DOUBLE),
3111#endif
3112 TEST_c_c (cacosh, 0.0L, 0x1p-52L, 2.220446049250313080847263336181622378926e-16L, 1.570796326794896619231321691639751442099L),
3113 TEST_c_c (cacosh, 0.0L, -0x1p-52L, 2.220446049250313080847263336181622378926e-16L, -1.570796326794896619231321691639751442099L),
3114 TEST_c_c (cacosh, -0.0L, 0x1p-52L, 2.220446049250313080847263336181622378926e-16L, 1.570796326794896619231321691639751442099L),
3115 TEST_c_c (cacosh, -0.0L, -0x1p-52L, 2.220446049250313080847263336181622378926e-16L, -1.570796326794896619231321691639751442099L),
3116 TEST_c_c (cacosh, 0x1p-52L, 0.0L, 0.0L, 1.570796326794896397186716766608443357372L),
3117 TEST_c_c (cacosh, -0x1p-52L, 0.0L, 0.0L, 1.570796326794896841275926616671059526825L),
3118 TEST_c_c (cacosh, 0x1p-52L, -0.0L, 0.0L, -1.570796326794896397186716766608443357372L),
3119 TEST_c_c (cacosh, -0x1p-52L, -0.0L, 0.0L, -1.570796326794896841275926616671059526825L),
52ce4860 3120#ifndef TEST_FLOAT
08198877
JM		 3121 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
3122 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
3123 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
3124 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
52ce4860
JM		 3125#endif
3126#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 3127 TEST_c_c (cacosh, 0x1p-63L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569937e-1L, 1.570796326794896619154657020805582738025L),
3128 TEST_c_c (cacosh, 0x1p-63L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569937e-1L, -1.570796326794896619154657020805582738025L),
3129 TEST_c_c (cacosh, -0x1p-63L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569937e-1L, 1.570796326794896619307986362473920146173L),
3130 TEST_c_c (cacosh, -0x1p-63L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569937e-1L, -1.570796326794896619307986362473920146173L),
3131 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, 0x1p-63L, 2.588578361325995866221775673638805081337e-10L, 4.188407771167967636741951941902992986043e-10L),
3132 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, 0x1p-63L, 2.588578361325995866221775673638805081337e-10L, 3.141592653170952461345846619605307690007L),
3133 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, -0x1p-63L, 2.588578361325995866221775673638805081337e-10L, -4.188407771167967636741951941902992986043e-10L),
3134 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, -0x1p-63L, 2.588578361325995866221775673638805081337e-10L, -3.141592653170952461345846619605307690007L),
52ce4860 3135# if LDBL_MIN_EXP <= -16381
08198877
JM		 3136 TEST_c_c (cacosh, 0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, 1.570796326794896619231321691639751442099L),
3137 TEST_c_c (cacosh, 0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, -1.570796326794896619231321691639751442099L),
3138 TEST_c_c (cacosh, -0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, 1.570796326794896619231321691639751442099L),
3139 TEST_c_c (cacosh, -0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, -1.570796326794896619231321691639751442099L),
3140 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 2.472906068161537187835415298076415423459e-4923L, 3.292722539913596233371825532007990724506e-10L),
3141 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 2.472906068161537187835415298076415423459e-4923L, 3.141592653260520984471283759942320330996L),
3142 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 2.472906068161537187835415298076415423459e-4923L, -3.292722539913596233371825532007990724506e-10L),
3143 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 2.472906068161537187835415298076415423459e-4923L, -3.141592653260520984471283759942320330996L),
52ce4860 3144# endif
08198877
JM		 3145 TEST_c_c (cacosh, 0.0L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, 1.570796326794896619231321691639751442099L),
3146 TEST_c_c (cacosh, 0.0L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, -1.570796326794896619231321691639751442099L),
3147 TEST_c_c (cacosh, -0.0L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, 1.570796326794896619231321691639751442099L),
3148 TEST_c_c (cacosh, -0.0L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, -1.570796326794896619231321691639751442099L),
3149 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, 0.0L, 0.0L, 3.292722539913596233371825532007990724506e-10L),
3150 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, 0.0L, 0.0L, 3.141592653260520984471283759942320330996L),
3151 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, -0.0L, 0.0L, -3.292722539913596233371825532007990724506e-10L),
3152 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, -0.0L, 0.0L, -3.141592653260520984471283759942320330996L),
3153#endif
3154 TEST_c_c (cacosh, 0x1p-63L, 0.5L, 4.812118250596034474977589134243684231373e-1L, 1.570796326794896619134347701278529840650L),
3155 TEST_c_c (cacosh, 0x1p-63L, -0.5L, 4.812118250596034474977589134243684231373e-1L, -1.570796326794896619134347701278529840650L),
3156 TEST_c_c (cacosh, -0x1p-63L, 0.5L, 4.812118250596034474977589134243684231373e-1L, 1.570796326794896619328295682000973043547L),
3157 TEST_c_c (cacosh, -0x1p-63L, -0.5L, 4.812118250596034474977589134243684231373e-1L, -1.570796326794896619328295682000973043547L),
3158 TEST_c_c (cacosh, 0.5L, 0x1p-63L, 1.251928832280966098829878787499365228659e-19L, 1.047197551196597746154214461093167628070L),
3159 TEST_c_c (cacosh, -0.5L, 0x1p-63L, 1.251928832280966098829878787499365228659e-19L, 2.094395102393195492308428922186335256127L),
3160 TEST_c_c (cacosh, 0.5L, -0x1p-63L, 1.251928832280966098829878787499365228659e-19L, -1.047197551196597746154214461093167628070L),
3161 TEST_c_c (cacosh, -0.5L, -0x1p-63L, 1.251928832280966098829878787499365228659e-19L, -2.094395102393195492308428922186335256127L),
52ce4860 3162#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3163 TEST_c_c (cacosh, 0x1.fp-16385L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442099L),
3164 TEST_c_c (cacosh, 0x1.fp-16385L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442099L),
3165 TEST_c_c (cacosh, -0x1.fp-16385L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442099L),
3166 TEST_c_c (cacosh, -0x1.fp-16385L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442099L),
3167 TEST_c_c (cacosh, 0.5L, 0x1.fp-16385L, 9.402257155670418112159334875199821342890e-4933L, 1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION),
3168 TEST_c_c (cacosh, -0.5L, 0x1.fp-16385L, 9.402257155670418112159334875199821342890e-4933L, 2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION),
3169 TEST_c_c (cacosh, 0.5L, -0x1.fp-16385L, 9.402257155670418112159334875199821342890e-4933L, -1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION),
3170 TEST_c_c (cacosh, -0.5L, -0x1.fp-16385L, 9.402257155670418112159334875199821342890e-4933L, -2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION),
3171#endif
3172 TEST_c_c (cacosh, 0x1p-63L, 0x1p-63L, 1.084202172485504434007452800869941711430e-19L, 1.570796326794896619122901474391200998698L),
3173 TEST_c_c (cacosh, 0x1p-63L, -0x1p-63L, 1.084202172485504434007452800869941711430e-19L, -1.570796326794896619122901474391200998698L),
3174 TEST_c_c (cacosh, -0x1p-63L, 0x1p-63L, 1.084202172485504434007452800869941711430e-19L, 1.570796326794896619339741908888301885499L),
3175 TEST_c_c (cacosh, -0x1p-63L, -0x1p-63L, 1.084202172485504434007452800869941711430e-19L, -1.570796326794896619339741908888301885499L),
52ce4860 3176#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3177 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1p-63L, 1.084202172485504434007452800869941711424e-19L, 1.570796326794896619231321691639751442099L),
3178 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1p-63L, 1.084202172485504434007452800869941711424e-19L, -1.570796326794896619231321691639751442099L),
3179 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1p-63L, 1.084202172485504434007452800869941711424e-19L, 1.570796326794896619231321691639751442099L),
3180 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1p-63L, 1.084202172485504434007452800869941711424e-19L, -1.570796326794896619231321691639751442099L),
3181 TEST_c_c (cacosh, 0x1p-63L, 0x1.fp-16385L, 8.142593549724601460479922838826119584465e-4933L, 1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION),
3182 TEST_c_c (cacosh, -0x1p-63L, 0x1.fp-16385L, 8.142593549724601460479922838826119584465e-4933L, 1.570796326794896619339741908888301885499L, UNDERFLOW_EXCEPTION),
3183 TEST_c_c (cacosh, 0x1p-63L, -0x1.fp-16385L, 8.142593549724601460479922838826119584465e-4933L, -1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION),
3184 TEST_c_c (cacosh, -0x1p-63L, -0x1.fp-16385L, 8.142593549724601460479922838826119584465e-4933L, -1.570796326794896619339741908888301885499L, UNDERFLOW_EXCEPTION),
3185#endif
3186 TEST_c_c (cacosh, 0.0L, 0x1p-63L, 1.084202172485504434007452800869941711424e-19L, 1.570796326794896619231321691639751442099L),
3187 TEST_c_c (cacosh, 0.0L, -0x1p-63L, 1.084202172485504434007452800869941711424e-19L, -1.570796326794896619231321691639751442099L),
3188 TEST_c_c (cacosh, -0.0L, 0x1p-63L, 1.084202172485504434007452800869941711424e-19L, 1.570796326794896619231321691639751442099L),
3189 TEST_c_c (cacosh, -0.0L, -0x1p-63L, 1.084202172485504434007452800869941711424e-19L, -1.570796326794896619231321691639751442099L),
3190 TEST_c_c (cacosh, 0x1p-63L, 0.0L, 0.0L, 1.570796326794896619122901474391200998698L),
3191 TEST_c_c (cacosh, -0x1p-63L, 0.0L, 0.0L, 1.570796326794896619339741908888301885499L),
3192 TEST_c_c (cacosh, 0x1p-63L, -0.0L, 0.0L, -1.570796326794896619122901474391200998698L),
3193 TEST_c_c (cacosh, -0x1p-63L, -0.0L, 0.0L, -1.570796326794896619339741908888301885499L),
52ce4860 3194#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3195 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
3196 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
3197 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
3198 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
52ce4860
JM		 3199#endif
3200#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 3201 TEST_c_c (cacosh, 0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639734010571L),
3202 TEST_c_c (cacosh, 0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639734010571L),
3203 TEST_c_c (cacosh, -0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639768873627L),
3204 TEST_c_c (cacosh, -0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639768873627L),
3205 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 1.234330349600789959989661887846005659983e-16L, 1.997188458999618357060632049675702684031e-16L),
3206 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 1.234330349600789959989661887846005659983e-16L, 3.141592653589793038743797483317667178134L),
3207 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 1.234330349600789959989661887846005659983e-16L, -1.997188458999618357060632049675702684031e-16L),
3208 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 1.234330349600789959989661887846005659983e-16L, -3.141592653589793038743797483317667178134L),
3209 TEST_c_c (cacosh, 0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639751442099L),
3210 TEST_c_c (cacosh, 0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639751442099L),
3211 TEST_c_c (cacosh, -0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639751442099L),
3212 TEST_c_c (cacosh, -0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639751442099L),
3213 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 3.432186888910770473784103112009399360940e-293L, 1.570092458683775059393382371963565104164e-16L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3214 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 3.432186888910770473784103112009399360940e-293L, 3.141592653589793081453397514901996944859L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3215 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 3.432186888910770473784103112009399360940e-293L, -1.570092458683775059393382371963565104164e-16L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3216 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 3.432186888910770473784103112009399360940e-293L, -3.141592653589793081453397514901996944859L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3217 TEST_c_c (cacosh, 0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639751442099L),
3218 TEST_c_c (cacosh, 0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639751442099L),
3219 TEST_c_c (cacosh, -0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639751442099L),
3220 TEST_c_c (cacosh, -0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639751442099L),
3221 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 0.0L, 1.570092458683775059393382371963565104164e-16L),
3222 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 0.0L, 3.141592653589793081453397514901996944859L),
3223 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 0.0L, -1.570092458683775059393382371963565104164e-16L),
3224 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 0.0L, -3.141592653589793081453397514901996944859L),
3225#endif
3226 TEST_c_c (cacosh, 0x1p-105L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639729392766L),
3227 TEST_c_c (cacosh, 0x1p-105L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639729392766L),
3228 TEST_c_c (cacosh, -0x1p-105L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639773491431L),
3229 TEST_c_c (cacosh, -0x1p-105L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639773491431L),
3230 TEST_c_c (cacosh, 0.5L, 0x1p-105L, 2.846556599890768890940941645338546615370e-32L, 1.047197551196597746154214461093167628066L),
3231 TEST_c_c (cacosh, -0.5L, 0x1p-105L, 2.846556599890768890940941645338546615370e-32L, 2.094395102393195492308428922186335256131L),
3232 TEST_c_c (cacosh, 0.5L, -0x1p-105L, 2.846556599890768890940941645338546615370e-32L, -1.047197551196597746154214461093167628066L),
3233 TEST_c_c (cacosh, -0.5L, -0x1p-105L, 2.846556599890768890940941645338546615370e-32L, -2.094395102393195492308428922186335256131L),
3234 TEST_c_c (cacosh, 0x1p-105L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639726790195L),
3235 TEST_c_c (cacosh, 0x1p-105L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639726790195L),
3236 TEST_c_c (cacosh, -0x1p-105L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639776094002L),
3237 TEST_c_c (cacosh, -0x1p-105L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639776094002L),
52ce4860 3238#ifndef TEST_FLOAT
08198877
JM		 3239 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639751442099L),
3240 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639751442099L),
3241 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639751442099L),
3242 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639751442099L),
3243 TEST_c_c (cacosh, 0x1p-105L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 1.570796326794896619231321691639726790195L, UNDERFLOW_EXCEPTION_DOUBLE),
3244 TEST_c_c (cacosh, -0x1p-105L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 1.570796326794896619231321691639776094002L, UNDERFLOW_EXCEPTION_DOUBLE),
3245 TEST_c_c (cacosh, 0x1p-105L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -1.570796326794896619231321691639726790195L, UNDERFLOW_EXCEPTION_DOUBLE),
3246 TEST_c_c (cacosh, -0x1p-105L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -1.570796326794896619231321691639776094002L, UNDERFLOW_EXCEPTION_DOUBLE),
3247#endif
3248 TEST_c_c (cacosh, 0.0L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639751442099L),
3249 TEST_c_c (cacosh, 0.0L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639751442099L),
3250 TEST_c_c (cacosh, -0.0L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639751442099L),
3251 TEST_c_c (cacosh, -0.0L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639751442099L),
3252 TEST_c_c (cacosh, 0x1p-105L, 0.0L, 0.0L, 1.570796326794896619231321691639726790195L),
3253 TEST_c_c (cacosh, -0x1p-105L, 0.0L, 0.0L, 1.570796326794896619231321691639776094002L),
3254 TEST_c_c (cacosh, 0x1p-105L, -0.0L, 0.0L, -1.570796326794896619231321691639726790195L),
3255 TEST_c_c (cacosh, -0x1p-105L, -0.0L, 0.0L, -1.570796326794896619231321691639776094002L),
52ce4860 3256#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 3257 TEST_c_c (cacosh, 0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751305915L),
3258 TEST_c_c (cacosh, 0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751305915L),
3259 TEST_c_c (cacosh, -0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751578282L),
3260 TEST_c_c (cacosh, -0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751578282L),
3261 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 1.091004200533850618345330909857103457781e-17L, 1.765281878332676474347460257221369818872e-17L),
3262 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 1.091004200533850618345330909857103457781e-17L, 3.141592653589793220809824599952738140723L),
3263 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 1.091004200533850618345330909857103457781e-17L, -1.765281878332676474347460257221369818872e-17L),
3264 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 1.091004200533850618345330909857103457781e-17L, -3.141592653589793220809824599952738140723L),
3265 TEST_c_c (cacosh, 0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751442099L),
3266 TEST_c_c (cacosh, 0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751442099L),
3267 TEST_c_c (cacosh, -0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751442099L),
3268 TEST_c_c (cacosh, -0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751442099L),
3269 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 5.867357004219059108790368268900490184505e-4916L, 1.387778780781445675529539585113525401762e-17L),
3270 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 5.867357004219059108790368268900490184505e-4916L, 3.141592653589793224584855575465046128902L),
3271 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 5.867357004219059108790368268900490184505e-4916L, -1.387778780781445675529539585113525401762e-17L),
3272 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 5.867357004219059108790368268900490184505e-4916L, -3.141592653589793224584855575465046128902L),
3273 TEST_c_c (cacosh, 0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751442099L),
3274 TEST_c_c (cacosh, 0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751442099L),
3275 TEST_c_c (cacosh, -0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751442099L),
3276 TEST_c_c (cacosh, -0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751442099L),
3277 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 0.0L, 1.387778780781445675529539585113525401762e-17L),
3278 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 0.0L, 3.141592653589793224584855575465046128902L),
3279 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 0.0L, -1.387778780781445675529539585113525401762e-17L),
3280 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 0.0L, -3.141592653589793224584855575465046128902L),
3281#endif
3282 TEST_c_c (cacosh, 0x1p-112L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751269838L),
3283 TEST_c_c (cacosh, 0x1p-112L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751269838L),
3284 TEST_c_c (cacosh, -0x1p-112L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751614359L),
3285 TEST_c_c (cacosh, -0x1p-112L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751614359L),
3286 TEST_c_c (cacosh, 0.5L, 0x1p-112L, 2.223872343664663196047610660420739543258e-34L, 1.047197551196597746154214461093167628066L),
3287 TEST_c_c (cacosh, -0.5L, 0x1p-112L, 2.223872343664663196047610660420739543258e-34L, 2.094395102393195492308428922186335256131L),
3288 TEST_c_c (cacosh, 0.5L, -0x1p-112L, 2.223872343664663196047610660420739543258e-34L, -1.047197551196597746154214461093167628066L),
3289 TEST_c_c (cacosh, -0.5L, -0x1p-112L, 2.223872343664663196047610660420739543258e-34L, -2.094395102393195492308428922186335256131L),
3290 TEST_c_c (cacosh, 0x1p-112L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751249506L),
3291 TEST_c_c (cacosh, 0x1p-112L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751249506L),
3292 TEST_c_c (cacosh, -0x1p-112L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751634692L),
3293 TEST_c_c (cacosh, -0x1p-112L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751634692L),
52ce4860 3294#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3295 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751442099L),
3296 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751442099L),
3297 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751442099L),
3298 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751442099L),
3299 TEST_c_c (cacosh, 0x1p-112L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 1.570796326794896619231321691639751249506L, UNDERFLOW_EXCEPTION),
3300 TEST_c_c (cacosh, -0x1p-112L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 1.570796326794896619231321691639751634692L, UNDERFLOW_EXCEPTION),
3301 TEST_c_c (cacosh, 0x1p-112L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -1.570796326794896619231321691639751249506L, UNDERFLOW_EXCEPTION),
3302 TEST_c_c (cacosh, -0x1p-112L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -1.570796326794896619231321691639751634692L, UNDERFLOW_EXCEPTION),
3303#endif
3304 TEST_c_c (cacosh, 0.0L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751442099L),
3305 TEST_c_c (cacosh, 0.0L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751442099L),
3306 TEST_c_c (cacosh, -0.0L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751442099L),
3307 TEST_c_c (cacosh, -0.0L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751442099L),
3308 TEST_c_c (cacosh, 0x1p-112L, 0.0L, 0.0L, 1.570796326794896619231321691639751249506L),
3309 TEST_c_c (cacosh, -0x1p-112L, 0.0L, 0.0L, 1.570796326794896619231321691639751634692L),
3310 TEST_c_c (cacosh, 0x1p-112L, -0.0L, 0.0L, -1.570796326794896619231321691639751249506L),
3311 TEST_c_c (cacosh, -0x1p-112L, -0.0L, 0.0L, -1.570796326794896619231321691639751634692L),
3312
3313 TEST_c_c (cacosh, 0.75L, 1.25L, 1.13239363160530819522266333696834467L, 1.11752014915610270578240049553777969L),
3314 TEST_c_c (cacosh, -2, -3, 1.9833870299165354323470769028940395L, -2.1414491111159960199416055713254211L),
3315 END_DATA (cacosh)
3316 };
3317
3318static void
3319cacosh_test (void)
3320{
3321 errno = 0;
3322 FUNC(cacosh) (BUILD_COMPLEX (0.7L, 1.2L));
3323 if (errno == ENOSYS)
3324 /* Function not implemented. */
3325 return;
8847214f 3326
08198877
JM		 3327 START (cacosh);
3328 RUN_TEST_LOOP_c_c (cacosh, cacosh_test_data, );
6815fabc 3329 END (cacosh, complex);
8847214f
UD		 3330}
3331
2550dfe9 3332
6a1992e2
JM		 3333static const struct test_c_f_data carg_test_data[] =
3334 {
3335 START_DATA (carg);
3336 /* carg (x + iy) is specified as atan2 (y, x) */
8847214f 3337
6a1992e2
JM		 3338 /* carg (x + i 0) == 0 for x > 0. */
3339 TEST_c_f (carg, 2.0, 0, 0),
3340 /* carg (x - i 0) == -0 for x > 0. */
3341 TEST_c_f (carg, 2.0, minus_zero, minus_zero),
8847214f 3342
6a1992e2
JM		 3343 TEST_c_f (carg, 0, 0, 0),
3344 TEST_c_f (carg, 0, minus_zero, minus_zero),
8847214f 3345
6a1992e2
JM		 3346 /* carg (x + i 0) == +pi for x < 0. */
3347 TEST_c_f (carg, -2.0, 0, M_PIl),
8847214f 3348
6a1992e2
JM		 3349 /* carg (x - i 0) == -pi for x < 0. */
3350 TEST_c_f (carg, -2.0, minus_zero, -M_PIl),
8847214f 3351
6a1992e2
JM		 3352 TEST_c_f (carg, minus_zero, 0, M_PIl),
3353 TEST_c_f (carg, minus_zero, minus_zero, -M_PIl),
8847214f 3354
6a1992e2
JM		 3355 /* carg (+0 + i y) == pi/2 for y > 0. */
3356 TEST_c_f (carg, 0, 2.0, M_PI_2l),
8847214f 3357
6a1992e2
JM		 3358 /* carg (-0 + i y) == pi/2 for y > 0. */
3359 TEST_c_f (carg, minus_zero, 2.0, M_PI_2l),
8847214f 3360
6a1992e2
JM		 3361 /* carg (+0 + i y) == -pi/2 for y < 0. */
3362 TEST_c_f (carg, 0, -2.0, -M_PI_2l),
8847214f 3363
6a1992e2
JM		 3364 /* carg (-0 + i y) == -pi/2 for y < 0. */
3365 TEST_c_f (carg, minus_zero, -2.0, -M_PI_2l),
8847214f 3366
6a1992e2
JM		 3367 /* carg (inf + i y) == +0 for finite y > 0. */
3368 TEST_c_f (carg, plus_infty, 2.0, 0),
8847214f 3369
6a1992e2
JM		 3370 /* carg (inf + i y) == -0 for finite y < 0. */
3371 TEST_c_f (carg, plus_infty, -2.0, minus_zero),
8847214f 3372
6a1992e2
JM		 3373 /* carg(x + i inf) == pi/2 for finite x. */
3374 TEST_c_f (carg, 10.0, plus_infty, M_PI_2l),
8847214f 3375
6a1992e2
JM		 3376 /* carg(x - i inf) == -pi/2 for finite x. */
3377 TEST_c_f (carg, 10.0, minus_infty, -M_PI_2l),
8847214f 3378
6a1992e2
JM		 3379 /* carg (-inf + i y) == +pi for finite y > 0. */
3380 TEST_c_f (carg, minus_infty, 10.0, M_PIl),
8847214f 3381
6a1992e2
JM		 3382 /* carg (-inf + i y) == -pi for finite y < 0. */
3383 TEST_c_f (carg, minus_infty, -10.0, -M_PIl),
8847214f 3384
6a1992e2 3385 TEST_c_f (carg, plus_infty, plus_infty, M_PI_4l),
8847214f 3386
6a1992e2 3387 TEST_c_f (carg, plus_infty, minus_infty, -M_PI_4l),
8847214f 3388
6a1992e2 3389 TEST_c_f (carg, minus_infty, plus_infty, M_PI_34l),
8847214f 3390
6a1992e2 3391 TEST_c_f (carg, minus_infty, minus_infty, -M_PI_34l),
8847214f 3392
6a1992e2
JM		 3393 TEST_c_f (carg, qnan_value, qnan_value, qnan_value),
3394 END_DATA (carg);
3395 };
15daa639 3396
6a1992e2
JM		 3397static void
3398carg_test (void)
3399{
3400 START (carg);
3401 RUN_TEST_LOOP_c_f (carg, carg_test_data, );
8847214f
UD		 3402 END (carg);
3403}
3404
08198877
JM		 3405static const struct test_c_c_data casin_test_data[] =
3406 {
3407 START_DATA (casin),
3408 TEST_c_c (casin, 0, 0, 0.0, 0.0),
3409 TEST_c_c (casin, minus_zero, 0, minus_zero, 0.0),
3410 TEST_c_c (casin, 0, minus_zero, 0.0, minus_zero),
3411 TEST_c_c (casin, minus_zero, minus_zero, minus_zero, minus_zero),
3412
3413 TEST_c_c (casin, plus_infty, plus_infty, M_PI_4l, plus_infty),
3414 TEST_c_c (casin, plus_infty, minus_infty, M_PI_4l, minus_infty),
3415 TEST_c_c (casin, minus_infty, plus_infty, -M_PI_4l, plus_infty),
3416 TEST_c_c (casin, minus_infty, minus_infty, -M_PI_4l, minus_infty),
3417
3418 TEST_c_c (casin, -10.0, plus_infty, minus_zero, plus_infty),
3419 TEST_c_c (casin, -10.0, minus_infty, minus_zero, minus_infty),
3420 TEST_c_c (casin, 0, plus_infty, 0.0, plus_infty),
3421 TEST_c_c (casin, 0, minus_infty, 0.0, minus_infty),
3422 TEST_c_c (casin, minus_zero, plus_infty, minus_zero, plus_infty),
3423 TEST_c_c (casin, minus_zero, minus_infty, minus_zero, minus_infty),
3424 TEST_c_c (casin, 0.1L, plus_infty, 0.0, plus_infty),
3425 TEST_c_c (casin, 0.1L, minus_infty, 0.0, minus_infty),
3426
3427 TEST_c_c (casin, minus_infty, 0, -M_PI_2l, plus_infty),
3428 TEST_c_c (casin, minus_infty, minus_zero, -M_PI_2l, minus_infty),
3429 TEST_c_c (casin, minus_infty, 100, -M_PI_2l, plus_infty),
3430 TEST_c_c (casin, minus_infty, -100, -M_PI_2l, minus_infty),
3431
3432 TEST_c_c (casin, plus_infty, 0, M_PI_2l, plus_infty),
3433 TEST_c_c (casin, plus_infty, minus_zero, M_PI_2l, minus_infty),
3434 TEST_c_c (casin, plus_infty, 0.5, M_PI_2l, plus_infty),
3435 TEST_c_c (casin, plus_infty, -0.5, M_PI_2l, minus_infty),
3436
3437 TEST_c_c (casin, qnan_value, plus_infty, qnan_value, plus_infty),
3438 TEST_c_c (casin, qnan_value, minus_infty, qnan_value, minus_infty),
3439
3440 TEST_c_c (casin, 0.0, qnan_value, 0.0, qnan_value),
3441 TEST_c_c (casin, minus_zero, qnan_value, minus_zero, qnan_value),
3442
3443 TEST_c_c (casin, plus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
3444 TEST_c_c (casin, minus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
3445
3446 TEST_c_c (casin, qnan_value, 10.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3447 TEST_c_c (casin, qnan_value, -10.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3448
3449 TEST_c_c (casin, 0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3450 TEST_c_c (casin, -0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3451
3452 TEST_c_c (casin, qnan_value, qnan_value, qnan_value, qnan_value),
3453
3454 TEST_c_c (casin, plus_zero, -1.5L, plus_zero, -1.194763217287109304111930828519090523536L),
3455 TEST_c_c (casin, minus_zero, -1.5L, minus_zero, -1.194763217287109304111930828519090523536L),
3456 TEST_c_c (casin, plus_zero, -1.0L, plus_zero, -0.8813735870195430252326093249797923090282L),
3457 TEST_c_c (casin, minus_zero, -1.0L, minus_zero, -0.8813735870195430252326093249797923090282L),
3458 TEST_c_c (casin, plus_zero, -0.5L, plus_zero, -0.4812118250596034474977589134243684231352L),
3459 TEST_c_c (casin, minus_zero, -0.5L, minus_zero, -0.4812118250596034474977589134243684231352L),
3460 TEST_c_c (casin, plus_zero, 0.5L, plus_zero, 0.4812118250596034474977589134243684231352L),
3461 TEST_c_c (casin, minus_zero, 0.5L, minus_zero, 0.4812118250596034474977589134243684231352L),
3462 TEST_c_c (casin, plus_zero, 1.0L, plus_zero, 0.8813735870195430252326093249797923090282L),
3463 TEST_c_c (casin, minus_zero, 1.0L, minus_zero, 0.8813735870195430252326093249797923090282L),
3464 TEST_c_c (casin, plus_zero, 1.5L, plus_zero, 1.194763217287109304111930828519090523536L),
3465 TEST_c_c (casin, minus_zero, 1.5L, minus_zero, 1.194763217287109304111930828519090523536L),
3466
3467 TEST_c_c (casin, -1.5L, plus_zero, -M_PI_2l, 0.9624236501192068949955178268487368462704L),
3468 TEST_c_c (casin, -1.5L, minus_zero, -M_PI_2l, -0.9624236501192068949955178268487368462704L),
3469 TEST_c_c (casin, -1.0L, plus_zero, -M_PI_2l, plus_zero),
3470 TEST_c_c (casin, -1.0L, minus_zero, -M_PI_2l, minus_zero),
3471 TEST_c_c (casin, -0.5L, plus_zero, -0.5235987755982988730771072305465838140329L, plus_zero),
3472 TEST_c_c (casin, -0.5L, minus_zero, -0.5235987755982988730771072305465838140329L, minus_zero),
3473 TEST_c_c (casin, 0.5L, plus_zero, 0.5235987755982988730771072305465838140329L, plus_zero),
3474 TEST_c_c (casin, 0.5L, minus_zero, 0.5235987755982988730771072305465838140329L, minus_zero),
3475 TEST_c_c (casin, 1.0L, plus_zero, M_PI_2l, plus_zero),
3476 TEST_c_c (casin, 1.0L, minus_zero, M_PI_2l, minus_zero),
3477 TEST_c_c (casin, 1.5L, plus_zero, M_PI_2l, 0.9624236501192068949955178268487368462704L),
3478 TEST_c_c (casin, 1.5L, minus_zero, M_PI_2l, -0.9624236501192068949955178268487368462704L),
3479
3480 TEST_c_c (casin, 0x1p50L, 1.0L, 1.570796326794895731052901991514519103193L, 3.535050620855721078027883819436720218708e1L),
3481 TEST_c_c (casin, 0x1p50L, -1.0L, 1.570796326794895731052901991514519103193L, -3.535050620855721078027883819436720218708e1L),
3482 TEST_c_c (casin, -0x1p50L, 1.0L, -1.570796326794895731052901991514519103193L, 3.535050620855721078027883819436720218708e1L),
3483 TEST_c_c (casin, -0x1p50L, -1.0L, -1.570796326794895731052901991514519103193L, -3.535050620855721078027883819436720218708e1L),
3484 TEST_c_c (casin, 1.0L, 0x1p50L, 8.881784197001252323389053344720723756399e-16L, 3.535050620855721078027883819436759661753e1L),
3485 TEST_c_c (casin, -1.0L, 0x1p50L, -8.881784197001252323389053344720723756399e-16L, 3.535050620855721078027883819436759661753e1L),
3486 TEST_c_c (casin, 1.0L, -0x1p50L, 8.881784197001252323389053344720723756399e-16L, -3.535050620855721078027883819436759661753e1L),
3487 TEST_c_c (casin, -1.0L, -0x1p50L, -8.881784197001252323389053344720723756399e-16L, -3.535050620855721078027883819436759661753e1L),
cdc1c96f 3488#ifndef TEST_FLOAT
08198877
JM		 3489 TEST_c_c (casin, 0x1p500L, 1.0L, 1.570796326794896619231321691639751442099L, 3.472667374605326000180332928505464606058e2L),
3490 TEST_c_c (casin, 0x1p500L, -1.0L, 1.570796326794896619231321691639751442099L, -3.472667374605326000180332928505464606058e2L),
3491 TEST_c_c (casin, -0x1p500L, 1.0L, -1.570796326794896619231321691639751442099L, 3.472667374605326000180332928505464606058e2L),
3492 TEST_c_c (casin, -0x1p500L, -1.0L, -1.570796326794896619231321691639751442099L, -3.472667374605326000180332928505464606058e2L),
3493 TEST_c_c (casin, 1.0L, 0x1p500L, 3.054936363499604682051979393213617699789e-151L, 3.472667374605326000180332928505464606058e2L),
3494 TEST_c_c (casin, -1.0L, 0x1p500L, -3.054936363499604682051979393213617699789e-151L, 3.472667374605326000180332928505464606058e2L),
3495 TEST_c_c (casin, 1.0L, -0x1p500L, 3.054936363499604682051979393213617699789e-151L, -3.472667374605326000180332928505464606058e2L),
3496 TEST_c_c (casin, -1.0L, -0x1p500L, -3.054936363499604682051979393213617699789e-151L, -3.472667374605326000180332928505464606058e2L),
cdc1c96f
JM		 3497#endif
3498#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 3499 TEST_c_c (casin, 0x1p5000L, 1.0L, 1.570796326794896619231321691639751442099L, 3.466429049980286492395577839412341016946e3L),
3500 TEST_c_c (casin, 0x1p5000L, -1.0L, 1.570796326794896619231321691639751442099L, -3.466429049980286492395577839412341016946e3L),
3501 TEST_c_c (casin, -0x1p5000L, 1.0L, -1.570796326794896619231321691639751442099L, 3.466429049980286492395577839412341016946e3L),
3502 TEST_c_c (casin, -0x1p5000L, -1.0L, -1.570796326794896619231321691639751442099L, -3.466429049980286492395577839412341016946e3L),
3503 TEST_c_c (casin, 1.0L, 0x1p5000L, 7.079811261048172892385615158694057552948e-1506L, 3.466429049980286492395577839412341016946e3L),
3504 TEST_c_c (casin, -1.0L, 0x1p5000L, -7.079811261048172892385615158694057552948e-1506L, 3.466429049980286492395577839412341016946e3L),
3505 TEST_c_c (casin, 1.0L, -0x1p5000L, 7.079811261048172892385615158694057552948e-1506L, -3.466429049980286492395577839412341016946e3L),
3506 TEST_c_c (casin, -1.0L, -0x1p5000L, -7.079811261048172892385615158694057552948e-1506L, -3.466429049980286492395577839412341016946e3L),
cdc1c96f
JM		 3507#endif
3508
08198877 3509 TEST_c_c (casin, 0x1.fp127L, 0x1.fp127L, 7.853981633974483096156608458198757210493e-1L, 8.973081118419833726837456344608533993585e1L),
a9708fed 3510#ifndef TEST_FLOAT
08198877 3511 TEST_c_c (casin, 0x1.fp1023L, 0x1.fp1023L, 7.853981633974483096156608458198757210493e-1L, 7.107906849659093345062145442726115449315e2L),
a9708fed
JM		 3512#endif
3513#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 3514 TEST_c_c (casin, 0x1.fp16383L, 0x1.fp16383L, 7.853981633974483096156608458198757210493e-1L, 1.135753137836666928715489992987020363057e4L),
a9708fed
JM		 3515#endif
3516
08198877
JM		 3517 TEST_c_c (casin, 0x1.fp-129L, 1.5L, 1.579176199917649005841160751101628985741e-39L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_FLOAT),
3518 TEST_c_c (casin, 0x1.fp-129L, -1.5L, 1.579176199917649005841160751101628985741e-39L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_FLOAT),
3519 TEST_c_c (casin, -0x1.fp-129L, 1.5L, -1.579176199917649005841160751101628985741e-39L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_FLOAT),
3520 TEST_c_c (casin, -0x1.fp-129L, -1.5L, -1.579176199917649005841160751101628985741e-39L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_FLOAT),
3521 TEST_c_c (casin, 1.5L, 0x1.fp-129L, 1.570796326794896619231321691639751442096L, 9.624236501192068949955178268487368462704e-1L),
3522 TEST_c_c (casin, -1.5L, 0x1.fp-129L, -1.570796326794896619231321691639751442096L, 9.624236501192068949955178268487368462704e-1L),
3523 TEST_c_c (casin, 1.5L, -0x1.fp-129L, 1.570796326794896619231321691639751442096L, -9.624236501192068949955178268487368462704e-1L),
3524 TEST_c_c (casin, -1.5L, -0x1.fp-129L, -1.570796326794896619231321691639751442096L, -9.624236501192068949955178268487368462704e-1L),
8cf28c5e 3525#ifndef TEST_FLOAT
08198877
JM		 3526 TEST_c_c (casin, 0x1.fp-1025L, 1.5L, 2.989196569048182929051881765490354365918e-309L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_DOUBLE),
3527 TEST_c_c (casin, 0x1.fp-1025L, -1.5L, 2.989196569048182929051881765490354365918e-309L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_DOUBLE),
3528 TEST_c_c (casin, -0x1.fp-1025L, 1.5L, -2.989196569048182929051881765490354365918e-309L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_DOUBLE),
3529 TEST_c_c (casin, -0x1.fp-1025L, -1.5L, -2.989196569048182929051881765490354365918e-309L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_DOUBLE),
3530 TEST_c_c (casin, 1.5L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 9.624236501192068949955178268487368462704e-1L),
3531 TEST_c_c (casin, -1.5L, 0x1.fp-1025L, -1.570796326794896619231321691639751442099L, 9.624236501192068949955178268487368462704e-1L),
3532 TEST_c_c (casin, 1.5L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -9.624236501192068949955178268487368462704e-1L),
3533 TEST_c_c (casin, -1.5L, -0x1.fp-1025L, -1.570796326794896619231321691639751442099L, -9.624236501192068949955178268487368462704e-1L),
8cf28c5e
JM		 3534#endif
3535#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3536 TEST_c_c (casin, 0x1.fp-16385L, 1.5L, 4.516698239814521372306784062043266700598e-4933L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION),
3537 TEST_c_c (casin, 0x1.fp-16385L, -1.5L, 4.516698239814521372306784062043266700598e-4933L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION),
3538 TEST_c_c (casin, -0x1.fp-16385L, 1.5L, -4.516698239814521372306784062043266700598e-4933L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION),
3539 TEST_c_c (casin, -0x1.fp-16385L, -1.5L, -4.516698239814521372306784062043266700598e-4933L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION),
3540 TEST_c_c (casin, 1.5L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 9.624236501192068949955178268487368462704e-1L),
3541 TEST_c_c (casin, -1.5L, 0x1.fp-16385L, -1.570796326794896619231321691639751442099L, 9.624236501192068949955178268487368462704e-1L),
3542 TEST_c_c (casin, 1.5L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -9.624236501192068949955178268487368462704e-1L),
3543 TEST_c_c (casin, -1.5L, -0x1.fp-16385L, -1.570796326794896619231321691639751442099L, -9.624236501192068949955178268487368462704e-1L),
3544#endif
3545
3546 TEST_c_c (casin, 0.5L, 1.0L, 3.494390628572132936274118260753699527325e-1L, 9.261330313501824245501244453057873152694e-1L),
3547 TEST_c_c (casin, 0.5L, -1.0L, 3.494390628572132936274118260753699527325e-1L, -9.261330313501824245501244453057873152694e-1L),
3548 TEST_c_c (casin, -0.5L, 1.0L, -3.494390628572132936274118260753699527325e-1L, 9.261330313501824245501244453057873152694e-1L),
3549 TEST_c_c (casin, -0.5L, -1.0L, -3.494390628572132936274118260753699527325e-1L, -9.261330313501824245501244453057873152694e-1L),
3550 TEST_c_c (casin, 1.0L, 0.5L, 8.959074812088902390666567243275770102229e-1L, 7.328576759736452608886724437653071523305e-1L),
3551 TEST_c_c (casin, -1.0L, 0.5L, -8.959074812088902390666567243275770102229e-1L, 7.328576759736452608886724437653071523305e-1L),
3552 TEST_c_c (casin, 1.0L, -0.5L, 8.959074812088902390666567243275770102229e-1L, -7.328576759736452608886724437653071523305e-1L),
3553 TEST_c_c (casin, -1.0L, -0.5L, -8.959074812088902390666567243275770102229e-1L, -7.328576759736452608886724437653071523305e-1L),
3554 TEST_c_c (casin, 0.25L, 1.0L, 1.763024327769669304186785666360901026468e-1L, 8.924633639033482359562124741744951972772e-1L),
3555 TEST_c_c (casin, 0.25L, -1.0L, 1.763024327769669304186785666360901026468e-1L, -8.924633639033482359562124741744951972772e-1L),
3556 TEST_c_c (casin, -0.25L, 1.0L, -1.763024327769669304186785666360901026468e-1L, 8.924633639033482359562124741744951972772e-1L),
3557 TEST_c_c (casin, -0.25L, -1.0L, -1.763024327769669304186785666360901026468e-1L, -8.924633639033482359562124741744951972772e-1L),
3558 TEST_c_c (casin, 1.0L, 0.25L, 1.081751996523816326311037318425097434186L, 5.097911466811016354623559941115413499164e-1L),
3559 TEST_c_c (casin, -1.0L, 0.25L, -1.081751996523816326311037318425097434186L, 5.097911466811016354623559941115413499164e-1L),
3560 TEST_c_c (casin, 1.0L, -0.25L, 1.081751996523816326311037318425097434186L, -5.097911466811016354623559941115413499164e-1L),
3561 TEST_c_c (casin, -1.0L, -0.25L, -1.081751996523816326311037318425097434186L, -5.097911466811016354623559941115413499164e-1L),
3562 TEST_c_c (casin, 0x1.fp-10L, 1.0L, 1.337909359557740912558349531052239112857e-3L, 8.813742198809567991336704287826445879025e-1L),
3563 TEST_c_c (casin, 0x1.fp-10L, -1.0L, 1.337909359557740912558349531052239112857e-3L, -8.813742198809567991336704287826445879025e-1L),
3564 TEST_c_c (casin, -0x1.fp-10L, 1.0L, -1.337909359557740912558349531052239112857e-3L, 8.813742198809567991336704287826445879025e-1L),
3565 TEST_c_c (casin, -0x1.fp-10L, -1.0L, -1.337909359557740912558349531052239112857e-3L, -8.813742198809567991336704287826445879025e-1L),
3566 TEST_c_c (casin, 1.0L, 0x1.fp-10L, 1.527305029163877791518741192097931722508L, 4.350501469856803800217957402220976497152e-2L),
3567 TEST_c_c (casin, -1.0L, 0x1.fp-10L, -1.527305029163877791518741192097931722508L, 4.350501469856803800217957402220976497152e-2L),
3568 TEST_c_c (casin, 1.0L, -0x1.fp-10L, 1.527305029163877791518741192097931722508L, -4.350501469856803800217957402220976497152e-2L),
3569 TEST_c_c (casin, -1.0L, -0x1.fp-10L, -1.527305029163877791518741192097931722508L, -4.350501469856803800217957402220976497152e-2L),
3570 TEST_c_c (casin, 0x1.fp-30L, 1.0L, 1.275929984216518540252717485007112529021e-9L, 8.813735870195430258081932989769495326854e-1L),
3571 TEST_c_c (casin, 0x1.fp-30L, -1.0L, 1.275929984216518540252717485007112529021e-9L, -8.813735870195430258081932989769495326854e-1L),
3572 TEST_c_c (casin, -0x1.fp-30L, 1.0L, -1.275929984216518540252717485007112529021e-9L, 8.813735870195430258081932989769495326854e-1L),
3573 TEST_c_c (casin, -0x1.fp-30L, -1.0L, -1.275929984216518540252717485007112529021e-9L, -8.813735870195430258081932989769495326854e-1L),
3574 TEST_c_c (casin, 1.0L, 0x1.fp-30L, 1.570753848123921942730162693731872690232L, 4.247867098745151888768727039216644758847e-5L),
3575 TEST_c_c (casin, -1.0L, 0x1.fp-30L, -1.570753848123921942730162693731872690232L, 4.247867098745151888768727039216644758847e-5L),
3576 TEST_c_c (casin, 1.0L, -0x1.fp-30L, 1.570753848123921942730162693731872690232L, -4.247867098745151888768727039216644758847e-5L),
3577 TEST_c_c (casin, -1.0L, -0x1.fp-30L, -1.570753848123921942730162693731872690232L, -4.247867098745151888768727039216644758847e-5L),
3578 TEST_c_c (casin, 0x1.fp-100L, 1.0L, 1.080754735021050612990719608916167354321e-30L, 8.813735870195430252326093249797923090282e-1L),
3579 TEST_c_c (casin, 0x1.fp-100L, -1.0L, 1.080754735021050612990719608916167354321e-30L, -8.813735870195430252326093249797923090282e-1L),
3580 TEST_c_c (casin, -0x1.fp-100L, 1.0L, -1.080754735021050612990719608916167354321e-30L, 8.813735870195430252326093249797923090282e-1L),
3581 TEST_c_c (casin, -0x1.fp-100L, -1.0L, -1.080754735021050612990719608916167354321e-30L, -8.813735870195430252326093249797923090282e-1L),
3582 TEST_c_c (casin, 1.0L, 0x1.fp-100L, 1.570796326794895382939283431378862777584L, 1.236292038260260888664514866457202186027e-15L),
3583 TEST_c_c (casin, -1.0L, 0x1.fp-100L, -1.570796326794895382939283431378862777584L, 1.236292038260260888664514866457202186027e-15L),
3584 TEST_c_c (casin, 1.0L, -0x1.fp-100L, 1.570796326794895382939283431378862777584L, -1.236292038260260888664514866457202186027e-15L),
3585 TEST_c_c (casin, -1.0L, -0x1.fp-100L, -1.570796326794895382939283431378862777584L, -1.236292038260260888664514866457202186027e-15L),
3586 TEST_c_c (casin, 0x1.fp-129L, 1.0L, 2.013062564695348242280482517399205554874e-39L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3587 TEST_c_c (casin, 0x1.fp-129L, -1.0L, 2.013062564695348242280482517399205554874e-39L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3588 TEST_c_c (casin, -0x1.fp-129L, 1.0L, -2.013062564695348242280482517399205554874e-39L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3589 TEST_c_c (casin, -0x1.fp-129L, -1.0L, -2.013062564695348242280482517399205554874e-39L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3590 TEST_c_c (casin, 1.0L, 0x1.fp-129L, 1.570796326794896619177965338869929107115L, 5.335635276982233498398987585285818977933e-20L),
3591 TEST_c_c (casin, -1.0L, 0x1.fp-129L, -1.570796326794896619177965338869929107115L, 5.335635276982233498398987585285818977933e-20L),
3592 TEST_c_c (casin, 1.0L, -0x1.fp-129L, 1.570796326794896619177965338869929107115L, -5.335635276982233498398987585285818977933e-20L),
3593 TEST_c_c (casin, -1.0L, -0x1.fp-129L, -1.570796326794896619177965338869929107115L, -5.335635276982233498398987585285818977933e-20L),
0a1b2ae6 3594#ifndef TEST_FLOAT
08198877
JM		 3595 TEST_c_c (casin, 0x1.fp-1000L, 1.0L, 1.278589251976747242280879285935084814093e-301L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3596 TEST_c_c (casin, 0x1.fp-1000L, -1.0L, 1.278589251976747242280879285935084814093e-301L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3597 TEST_c_c (casin, -0x1.fp-1000L, 1.0L, -1.278589251976747242280879285935084814093e-301L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3598 TEST_c_c (casin, -0x1.fp-1000L, -1.0L, -1.278589251976747242280879285935084814093e-301L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3599 TEST_c_c (casin, 1.0L, 0x1.fp-1000L, 1.570796326794896619231321691639751442099L, 4.252291453851660175550490409247739011867e-151L),
3600 TEST_c_c (casin, -1.0L, 0x1.fp-1000L, -1.570796326794896619231321691639751442099L, 4.252291453851660175550490409247739011867e-151L),
3601 TEST_c_c (casin, 1.0L, -0x1.fp-1000L, 1.570796326794896619231321691639751442099L, -4.252291453851660175550490409247739011867e-151L),
3602 TEST_c_c (casin, -1.0L, -0x1.fp-1000L, -1.570796326794896619231321691639751442099L, -4.252291453851660175550490409247739011867e-151L),
3603 TEST_c_c (casin, 0x1.fp-1025L, 1.0L, 3.810492908885321743133304375216617626230e-309L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3604 TEST_c_c (casin, 0x1.fp-1025L, -1.0L, 3.810492908885321743133304375216617626230e-309L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3605 TEST_c_c (casin, -0x1.fp-1025L, 1.0L, -3.810492908885321743133304375216617626230e-309L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3606 TEST_c_c (casin, -0x1.fp-1025L, -1.0L, -3.810492908885321743133304375216617626230e-309L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3607 TEST_c_c (casin, 1.0L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 7.340879205566679497036857179189356754017e-155L),
3608 TEST_c_c (casin, -1.0L, 0x1.fp-1025L, -1.570796326794896619231321691639751442099L, 7.340879205566679497036857179189356754017e-155L),
3609 TEST_c_c (casin, 1.0L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -7.340879205566679497036857179189356754017e-155L),
3610 TEST_c_c (casin, -1.0L, -0x1.fp-1025L, -1.570796326794896619231321691639751442099L, -7.340879205566679497036857179189356754017e-155L),
0a1b2ae6
JM		 3611#endif
3612#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3613 TEST_c_c (casin, 0x1.fp-10000L, 1.0L, 6.867047849047171855399183659351043150871e-3011L, 8.813735870195430252326093249797923090282e-1L),
3614 TEST_c_c (casin, 0x1.fp-10000L, -1.0L, 6.867047849047171855399183659351043150871e-3011L, -8.813735870195430252326093249797923090282e-1L),
3615 TEST_c_c (casin, -0x1.fp-10000L, 1.0L, -6.867047849047171855399183659351043150871e-3011L, 8.813735870195430252326093249797923090282e-1L),
3616 TEST_c_c (casin, -0x1.fp-10000L, -1.0L, -6.867047849047171855399183659351043150871e-3011L, -8.813735870195430252326093249797923090282e-1L),
3617 TEST_c_c (casin, 1.0L, 0x1.fp-10000L, 1.570796326794896619231321691639751442099L, 9.854680208706673586644342922051388714633e-1506L),
3618 TEST_c_c (casin, -1.0L, 0x1.fp-10000L, -1.570796326794896619231321691639751442099L, 9.854680208706673586644342922051388714633e-1506L),
3619 TEST_c_c (casin, 1.0L, -0x1.fp-10000L, 1.570796326794896619231321691639751442099L, -9.854680208706673586644342922051388714633e-1506L),
3620 TEST_c_c (casin, -1.0L, -0x1.fp-10000L, -1.570796326794896619231321691639751442099L, -9.854680208706673586644342922051388714633e-1506L),
3621 TEST_c_c (casin, 0x1.fp-16385L, 1.0L, 5.757683115456107044131264955348448954458e-4933L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION),
3622 TEST_c_c (casin, 0x1.fp-16385L, -1.0L, 5.757683115456107044131264955348448954458e-4933L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION),
3623 TEST_c_c (casin, -0x1.fp-16385L, 1.0L, -5.757683115456107044131264955348448954458e-4933L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION),
3624 TEST_c_c (casin, -0x1.fp-16385L, -1.0L, -5.757683115456107044131264955348448954458e-4933L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION),
3625 TEST_c_c (casin, 1.0L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 9.023632056840860275214893047597614177639e-2467L),
3626 TEST_c_c (casin, -1.0L, 0x1.fp-16385L, -1.570796326794896619231321691639751442099L, 9.023632056840860275214893047597614177639e-2467L),
3627 TEST_c_c (casin, 1.0L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -9.023632056840860275214893047597614177639e-2467L),
3628 TEST_c_c (casin, -1.0L, -0x1.fp-16385L, -1.570796326794896619231321691639751442099L, -9.023632056840860275214893047597614177639e-2467L),
3629#endif
3630
3631 TEST_c_c (casin, 0x1p-23L, 0x1.000002p0L, 8.429369199749229560964789467980644296420e-8L, 8.813736713132400470205730751186547909968e-1L),
3632 TEST_c_c (casin, 0x1p-23L, -0x1.000002p0L, 8.429369199749229560964789467980644296420e-8L, -8.813736713132400470205730751186547909968e-1L),
3633 TEST_c_c (casin, -0x1p-23L, 0x1.000002p0L, -8.429369199749229560964789467980644296420e-8L, 8.813736713132400470205730751186547909968e-1L),
3634 TEST_c_c (casin, -0x1p-23L, -0x1.000002p0L, -8.429369199749229560964789467980644296420e-8L, -8.813736713132400470205730751186547909968e-1L),
3635 TEST_c_c (casin, 0x1.000002p0L, 0x1p-23L, 1.570574114956455764594481054234834678422L, 5.364668491573609633134147164031476452679e-4L),
3636 TEST_c_c (casin, -0x1.000002p0L, 0x1p-23L, -1.570574114956455764594481054234834678422L, 5.364668491573609633134147164031476452679e-4L),
3637 TEST_c_c (casin, 0x1.000002p0L, -0x1p-23L, 1.570574114956455764594481054234834678422L, -5.364668491573609633134147164031476452679e-4L),
3638 TEST_c_c (casin, -0x1.000002p0L, -0x1p-23L, -1.570574114956455764594481054234834678422L, -5.364668491573609633134147164031476452679e-4L),
3639 TEST_c_c (casin, 0x1.fp-129L, 0x1.000002p0L, 2.013062444707472738895109955455676357057e-39L, 8.813736713132375348727889167749389235161e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3640 TEST_c_c (casin, 0x1.fp-129L, -0x1.000002p0L, 2.013062444707472738895109955455676357057e-39L, -8.813736713132375348727889167749389235161e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3641 TEST_c_c (casin, -0x1.fp-129L, 0x1.000002p0L, -2.013062444707472738895109955455676357057e-39L, 8.813736713132375348727889167749389235161e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3642 TEST_c_c (casin, -0x1.fp-129L, -0x1.000002p0L, -2.013062444707472738895109955455676357057e-39L, -8.813736713132375348727889167749389235161e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3643 TEST_c_c (casin, 0x1.000002p0L, 0x1.fp-129L, 1.570796326794896619231321691639751436268L, 4.882812451493617206486388134172712975070e-4L),
3644 TEST_c_c (casin, -0x1.000002p0L, 0x1.fp-129L, -1.570796326794896619231321691639751436268L, 4.882812451493617206486388134172712975070e-4L),
3645 TEST_c_c (casin, 0x1.000002p0L, -0x1.fp-129L, 1.570796326794896619231321691639751436268L, -4.882812451493617206486388134172712975070e-4L),
3646 TEST_c_c (casin, -0x1.000002p0L, -0x1.fp-129L, -1.570796326794896619231321691639751436268L, -4.882812451493617206486388134172712975070e-4L),
3647 TEST_c_c (casin, 0.0L, 0x1.000002p0L, 0.0L, 8.813736713132375348727889167749389235161e-1L),
3648 TEST_c_c (casin, 0.0L, -0x1.000002p0L, 0.0L, -8.813736713132375348727889167749389235161e-1L),
3649 TEST_c_c (casin, -0.0L, 0x1.000002p0L, -0.0L, 8.813736713132375348727889167749389235161e-1L),
3650 TEST_c_c (casin, -0.0L, -0x1.000002p0L, -0.0L, -8.813736713132375348727889167749389235161e-1L),
3651 TEST_c_c (casin, 0x1.000002p0L, 0.0L, 1.570796326794896619231321691639751442099L, 4.882812451493617206486388134172712975070e-4L),
3652 TEST_c_c (casin, -0x1.000002p0L, 0.0L, -1.570796326794896619231321691639751442099L, 4.882812451493617206486388134172712975070e-4L),
3653 TEST_c_c (casin, 0x1.000002p0L, -0.0L, 1.570796326794896619231321691639751442099L, -4.882812451493617206486388134172712975070e-4L),
3654 TEST_c_c (casin, -0x1.000002p0L, -0.0L, -1.570796326794896619231321691639751442099L, -4.882812451493617206486388134172712975070e-4L),
3a7182a1 3655#ifndef TEST_FLOAT
08198877
JM		 3656 TEST_c_c (casin, 0x1p-52L, 0x1.0000000000001p0L, 1.570092458683774885078102529858632363236e-16L, 8.813735870195431822418551933572982483664e-1L),
3657 TEST_c_c (casin, 0x1p-52L, -0x1.0000000000001p0L, 1.570092458683774885078102529858632363236e-16L, -8.813735870195431822418551933572982483664e-1L),
3658 TEST_c_c (casin, -0x1p-52L, 0x1.0000000000001p0L, -1.570092458683774885078102529858632363236e-16L, 8.813735870195431822418551933572982483664e-1L),
3659 TEST_c_c (casin, -0x1p-52L, -0x1.0000000000001p0L, -1.570092458683774885078102529858632363236e-16L, -8.813735870195431822418551933572982483664e-1L),
3660 TEST_c_c (casin, 0x1.0000000000001p0L, 0x1p-52L, 1.570796317204594913251280305810847349436L, 2.315303644582684770975188768022139415020e-8L),
3661 TEST_c_c (casin, -0x1.0000000000001p0L, 0x1p-52L, -1.570796317204594913251280305810847349436L, 2.315303644582684770975188768022139415020e-8L),
3662 TEST_c_c (casin, 0x1.0000000000001p0L, -0x1p-52L, 1.570796317204594913251280305810847349436L, -2.315303644582684770975188768022139415020e-8L),
3663 TEST_c_c (casin, -0x1.0000000000001p0L, -0x1p-52L, -1.570796317204594913251280305810847349436L, -2.315303644582684770975188768022139415020e-8L),
3664 TEST_c_c (casin, 0x1.fp-1025L, 0x1.0000000000001p0L, 3.810492908885321320083608113679347200012e-309L, 8.813735870195431822418551933572895326024e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3665 TEST_c_c (casin, 0x1.fp-1025L, -0x1.0000000000001p0L, 3.810492908885321320083608113679347200012e-309L, -8.813735870195431822418551933572895326024e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3666 TEST_c_c (casin, -0x1.fp-1025L, 0x1.0000000000001p0L, -3.810492908885321320083608113679347200012e-309L, 8.813735870195431822418551933572895326024e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3667 TEST_c_c (casin, -0x1.fp-1025L, -0x1.0000000000001p0L, -3.810492908885321320083608113679347200012e-309L, -8.813735870195431822418551933572895326024e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3668 TEST_c_c (casin, 0x1.0000000000001p0L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 2.107342425544701550354780375182800088393e-8L),
3669 TEST_c_c (casin, -0x1.0000000000001p0L, 0x1.fp-1025L, -1.570796326794896619231321691639751442099L, 2.107342425544701550354780375182800088393e-8L),
3670 TEST_c_c (casin, 0x1.0000000000001p0L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -2.107342425544701550354780375182800088393e-8L),
3671 TEST_c_c (casin, -0x1.0000000000001p0L, -0x1.fp-1025L, -1.570796326794896619231321691639751442099L, -2.107342425544701550354780375182800088393e-8L),
3672 TEST_c_c (casin, 0.0L, 0x1.0000000000001p0L, 0.0L, 8.813735870195431822418551933572895326024e-1L),
3673 TEST_c_c (casin, 0.0L, -0x1.0000000000001p0L, 0.0L, -8.813735870195431822418551933572895326024e-1L),
3674 TEST_c_c (casin, -0.0L, 0x1.0000000000001p0L, -0.0L, 8.813735870195431822418551933572895326024e-1L),
3675 TEST_c_c (casin, -0.0L, -0x1.0000000000001p0L, -0.0L, -8.813735870195431822418551933572895326024e-1L),
3676 TEST_c_c (casin, 0x1.0000000000001p0L, 0.0L, 1.570796326794896619231321691639751442099L, 2.107342425544701550354780375182800088393e-8L),
3677 TEST_c_c (casin, -0x1.0000000000001p0L, 0.0L, -1.570796326794896619231321691639751442099L, 2.107342425544701550354780375182800088393e-8L),
3678 TEST_c_c (casin, 0x1.0000000000001p0L, -0.0L, 1.570796326794896619231321691639751442099L, -2.107342425544701550354780375182800088393e-8L),
3679 TEST_c_c (casin, -0x1.0000000000001p0L, -0.0L, -1.570796326794896619231321691639751442099L, -2.107342425544701550354780375182800088393e-8L),
3a7182a1
JM		 3680#endif
3681#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 3682 TEST_c_c (casin, 0x1p-63L, 0x1.0000000000000002p0L, 7.666467083416870406778649849746878368519e-20L, 8.813735870195430253092739958139610131001e-1L),
3683 TEST_c_c (casin, 0x1p-63L, -0x1.0000000000000002p0L, 7.666467083416870406778649849746878368519e-20L, -8.813735870195430253092739958139610131001e-1L),
3684 TEST_c_c (casin, -0x1p-63L, 0x1.0000000000000002p0L, -7.666467083416870406778649849746878368519e-20L, 8.813735870195430253092739958139610131001e-1L),
3685 TEST_c_c (casin, -0x1p-63L, -0x1.0000000000000002p0L, -7.666467083416870406778649849746878368519e-20L, -8.813735870195430253092739958139610131001e-1L),
3686 TEST_c_c (casin, 0x1.0000000000000002p0L, 0x1p-63L, 1.570796326582978888921215348380499122131L, 5.116146586219826555037807251857670783420e-10L),
3687 TEST_c_c (casin, -0x1.0000000000000002p0L, 0x1p-63L, -1.570796326582978888921215348380499122131L, 5.116146586219826555037807251857670783420e-10L),
3688 TEST_c_c (casin, 0x1.0000000000000002p0L, -0x1p-63L, 1.570796326582978888921215348380499122131L, -5.116146586219826555037807251857670783420e-10L),
3689 TEST_c_c (casin, -0x1.0000000000000002p0L, -0x1p-63L, -1.570796326582978888921215348380499122131L, -5.116146586219826555037807251857670783420e-10L),
3a7182a1 3690# if LDBL_MIN_EXP <= -16381
08198877
JM		 3691 TEST_c_c (casin, 0x1.fp-16385L, 0x1.0000000000000002p0L, 5.757683115456107043819140328235418018963e-4933L, 8.813735870195430253092739958139610130980e-1L, UNDERFLOW_EXCEPTION),
3692 TEST_c_c (casin, 0x1.fp-16385L, -0x1.0000000000000002p0L, 5.757683115456107043819140328235418018963e-4933L, -8.813735870195430253092739958139610130980e-1L, UNDERFLOW_EXCEPTION),
3693 TEST_c_c (casin, -0x1.fp-16385L, 0x1.0000000000000002p0L, -5.757683115456107043819140328235418018963e-4933L, 8.813735870195430253092739958139610130980e-1L, UNDERFLOW_EXCEPTION),
3694 TEST_c_c (casin, -0x1.fp-16385L, -0x1.0000000000000002p0L, -5.757683115456107043819140328235418018963e-4933L, -8.813735870195430253092739958139610130980e-1L, UNDERFLOW_EXCEPTION),
3695 TEST_c_c (casin, 0x1.0000000000000002p0L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 4.656612873077392578082927418388212703712e-10L),
3696 TEST_c_c (casin, -0x1.0000000000000002p0L, 0x1.fp-16385L, -1.570796326794896619231321691639751442099L, 4.656612873077392578082927418388212703712e-10L),
3697 TEST_c_c (casin, 0x1.0000000000000002p0L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -4.656612873077392578082927418388212703712e-10L),
3698 TEST_c_c (casin, -0x1.0000000000000002p0L, -0x1.fp-16385L, -1.570796326794896619231321691639751442099L, -4.656612873077392578082927418388212703712e-10L),
3a7182a1 3699# endif
08198877
JM		 3700 TEST_c_c (casin, 0.0L, 0x1.0000000000000002p0L, 0.0L, 8.813735870195430253092739958139610130980e-1L),
3701 TEST_c_c (casin, 0.0L, -0x1.0000000000000002p0L, 0.0L, -8.813735870195430253092739958139610130980e-1L),
3702 TEST_c_c (casin, -0.0L, 0x1.0000000000000002p0L, -0.0L, 8.813735870195430253092739958139610130980e-1L),
3703 TEST_c_c (casin, -0.0L, -0x1.0000000000000002p0L, -0.0L, -8.813735870195430253092739958139610130980e-1L),
3704 TEST_c_c (casin, 0x1.0000000000000002p0L, 0.0L, 1.570796326794896619231321691639751442099L, 4.656612873077392578082927418388212703712e-10L),
3705 TEST_c_c (casin, -0x1.0000000000000002p0L, 0.0L, -1.570796326794896619231321691639751442099L, 4.656612873077392578082927418388212703712e-10L),
3706 TEST_c_c (casin, 0x1.0000000000000002p0L, -0.0L, 1.570796326794896619231321691639751442099L, -4.656612873077392578082927418388212703712e-10L),
3707 TEST_c_c (casin, -0x1.0000000000000002p0L, -0.0L, -1.570796326794896619231321691639751442099L, -4.656612873077392578082927418388212703712e-10L),
3a7182a1
JM		 3708#endif
3709#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 3710 TEST_c_c (casin, 0x1p-106L, 0x1.000000000000000000000000008p0L, 8.715763992105246878957416200936726072500e-33L, 8.813735870195430252326093249798097405561e-1L),
3711 TEST_c_c (casin, 0x1p-106L, -0x1.000000000000000000000000008p0L, 8.715763992105246878957416200936726072500e-33L, -8.813735870195430252326093249798097405561e-1L),
3712 TEST_c_c (casin, -0x1p-106L, 0x1.000000000000000000000000008p0L, -8.715763992105246878957416200936726072500e-33L, 8.813735870195430252326093249798097405561e-1L),
3713 TEST_c_c (casin, -0x1p-106L, -0x1.000000000000000000000000008p0L, -8.715763992105246878957416200936726072500e-33L, -8.813735870195430252326093249798097405561e-1L),
3714 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, 0x1p-106L, 1.570796326794896565289107467733682961928L, 2.285028863093221674154232933662774454211e-16L),
3715 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, 0x1p-106L, -1.570796326794896565289107467733682961928L, 2.285028863093221674154232933662774454211e-16L),
3716 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, -0x1p-106L, 1.570796326794896565289107467733682961928L, -2.285028863093221674154232933662774454211e-16L),
3717 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, -0x1p-106L, -1.570796326794896565289107467733682961928L, -2.285028863093221674154232933662774454211e-16L),
3718 TEST_c_c (casin, 0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 3.810492908885321743133304375216570658278e-309L, 8.813735870195430252326093249798097405561e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3719 TEST_c_c (casin, 0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 3.810492908885321743133304375216570658278e-309L, -8.813735870195430252326093249798097405561e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3720 TEST_c_c (casin, -0x1.fp-1025L, 0x1.000000000000000000000000008p0L, -3.810492908885321743133304375216570658278e-309L, 8.813735870195430252326093249798097405561e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3721 TEST_c_c (casin, -0x1.fp-1025L, -0x1.000000000000000000000000008p0L, -3.810492908885321743133304375216570658278e-309L, -8.813735870195430252326093249798097405561e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3722 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181636063482e-16L),
3723 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, 0x1.fp-1025L, -1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181636063482e-16L),
3724 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181636063482e-16L),
3725 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, -0x1.fp-1025L, -1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181636063482e-16L),
3726 TEST_c_c (casin, 0.0L, 0x1.000000000000000000000000008p0L, 0.0L, 8.813735870195430252326093249798097405561e-1L),
3727 TEST_c_c (casin, 0.0L, -0x1.000000000000000000000000008p0L, 0.0L, -8.813735870195430252326093249798097405561e-1L),
3728 TEST_c_c (casin, -0.0L, 0x1.000000000000000000000000008p0L, -0.0L, 8.813735870195430252326093249798097405561e-1L),
3729 TEST_c_c (casin, -0.0L, -0x1.000000000000000000000000008p0L, -0.0L, -8.813735870195430252326093249798097405561e-1L),
3730 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, 0.0L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181636063482e-16L),
3731 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, 0.0L, -1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181636063482e-16L),
3732 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, -0.0L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181636063482e-16L),
3733 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, -0.0L, -1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181636063482e-16L),
3a7182a1
JM		 3734#endif
3735#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 3736 TEST_c_c (casin, 0x1p-113L, 0x1.0000000000000000000000000001p0L, 6.809190618832224124185481406981900518193e-35L, 8.813735870195430252326093249797924452120e-1L),
3737 TEST_c_c (casin, 0x1p-113L, -0x1.0000000000000000000000000001p0L, 6.809190618832224124185481406981900518193e-35L, -8.813735870195430252326093249797924452120e-1L),
3738 TEST_c_c (casin, -0x1p-113L, 0x1.0000000000000000000000000001p0L, -6.809190618832224124185481406981900518193e-35L, 8.813735870195430252326093249797924452120e-1L),
3739 TEST_c_c (casin, -0x1p-113L, -0x1.0000000000000000000000000001p0L, -6.809190618832224124185481406981900518193e-35L, -8.813735870195430252326093249797924452120e-1L),
3740 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, 0x1p-113L, 1.570796326794896614463458507897073960405L, 2.019699255375255198156433710951064632386e-17L),
3741 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, 0x1p-113L, -1.570796326794896614463458507897073960405L, 2.019699255375255198156433710951064632386e-17L),
3742 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, -0x1p-113L, 1.570796326794896614463458507897073960405L, -2.019699255375255198156433710951064632386e-17L),
3743 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, -0x1p-113L, -1.570796326794896614463458507897073960405L, -2.019699255375255198156433710951064632386e-17L),
3744 TEST_c_c (casin, 0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 5.757683115456107044131264955348448400014e-4933L, 8.813735870195430252326093249797924452120e-1L, UNDERFLOW_EXCEPTION),
3745 TEST_c_c (casin, 0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 5.757683115456107044131264955348448400014e-4933L, -8.813735870195430252326093249797924452120e-1L, UNDERFLOW_EXCEPTION),
3746 TEST_c_c (casin, -0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, -5.757683115456107044131264955348448400014e-4933L, 8.813735870195430252326093249797924452120e-1L, UNDERFLOW_EXCEPTION),
3747 TEST_c_c (casin, -0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, -5.757683115456107044131264955348448400014e-4933L, -8.813735870195430252326093249797924452120e-1L, UNDERFLOW_EXCEPTION),
3748 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 1.962615573354718824241727964954454332780e-17L),
3749 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, -1.570796326794896619231321691639751442099L, 1.962615573354718824241727964954454332780e-17L),
3750 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -1.962615573354718824241727964954454332780e-17L),
3751 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, -1.570796326794896619231321691639751442099L, -1.962615573354718824241727964954454332780e-17L),
3752 TEST_c_c (casin, 0.0L, 0x1.0000000000000000000000000001p0L, 0.0L, 8.813735870195430252326093249797924452120e-1L),
3753 TEST_c_c (casin, 0.0L, -0x1.0000000000000000000000000001p0L, 0.0L, -8.813735870195430252326093249797924452120e-1L),
3754 TEST_c_c (casin, -0.0L, 0x1.0000000000000000000000000001p0L, -0.0L, 8.813735870195430252326093249797924452120e-1L),
3755 TEST_c_c (casin, -0.0L, -0x1.0000000000000000000000000001p0L, -0.0L, -8.813735870195430252326093249797924452120e-1L),
3756 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, 0.0L, 1.570796326794896619231321691639751442099L, 1.962615573354718824241727964954454332780e-17L),
3757 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, 0.0L, -1.570796326794896619231321691639751442099L, 1.962615573354718824241727964954454332780e-17L),
3758 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, -0.0L, 1.570796326794896619231321691639751442099L, -1.962615573354718824241727964954454332780e-17L),
3759 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, -0.0L, -1.570796326794896619231321691639751442099L, -1.962615573354718824241727964954454332780e-17L),
3760#endif
3761
3762 TEST_c_c (casin, 0x1p-23L, 0x0.ffffffp0L, 8.429369953393598499000760938112968755257e-8L, 8.813735448726963984495965873956465777250e-1L),
3763 TEST_c_c (casin, 0x1p-23L, -0x0.ffffffp0L, 8.429369953393598499000760938112968755257e-8L, -8.813735448726963984495965873956465777250e-1L),
3764 TEST_c_c (casin, -0x1p-23L, 0x0.ffffffp0L, -8.429369953393598499000760938112968755257e-8L, 8.813735448726963984495965873956465777250e-1L),
3765 TEST_c_c (casin, -0x1p-23L, -0x0.ffffffp0L, -8.429369953393598499000760938112968755257e-8L, -8.813735448726963984495965873956465777250e-1L),
3766 TEST_c_c (casin, 0x0.ffffffp0L, 0x1p-23L, 1.570357140408705570520377172865353621698L, 2.714321200917194650737217746780928423385e-4L),
3767 TEST_c_c (casin, -0x0.ffffffp0L, 0x1p-23L, -1.570357140408705570520377172865353621698L, 2.714321200917194650737217746780928423385e-4L),
3768 TEST_c_c (casin, 0x0.ffffffp0L, -0x1p-23L, 1.570357140408705570520377172865353621698L, -2.714321200917194650737217746780928423385e-4L),
3769 TEST_c_c (casin, -0x0.ffffffp0L, -0x1p-23L, -1.570357140408705570520377172865353621698L, -2.714321200917194650737217746780928423385e-4L),
3770 TEST_c_c (casin, 0x1.fp-129L, 0x0.ffffffp0L, 2.013062624689288675911339929224634593425e-39L, 8.813735448726938863015878255140556727969e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3771 TEST_c_c (casin, 0x1.fp-129L, -0x0.ffffffp0L, 2.013062624689288675911339929224634593425e-39L, -8.813735448726938863015878255140556727969e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3772 TEST_c_c (casin, -0x1.fp-129L, 0x0.ffffffp0L, -2.013062624689288675911339929224634593425e-39L, 8.813735448726938863015878255140556727969e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3773 TEST_c_c (casin, -0x1.fp-129L, -0x0.ffffffp0L, -2.013062624689288675911339929224634593425e-39L, -8.813735448726938863015878255140556727969e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3774 TEST_c_c (casin, 0x0.ffffffp0L, 0x1.fp-129L, 1.570451059810180415643718442157112705601L, 8.245504387859737323891843603996428534945e-36L),
3775 TEST_c_c (casin, -0x0.ffffffp0L, 0x1.fp-129L, -1.570451059810180415643718442157112705601L, 8.245504387859737323891843603996428534945e-36L),
3776 TEST_c_c (casin, 0x0.ffffffp0L, -0x1.fp-129L, 1.570451059810180415643718442157112705601L, -8.245504387859737323891843603996428534945e-36L),
3777 TEST_c_c (casin, -0x0.ffffffp0L, -0x1.fp-129L, -1.570451059810180415643718442157112705601L, -8.245504387859737323891843603996428534945e-36L),
3778 TEST_c_c (casin, 0.0L, 0x0.ffffffp0L, 0.0L, 8.813735448726938863015878255140556727969e-1L),
3779 TEST_c_c (casin, 0.0L, -0x0.ffffffp0L, 0.0L, -8.813735448726938863015878255140556727969e-1L),
3780 TEST_c_c (casin, -0.0L, 0x0.ffffffp0L, -0.0L, 8.813735448726938863015878255140556727969e-1L),
3781 TEST_c_c (casin, -0.0L, -0x0.ffffffp0L, -0.0L, -8.813735448726938863015878255140556727969e-1L),
3782 TEST_c_c (casin, 0x0.ffffffp0L, 0.0L, 1.570451059810180415643718442157112705601L, 0.0L),
3783 TEST_c_c (casin, -0x0.ffffffp0L, 0.0L, -1.570451059810180415643718442157112705601L, 0.0L),
3784 TEST_c_c (casin, 0x0.ffffffp0L, -0.0L, 1.570451059810180415643718442157112705601L, -0.0L),
3785 TEST_c_c (casin, -0x0.ffffffp0L, -0.0L, -1.570451059810180415643718442157112705601L, -0.0L),
3786 TEST_c_c (casin, 0x1p-23L, 0.5L, 1.066240299940009780479664302917201696886e-7L, 4.812118250596059896127318386463676808798e-1L),
3787 TEST_c_c (casin, 0x1p-23L, -0.5L, 1.066240299940009780479664302917201696886e-7L, -4.812118250596059896127318386463676808798e-1L),
3788 TEST_c_c (casin, -0x1p-23L, 0.5L, -1.066240299940009780479664302917201696886e-7L, 4.812118250596059896127318386463676808798e-1L),
3789 TEST_c_c (casin, -0x1p-23L, -0.5L, -1.066240299940009780479664302917201696886e-7L, -4.812118250596059896127318386463676808798e-1L),
3790 TEST_c_c (casin, 0.5L, 0x1p-23L, 5.235987755982934033165770729745469098254e-1L, 1.376510308240943236356088341381173571841e-7L),
3791 TEST_c_c (casin, -0.5L, 0x1p-23L, -5.235987755982934033165770729745469098254e-1L, 1.376510308240943236356088341381173571841e-7L),
3792 TEST_c_c (casin, 0.5L, -0x1p-23L, 5.235987755982934033165770729745469098254e-1L, -1.376510308240943236356088341381173571841e-7L),
3793 TEST_c_c (casin, -0.5L, -0x1p-23L, -5.235987755982934033165770729745469098254e-1L, -1.376510308240943236356088341381173571841e-7L),
3794 TEST_c_c (casin, 0x1.fp-129L, 0.5L, 2.546345110742945032959687790021055102355e-39L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3795 TEST_c_c (casin, 0x1.fp-129L, -0.5L, 2.546345110742945032959687790021055102355e-39L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3796 TEST_c_c (casin, -0x1.fp-129L, 0.5L, -2.546345110742945032959687790021055102355e-39L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3797 TEST_c_c (casin, -0x1.fp-129L, -0.5L, -2.546345110742945032959687790021055102355e-39L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3798 TEST_c_c (casin, 0.5L, 0x1.fp-129L, 5.235987755982988730771072305465838140329e-1L, 3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3799 TEST_c_c (casin, -0.5L, 0x1.fp-129L, -5.235987755982988730771072305465838140329e-1L, 3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3800 TEST_c_c (casin, 0.5L, -0x1.fp-129L, 5.235987755982988730771072305465838140329e-1L, -3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3801 TEST_c_c (casin, -0.5L, -0x1.fp-129L, -5.235987755982988730771072305465838140329e-1L, -3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3802 TEST_c_c (casin, 0x1p-23L, 0x1p-23L, 1.192092895507806853113684971258850504935e-7L, 1.192092895507818146886315028596704749235e-7L),
3803 TEST_c_c (casin, 0x1p-23L, -0x1p-23L, 1.192092895507806853113684971258850504935e-7L, -1.192092895507818146886315028596704749235e-7L),
3804 TEST_c_c (casin, -0x1p-23L, 0x1p-23L, -1.192092895507806853113684971258850504935e-7L, 1.192092895507818146886315028596704749235e-7L),
3805 TEST_c_c (casin, -0x1p-23L, -0x1p-23L, -1.192092895507806853113684971258850504935e-7L, -1.192092895507818146886315028596704749235e-7L),
3806 /* Bug 15319: underflow exception may be missing. */
3807 TEST_c_c (casin, 0x1.fp-129L, 0x1p-23L, 2.846900380897707329917933005874691056564e-39L, 1.192092895507809676556842485683592032154e-7L, UNDERFLOW_EXCEPTION_OK_FLOAT),
3808 TEST_c_c (casin, 0x1.fp-129L, -0x1p-23L, 2.846900380897707329917933005874691056564e-39L, -1.192092895507809676556842485683592032154e-7L, UNDERFLOW_EXCEPTION_OK_FLOAT),
3809 TEST_c_c (casin, -0x1.fp-129L, 0x1p-23L, -2.846900380897707329917933005874691056564e-39L, 1.192092895507809676556842485683592032154e-7L, UNDERFLOW_EXCEPTION_OK_FLOAT),
3810 TEST_c_c (casin, -0x1.fp-129L, -0x1p-23L, -2.846900380897707329917933005874691056564e-39L, -1.192092895507809676556842485683592032154e-7L, UNDERFLOW_EXCEPTION_OK_FLOAT),
3811 TEST_c_c (casin, 0x1p-23L, 0x1.fp-129L, 1.192092895507815323443157514352519154304e-7L, 2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3812 TEST_c_c (casin, -0x1p-23L, 0x1.fp-129L, -1.192092895507815323443157514352519154304e-7L, 2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3813 TEST_c_c (casin, 0x1p-23L, -0x1.fp-129L, 1.192092895507815323443157514352519154304e-7L, -2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3814 TEST_c_c (casin, -0x1p-23L, -0x1.fp-129L, -1.192092895507815323443157514352519154304e-7L, -2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3815 TEST_c_c (casin, 0.0L, 0x1p-23L, 0.0L, 1.192092895507809676556842485683592032154e-7L),
3816 TEST_c_c (casin, 0.0L, -0x1p-23L, 0.0L, -1.192092895507809676556842485683592032154e-7L),
3817 TEST_c_c (casin, -0.0L, 0x1p-23L, -0.0L, 1.192092895507809676556842485683592032154e-7L),
3818 TEST_c_c (casin, -0.0L, -0x1p-23L, -0.0L, -1.192092895507809676556842485683592032154e-7L),
3819 TEST_c_c (casin, 0x1p-23L, 0.0L, 1.192092895507815323443157514352519154304e-7L, 0.0L),
3820 TEST_c_c (casin, -0x1p-23L, 0.0L, -1.192092895507815323443157514352519154304e-7L, 0.0L),
3821 TEST_c_c (casin, 0x1p-23L, -0.0L, 1.192092895507815323443157514352519154304e-7L, -0.0L),
3822 TEST_c_c (casin, -0x1p-23L, -0.0L, -1.192092895507815323443157514352519154304e-7L, -0.0L),
3823 TEST_c_c (casin, 0x1.fp-129L, 0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3824 TEST_c_c (casin, 0x1.fp-129L, -0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3825 TEST_c_c (casin, -0x1.fp-129L, 0x1.fp-129L, -2.846900380897727558361783801085126250967e-39L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3826 TEST_c_c (casin, -0x1.fp-129L, -0x1.fp-129L, -2.846900380897727558361783801085126250967e-39L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
ccc8cadf 3827#ifndef TEST_FLOAT
08198877
JM		 3828 TEST_c_c (casin, 0x1p-52L, 0x0.fffffffffffff8p0L, 1.570092458683775146551022293016031474627e-16L, 8.813735870195429467279863907910458761820e-1L),
3829 TEST_c_c (casin, 0x1p-52L, -0x0.fffffffffffff8p0L, 1.570092458683775146551022293016031474627e-16L, -8.813735870195429467279863907910458761820e-1L),
3830 TEST_c_c (casin, -0x1p-52L, 0x0.fffffffffffff8p0L, -1.570092458683775146551022293016031474627e-16L, 8.813735870195429467279863907910458761820e-1L),
3831 TEST_c_c (casin, -0x1p-52L, -0x0.fffffffffffff8p0L, -1.570092458683775146551022293016031474627e-16L, -8.813735870195429467279863907910458761820e-1L),
3832 TEST_c_c (casin, 0x0.fffffffffffff8p0L, 0x1p-52L, 1.570796307840326780080580569360500172043L, 1.171456840272878582596796205397918831268e-8L),
3833 TEST_c_c (casin, -0x0.fffffffffffff8p0L, 0x1p-52L, -1.570796307840326780080580569360500172043L, 1.171456840272878582596796205397918831268e-8L),
3834 TEST_c_c (casin, 0x0.fffffffffffff8p0L, -0x1p-52L, 1.570796307840326780080580569360500172043L, -1.171456840272878582596796205397918831268e-8L),
3835 TEST_c_c (casin, -0x0.fffffffffffff8p0L, -0x1p-52L, -1.570796307840326780080580569360500172043L, -1.171456840272878582596796205397918831268e-8L),
3836 TEST_c_c (casin, 0x1.fp-1025L, 0x0.fffffffffffff8p0L, 3.810492908885321954658152505985270452320e-309L, 8.813735870195429467279863907910371604180e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3837 TEST_c_c (casin, 0x1.fp-1025L, -0x0.fffffffffffff8p0L, 3.810492908885321954658152505985270452320e-309L, -8.813735870195429467279863907910371604180e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3838 TEST_c_c (casin, -0x1.fp-1025L, 0x0.fffffffffffff8p0L, -3.810492908885321954658152505985270452320e-309L, 8.813735870195429467279863907910371604180e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3839 TEST_c_c (casin, -0x1.fp-1025L, -0x0.fffffffffffff8p0L, -3.810492908885321954658152505985270452320e-309L, -8.813735870195429467279863907910371604180e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3840 TEST_c_c (casin, 0x0.fffffffffffff8p0L, 0x1.fp-1025L, 1.570796311893735425383665303776316016594L, 3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3841 TEST_c_c (casin, -0x0.fffffffffffff8p0L, 0x1.fp-1025L, -1.570796311893735425383665303776316016594L, 3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3842 TEST_c_c (casin, 0x0.fffffffffffff8p0L, -0x1.fp-1025L, 1.570796311893735425383665303776316016594L, -3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3843 TEST_c_c (casin, -0x0.fffffffffffff8p0L, -0x1.fp-1025L, -1.570796311893735425383665303776316016594L, -3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3844 TEST_c_c (casin, 0.0L, 0x0.fffffffffffff8p0L, 0.0L, 8.813735870195429467279863907910371604180e-1L),
3845 TEST_c_c (casin, 0.0L, -0x0.fffffffffffff8p0L, 0.0L, -8.813735870195429467279863907910371604180e-1L),
3846 TEST_c_c (casin, -0.0L, 0x0.fffffffffffff8p0L, -0.0L, 8.813735870195429467279863907910371604180e-1L),
3847 TEST_c_c (casin, -0.0L, -0x0.fffffffffffff8p0L, -0.0L, -8.813735870195429467279863907910371604180e-1L),
3848 TEST_c_c (casin, 0x0.fffffffffffff8p0L, 0.0L, 1.570796311893735425383665303776316016594L, 0.0L),
3849 TEST_c_c (casin, -0x0.fffffffffffff8p0L, 0.0L, -1.570796311893735425383665303776316016594L, 0.0L),
3850 TEST_c_c (casin, 0x0.fffffffffffff8p0L, -0.0L, 1.570796311893735425383665303776316016594L, -0.0L),
3851 TEST_c_c (casin, -0x0.fffffffffffff8p0L, -0.0L, -1.570796311893735425383665303776316016594L, -0.0L),
3852#endif
3853 TEST_c_c (casin, 0x1p-52L, 0.5L, 1.986027322597818397661816253158024383707e-16L, 4.812118250596034474977589134243772428682e-1L),
3854 TEST_c_c (casin, 0x1p-52L, -0.5L, 1.986027322597818397661816253158024383707e-16L, -4.812118250596034474977589134243772428682e-1L),
3855 TEST_c_c (casin, -0x1p-52L, 0.5L, -1.986027322597818397661816253158024383707e-16L, 4.812118250596034474977589134243772428682e-1L),
3856 TEST_c_c (casin, -0x1p-52L, -0.5L, -1.986027322597818397661816253158024383707e-16L, -4.812118250596034474977589134243772428682e-1L),
3857 TEST_c_c (casin, 0.5L, 0x1p-52L, 5.235987755982988730771072305465648369889e-1L, 2.563950248511418570403591756798643804971e-16L),
3858 TEST_c_c (casin, -0.5L, 0x1p-52L, -5.235987755982988730771072305465648369889e-1L, 2.563950248511418570403591756798643804971e-16L),
3859 TEST_c_c (casin, 0.5L, -0x1p-52L, 5.235987755982988730771072305465648369889e-1L, -2.563950248511418570403591756798643804971e-16L),
3860 TEST_c_c (casin, -0.5L, -0x1p-52L, -5.235987755982988730771072305465648369889e-1L, -2.563950248511418570403591756798643804971e-16L),
ccc8cadf 3861#ifndef TEST_FLOAT
08198877
JM		 3862 TEST_c_c (casin, 0x1.fp-1025L, 0.5L, 4.819934639999230680322935210539402497827e-309L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3863 TEST_c_c (casin, 0x1.fp-1025L, -0.5L, 4.819934639999230680322935210539402497827e-309L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3864 TEST_c_c (casin, -0x1.fp-1025L, 0.5L, -4.819934639999230680322935210539402497827e-309L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3865 TEST_c_c (casin, -0x1.fp-1025L, -0.5L, -4.819934639999230680322935210539402497827e-309L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3866 TEST_c_c (casin, 0.5L, 0x1.fp-1025L, 5.235987755982988730771072305465838140329e-1L, 6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3867 TEST_c_c (casin, -0.5L, 0x1.fp-1025L, -5.235987755982988730771072305465838140329e-1L, 6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3868 TEST_c_c (casin, 0.5L, -0x1.fp-1025L, 5.235987755982988730771072305465838140329e-1L, -6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3869 TEST_c_c (casin, -0.5L, -0x1.fp-1025L, -5.235987755982988730771072305465838140329e-1L, -6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3870#endif
3871 TEST_c_c (casin, 0x1p-52L, 0x1p-52L, 2.220446049250313080847263336181604132852e-16L, 2.220446049250313080847263336181677117148e-16L),
3872 TEST_c_c (casin, 0x1p-52L, -0x1p-52L, 2.220446049250313080847263336181604132852e-16L, -2.220446049250313080847263336181677117148e-16L),
3873 TEST_c_c (casin, -0x1p-52L, 0x1p-52L, -2.220446049250313080847263336181604132852e-16L, 2.220446049250313080847263336181677117148e-16L),
3874 TEST_c_c (casin, -0x1p-52L, -0x1p-52L, -2.220446049250313080847263336181604132852e-16L, -2.220446049250313080847263336181677117148e-16L),
ccc8cadf 3875#ifndef TEST_FLOAT
08198877
JM		 3876 /* Bug 15319: underflow exception may be missing. */
3877 TEST_c_c (casin, 0x1.fp-1025L, 0x1p-52L, 5.388850751072128349671657362289283247603e-309L, 2.220446049250313080847263336181622378926e-16L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3878 TEST_c_c (casin, 0x1.fp-1025L, -0x1p-52L, 5.388850751072128349671657362289283247603e-309L, -2.220446049250313080847263336181622378926e-16L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3879 TEST_c_c (casin, -0x1.fp-1025L, 0x1p-52L, -5.388850751072128349671657362289283247603e-309L, 2.220446049250313080847263336181622378926e-16L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3880 TEST_c_c (casin, -0x1.fp-1025L, -0x1p-52L, -5.388850751072128349671657362289283247603e-309L, -2.220446049250313080847263336181622378926e-16L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3881 TEST_c_c (casin, 0x1p-52L, 0x1.fp-1025L, 2.220446049250313080847263336181658871074e-16L, 5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3882 TEST_c_c (casin, -0x1p-52L, 0x1.fp-1025L, -2.220446049250313080847263336181658871074e-16L, 5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3883 TEST_c_c (casin, 0x1p-52L, -0x1.fp-1025L, 2.220446049250313080847263336181658871074e-16L, -5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3884 TEST_c_c (casin, -0x1p-52L, -0x1.fp-1025L, -2.220446049250313080847263336181658871074e-16L, -5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3885#endif
3886 TEST_c_c (casin, 0.0L, 0x1p-52L, 0.0L, 2.220446049250313080847263336181622378926e-16L),
3887 TEST_c_c (casin, 0.0L, -0x1p-52L, 0.0L, -2.220446049250313080847263336181622378926e-16L),
3888 TEST_c_c (casin, -0.0L, 0x1p-52L, -0.0L, 2.220446049250313080847263336181622378926e-16L),
3889 TEST_c_c (casin, -0.0L, -0x1p-52L, -0.0L, -2.220446049250313080847263336181622378926e-16L),
3890 TEST_c_c (casin, 0x1p-52L, 0.0L, 2.220446049250313080847263336181658871074e-16L, 0.0L),
3891 TEST_c_c (casin, -0x1p-52L, 0.0L, -2.220446049250313080847263336181658871074e-16L, 0.0L),
3892 TEST_c_c (casin, 0x1p-52L, -0.0L, 2.220446049250313080847263336181658871074e-16L, -0.0L),
3893 TEST_c_c (casin, -0x1p-52L, -0.0L, -2.220446049250313080847263336181658871074e-16L, -0.0L),
ccc8cadf 3894#ifndef TEST_FLOAT
08198877
JM		 3895 TEST_c_c (casin, 0x1.fp-1025L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3896 TEST_c_c (casin, 0x1.fp-1025L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3897 TEST_c_c (casin, -0x1.fp-1025L, 0x1.fp-1025L, -5.388850751072128349671657362289416093031e-309L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3898 TEST_c_c (casin, -0x1.fp-1025L, -0x1.fp-1025L, -5.388850751072128349671657362289416093031e-309L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
ccc8cadf
JM		 3899#endif
3900#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 3901 TEST_c_c (casin, 0x1p-63L, 0x0.ffffffffffffffffp0L, 7.666467083416870407402049869781566856442e-20L, 8.813735870195430251942769895627079569937e-1L),
3902 TEST_c_c (casin, 0x1p-63L, -0x0.ffffffffffffffffp0L, 7.666467083416870407402049869781566856442e-20L, -8.813735870195430251942769895627079569937e-1L),
3903 TEST_c_c (casin, -0x1p-63L, 0x0.ffffffffffffffffp0L, -7.666467083416870407402049869781566856442e-20L, 8.813735870195430251942769895627079569937e-1L),
3904 TEST_c_c (casin, -0x1p-63L, -0x0.ffffffffffffffffp0L, -7.666467083416870407402049869781566856442e-20L, -8.813735870195430251942769895627079569937e-1L),
3905 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, 0x1p-63L, 1.570796326376055842114524927965556247908L, 2.588578361325995866221775673638805081337e-10L),
3906 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, 0x1p-63L, -1.570796326376055842114524927965556247908L, 2.588578361325995866221775673638805081337e-10L),
3907 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, -0x1p-63L, 1.570796326376055842114524927965556247908L, -2.588578361325995866221775673638805081337e-10L),
3908 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, -0x1p-63L, -1.570796326376055842114524927965556247908L, -2.588578361325995866221775673638805081337e-10L),
ccc8cadf 3909# if LDBL_MIN_EXP <= -16381
08198877
JM		 3910 TEST_c_c (casin, 0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 5.757683115456107044287327268904964422212e-4933L, 8.813735870195430251942769895627079569917e-1L, UNDERFLOW_EXCEPTION),
3911 TEST_c_c (casin, 0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 5.757683115456107044287327268904964422212e-4933L, -8.813735870195430251942769895627079569917e-1L, UNDERFLOW_EXCEPTION),
3912 TEST_c_c (casin, -0x1.fp-16385L, 0x0.ffffffffffffffffp0L, -5.757683115456107044287327268904964422212e-4933L, 8.813735870195430251942769895627079569917e-1L, UNDERFLOW_EXCEPTION),
3913 TEST_c_c (casin, -0x1.fp-16385L, -0x0.ffffffffffffffffp0L, -5.757683115456107044287327268904964422212e-4933L, -8.813735870195430251942769895627079569917e-1L, UNDERFLOW_EXCEPTION),
3914 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 1.570796326465624365239962068302568888898L, 2.472906068161537187835415298076415423459e-4923L),
3915 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, 0x1.fp-16385L, -1.570796326465624365239962068302568888898L, 2.472906068161537187835415298076415423459e-4923L),
3916 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 1.570796326465624365239962068302568888898L, -2.472906068161537187835415298076415423459e-4923L),
3917 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, -0x1.fp-16385L, -1.570796326465624365239962068302568888898L, -2.472906068161537187835415298076415423459e-4923L),
ccc8cadf 3918# endif
08198877
JM		 3919 TEST_c_c (casin, 0.0L, 0x0.ffffffffffffffffp0L, 0.0L, 8.813735870195430251942769895627079569917e-1L),
3920 TEST_c_c (casin, 0.0L, -0x0.ffffffffffffffffp0L, 0.0L, -8.813735870195430251942769895627079569917e-1L),
3921 TEST_c_c (casin, -0.0L, 0x0.ffffffffffffffffp0L, -0.0L, 8.813735870195430251942769895627079569917e-1L),
3922 TEST_c_c (casin, -0.0L, -0x0.ffffffffffffffffp0L, -0.0L, -8.813735870195430251942769895627079569917e-1L),
3923 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, 0.0L, 1.570796326465624365239962068302568888898L, 0.0L),
3924 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, 0.0L, -1.570796326465624365239962068302568888898L, 0.0L),
3925 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, -0.0L, 1.570796326465624365239962068302568888898L, -0.0L),
3926 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, -0.0L, -1.570796326465624365239962068302568888898L, -0.0L),
3927#endif
3928 TEST_c_c (casin, 0x1p-63L, 0.5L, 9.697399036122160144833087173623140436413e-20L, 4.812118250596034474977589134243684231373e-1L),
3929 TEST_c_c (casin, 0x1p-63L, -0.5L, 9.697399036122160144833087173623140436413e-20L, -4.812118250596034474977589134243684231373e-1L),
3930 TEST_c_c (casin, -0x1p-63L, 0.5L, -9.697399036122160144833087173623140436413e-20L, 4.812118250596034474977589134243684231373e-1L),
3931 TEST_c_c (casin, -0x1p-63L, -0.5L, -9.697399036122160144833087173623140436413e-20L, -4.812118250596034474977589134243684231373e-1L),
3932 TEST_c_c (casin, 0.5L, 0x1p-63L, 5.235987755982988730771072305465838140283e-1L, 1.251928832280966098829878787499365228659e-19L),
3933 TEST_c_c (casin, -0.5L, 0x1p-63L, -5.235987755982988730771072305465838140283e-1L, 1.251928832280966098829878787499365228659e-19L),
3934 TEST_c_c (casin, 0.5L, -0x1p-63L, 5.235987755982988730771072305465838140283e-1L, -1.251928832280966098829878787499365228659e-19L),
3935 TEST_c_c (casin, -0.5L, -0x1p-63L, -5.235987755982988730771072305465838140283e-1L, -1.251928832280966098829878787499365228659e-19L),
ccc8cadf 3936#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3937 TEST_c_c (casin, 0x1.fp-16385L, 0.5L, 7.282957076134209141226696333885150260319e-4933L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION),
3938 TEST_c_c (casin, 0x1.fp-16385L, -0.5L, 7.282957076134209141226696333885150260319e-4933L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION),
3939 TEST_c_c (casin, -0x1.fp-16385L, 0.5L, -7.282957076134209141226696333885150260319e-4933L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION),
3940 TEST_c_c (casin, -0x1.fp-16385L, -0.5L, -7.282957076134209141226696333885150260319e-4933L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION),
3941 TEST_c_c (casin, 0.5L, 0x1.fp-16385L, 5.235987755982988730771072305465838140329e-1L, 9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
3942 TEST_c_c (casin, -0.5L, 0x1.fp-16385L, -5.235987755982988730771072305465838140329e-1L, 9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
3943 TEST_c_c (casin, 0.5L, -0x1.fp-16385L, 5.235987755982988730771072305465838140329e-1L, -9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
3944 TEST_c_c (casin, -0.5L, -0x1.fp-16385L, -5.235987755982988730771072305465838140329e-1L, -9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
3945#endif
3946 TEST_c_c (casin, 0x1p-63L, 0x1p-63L, 1.084202172485504434007452800869941711422e-19L, 1.084202172485504434007452800869941711430e-19L),
3947 TEST_c_c (casin, 0x1p-63L, -0x1p-63L, 1.084202172485504434007452800869941711422e-19L, -1.084202172485504434007452800869941711430e-19L),
3948 TEST_c_c (casin, -0x1p-63L, 0x1p-63L, -1.084202172485504434007452800869941711422e-19L, 1.084202172485504434007452800869941711430e-19L),
3949 TEST_c_c (casin, -0x1p-63L, -0x1p-63L, -1.084202172485504434007452800869941711422e-19L, -1.084202172485504434007452800869941711430e-19L),
ccc8cadf 3950#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3951 TEST_c_c (casin, 0x1.fp-16385L, 0x1p-63L, 8.142593549724601460479922838826119584369e-4933L, 1.084202172485504434007452800869941711424e-19L, UNDERFLOW_EXCEPTION),
3952 TEST_c_c (casin, 0x1.fp-16385L, -0x1p-63L, 8.142593549724601460479922838826119584369e-4933L, -1.084202172485504434007452800869941711424e-19L, UNDERFLOW_EXCEPTION),
3953 TEST_c_c (casin, -0x1.fp-16385L, 0x1p-63L, -8.142593549724601460479922838826119584369e-4933L, 1.084202172485504434007452800869941711424e-19L, UNDERFLOW_EXCEPTION),
3954 TEST_c_c (casin, -0x1.fp-16385L, -0x1p-63L, -8.142593549724601460479922838826119584369e-4933L, -1.084202172485504434007452800869941711424e-19L, UNDERFLOW_EXCEPTION),
3955 TEST_c_c (casin, 0x1p-63L, 0x1.fp-16385L, 1.084202172485504434007452800869941711428e-19L, 8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
3956 TEST_c_c (casin, -0x1p-63L, 0x1.fp-16385L, -1.084202172485504434007452800869941711428e-19L, 8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
3957 TEST_c_c (casin, 0x1p-63L, -0x1.fp-16385L, 1.084202172485504434007452800869941711428e-19L, -8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
3958 TEST_c_c (casin, -0x1p-63L, -0x1.fp-16385L, -1.084202172485504434007452800869941711428e-19L, -8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
3959#endif
3960 TEST_c_c (casin, 0.0L, 0x1p-63L, 0.0L, 1.084202172485504434007452800869941711424e-19L),
3961 TEST_c_c (casin, 0.0L, -0x1p-63L, 0.0L, -1.084202172485504434007452800869941711424e-19L),
3962 TEST_c_c (casin, -0.0L, 0x1p-63L, -0.0L, 1.084202172485504434007452800869941711424e-19L),
3963 TEST_c_c (casin, -0.0L, -0x1p-63L, -0.0L, -1.084202172485504434007452800869941711424e-19L),
3964 TEST_c_c (casin, 0x1p-63L, 0.0L, 1.084202172485504434007452800869941711428e-19L, 0.0L),
3965 TEST_c_c (casin, -0x1p-63L, 0.0L, -1.084202172485504434007452800869941711428e-19L, 0.0L),
3966 TEST_c_c (casin, 0x1p-63L, -0.0L, 1.084202172485504434007452800869941711428e-19L, -0.0L),
3967 TEST_c_c (casin, -0x1p-63L, -0.0L, -1.084202172485504434007452800869941711428e-19L, -0.0L),
ccc8cadf 3968#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3969 TEST_c_c (casin, 0x1.fp-16385L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3970 TEST_c_c (casin, 0x1.fp-16385L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3971 TEST_c_c (casin, -0x1.fp-16385L, 0x1.fp-16385L, -8.142593549724601460479922838826119584417e-4933L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3972 TEST_c_c (casin, -0x1.fp-16385L, -0x1.fp-16385L, -8.142593549724601460479922838826119584417e-4933L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
ccc8cadf
JM		 3973#endif
3974#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 3975 TEST_c_c (casin, 0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 1.743152798421049375791483240187377443526e-32L, 8.813735870195430252326093249797835932642e-1L),
3976 TEST_c_c (casin, 0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 1.743152798421049375791483240187377443526e-32L, -8.813735870195430252326093249797835932642e-1L),
3977 TEST_c_c (casin, -0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, -1.743152798421049375791483240187377443526e-32L, 8.813735870195430252326093249797835932642e-1L),
3978 TEST_c_c (casin, -0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, -1.743152798421049375791483240187377443526e-32L, -8.813735870195430252326093249797835932642e-1L),
3979 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 1.570796326794896419512475791677915736035L, 1.234330349600789959989661887846005659983e-16L),
3980 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, -1.570796326794896419512475791677915736035L, 1.234330349600789959989661887846005659983e-16L),
3981 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 1.570796326794896419512475791677915736035L, -1.234330349600789959989661887846005659983e-16L),
3982 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, -1.570796326794896419512475791677915736035L, -1.234330349600789959989661887846005659983e-16L),
3983 TEST_c_c (casin, 0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 3.810492908885321743133304375216641110205e-309L, 8.813735870195430252326093249797835932642e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3984 TEST_c_c (casin, 0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 3.810492908885321743133304375216641110205e-309L, -8.813735870195430252326093249797835932642e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3985 TEST_c_c (casin, -0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, -3.810492908885321743133304375216641110205e-309L, 8.813735870195430252326093249797835932642e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3986 TEST_c_c (casin, -0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, -3.810492908885321743133304375216641110205e-309L, -8.813735870195430252326093249797835932642e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3987 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 1.570796326794896462222075823262245502760L, 3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3988 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, -1.570796326794896462222075823262245502760L, 3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3989 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 1.570796326794896462222075823262245502760L, -3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3990 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, -1.570796326794896462222075823262245502760L, -3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3991 TEST_c_c (casin, 0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 8.813735870195430252326093249797835932642e-1L),
3992 TEST_c_c (casin, 0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, -8.813735870195430252326093249797835932642e-1L),
3993 TEST_c_c (casin, -0.0L, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 8.813735870195430252326093249797835932642e-1L),
3994 TEST_c_c (casin, -0.0L, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, -8.813735870195430252326093249797835932642e-1L),
3995 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 1.570796326794896462222075823262245502760L, 0.0L),
3996 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, -1.570796326794896462222075823262245502760L, 0.0L),
3997 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 1.570796326794896462222075823262245502760L, -0.0L),
3998 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, -1.570796326794896462222075823262245502760L, -0.0L),
3999#endif
4000 TEST_c_c (casin, 0x1p-105L, 0.5L, 2.204933261082751447436996198490110245167e-32L, 4.812118250596034474977589134243684231352e-1L),
4001 TEST_c_c (casin, 0x1p-105L, -0.5L, 2.204933261082751447436996198490110245167e-32L, -4.812118250596034474977589134243684231352e-1L),
4002 TEST_c_c (casin, -0x1p-105L, 0.5L, -2.204933261082751447436996198490110245167e-32L, 4.812118250596034474977589134243684231352e-1L),
4003 TEST_c_c (casin, -0x1p-105L, -0.5L, -2.204933261082751447436996198490110245167e-32L, -4.812118250596034474977589134243684231352e-1L),
4004 TEST_c_c (casin, 0.5L, 0x1p-105L, 5.235987755982988730771072305465838140329e-1L, 2.846556599890768890940941645338546615370e-32L),
4005 TEST_c_c (casin, -0.5L, 0x1p-105L, -5.235987755982988730771072305465838140329e-1L, 2.846556599890768890940941645338546615370e-32L),
4006 TEST_c_c (casin, 0.5L, -0x1p-105L, 5.235987755982988730771072305465838140329e-1L, -2.846556599890768890940941645338546615370e-32L),
4007 TEST_c_c (casin, -0.5L, -0x1p-105L, -5.235987755982988730771072305465838140329e-1L, -2.846556599890768890940941645338546615370e-32L),
4008 TEST_c_c (casin, 0x1p-105L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 2.465190328815661891911651766508706967729e-32L),
4009 TEST_c_c (casin, 0x1p-105L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -2.465190328815661891911651766508706967729e-32L),
4010 TEST_c_c (casin, -0x1p-105L, 0x1p-105L, -2.465190328815661891911651766508706967729e-32L, 2.465190328815661891911651766508706967729e-32L),
4011 TEST_c_c (casin, -0x1p-105L, -0x1p-105L, -2.465190328815661891911651766508706967729e-32L, -2.465190328815661891911651766508706967729e-32L),
ccc8cadf 4012#ifndef TEST_FLOAT
08198877
JM		 4013 /* Bug 15319: underflow exception may be missing. */
4014 TEST_c_c (casin, 0x1.fp-1025L, 0x1p-105L, 5.388850751072128349671657362289416093031e-309L, 2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4015 TEST_c_c (casin, 0x1.fp-1025L, -0x1p-105L, 5.388850751072128349671657362289416093031e-309L, -2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4016 TEST_c_c (casin, -0x1.fp-1025L, 0x1p-105L, -5.388850751072128349671657362289416093031e-309L, 2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4017 TEST_c_c (casin, -0x1.fp-1025L, -0x1p-105L, -5.388850751072128349671657362289416093031e-309L, -2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4018 TEST_c_c (casin, 0x1p-105L, 0x1.fp-1025L, 2.465190328815661891911651766508706967729e-32L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4019 TEST_c_c (casin, -0x1p-105L, 0x1.fp-1025L, -2.465190328815661891911651766508706967729e-32L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4020 TEST_c_c (casin, 0x1p-105L, -0x1.fp-1025L, 2.465190328815661891911651766508706967729e-32L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4021 TEST_c_c (casin, -0x1p-105L, -0x1.fp-1025L, -2.465190328815661891911651766508706967729e-32L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4022#endif
4023 TEST_c_c (casin, 0.0L, 0x1p-105L, 0.0L, 2.465190328815661891911651766508706967729e-32L),
4024 TEST_c_c (casin, 0.0L, -0x1p-105L, 0.0L, -2.465190328815661891911651766508706967729e-32L),
4025 TEST_c_c (casin, -0.0L, 0x1p-105L, -0.0L, 2.465190328815661891911651766508706967729e-32L),
4026 TEST_c_c (casin, -0.0L, -0x1p-105L, -0.0L, -2.465190328815661891911651766508706967729e-32L),
4027 TEST_c_c (casin, 0x1p-105L, 0.0L, 2.465190328815661891911651766508706967729e-32L, 0.0L),
4028 TEST_c_c (casin, -0x1p-105L, 0.0L, -2.465190328815661891911651766508706967729e-32L, 0.0L),
4029 TEST_c_c (casin, 0x1p-105L, -0.0L, 2.465190328815661891911651766508706967729e-32L, -0.0L),
4030 TEST_c_c (casin, -0x1p-105L, -0.0L, -2.465190328815661891911651766508706967729e-32L, -0.0L),
ccc8cadf 4031#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 4032 TEST_c_c (casin, 0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.361838123766444824837096281396380300349e-34L, 8.813735870195430252326093249797922409363e-1L),
4033 TEST_c_c (casin, 0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.361838123766444824837096281396380300349e-34L, -8.813735870195430252326093249797922409363e-1L),
4034 TEST_c_c (casin, -0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, -1.361838123766444824837096281396380300349e-34L, 8.813735870195430252326093249797922409363e-1L),
4035 TEST_c_c (casin, -0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, -1.361838123766444824837096281396380300349e-34L, -8.813735870195430252326093249797922409363e-1L),
4036 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 1.570796326794896601578502908312986698624L, 1.091004200533850618345330909857103457781e-17L),
4037 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, -1.570796326794896601578502908312986698624L, 1.091004200533850618345330909857103457781e-17L),
4038 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 1.570796326794896601578502908312986698624L, -1.091004200533850618345330909857103457781e-17L),
4039 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, -1.570796326794896601578502908312986698624L, -1.091004200533850618345330909857103457781e-17L),
4040 TEST_c_c (casin, 0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 5.757683115456107044131264955348449231681e-4933L, 8.813735870195430252326093249797922409363e-1L, UNDERFLOW_EXCEPTION),
4041 TEST_c_c (casin, 0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 5.757683115456107044131264955348449231681e-4933L, -8.813735870195430252326093249797922409363e-1L, UNDERFLOW_EXCEPTION),
4042 TEST_c_c (casin, -0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, -5.757683115456107044131264955348449231681e-4933L, 8.813735870195430252326093249797922409363e-1L, UNDERFLOW_EXCEPTION),
4043 TEST_c_c (casin, -0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, -5.757683115456107044131264955348449231681e-4933L, -8.813735870195430252326093249797922409363e-1L, UNDERFLOW_EXCEPTION),
4044 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 1.570796326794896605353533883825294686803L, 5.867357004219059108790368268900490184505e-4916L),
4045 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, -1.570796326794896605353533883825294686803L, 5.867357004219059108790368268900490184505e-4916L),
4046 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 1.570796326794896605353533883825294686803L, -5.867357004219059108790368268900490184505e-4916L),
4047 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, -1.570796326794896605353533883825294686803L, -5.867357004219059108790368268900490184505e-4916L),
4048 TEST_c_c (casin, 0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 8.813735870195430252326093249797922409363e-1L),
4049 TEST_c_c (casin, 0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, -8.813735870195430252326093249797922409363e-1L),
4050 TEST_c_c (casin, -0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 8.813735870195430252326093249797922409363e-1L),
4051 TEST_c_c (casin, -0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, -8.813735870195430252326093249797922409363e-1L),
4052 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 1.570796326794896605353533883825294686803L, 0.0L),
4053 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, -1.570796326794896605353533883825294686803L, 0.0L),
4054 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 1.570796326794896605353533883825294686803L, -0.0L),
4055 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, -1.570796326794896605353533883825294686803L, -0.0L),
4056#endif
4057 TEST_c_c (casin, 0x1p-112L, 0.5L, 1.722604110220899568310153280070398629037e-34L, 4.812118250596034474977589134243684231352e-1L),
4058 TEST_c_c (casin, 0x1p-112L, -0.5L, 1.722604110220899568310153280070398629037e-34L, -4.812118250596034474977589134243684231352e-1L),
4059 TEST_c_c (casin, -0x1p-112L, 0.5L, -1.722604110220899568310153280070398629037e-34L, 4.812118250596034474977589134243684231352e-1L),
4060 TEST_c_c (casin, -0x1p-112L, -0.5L, -1.722604110220899568310153280070398629037e-34L, -4.812118250596034474977589134243684231352e-1L),
4061 TEST_c_c (casin, 0.5L, 0x1p-112L, 5.235987755982988730771072305465838140329e-1L, 2.223872343664663196047610660420739543258e-34L),
4062 TEST_c_c (casin, -0.5L, 0x1p-112L, -5.235987755982988730771072305465838140329e-1L, 2.223872343664663196047610660420739543258e-34L),
4063 TEST_c_c (casin, 0.5L, -0x1p-112L, 5.235987755982988730771072305465838140329e-1L, -2.223872343664663196047610660420739543258e-34L),
4064 TEST_c_c (casin, -0.5L, -0x1p-112L, -5.235987755982988730771072305465838140329e-1L, -2.223872343664663196047610660420739543258e-34L),
4065 TEST_c_c (casin, 0x1p-112L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.925929944387235853055977942584927318538e-34L),
4066 TEST_c_c (casin, 0x1p-112L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.925929944387235853055977942584927318538e-34L),
4067 TEST_c_c (casin, -0x1p-112L, 0x1p-112L, -1.925929944387235853055977942584927318538e-34L, 1.925929944387235853055977942584927318538e-34L),
4068 TEST_c_c (casin, -0x1p-112L, -0x1p-112L, -1.925929944387235853055977942584927318538e-34L, -1.925929944387235853055977942584927318538e-34L),
ccc8cadf 4069#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 4070 TEST_c_c (casin, 0x1.fp-16385L, 0x1p-112L, 8.142593549724601460479922838826119584417e-4933L, 1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4071 TEST_c_c (casin, 0x1.fp-16385L, -0x1p-112L, 8.142593549724601460479922838826119584417e-4933L, -1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4072 TEST_c_c (casin, -0x1.fp-16385L, 0x1p-112L, -8.142593549724601460479922838826119584417e-4933L, 1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4073 TEST_c_c (casin, -0x1.fp-16385L, -0x1p-112L, -8.142593549724601460479922838826119584417e-4933L, -1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4074 TEST_c_c (casin, 0x1p-112L, 0x1.fp-16385L, 1.925929944387235853055977942584927318538e-34L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4075 TEST_c_c (casin, -0x1p-112L, 0x1.fp-16385L, -1.925929944387235853055977942584927318538e-34L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4076 TEST_c_c (casin, 0x1p-112L, -0x1.fp-16385L, 1.925929944387235853055977942584927318538e-34L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4077 TEST_c_c (casin, -0x1p-112L, -0x1.fp-16385L, -1.925929944387235853055977942584927318538e-34L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4078#endif
4079 TEST_c_c (casin, 0.0L, 0x1p-112L, 0.0L, 1.925929944387235853055977942584927318538e-34L),
4080 TEST_c_c (casin, 0.0L, -0x1p-112L, 0.0L, -1.925929944387235853055977942584927318538e-34L),
4081 TEST_c_c (casin, -0.0L, 0x1p-112L, -0.0L, 1.925929944387235853055977942584927318538e-34L),
4082 TEST_c_c (casin, -0.0L, -0x1p-112L, -0.0L, -1.925929944387235853055977942584927318538e-34L),
4083 TEST_c_c (casin, 0x1p-112L, 0.0L, 1.925929944387235853055977942584927318538e-34L, 0.0L),
4084 TEST_c_c (casin, -0x1p-112L, 0.0L, -1.925929944387235853055977942584927318538e-34L, 0.0L),
4085 TEST_c_c (casin, 0x1p-112L, -0.0L, 1.925929944387235853055977942584927318538e-34L, -0.0L),
4086 TEST_c_c (casin, -0x1p-112L, -0.0L, -1.925929944387235853055977942584927318538e-34L, -0.0L),
4087
4088 TEST_c_c (casin, 0.75L, 1.25L, 0.453276177638793913448921196101971749L, 1.13239363160530819522266333696834467L),
4089 TEST_c_c (casin, -2, -3, -0.57065278432109940071028387968566963L, -1.9833870299165354323470769028940395L),
4090 END_DATA (casin)
4091 };
8847214f
UD		 4092
4093static void
08198877 4094casin_test (void)
8847214f 4095{
aaca11d8 4096 errno = 0;
08198877 4097 FUNC(casin) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD		 4098 if (errno == ENOSYS)
4099 /* Function not implemented. */
4100 return;
4101
08198877
JM		 4102 START (casin);
4103 RUN_TEST_LOOP_c_c (casin, casin_test_data, );
4104 END (casin, complex);
4105}
8847214f 4106
08198877
JM		 4107
4108static const struct test_c_c_data casinh_test_data[] =
4109 {
4110 START_DATA (casinh),
4111 TEST_c_c (casinh, 0, 0, 0.0, 0.0),
4112 TEST_c_c (casinh, minus_zero, 0, minus_zero, 0),
4113 TEST_c_c (casinh, 0, minus_zero, 0.0, minus_zero),
4114 TEST_c_c (casinh, minus_zero, minus_zero, minus_zero, minus_zero),
4115
4116 TEST_c_c (casinh, plus_infty, plus_infty, plus_infty, M_PI_4l),
4117 TEST_c_c (casinh, plus_infty, minus_infty, plus_infty, -M_PI_4l),
4118 TEST_c_c (casinh, minus_infty, plus_infty, minus_infty, M_PI_4l),
4119 TEST_c_c (casinh, minus_infty, minus_infty, minus_infty, -M_PI_4l),
4120
4121 TEST_c_c (casinh, -10.0, plus_infty, minus_infty, M_PI_2l),
4122 TEST_c_c (casinh, -10.0, minus_infty, minus_infty, -M_PI_2l),
4123 TEST_c_c (casinh, 0, plus_infty, plus_infty, M_PI_2l),
4124 TEST_c_c (casinh, 0, minus_infty, plus_infty, -M_PI_2l),
4125 TEST_c_c (casinh, minus_zero, plus_infty, minus_infty, M_PI_2l),
4126 TEST_c_c (casinh, minus_zero, minus_infty, minus_infty, -M_PI_2l),
4127 TEST_c_c (casinh, 0.1L, plus_infty, plus_infty, M_PI_2l),
4128 TEST_c_c (casinh, 0.1L, minus_infty, plus_infty, -M_PI_2l),
4129
4130 TEST_c_c (casinh, minus_infty, 0, minus_infty, 0.0),
4131 TEST_c_c (casinh, minus_infty, minus_zero, minus_infty, minus_zero),
4132 TEST_c_c (casinh, minus_infty, 100, minus_infty, 0.0),
4133 TEST_c_c (casinh, minus_infty, -100, minus_infty, minus_zero),
4134
4135 TEST_c_c (casinh, plus_infty, 0, plus_infty, 0.0),
4136 TEST_c_c (casinh, plus_infty, minus_zero, plus_infty, minus_zero),
4137 TEST_c_c (casinh, plus_infty, 0.5, plus_infty, 0.0),
4138 TEST_c_c (casinh, plus_infty, -0.5, plus_infty, minus_zero),
4139
4140 TEST_c_c (casinh, plus_infty, qnan_value, plus_infty, qnan_value),
4141 TEST_c_c (casinh, minus_infty, qnan_value, minus_infty, qnan_value),
4142
4143 TEST_c_c (casinh, qnan_value, 0, qnan_value, 0.0),
4144 TEST_c_c (casinh, qnan_value, minus_zero, qnan_value, minus_zero),
4145
4146 TEST_c_c (casinh, qnan_value, plus_infty, plus_infty, qnan_value, IGNORE_ZERO_INF_SIGN),
4147 TEST_c_c (casinh, qnan_value, minus_infty, plus_infty, qnan_value, IGNORE_ZERO_INF_SIGN),
4148
4149 TEST_c_c (casinh, 10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4150 TEST_c_c (casinh, -10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4151
4152 TEST_c_c (casinh, qnan_value, 0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4153 TEST_c_c (casinh, -0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4154
4155 TEST_c_c (casinh, qnan_value, qnan_value, qnan_value, qnan_value),
4156
4157 TEST_c_c (casinh, plus_zero, -1.5L, 0.9624236501192068949955178268487368462704L, -M_PI_2l),
4158 TEST_c_c (casinh, minus_zero, -1.5L, -0.9624236501192068949955178268487368462704L, -M_PI_2l),
4159 TEST_c_c (casinh, plus_zero, -1.0L, plus_zero, -M_PI_2l),
4160 TEST_c_c (casinh, minus_zero, -1.0L, minus_zero, -M_PI_2l),
4161 TEST_c_c (casinh, plus_zero, -0.5L, plus_zero, -0.5235987755982988730771072305465838140329L),
4162 TEST_c_c (casinh, minus_zero, -0.5L, minus_zero, -0.5235987755982988730771072305465838140329L),
4163 TEST_c_c (casinh, plus_zero, 0.5L, plus_zero, 0.5235987755982988730771072305465838140329L),
4164 TEST_c_c (casinh, minus_zero, 0.5L, minus_zero, 0.5235987755982988730771072305465838140329L),
4165 TEST_c_c (casinh, plus_zero, 1.0L, plus_zero, M_PI_2l),
4166 TEST_c_c (casinh, minus_zero, 1.0L, minus_zero, M_PI_2l),
4167 TEST_c_c (casinh, plus_zero, 1.5L, 0.9624236501192068949955178268487368462704L, M_PI_2l),
4168 TEST_c_c (casinh, minus_zero, 1.5L, -0.9624236501192068949955178268487368462704L, M_PI_2l),
4169
4170 TEST_c_c (casinh, -1.5L, plus_zero, -1.194763217287109304111930828519090523536L, plus_zero),
4171 TEST_c_c (casinh, -1.5L, minus_zero, -1.194763217287109304111930828519090523536L, minus_zero),
4172 TEST_c_c (casinh, -1.0L, plus_zero, -0.8813735870195430252326093249797923090282L, plus_zero),
4173 TEST_c_c (casinh, -1.0L, minus_zero, -0.8813735870195430252326093249797923090282L, minus_zero),
4174 TEST_c_c (casinh, -0.5L, plus_zero, -0.4812118250596034474977589134243684231352L, plus_zero),
4175 TEST_c_c (casinh, -0.5L, minus_zero, -0.4812118250596034474977589134243684231352L, minus_zero),
4176 TEST_c_c (casinh, 0.5L, plus_zero, 0.4812118250596034474977589134243684231352L, plus_zero),
4177 TEST_c_c (casinh, 0.5L, minus_zero, 0.4812118250596034474977589134243684231352L, minus_zero),
4178 TEST_c_c (casinh, 1.0L, plus_zero, 0.8813735870195430252326093249797923090282L, plus_zero),
4179 TEST_c_c (casinh, 1.0L, minus_zero, 0.8813735870195430252326093249797923090282L, minus_zero),
4180 TEST_c_c (casinh, 1.5L, plus_zero, 1.194763217287109304111930828519090523536L, plus_zero),
4181 TEST_c_c (casinh, 1.5L, minus_zero, 1.194763217287109304111930828519090523536L, minus_zero),
4182
4183 TEST_c_c (casinh, 0x1p50L, 1.0L, 3.535050620855721078027883819436759661753e1L, 8.881784197001252323389053344720723756399e-16L),
4184 TEST_c_c (casinh, 0x1p50L, -1.0L, 3.535050620855721078027883819436759661753e1L, -8.881784197001252323389053344720723756399e-16L),
4185 TEST_c_c (casinh, -0x1p50L, 1.0L, -3.535050620855721078027883819436759661753e1L, 8.881784197001252323389053344720723756399e-16L),
4186 TEST_c_c (casinh, -0x1p50L, -1.0L, -3.535050620855721078027883819436759661753e1L, -8.881784197001252323389053344720723756399e-16L),
4187 TEST_c_c (casinh, 1.0L, 0x1p50L, 3.535050620855721078027883819436720218708e1L, 1.570796326794895731052901991514519103193L),
4188 TEST_c_c (casinh, -1.0L, 0x1p50L, -3.535050620855721078027883819436720218708e1L, 1.570796326794895731052901991514519103193L),
4189 TEST_c_c (casinh, 1.0L, -0x1p50L, 3.535050620855721078027883819436720218708e1L, -1.570796326794895731052901991514519103193L),
4190 TEST_c_c (casinh, -1.0L, -0x1p50L, -3.535050620855721078027883819436720218708e1L, -1.570796326794895731052901991514519103193L),
cdc1c96f 4191#ifndef TEST_FLOAT
08198877
JM		 4192 TEST_c_c (casinh, 0x1p500L, 1.0L, 3.472667374605326000180332928505464606058e2L, 3.054936363499604682051979393213617699789e-151L),
4193 TEST_c_c (casinh, 0x1p500L, -1.0L, 3.472667374605326000180332928505464606058e2L, -3.054936363499604682051979393213617699789e-151L),
4194 TEST_c_c (casinh, -0x1p500L, 1.0L, -3.472667374605326000180332928505464606058e2L, 3.054936363499604682051979393213617699789e-151L),
4195 TEST_c_c (casinh, -0x1p500L, -1.0L, -3.472667374605326000180332928505464606058e2L, -3.054936363499604682051979393213617699789e-151L),
4196 TEST_c_c (casinh, 1.0L, 0x1p500L, 3.472667374605326000180332928505464606058e2L, 1.570796326794896619231321691639751442099L),
4197 TEST_c_c (casinh, -1.0L, 0x1p500L, -3.472667374605326000180332928505464606058e2L, 1.570796326794896619231321691639751442099L),
4198 TEST_c_c (casinh, 1.0L, -0x1p500L, 3.472667374605326000180332928505464606058e2L, -1.570796326794896619231321691639751442099L),
4199 TEST_c_c (casinh, -1.0L, -0x1p500L, -3.472667374605326000180332928505464606058e2L, -1.570796326794896619231321691639751442099L),
cdc1c96f
JM		 4200#endif
4201#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 4202 TEST_c_c (casinh, 0x1p5000L, 1.0L, 3.466429049980286492395577839412341016946e3L, 7.079811261048172892385615158694057552948e-1506L),
4203 TEST_c_c (casinh, 0x1p5000L, -1.0L, 3.466429049980286492395577839412341016946e3L, -7.079811261048172892385615158694057552948e-1506L),
4204 TEST_c_c (casinh, -0x1p5000L, 1.0L, -3.466429049980286492395577839412341016946e3L, 7.079811261048172892385615158694057552948e-1506L),
4205 TEST_c_c (casinh, -0x1p5000L, -1.0L, -3.466429049980286492395577839412341016946e3L, -7.079811261048172892385615158694057552948e-1506L),
4206 TEST_c_c (casinh, 1.0L, 0x1p5000L, 3.466429049980286492395577839412341016946e3L, 1.570796326794896619231321691639751442099L),
4207 TEST_c_c (casinh, -1.0L, 0x1p5000L, -3.466429049980286492395577839412341016946e3L, 1.570796326794896619231321691639751442099L),
4208 TEST_c_c (casinh, 1.0L, -0x1p5000L, 3.466429049980286492395577839412341016946e3L, -1.570796326794896619231321691639751442099L),
4209 TEST_c_c (casinh, -1.0L, -0x1p5000L, -3.466429049980286492395577839412341016946e3L, -1.570796326794896619231321691639751442099L),
cdc1c96f
JM		 4210#endif
4211
08198877 4212 TEST_c_c (casinh, 0x1.fp127L, 0x1.fp127L, 8.973081118419833726837456344608533993585e1L, 7.853981633974483096156608458198757210493e-1L),
a9708fed 4213#ifndef TEST_FLOAT
08198877 4214 TEST_c_c (casinh, 0x1.fp1023L, 0x1.fp1023L, 7.107906849659093345062145442726115449315e2L, 7.853981633974483096156608458198757210493e-1L),
a9708fed
JM		 4215#endif
4216#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 4217 TEST_c_c (casinh, 0x1.fp16383L, 0x1.fp16383L, 1.135753137836666928715489992987020363057e4L, 7.853981633974483096156608458198757210493e-1L),
a9708fed
JM		 4218#endif
4219
08198877
JM		 4220 TEST_c_c (casinh, 0x1.fp-129L, 1.5L, 9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442096L),
4221 TEST_c_c (casinh, 0x1.fp-129L, -1.5L, 9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442096L),
4222 TEST_c_c (casinh, -0x1.fp-129L, 1.5L, -9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442096L),
4223 TEST_c_c (casinh, -0x1.fp-129L, -1.5L, -9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442096L),
4224 TEST_c_c (casinh, 1.5L, 0x1.fp-129L, 1.194763217287109304111930828519090523536L, 1.579176199917649005841160751101628985741e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4225 TEST_c_c (casinh, -1.5L, 0x1.fp-129L, -1.194763217287109304111930828519090523536L, 1.579176199917649005841160751101628985741e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4226 TEST_c_c (casinh, 1.5L, -0x1.fp-129L, 1.194763217287109304111930828519090523536L, -1.579176199917649005841160751101628985741e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4227 TEST_c_c (casinh, -1.5L, -0x1.fp-129L, -1.194763217287109304111930828519090523536L, -1.579176199917649005841160751101628985741e-39L, UNDERFLOW_EXCEPTION_FLOAT),
8cf28c5e 4228#ifndef TEST_FLOAT
08198877
JM		 4229 TEST_c_c (casinh, 0x1.fp-1025L, 1.5L, 9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442099L),
4230 TEST_c_c (casinh, 0x1.fp-1025L, -1.5L, 9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442099L),
4231 TEST_c_c (casinh, -0x1.fp-1025L, 1.5L, -9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442099L),
4232 TEST_c_c (casinh, -0x1.fp-1025L, -1.5L, -9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442099L),
4233 TEST_c_c (casinh, 1.5L, 0x1.fp-1025L, 1.194763217287109304111930828519090523536L, 2.989196569048182929051881765490354365918e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4234 TEST_c_c (casinh, -1.5L, 0x1.fp-1025L, -1.194763217287109304111930828519090523536L, 2.989196569048182929051881765490354365918e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4235 TEST_c_c (casinh, 1.5L, -0x1.fp-1025L, 1.194763217287109304111930828519090523536L, -2.989196569048182929051881765490354365918e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4236 TEST_c_c (casinh, -1.5L, -0x1.fp-1025L, -1.194763217287109304111930828519090523536L, -2.989196569048182929051881765490354365918e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
8cf28c5e
JM		 4237#endif
4238#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 4239 TEST_c_c (casinh, 0x1.fp-16385L, 1.5L, 9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442099L),
4240 TEST_c_c (casinh, 0x1.fp-16385L, -1.5L, 9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442099L),
4241 TEST_c_c (casinh, -0x1.fp-16385L, 1.5L, -9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442099L),
4242 TEST_c_c (casinh, -0x1.fp-16385L, -1.5L, -9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442099L),
4243 TEST_c_c (casinh, 1.5L, 0x1.fp-16385L, 1.194763217287109304111930828519090523536L, 4.516698239814521372306784062043266700598e-4933L, UNDERFLOW_EXCEPTION),
4244 TEST_c_c (casinh, -1.5L, 0x1.fp-16385L, -1.194763217287109304111930828519090523536L, 4.516698239814521372306784062043266700598e-4933L, UNDERFLOW_EXCEPTION),
4245 TEST_c_c (casinh, 1.5L, -0x1.fp-16385L, 1.194763217287109304111930828519090523536L, -4.516698239814521372306784062043266700598e-4933L, UNDERFLOW_EXCEPTION),
4246 TEST_c_c (casinh, -1.5L, -0x1.fp-16385L, -1.194763217287109304111930828519090523536L, -4.516698239814521372306784062043266700598e-4933L, UNDERFLOW_EXCEPTION),
4247#endif
4248
4249 TEST_c_c (casinh, 0.5L, 1.0L, 7.328576759736452608886724437653071523305e-1L, 8.959074812088902390666567243275770102229e-1L),
4250 TEST_c_c (casinh, 0.5L, -1.0L, 7.328576759736452608886724437653071523305e-1L, -8.959074812088902390666567243275770102229e-1L),
4251 TEST_c_c (casinh, -0.5L, 1.0L, -7.328576759736452608886724437653071523305e-1L, 8.959074812088902390666567243275770102229e-1L),
4252 TEST_c_c (casinh, -0.5L, -1.0L, -7.328576759736452608886724437653071523305e-1L, -8.959074812088902390666567243275770102229e-1L),
4253 TEST_c_c (casinh, 1.0L, 0.5L, 9.261330313501824245501244453057873152694e-1L, 3.494390628572132936274118260753699527325e-1L),
4254 TEST_c_c (casinh, -1.0L, 0.5L, -9.261330313501824245501244453057873152694e-1L, 3.494390628572132936274118260753699527325e-1L),
4255 TEST_c_c (casinh, 1.0L, -0.5L, 9.261330313501824245501244453057873152694e-1L, -3.494390628572132936274118260753699527325e-1L),
4256 TEST_c_c (casinh, -1.0L, -0.5L, -9.261330313501824245501244453057873152694e-1L, -3.494390628572132936274118260753699527325e-1L),
4257 TEST_c_c (casinh, 0.25L, 1.0L, 5.097911466811016354623559941115413499164e-1L, 1.081751996523816326311037318425097434186L),
4258 TEST_c_c (casinh, 0.25L, -1.0L, 5.097911466811016354623559941115413499164e-1L, -1.081751996523816326311037318425097434186L),
4259 TEST_c_c (casinh, -0.25L, 1.0L, -5.097911466811016354623559941115413499164e-1L, 1.081751996523816326311037318425097434186L),
4260 TEST_c_c (casinh, -0.25L, -1.0L, -5.097911466811016354623559941115413499164e-1L, -1.081751996523816326311037318425097434186L),
4261 TEST_c_c (casinh, 1.0L, 0.25L, 8.924633639033482359562124741744951972772e-1L, 1.763024327769669304186785666360901026468e-1L),
4262 TEST_c_c (casinh, -1.0L, 0.25L, -8.924633639033482359562124741744951972772e-1L, 1.763024327769669304186785666360901026468e-1L),
4263 TEST_c_c (casinh, 1.0L, -0.25L, 8.924633639033482359562124741744951972772e-1L, -1.763024327769669304186785666360901026468e-1L),
4264 TEST_c_c (casinh, -1.0L, -0.25L, -8.924633639033482359562124741744951972772e-1L, -1.763024327769669304186785666360901026468e-1L),
4265 TEST_c_c (casinh, 0x1.fp-10L, 1.0L, 4.350501469856803800217957402220976497152e-2L, 1.527305029163877791518741192097931722508L),
4266 TEST_c_c (casinh, 0x1.fp-10L, -1.0L, 4.350501469856803800217957402220976497152e-2L, -1.527305029163877791518741192097931722508L),
4267 TEST_c_c (casinh, -0x1.fp-10L, 1.0L, -4.350501469856803800217957402220976497152e-2L, 1.527305029163877791518741192097931722508L),
4268 TEST_c_c (casinh, -0x1.fp-10L, -1.0L, -4.350501469856803800217957402220976497152e-2L, -1.527305029163877791518741192097931722508L),
4269 TEST_c_c (casinh, 1.0L, 0x1.fp-10L, 8.813742198809567991336704287826445879025e-1L, 1.337909359557740912558349531052239112857e-3L),
4270 TEST_c_c (casinh, -1.0L, 0x1.fp-10L, -8.813742198809567991336704287826445879025e-1L, 1.337909359557740912558349531052239112857e-3L),
4271 TEST_c_c (casinh, 1.0L, -0x1.fp-10L, 8.813742198809567991336704287826445879025e-1L, -1.337909359557740912558349531052239112857e-3L),
4272 TEST_c_c (casinh, -1.0L, -0x1.fp-10L, -8.813742198809567991336704287826445879025e-1L, -1.337909359557740912558349531052239112857e-3L),
4273 TEST_c_c (casinh, 0x1.fp-30L, 1.0L, 4.247867098745151888768727039216644758847e-5L, 1.570753848123921942730162693731872690232L),
4274 TEST_c_c (casinh, 0x1.fp-30L, -1.0L, 4.247867098745151888768727039216644758847e-5L, -1.570753848123921942730162693731872690232L),
4275 TEST_c_c (casinh, -0x1.fp-30L, 1.0L, -4.247867098745151888768727039216644758847e-5L, 1.570753848123921942730162693731872690232L),
4276 TEST_c_c (casinh, -0x1.fp-30L, -1.0L, -4.247867098745151888768727039216644758847e-5L, -1.570753848123921942730162693731872690232L),
4277 TEST_c_c (casinh, 1.0L, 0x1.fp-30L, 8.813735870195430258081932989769495326854e-1L, 1.275929984216518540252717485007112529021e-9L),
4278 TEST_c_c (casinh, -1.0L, 0x1.fp-30L, -8.813735870195430258081932989769495326854e-1L, 1.275929984216518540252717485007112529021e-9L),
4279 TEST_c_c (casinh, 1.0L, -0x1.fp-30L, 8.813735870195430258081932989769495326854e-1L, -1.275929984216518540252717485007112529021e-9L),
4280 TEST_c_c (casinh, -1.0L, -0x1.fp-30L, -8.813735870195430258081932989769495326854e-1L, -1.275929984216518540252717485007112529021e-9L),
4281 TEST_c_c (casinh, 0x1.fp-100L, 1.0L, 1.236292038260260888664514866457202186027e-15L, 1.570796326794895382939283431378862777584L),
4282 TEST_c_c (casinh, 0x1.fp-100L, -1.0L, 1.236292038260260888664514866457202186027e-15L, -1.570796326794895382939283431378862777584L),
4283 TEST_c_c (casinh, -0x1.fp-100L, 1.0L, -1.236292038260260888664514866457202186027e-15L, 1.570796326794895382939283431378862777584L),
4284 TEST_c_c (casinh, -0x1.fp-100L, -1.0L, -1.236292038260260888664514866457202186027e-15L, -1.570796326794895382939283431378862777584L),
4285 TEST_c_c (casinh, 1.0L, 0x1.fp-100L, 8.813735870195430252326093249797923090282e-1L, 1.080754735021050612990719608916167354321e-30L),
4286 TEST_c_c (casinh, -1.0L, 0x1.fp-100L, -8.813735870195430252326093249797923090282e-1L, 1.080754735021050612990719608916167354321e-30L),
4287 TEST_c_c (casinh, 1.0L, -0x1.fp-100L, 8.813735870195430252326093249797923090282e-1L, -1.080754735021050612990719608916167354321e-30L),
4288 TEST_c_c (casinh, -1.0L, -0x1.fp-100L, -8.813735870195430252326093249797923090282e-1L, -1.080754735021050612990719608916167354321e-30L),
4289 TEST_c_c (casinh, 0x1.fp-129L, 1.0L, 5.335635276982233498398987585285818977933e-20L, 1.570796326794896619177965338869929107115L),
4290 TEST_c_c (casinh, 0x1.fp-129L, -1.0L, 5.335635276982233498398987585285818977933e-20L, -1.570796326794896619177965338869929107115L),
4291 TEST_c_c (casinh, -0x1.fp-129L, 1.0L, -5.335635276982233498398987585285818977933e-20L, 1.570796326794896619177965338869929107115L),
4292 TEST_c_c (casinh, -0x1.fp-129L, -1.0L, -5.335635276982233498398987585285818977933e-20L, -1.570796326794896619177965338869929107115L),
4293 TEST_c_c (casinh, 1.0L, 0x1.fp-129L, 8.813735870195430252326093249797923090282e-1L, 2.013062564695348242280482517399205554874e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4294 TEST_c_c (casinh, -1.0L, 0x1.fp-129L, -8.813735870195430252326093249797923090282e-1L, 2.013062564695348242280482517399205554874e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4295 TEST_c_c (casinh, 1.0L, -0x1.fp-129L, 8.813735870195430252326093249797923090282e-1L, -2.013062564695348242280482517399205554874e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4296 TEST_c_c (casinh, -1.0L, -0x1.fp-129L, -8.813735870195430252326093249797923090282e-1L, -2.013062564695348242280482517399205554874e-39L, UNDERFLOW_EXCEPTION_FLOAT),
0a1b2ae6 4297#ifndef TEST_FLOAT
08198877
JM		 4298 TEST_c_c (casinh, 0x1.fp-1000L, 1.0L, 4.252291453851660175550490409247739011867e-151L, 1.570796326794896619231321691639751442099L),
4299 TEST_c_c (casinh, 0x1.fp-1000L, -1.0L, 4.252291453851660175550490409247739011867e-151L, -1.570796326794896619231321691639751442099L),
4300 TEST_c_c (casinh, -0x1.fp-1000L, 1.0L, -4.252291453851660175550490409247739011867e-151L, 1.570796326794896619231321691639751442099L),
4301 TEST_c_c (casinh, -0x1.fp-1000L, -1.0L, -4.252291453851660175550490409247739011867e-151L, -1.570796326794896619231321691639751442099L),
4302 TEST_c_c (casinh, 1.0L, 0x1.fp-1000L, 8.813735870195430252326093249797923090282e-1L, 1.278589251976747242280879285935084814093e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4303 TEST_c_c (casinh, -1.0L, 0x1.fp-1000L, -8.813735870195430252326093249797923090282e-1L, 1.278589251976747242280879285935084814093e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4304 TEST_c_c (casinh, 1.0L, -0x1.fp-1000L, 8.813735870195430252326093249797923090282e-1L, -1.278589251976747242280879285935084814093e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4305 TEST_c_c (casinh, -1.0L, -0x1.fp-1000L, -8.813735870195430252326093249797923090282e-1L, -1.278589251976747242280879285935084814093e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4306 TEST_c_c (casinh, 0x1.fp-1025L, 1.0L, 7.340879205566679497036857179189356754017e-155L, 1.570796326794896619231321691639751442099L),
4307 TEST_c_c (casinh, 0x1.fp-1025L, -1.0L, 7.340879205566679497036857179189356754017e-155L, -1.570796326794896619231321691639751442099L),
4308 TEST_c_c (casinh, -0x1.fp-1025L, 1.0L, -7.340879205566679497036857179189356754017e-155L, 1.570796326794896619231321691639751442099L),
4309 TEST_c_c (casinh, -0x1.fp-1025L, -1.0L, -7.340879205566679497036857179189356754017e-155L, -1.570796326794896619231321691639751442099L),
4310 TEST_c_c (casinh, 1.0L, 0x1.fp-1025L, 8.813735870195430252326093249797923090282e-1L, 3.810492908885321743133304375216617626230e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4311 TEST_c_c (casinh, -1.0L, 0x1.fp-1025L, -8.813735870195430252326093249797923090282e-1L, 3.810492908885321743133304375216617626230e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4312 TEST_c_c (casinh, 1.0L, -0x1.fp-1025L, 8.813735870195430252326093249797923090282e-1L, -3.810492908885321743133304375216617626230e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4313 TEST_c_c (casinh, -1.0L, -0x1.fp-1025L, -8.813735870195430252326093249797923090282e-1L, -3.810492908885321743133304375216617626230e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
0a1b2ae6
JM		 4314#endif
4315#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 4316 TEST_c_c (casinh, 0x1.fp-10000L, 1.0L, 9.854680208706673586644342922051388714633e-1506L, 1.570796326794896619231321691639751442099L),
4317 TEST_c_c (casinh, 0x1.fp-10000L, -1.0L, 9.854680208706673586644342922051388714633e-1506L, -1.570796326794896619231321691639751442099L),
4318 TEST_c_c (casinh, -0x1.fp-10000L, 1.0L, -9.854680208706673586644342922051388714633e-1506L, 1.570796326794896619231321691639751442099L),
4319 TEST_c_c (casinh, -0x1.fp-10000L, -1.0L, -9.854680208706673586644342922051388714633e-1506L, -1.570796326794896619231321691639751442099L),
4320 TEST_c_c (casinh, 1.0L, 0x1.fp-10000L, 8.813735870195430252326093249797923090282e-1L, 6.867047849047171855399183659351043150871e-3011L),
4321 TEST_c_c (casinh, -1.0L, 0x1.fp-10000L, -8.813735870195430252326093249797923090282e-1L, 6.867047849047171855399183659351043150871e-3011L),
4322 TEST_c_c (casinh, 1.0L, -0x1.fp-10000L, 8.813735870195430252326093249797923090282e-1L, -6.867047849047171855399183659351043150871e-3011L),
4323 TEST_c_c (casinh, -1.0L, -0x1.fp-10000L, -8.813735870195430252326093249797923090282e-1L, -6.867047849047171855399183659351043150871e-3011L),
4324 TEST_c_c (casinh, 0x1.fp-16385L, 1.0L, 9.023632056840860275214893047597614177639e-2467L, 1.570796326794896619231321691639751442099L),
4325 TEST_c_c (casinh, 0x1.fp-16385L, -1.0L, 9.023632056840860275214893047597614177639e-2467L, -1.570796326794896619231321691639751442099L),
4326 TEST_c_c (casinh, -0x1.fp-16385L, 1.0L, -9.023632056840860275214893047597614177639e-2467L, 1.570796326794896619231321691639751442099L),
4327 TEST_c_c (casinh, -0x1.fp-16385L, -1.0L, -9.023632056840860275214893047597614177639e-2467L, -1.570796326794896619231321691639751442099L),
4328 TEST_c_c (casinh, 1.0L, 0x1.fp-16385L, 8.813735870195430252326093249797923090282e-1L, 5.757683115456107044131264955348448954458e-4933L, UNDERFLOW_EXCEPTION),
4329 TEST_c_c (casinh, -1.0L, 0x1.fp-16385L, -8.813735870195430252326093249797923090282e-1L, 5.757683115456107044131264955348448954458e-4933L, UNDERFLOW_EXCEPTION),
4330 TEST_c_c (casinh, 1.0L, -0x1.fp-16385L, 8.813735870195430252326093249797923090282e-1L, -5.757683115456107044131264955348448954458e-4933L, UNDERFLOW_EXCEPTION),
4331 TEST_c_c (casinh, -1.0L, -0x1.fp-16385L, -8.813735870195430252326093249797923090282e-1L, -5.757683115456107044131264955348448954458e-4933L, UNDERFLOW_EXCEPTION),
4332#endif
4333
4334 TEST_c_c (casinh, 0x1p-23L, 0x1.000002p0L, 5.364668491573609633134147164031476452679e-4L, 1.570574114956455764594481054234834678422L),
4335 TEST_c_c (casinh, 0x1p-23L, -0x1.000002p0L, 5.364668491573609633134147164031476452679e-4L, -1.570574114956455764594481054234834678422L),
4336 TEST_c_c (casinh, -0x1p-23L, 0x1.000002p0L, -5.364668491573609633134147164031476452679e-4L, 1.570574114956455764594481054234834678422L),
4337 TEST_c_c (casinh, -0x1p-23L, -0x1.000002p0L, -5.364668491573609633134147164031476452679e-4L, -1.570574114956455764594481054234834678422L),
4338 TEST_c_c (casinh, 0x1.000002p0L, 0x1p-23L, 8.813736713132400470205730751186547909968e-1L, 8.429369199749229560964789467980644296420e-8L),
4339 TEST_c_c (casinh, -0x1.000002p0L, 0x1p-23L, -8.813736713132400470205730751186547909968e-1L, 8.429369199749229560964789467980644296420e-8L),
4340 TEST_c_c (casinh, 0x1.000002p0L, -0x1p-23L, 8.813736713132400470205730751186547909968e-1L, -8.429369199749229560964789467980644296420e-8L),
4341 TEST_c_c (casinh, -0x1.000002p0L, -0x1p-23L, -8.813736713132400470205730751186547909968e-1L, -8.429369199749229560964789467980644296420e-8L),
4342 TEST_c_c (casinh, 0x1.fp-129L, 0x1.000002p0L, 4.882812451493617206486388134172712975070e-4L, 1.570796326794896619231321691639751436268L),
4343 TEST_c_c (casinh, 0x1.fp-129L, -0x1.000002p0L, 4.882812451493617206486388134172712975070e-4L, -1.570796326794896619231321691639751436268L),
4344 TEST_c_c (casinh, -0x1.fp-129L, 0x1.000002p0L, -4.882812451493617206486388134172712975070e-4L, 1.570796326794896619231321691639751436268L),
4345 TEST_c_c (casinh, -0x1.fp-129L, -0x1.000002p0L, -4.882812451493617206486388134172712975070e-4L, -1.570796326794896619231321691639751436268L),
4346 TEST_c_c (casinh, 0x1.000002p0L, 0x1.fp-129L, 8.813736713132375348727889167749389235161e-1L, 2.013062444707472738895109955455676357057e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4347 TEST_c_c (casinh, -0x1.000002p0L, 0x1.fp-129L, -8.813736713132375348727889167749389235161e-1L, 2.013062444707472738895109955455676357057e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4348 TEST_c_c (casinh, 0x1.000002p0L, -0x1.fp-129L, 8.813736713132375348727889167749389235161e-1L, -2.013062444707472738895109955455676357057e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4349 TEST_c_c (casinh, -0x1.000002p0L, -0x1.fp-129L, -8.813736713132375348727889167749389235161e-1L, -2.013062444707472738895109955455676357057e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4350 TEST_c_c (casinh, 0.0L, 0x1.000002p0L, 4.882812451493617206486388134172712975070e-4L, 1.570796326794896619231321691639751442099L),
4351 TEST_c_c (casinh, 0.0L, -0x1.000002p0L, 4.882812451493617206486388134172712975070e-4L, -1.570796326794896619231321691639751442099L),
4352 TEST_c_c (casinh, -0.0L, 0x1.000002p0L, -4.882812451493617206486388134172712975070e-4L, 1.570796326794896619231321691639751442099L),
4353 TEST_c_c (casinh, -0.0L, -0x1.000002p0L, -4.882812451493617206486388134172712975070e-4L, -1.570796326794896619231321691639751442099L),
4354 TEST_c_c (casinh, 0x1.000002p0L, 0.0L, 8.813736713132375348727889167749389235161e-1L, 0.0L),
4355 TEST_c_c (casinh, -0x1.000002p0L, 0.0L, -8.813736713132375348727889167749389235161e-1L, 0.0L),
4356 TEST_c_c (casinh, 0x1.000002p0L, -0.0L, 8.813736713132375348727889167749389235161e-1L, -0.0L),
4357 TEST_c_c (casinh, -0x1.000002p0L, -0.0L, -8.813736713132375348727889167749389235161e-1L, -0.0L),
3a7182a1 4358#ifndef TEST_FLOAT
08198877
JM		 4359 TEST_c_c (casinh, 0x1p-52L, 0x1.0000000000001p0L, 2.315303644582684770975188768022139415020e-8L, 1.570796317204594913251280305810847349436L),
4360 TEST_c_c (casinh, 0x1p-52L, -0x1.0000000000001p0L, 2.315303644582684770975188768022139415020e-8L, -1.570796317204594913251280305810847349436L),
4361 TEST_c_c (casinh, -0x1p-52L, 0x1.0000000000001p0L, -2.315303644582684770975188768022139415020e-8L, 1.570796317204594913251280305810847349436L),
4362 TEST_c_c (casinh, -0x1p-52L, -0x1.0000000000001p0L, -2.315303644582684770975188768022139415020e-8L, -1.570796317204594913251280305810847349436L),
4363 TEST_c_c (casinh, 0x1.0000000000001p0L, 0x1p-52L, 8.813735870195431822418551933572982483664e-1L, 1.570092458683774885078102529858632363236e-16L),
4364 TEST_c_c (casinh, -0x1.0000000000001p0L, 0x1p-52L, -8.813735870195431822418551933572982483664e-1L, 1.570092458683774885078102529858632363236e-16L),
4365 TEST_c_c (casinh, 0x1.0000000000001p0L, -0x1p-52L, 8.813735870195431822418551933572982483664e-1L, -1.570092458683774885078102529858632363236e-16L),
4366 TEST_c_c (casinh, -0x1.0000000000001p0L, -0x1p-52L, -8.813735870195431822418551933572982483664e-1L, -1.570092458683774885078102529858632363236e-16L),
4367 TEST_c_c (casinh, 0x1.fp-1025L, 0x1.0000000000001p0L, 2.107342425544701550354780375182800088393e-8L, 1.570796326794896619231321691639751442099L),
4368 TEST_c_c (casinh, 0x1.fp-1025L, -0x1.0000000000001p0L, 2.107342425544701550354780375182800088393e-8L, -1.570796326794896619231321691639751442099L),
4369 TEST_c_c (casinh, -0x1.fp-1025L, 0x1.0000000000001p0L, -2.107342425544701550354780375182800088393e-8L, 1.570796326794896619231321691639751442099L),
4370 TEST_c_c (casinh, -0x1.fp-1025L, -0x1.0000000000001p0L, -2.107342425544701550354780375182800088393e-8L, -1.570796326794896619231321691639751442099L),
4371 TEST_c_c (casinh, 0x1.0000000000001p0L, 0x1.fp-1025L, 8.813735870195431822418551933572895326024e-1L, 3.810492908885321320083608113679347200012e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4372 TEST_c_c (casinh, -0x1.0000000000001p0L, 0x1.fp-1025L, -8.813735870195431822418551933572895326024e-1L, 3.810492908885321320083608113679347200012e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4373 TEST_c_c (casinh, 0x1.0000000000001p0L, -0x1.fp-1025L, 8.813735870195431822418551933572895326024e-1L, -3.810492908885321320083608113679347200012e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4374 TEST_c_c (casinh, -0x1.0000000000001p0L, -0x1.fp-1025L, -8.813735870195431822418551933572895326024e-1L, -3.810492908885321320083608113679347200012e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4375 TEST_c_c (casinh, 0.0L, 0x1.0000000000001p0L, 2.107342425544701550354780375182800088393e-8L, 1.570796326794896619231321691639751442099L),
4376 TEST_c_c (casinh, 0.0L, -0x1.0000000000001p0L, 2.107342425544701550354780375182800088393e-8L, -1.570796326794896619231321691639751442099L),
4377 TEST_c_c (casinh, -0.0L, 0x1.0000000000001p0L, -2.107342425544701550354780375182800088393e-8L, 1.570796326794896619231321691639751442099L),
4378 TEST_c_c (casinh, -0.0L, -0x1.0000000000001p0L, -2.107342425544701550354780375182800088393e-8L, -1.570796326794896619231321691639751442099L),
4379 TEST_c_c (casinh, 0x1.0000000000001p0L, 0.0L, 8.813735870195431822418551933572895326024e-1L, 0.0L),
4380 TEST_c_c (casinh, -0x1.0000000000001p0L, 0.0L, -8.813735870195431822418551933572895326024e-1L, 0.0L),
4381 TEST_c_c (casinh, 0x1.0000000000001p0L, -0.0L, 8.813735870195431822418551933572895326024e-1L, -0.0L),
4382 TEST_c_c (casinh, -0x1.0000000000001p0L, -0.0L, -8.813735870195431822418551933572895326024e-1L, -0.0L),
3a7182a1
JM		 4383#endif
4384#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 4385 TEST_c_c (casinh, 0x1p-63L, 0x1.0000000000000002p0L, 5.116146586219826555037807251857670783420e-10L, 1.570796326582978888921215348380499122131L),
4386 TEST_c_c (casinh, 0x1p-63L, -0x1.0000000000000002p0L, 5.116146586219826555037807251857670783420e-10L, -1.570796326582978888921215348380499122131L),
4387 TEST_c_c (casinh, -0x1p-63L, 0x1.0000000000000002p0L, -5.116146586219826555037807251857670783420e-10L, 1.570796326582978888921215348380499122131L),
4388 TEST_c_c (casinh, -0x1p-63L, -0x1.0000000000000002p0L, -5.116146586219826555037807251857670783420e-10L, -1.570796326582978888921215348380499122131L),
4389 TEST_c_c (casinh, 0x1.0000000000000002p0L, 0x1p-63L, 8.813735870195430253092739958139610131001e-1L, 7.666467083416870406778649849746878368519e-20L),
4390 TEST_c_c (casinh, -0x1.0000000000000002p0L, 0x1p-63L, -8.813735870195430253092739958139610131001e-1L, 7.666467083416870406778649849746878368519e-20L),
4391 TEST_c_c (casinh, 0x1.0000000000000002p0L, -0x1p-63L, 8.813735870195430253092739958139610131001e-1L, -7.666467083416870406778649849746878368519e-20L),
4392 TEST_c_c (casinh, -0x1.0000000000000002p0L, -0x1p-63L, -8.813735870195430253092739958139610131001e-1L, -7.666467083416870406778649849746878368519e-20L),
3a7182a1 4393# if LDBL_MIN_EXP <= -16381
08198877
JM		 4394 TEST_c_c (casinh, 0x1.fp-16385L, 0x1.0000000000000002p0L, 4.656612873077392578082927418388212703712e-10L, 1.570796326794896619231321691639751442099L),
4395 TEST_c_c (casinh, 0x1.fp-16385L, -0x1.0000000000000002p0L, 4.656612873077392578082927418388212703712e-10L, -1.570796326794896619231321691639751442099L),
4396 TEST_c_c (casinh, -0x1.fp-16385L, 0x1.0000000000000002p0L, -4.656612873077392578082927418388212703712e-10L, 1.570796326794896619231321691639751442099L),
4397 TEST_c_c (casinh, -0x1.fp-16385L, -0x1.0000000000000002p0L, -4.656612873077392578082927418388212703712e-10L, -1.570796326794896619231321691639751442099L),
4398 TEST_c_c (casinh, 0x1.0000000000000002p0L, 0x1.fp-16385L, 8.813735870195430253092739958139610130980e-1L, 5.757683115456107043819140328235418018963e-4933L, UNDERFLOW_EXCEPTION),
4399 TEST_c_c (casinh, -0x1.0000000000000002p0L, 0x1.fp-16385L, -8.813735870195430253092739958139610130980e-1L, 5.757683115456107043819140328235418018963e-4933L, UNDERFLOW_EXCEPTION),
4400 TEST_c_c (casinh, 0x1.0000000000000002p0L, -0x1.fp-16385L, 8.813735870195430253092739958139610130980e-1L, -5.757683115456107043819140328235418018963e-4933L, UNDERFLOW_EXCEPTION),
4401 TEST_c_c (casinh, -0x1.0000000000000002p0L, -0x1.fp-16385L, -8.813735870195430253092739958139610130980e-1L, -5.757683115456107043819140328235418018963e-4933L, UNDERFLOW_EXCEPTION),
3a7182a1 4402# endif
08198877
JM		 4403 TEST_c_c (casinh, 0.0L, 0x1.0000000000000002p0L, 4.656612873077392578082927418388212703712e-10L, 1.570796326794896619231321691639751442099L),
4404 TEST_c_c (casinh, 0.0L, -0x1.0000000000000002p0L, 4.656612873077392578082927418388212703712e-10L, -1.570796326794896619231321691639751442099L),
4405 TEST_c_c (casinh, -0.0L, 0x1.0000000000000002p0L, -4.656612873077392578082927418388212703712e-10L, 1.570796326794896619231321691639751442099L),
4406 TEST_c_c (casinh, -0.0L, -0x1.0000000000000002p0L, -4.656612873077392578082927418388212703712e-10L, -1.570796326794896619231321691639751442099L),
4407 TEST_c_c (casinh, 0x1.0000000000000002p0L, 0.0L, 8.813735870195430253092739958139610130980e-1L, 0.0L),
4408 TEST_c_c (casinh, -0x1.0000000000000002p0L, 0.0L, -8.813735870195430253092739958139610130980e-1L, 0.0L),
4409 TEST_c_c (casinh, 0x1.0000000000000002p0L, -0.0L, 8.813735870195430253092739958139610130980e-1L, -0.0L),
4410 TEST_c_c (casinh, -0x1.0000000000000002p0L, -0.0L, -8.813735870195430253092739958139610130980e-1L, -0.0L),
3a7182a1
JM		 4411#endif
4412#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 4413 TEST_c_c (casinh, 0x1p-106L, 0x1.000000000000000000000000008p0L, 2.285028863093221674154232933662774454211e-16L, 1.570796326794896565289107467733682961928L),
4414 TEST_c_c (casinh, 0x1p-106L, -0x1.000000000000000000000000008p0L, 2.285028863093221674154232933662774454211e-16L, -1.570796326794896565289107467733682961928L),
4415 TEST_c_c (casinh, -0x1p-106L, 0x1.000000000000000000000000008p0L, -2.285028863093221674154232933662774454211e-16L, 1.570796326794896565289107467733682961928L),
4416 TEST_c_c (casinh, -0x1p-106L, -0x1.000000000000000000000000008p0L, -2.285028863093221674154232933662774454211e-16L, -1.570796326794896565289107467733682961928L),
4417 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, 0x1p-106L, 8.813735870195430252326093249798097405561e-1L, 8.715763992105246878957416200936726072500e-33L),
4418 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, 0x1p-106L, -8.813735870195430252326093249798097405561e-1L, 8.715763992105246878957416200936726072500e-33L),
4419 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, -0x1p-106L, 8.813735870195430252326093249798097405561e-1L, -8.715763992105246878957416200936726072500e-33L),
4420 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, -0x1p-106L, -8.813735870195430252326093249798097405561e-1L, -8.715763992105246878957416200936726072500e-33L),
4421 TEST_c_c (casinh, 0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 2.220446049250313080847263336181636063482e-16L, 1.570796326794896619231321691639751442099L),
4422 TEST_c_c (casinh, 0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 2.220446049250313080847263336181636063482e-16L, -1.570796326794896619231321691639751442099L),
4423 TEST_c_c (casinh, -0x1.fp-1025L, 0x1.000000000000000000000000008p0L, -2.220446049250313080847263336181636063482e-16L, 1.570796326794896619231321691639751442099L),
4424 TEST_c_c (casinh, -0x1.fp-1025L, -0x1.000000000000000000000000008p0L, -2.220446049250313080847263336181636063482e-16L, -1.570796326794896619231321691639751442099L),
4425 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 8.813735870195430252326093249798097405561e-1L, 3.810492908885321743133304375216570658278e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4426 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, 0x1.fp-1025L, -8.813735870195430252326093249798097405561e-1L, 3.810492908885321743133304375216570658278e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4427 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 8.813735870195430252326093249798097405561e-1L, -3.810492908885321743133304375216570658278e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4428 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, -0x1.fp-1025L, -8.813735870195430252326093249798097405561e-1L, -3.810492908885321743133304375216570658278e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4429 TEST_c_c (casinh, 0.0L, 0x1.000000000000000000000000008p0L, 2.220446049250313080847263336181636063482e-16L, 1.570796326794896619231321691639751442099L),
4430 TEST_c_c (casinh, 0.0L, -0x1.000000000000000000000000008p0L, 2.220446049250313080847263336181636063482e-16L, -1.570796326794896619231321691639751442099L),
4431 TEST_c_c (casinh, -0.0L, 0x1.000000000000000000000000008p0L, -2.220446049250313080847263336181636063482e-16L, 1.570796326794896619231321691639751442099L),
4432 TEST_c_c (casinh, -0.0L, -0x1.000000000000000000000000008p0L, -2.220446049250313080847263336181636063482e-16L, -1.570796326794896619231321691639751442099L),
4433 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, 0.0L, 8.813735870195430252326093249798097405561e-1L, 0.0L),
4434 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, 0.0L, -8.813735870195430252326093249798097405561e-1L, 0.0L),
4435 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, -0.0L, 8.813735870195430252326093249798097405561e-1L, -0.0L),
4436 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, -0.0L, -8.813735870195430252326093249798097405561e-1L, -0.0L),
3a7182a1
JM		 4437#endif
4438#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 4439 TEST_c_c (casinh, 0x1p-113L, 0x1.0000000000000000000000000001p0L, 2.019699255375255198156433710951064632386e-17L, 1.570796326794896614463458507897073960405L),
4440 TEST_c_c (casinh, 0x1p-113L, -0x1.0000000000000000000000000001p0L, 2.019699255375255198156433710951064632386e-17L, -1.570796326794896614463458507897073960405L),
4441 TEST_c_c (casinh, -0x1p-113L, 0x1.0000000000000000000000000001p0L, -2.019699255375255198156433710951064632386e-17L, 1.570796326794896614463458507897073960405L),
4442 TEST_c_c (casinh, -0x1p-113L, -0x1.0000000000000000000000000001p0L, -2.019699255375255198156433710951064632386e-17L, -1.570796326794896614463458507897073960405L),
4443 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, 0x1p-113L, 8.813735870195430252326093249797924452120e-1L, 6.809190618832224124185481406981900518193e-35L),
4444 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, 0x1p-113L, -8.813735870195430252326093249797924452120e-1L, 6.809190618832224124185481406981900518193e-35L),
4445 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, -0x1p-113L, 8.813735870195430252326093249797924452120e-1L, -6.809190618832224124185481406981900518193e-35L),
4446 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, -0x1p-113L, -8.813735870195430252326093249797924452120e-1L, -6.809190618832224124185481406981900518193e-35L),
4447 TEST_c_c (casinh, 0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 1.962615573354718824241727964954454332780e-17L, 1.570796326794896619231321691639751442099L),
4448 TEST_c_c (casinh, 0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 1.962615573354718824241727964954454332780e-17L, -1.570796326794896619231321691639751442099L),
4449 TEST_c_c (casinh, -0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, -1.962615573354718824241727964954454332780e-17L, 1.570796326794896619231321691639751442099L),
4450 TEST_c_c (casinh, -0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, -1.962615573354718824241727964954454332780e-17L, -1.570796326794896619231321691639751442099L),
4451 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 8.813735870195430252326093249797924452120e-1L, 5.757683115456107044131264955348448400014e-4933L, UNDERFLOW_EXCEPTION),
4452 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, -8.813735870195430252326093249797924452120e-1L, 5.757683115456107044131264955348448400014e-4933L, UNDERFLOW_EXCEPTION),
4453 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 8.813735870195430252326093249797924452120e-1L, -5.757683115456107044131264955348448400014e-4933L, UNDERFLOW_EXCEPTION),
4454 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, -8.813735870195430252326093249797924452120e-1L, -5.757683115456107044131264955348448400014e-4933L, UNDERFLOW_EXCEPTION),
4455 TEST_c_c (casinh, 0.0L, 0x1.0000000000000000000000000001p0L, 1.962615573354718824241727964954454332780e-17L, 1.570796326794896619231321691639751442099L),
4456 TEST_c_c (casinh, 0.0L, -0x1.0000000000000000000000000001p0L, 1.962615573354718824241727964954454332780e-17L, -1.570796326794896619231321691639751442099L),
4457 TEST_c_c (casinh, -0.0L, 0x1.0000000000000000000000000001p0L, -1.962615573354718824241727964954454332780e-17L, 1.570796326794896619231321691639751442099L),
4458 TEST_c_c (casinh, -0.0L, -0x1.0000000000000000000000000001p0L, -1.962615573354718824241727964954454332780e-17L, -1.570796326794896619231321691639751442099L),
4459 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, 0.0L, 8.813735870195430252326093249797924452120e-1L, 0.0L),
4460 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, 0.0L, -8.813735870195430252326093249797924452120e-1L, 0.0L),
4461 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, -0.0L, 8.813735870195430252326093249797924452120e-1L, -0.0L),
4462 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, -0.0L, -8.813735870195430252326093249797924452120e-1L, -0.0L),
4463#endif
4464
4465 TEST_c_c (casinh, 0x1p-23L, 0x0.ffffffp0L, 2.714321200917194650737217746780928423385e-4L, 1.570357140408705570520377172865353621698L),
4466 TEST_c_c (casinh, 0x1p-23L, -0x0.ffffffp0L, 2.714321200917194650737217746780928423385e-4L, -1.570357140408705570520377172865353621698L),
4467 TEST_c_c (casinh, -0x1p-23L, 0x0.ffffffp0L, -2.714321200917194650737217746780928423385e-4L, 1.570357140408705570520377172865353621698L),
4468 TEST_c_c (casinh, -0x1p-23L, -0x0.ffffffp0L, -2.714321200917194650737217746780928423385e-4L, -1.570357140408705570520377172865353621698L),
4469 TEST_c_c (casinh, 0x0.ffffffp0L, 0x1p-23L, 8.813735448726963984495965873956465777250e-1L, 8.429369953393598499000760938112968755257e-8L),
4470 TEST_c_c (casinh, -0x0.ffffffp0L, 0x1p-23L, -8.813735448726963984495965873956465777250e-1L, 8.429369953393598499000760938112968755257e-8L),
4471 TEST_c_c (casinh, 0x0.ffffffp0L, -0x1p-23L, 8.813735448726963984495965873956465777250e-1L, -8.429369953393598499000760938112968755257e-8L),
4472 TEST_c_c (casinh, -0x0.ffffffp0L, -0x1p-23L, -8.813735448726963984495965873956465777250e-1L, -8.429369953393598499000760938112968755257e-8L),
4473 TEST_c_c (casinh, 0x1.fp-129L, 0x0.ffffffp0L, 8.245504387859737323891843603996428534945e-36L, 1.570451059810180415643718442157112705601L),
4474 TEST_c_c (casinh, 0x1.fp-129L, -0x0.ffffffp0L, 8.245504387859737323891843603996428534945e-36L, -1.570451059810180415643718442157112705601L),
4475 TEST_c_c (casinh, -0x1.fp-129L, 0x0.ffffffp0L, -8.245504387859737323891843603996428534945e-36L, 1.570451059810180415643718442157112705601L),
4476 TEST_c_c (casinh, -0x1.fp-129L, -0x0.ffffffp0L, -8.245504387859737323891843603996428534945e-36L, -1.570451059810180415643718442157112705601L),
4477 TEST_c_c (casinh, 0x0.ffffffp0L, 0x1.fp-129L, 8.813735448726938863015878255140556727969e-1L, 2.013062624689288675911339929224634593425e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4478 TEST_c_c (casinh, -0x0.ffffffp0L, 0x1.fp-129L, -8.813735448726938863015878255140556727969e-1L, 2.013062624689288675911339929224634593425e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4479 TEST_c_c (casinh, 0x0.ffffffp0L, -0x1.fp-129L, 8.813735448726938863015878255140556727969e-1L, -2.013062624689288675911339929224634593425e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4480 TEST_c_c (casinh, -0x0.ffffffp0L, -0x1.fp-129L, -8.813735448726938863015878255140556727969e-1L, -2.013062624689288675911339929224634593425e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4481 TEST_c_c (casinh, 0.0L, 0x0.ffffffp0L, 0.0L, 1.570451059810180415643718442157112705601L),
4482 TEST_c_c (casinh, 0.0L, -0x0.ffffffp0L, 0.0L, -1.570451059810180415643718442157112705601L),
4483 TEST_c_c (casinh, -0.0L, 0x0.ffffffp0L, -0.0L, 1.570451059810180415643718442157112705601L),
4484 TEST_c_c (casinh, -0.0L, -0x0.ffffffp0L, -0.0L, -1.570451059810180415643718442157112705601L),
4485 TEST_c_c (casinh, 0x0.ffffffp0L, 0.0L, 8.813735448726938863015878255140556727969e-1L, 0.0L),
4486 TEST_c_c (casinh, -0x0.ffffffp0L, 0.0L, -8.813735448726938863015878255140556727969e-1L, 0.0L),
4487 TEST_c_c (casinh, 0x0.ffffffp0L, -0.0L, 8.813735448726938863015878255140556727969e-1L, -0.0L),
4488 TEST_c_c (casinh, -0x0.ffffffp0L, -0.0L, -8.813735448726938863015878255140556727969e-1L, -0.0L),
4489 TEST_c_c (casinh, 0x1p-23L, 0.5L, 1.376510308240943236356088341381173571841e-7L, 5.235987755982934033165770729745469098254e-1L),
4490 TEST_c_c (casinh, 0x1p-23L, -0.5L, 1.376510308240943236356088341381173571841e-7L, -5.235987755982934033165770729745469098254e-1L),
4491 TEST_c_c (casinh, -0x1p-23L, 0.5L, -1.376510308240943236356088341381173571841e-7L, 5.235987755982934033165770729745469098254e-1L),
4492 TEST_c_c (casinh, -0x1p-23L, -0.5L, -1.376510308240943236356088341381173571841e-7L, -5.235987755982934033165770729745469098254e-1L),
4493 TEST_c_c (casinh, 0.5L, 0x1p-23L, 4.812118250596059896127318386463676808798e-1L, 1.066240299940009780479664302917201696886e-7L),
4494 TEST_c_c (casinh, -0.5L, 0x1p-23L, -4.812118250596059896127318386463676808798e-1L, 1.066240299940009780479664302917201696886e-7L),
4495 TEST_c_c (casinh, 0.5L, -0x1p-23L, 4.812118250596059896127318386463676808798e-1L, -1.066240299940009780479664302917201696886e-7L),
4496 TEST_c_c (casinh, -0.5L, -0x1p-23L, -4.812118250596059896127318386463676808798e-1L, -1.066240299940009780479664302917201696886e-7L),
4497 TEST_c_c (casinh, 0x1.fp-129L, 0.5L, 3.287317402534702257036015056278368274737e-39L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_FLOAT),
4498 TEST_c_c (casinh, 0x1.fp-129L, -0.5L, 3.287317402534702257036015056278368274737e-39L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_FLOAT),
4499 TEST_c_c (casinh, -0x1.fp-129L, 0.5L, -3.287317402534702257036015056278368274737e-39L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_FLOAT),
4500 TEST_c_c (casinh, -0x1.fp-129L, -0.5L, -3.287317402534702257036015056278368274737e-39L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_FLOAT),
4501 TEST_c_c (casinh, 0.5L, 0x1.fp-129L, 4.812118250596034474977589134243684231352e-1L, 2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4502 TEST_c_c (casinh, -0.5L, 0x1.fp-129L, -4.812118250596034474977589134243684231352e-1L, 2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4503 TEST_c_c (casinh, 0.5L, -0x1.fp-129L, 4.812118250596034474977589134243684231352e-1L, -2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4504 TEST_c_c (casinh, -0.5L, -0x1.fp-129L, -4.812118250596034474977589134243684231352e-1L, -2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4505 TEST_c_c (casinh, 0x1p-23L, 0x1p-23L, 1.192092895507818146886315028596704749235e-7L, 1.192092895507806853113684971258850504935e-7L),
4506 TEST_c_c (casinh, 0x1p-23L, -0x1p-23L, 1.192092895507818146886315028596704749235e-7L, -1.192092895507806853113684971258850504935e-7L),
4507 TEST_c_c (casinh, -0x1p-23L, 0x1p-23L, -1.192092895507818146886315028596704749235e-7L, 1.192092895507806853113684971258850504935e-7L),
4508 TEST_c_c (casinh, -0x1p-23L, -0x1p-23L, -1.192092895507818146886315028596704749235e-7L, -1.192092895507806853113684971258850504935e-7L),
4509 TEST_c_c (casinh, 0x1.fp-129L, 0x1p-23L, 2.846900380897747786805634596726756660388e-39L, 1.192092895507815323443157514352519154304e-7L, UNDERFLOW_EXCEPTION_FLOAT),
4510 TEST_c_c (casinh, 0x1.fp-129L, -0x1p-23L, 2.846900380897747786805634596726756660388e-39L, -1.192092895507815323443157514352519154304e-7L, UNDERFLOW_EXCEPTION_FLOAT),
4511 TEST_c_c (casinh, -0x1.fp-129L, 0x1p-23L, -2.846900380897747786805634596726756660388e-39L, 1.192092895507815323443157514352519154304e-7L, UNDERFLOW_EXCEPTION_FLOAT),
4512 TEST_c_c (casinh, -0x1.fp-129L, -0x1p-23L, -2.846900380897747786805634596726756660388e-39L, -1.192092895507815323443157514352519154304e-7L, UNDERFLOW_EXCEPTION_FLOAT),
4513 /* Bug 15319: underflow exception may be missing. */
4514 TEST_c_c (casinh, 0x1p-23L, 0x1.fp-129L, 1.192092895507809676556842485683592032154e-7L, 2.846900380897707329917933005874691056564e-39L, UNDERFLOW_EXCEPTION_OK_FLOAT),
4515 TEST_c_c (casinh, -0x1p-23L, 0x1.fp-129L, -1.192092895507809676556842485683592032154e-7L, 2.846900380897707329917933005874691056564e-39L, UNDERFLOW_EXCEPTION_OK_FLOAT),
4516 TEST_c_c (casinh, 0x1p-23L, -0x1.fp-129L, 1.192092895507809676556842485683592032154e-7L, -2.846900380897707329917933005874691056564e-39L, UNDERFLOW_EXCEPTION_OK_FLOAT),
4517 TEST_c_c (casinh, -0x1p-23L, -0x1.fp-129L, -1.192092895507809676556842485683592032154e-7L, -2.846900380897707329917933005874691056564e-39L, UNDERFLOW_EXCEPTION_OK_FLOAT),
4518 TEST_c_c (casinh, 0.0L, 0x1p-23L, 0.0L, 1.192092895507815323443157514352519154304e-7L),
4519 TEST_c_c (casinh, 0.0L, -0x1p-23L, 0.0L, -1.192092895507815323443157514352519154304e-7L),
4520 TEST_c_c (casinh, -0.0L, 0x1p-23L, -0.0L, 1.192092895507815323443157514352519154304e-7L),
4521 TEST_c_c (casinh, -0.0L, -0x1p-23L, -0.0L, -1.192092895507815323443157514352519154304e-7L),
4522 TEST_c_c (casinh, 0x1p-23L, 0.0L, 1.192092895507809676556842485683592032154e-7L, 0.0L),
4523 TEST_c_c (casinh, -0x1p-23L, 0.0L, -1.192092895507809676556842485683592032154e-7L, 0.0L),
4524 TEST_c_c (casinh, 0x1p-23L, -0.0L, 1.192092895507809676556842485683592032154e-7L, -0.0L),
4525 TEST_c_c (casinh, -0x1p-23L, -0.0L, -1.192092895507809676556842485683592032154e-7L, -0.0L),
4526 TEST_c_c (casinh, 0x1.fp-129L, 0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4527 TEST_c_c (casinh, 0x1.fp-129L, -0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4528 TEST_c_c (casinh, -0x1.fp-129L, 0x1.fp-129L, -2.846900380897727558361783801085126250967e-39L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4529 TEST_c_c (casinh, -0x1.fp-129L, -0x1.fp-129L, -2.846900380897727558361783801085126250967e-39L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
ccc8cadf 4530#ifndef TEST_FLOAT
08198877
JM		 4531 TEST_c_c (casinh, 0x1p-52L, 0x0.fffffffffffff8p0L, 1.171456840272878582596796205397918831268e-8L, 1.570796307840326780080580569360500172043L),
4532 TEST_c_c (casinh, 0x1p-52L, -0x0.fffffffffffff8p0L, 1.171456840272878582596796205397918831268e-8L, -1.570796307840326780080580569360500172043L),
4533 TEST_c_c (casinh, -0x1p-52L, 0x0.fffffffffffff8p0L, -1.171456840272878582596796205397918831268e-8L, 1.570796307840326780080580569360500172043L),
4534 TEST_c_c (casinh, -0x1p-52L, -0x0.fffffffffffff8p0L, -1.171456840272878582596796205397918831268e-8L, -1.570796307840326780080580569360500172043L),
4535 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, 0x1p-52L, 8.813735870195429467279863907910458761820e-1L, 1.570092458683775146551022293016031474627e-16L),
4536 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, 0x1p-52L, -8.813735870195429467279863907910458761820e-1L, 1.570092458683775146551022293016031474627e-16L),
4537 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, -0x1p-52L, 8.813735870195429467279863907910458761820e-1L, -1.570092458683775146551022293016031474627e-16L),
4538 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, -0x1p-52L, -8.813735870195429467279863907910458761820e-1L, -1.570092458683775146551022293016031474627e-16L),
4539 TEST_c_c (casinh, 0x1.fp-1025L, 0x0.fffffffffffff8p0L, 3.616396521699973256461764099945789620604e-301L, 1.570796311893735425383665303776316016594L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4540 TEST_c_c (casinh, 0x1.fp-1025L, -0x0.fffffffffffff8p0L, 3.616396521699973256461764099945789620604e-301L, -1.570796311893735425383665303776316016594L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4541 TEST_c_c (casinh, -0x1.fp-1025L, 0x0.fffffffffffff8p0L, -3.616396521699973256461764099945789620604e-301L, 1.570796311893735425383665303776316016594L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4542 TEST_c_c (casinh, -0x1.fp-1025L, -0x0.fffffffffffff8p0L, -3.616396521699973256461764099945789620604e-301L, -1.570796311893735425383665303776316016594L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4543 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, 0x1.fp-1025L, 8.813735870195429467279863907910371604180e-1L, 3.810492908885321954658152505985270452320e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4544 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, 0x1.fp-1025L, -8.813735870195429467279863907910371604180e-1L, 3.810492908885321954658152505985270452320e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4545 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, -0x1.fp-1025L, 8.813735870195429467279863907910371604180e-1L, -3.810492908885321954658152505985270452320e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4546 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, -0x1.fp-1025L, -8.813735870195429467279863907910371604180e-1L, -3.810492908885321954658152505985270452320e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4547 TEST_c_c (casinh, 0.0L, 0x0.fffffffffffff8p0L, 0.0L, 1.570796311893735425383665303776316016594L),
4548 TEST_c_c (casinh, 0.0L, -0x0.fffffffffffff8p0L, 0.0L, -1.570796311893735425383665303776316016594L),
4549 TEST_c_c (casinh, -0.0L, 0x0.fffffffffffff8p0L, -0.0L, 1.570796311893735425383665303776316016594L),
4550 TEST_c_c (casinh, -0.0L, -0x0.fffffffffffff8p0L, -0.0L, -1.570796311893735425383665303776316016594L),
4551 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, 0.0L, 8.813735870195429467279863907910371604180e-1L, 0.0L),
4552 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, 0.0L, -8.813735870195429467279863907910371604180e-1L, 0.0L),
4553 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, -0.0L, 8.813735870195429467279863907910371604180e-1L, -0.0L),
4554 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, -0.0L, -8.813735870195429467279863907910371604180e-1L, -0.0L),
4555#endif
4556 TEST_c_c (casinh, 0x1p-52L, 0.5L, 2.563950248511418570403591756798643804971e-16L, 5.235987755982988730771072305465648369889e-1L),
4557 TEST_c_c (casinh, 0x1p-52L, -0.5L, 2.563950248511418570403591756798643804971e-16L, -5.235987755982988730771072305465648369889e-1L),
4558 TEST_c_c (casinh, -0x1p-52L, 0.5L, -2.563950248511418570403591756798643804971e-16L, 5.235987755982988730771072305465648369889e-1L),
4559 TEST_c_c (casinh, -0x1p-52L, -0.5L, -2.563950248511418570403591756798643804971e-16L, -5.235987755982988730771072305465648369889e-1L),
4560 TEST_c_c (casinh, 0.5L, 0x1p-52L, 4.812118250596034474977589134243772428682e-1L, 1.986027322597818397661816253158024383707e-16L),
4561 TEST_c_c (casinh, -0.5L, 0x1p-52L, -4.812118250596034474977589134243772428682e-1L, 1.986027322597818397661816253158024383707e-16L),
4562 TEST_c_c (casinh, 0.5L, -0x1p-52L, 4.812118250596034474977589134243772428682e-1L, -1.986027322597818397661816253158024383707e-16L),
4563 TEST_c_c (casinh, -0.5L, -0x1p-52L, -4.812118250596034474977589134243772428682e-1L, -1.986027322597818397661816253158024383707e-16L),
ccc8cadf 4564#ifndef TEST_FLOAT
08198877
JM		 4565 TEST_c_c (casinh, 0x1.fp-1025L, 0.5L, 6.222508863508420569166420770843207333493e-309L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
4566 TEST_c_c (casinh, 0x1.fp-1025L, -0.5L, 6.222508863508420569166420770843207333493e-309L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
4567 TEST_c_c (casinh, -0x1.fp-1025L, 0.5L, -6.222508863508420569166420770843207333493e-309L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
4568 TEST_c_c (casinh, -0x1.fp-1025L, -0.5L, -6.222508863508420569166420770843207333493e-309L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
4569 TEST_c_c (casinh, 0.5L, 0x1.fp-1025L, 4.812118250596034474977589134243684231352e-1L, 4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4570 TEST_c_c (casinh, -0.5L, 0x1.fp-1025L, -4.812118250596034474977589134243684231352e-1L, 4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4571 TEST_c_c (casinh, 0.5L, -0x1.fp-1025L, 4.812118250596034474977589134243684231352e-1L, -4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4572 TEST_c_c (casinh, -0.5L, -0x1.fp-1025L, -4.812118250596034474977589134243684231352e-1L, -4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4573#endif
4574 TEST_c_c (casinh, 0x1p-52L, 0x1p-52L, 2.220446049250313080847263336181677117148e-16L, 2.220446049250313080847263336181604132852e-16L),
4575 TEST_c_c (casinh, 0x1p-52L, -0x1p-52L, 2.220446049250313080847263336181677117148e-16L, -2.220446049250313080847263336181604132852e-16L),
4576 TEST_c_c (casinh, -0x1p-52L, 0x1p-52L, -2.220446049250313080847263336181677117148e-16L, 2.220446049250313080847263336181604132852e-16L),
4577 TEST_c_c (casinh, -0x1p-52L, -0x1p-52L, -2.220446049250313080847263336181677117148e-16L, -2.220446049250313080847263336181604132852e-16L),
ccc8cadf 4578#ifndef TEST_FLOAT
08198877
JM		 4579 TEST_c_c (casinh, 0x1.fp-1025L, 0x1p-52L, 5.388850751072128349671657362289548938458e-309L, 2.220446049250313080847263336181658871074e-16L, UNDERFLOW_EXCEPTION_DOUBLE),
4580 TEST_c_c (casinh, 0x1.fp-1025L, -0x1p-52L, 5.388850751072128349671657362289548938458e-309L, -2.220446049250313080847263336181658871074e-16L, UNDERFLOW_EXCEPTION_DOUBLE),
4581 TEST_c_c (casinh, -0x1.fp-1025L, 0x1p-52L, -5.388850751072128349671657362289548938458e-309L, 2.220446049250313080847263336181658871074e-16L, UNDERFLOW_EXCEPTION_DOUBLE),
4582 TEST_c_c (casinh, -0x1.fp-1025L, -0x1p-52L, -5.388850751072128349671657362289548938458e-309L, -2.220446049250313080847263336181658871074e-16L, UNDERFLOW_EXCEPTION_DOUBLE),
4583 /* Bug 15319: underflow exception may be missing. */
4584 TEST_c_c (casinh, 0x1p-52L, 0x1.fp-1025L, 2.220446049250313080847263336181622378926e-16L, 5.388850751072128349671657362289283247603e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4585 TEST_c_c (casinh, -0x1p-52L, 0x1.fp-1025L, -2.220446049250313080847263336181622378926e-16L, 5.388850751072128349671657362289283247603e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4586 TEST_c_c (casinh, 0x1p-52L, -0x1.fp-1025L, 2.220446049250313080847263336181622378926e-16L, -5.388850751072128349671657362289283247603e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4587 TEST_c_c (casinh, -0x1p-52L, -0x1.fp-1025L, -2.220446049250313080847263336181622378926e-16L, -5.388850751072128349671657362289283247603e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4588#endif
4589 TEST_c_c (casinh, 0.0L, 0x1p-52L, 0.0L, 2.220446049250313080847263336181658871074e-16L),
4590 TEST_c_c (casinh, 0.0L, -0x1p-52L, 0.0L, -2.220446049250313080847263336181658871074e-16L),
4591 TEST_c_c (casinh, -0.0L, 0x1p-52L, -0.0L, 2.220446049250313080847263336181658871074e-16L),
4592 TEST_c_c (casinh, -0.0L, -0x1p-52L, -0.0L, -2.220446049250313080847263336181658871074e-16L),
4593 TEST_c_c (casinh, 0x1p-52L, 0.0L, 2.220446049250313080847263336181622378926e-16L, 0.0L),
4594 TEST_c_c (casinh, -0x1p-52L, 0.0L, -2.220446049250313080847263336181622378926e-16L, 0.0L),
4595 TEST_c_c (casinh, 0x1p-52L, -0.0L, 2.220446049250313080847263336181622378926e-16L, -0.0L),
4596 TEST_c_c (casinh, -0x1p-52L, -0.0L, -2.220446049250313080847263336181622378926e-16L, -0.0L),
ccc8cadf 4597#ifndef TEST_FLOAT
08198877
JM		 4598 TEST_c_c (casinh, 0x1.fp-1025L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4599 TEST_c_c (casinh, 0x1.fp-1025L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4600 TEST_c_c (casinh, -0x1.fp-1025L, 0x1.fp-1025L, -5.388850751072128349671657362289416093031e-309L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4601 TEST_c_c (casinh, -0x1.fp-1025L, -0x1.fp-1025L, -5.388850751072128349671657362289416093031e-309L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
ccc8cadf
JM		 4602#endif
4603#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 4604 TEST_c_c (casinh, 0x1p-63L, 0x0.ffffffffffffffffp0L, 2.588578361325995866221775673638805081337e-10L, 1.570796326376055842114524927965556247908L),
4605 TEST_c_c (casinh, 0x1p-63L, -0x0.ffffffffffffffffp0L, 2.588578361325995866221775673638805081337e-10L, -1.570796326376055842114524927965556247908L),
4606 TEST_c_c (casinh, -0x1p-63L, 0x0.ffffffffffffffffp0L, -2.588578361325995866221775673638805081337e-10L, 1.570796326376055842114524927965556247908L),
4607 TEST_c_c (casinh, -0x1p-63L, -0x0.ffffffffffffffffp0L, -2.588578361325995866221775673638805081337e-10L, -1.570796326376055842114524927965556247908L),
4608 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, 0x1p-63L, 8.813735870195430251942769895627079569937e-1L, 7.666467083416870407402049869781566856442e-20L),
4609 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, 0x1p-63L, -8.813735870195430251942769895627079569937e-1L, 7.666467083416870407402049869781566856442e-20L),
4610 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, -0x1p-63L, 8.813735870195430251942769895627079569937e-1L, -7.666467083416870407402049869781566856442e-20L),
4611 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, -0x1p-63L, -8.813735870195430251942769895627079569937e-1L, -7.666467083416870407402049869781566856442e-20L),
ccc8cadf 4612# if LDBL_MIN_EXP <= -16381
08198877
JM		 4613 TEST_c_c (casinh, 0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 2.472906068161537187835415298076415423459e-4923L, 1.570796326465624365239962068302568888898L),
4614 TEST_c_c (casinh, 0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 2.472906068161537187835415298076415423459e-4923L, -1.570796326465624365239962068302568888898L),
4615 TEST_c_c (casinh, -0x1.fp-16385L, 0x0.ffffffffffffffffp0L, -2.472906068161537187835415298076415423459e-4923L, 1.570796326465624365239962068302568888898L),
4616 TEST_c_c (casinh, -0x1.fp-16385L, -0x0.ffffffffffffffffp0L, -2.472906068161537187835415298076415423459e-4923L, -1.570796326465624365239962068302568888898L),
4617 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 8.813735870195430251942769895627079569917e-1L, 5.757683115456107044287327268904964422212e-4933L, UNDERFLOW_EXCEPTION),
4618 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, 0x1.fp-16385L, -8.813735870195430251942769895627079569917e-1L, 5.757683115456107044287327268904964422212e-4933L, UNDERFLOW_EXCEPTION),
4619 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 8.813735870195430251942769895627079569917e-1L, -5.757683115456107044287327268904964422212e-4933L, UNDERFLOW_EXCEPTION),
4620 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, -0x1.fp-16385L, -8.813735870195430251942769895627079569917e-1L, -5.757683115456107044287327268904964422212e-4933L, UNDERFLOW_EXCEPTION),
ccc8cadf 4621# endif
08198877
JM		 4622 TEST_c_c (casinh, 0.0L, 0x0.ffffffffffffffffp0L, 0.0L, 1.570796326465624365239962068302568888898L),
4623 TEST_c_c (casinh, 0.0L, -0x0.ffffffffffffffffp0L, 0.0L, -1.570796326465624365239962068302568888898L),
4624 TEST_c_c (casinh, -0.0L, 0x0.ffffffffffffffffp0L, -0.0L, 1.570796326465624365239962068302568888898L),
4625 TEST_c_c (casinh, -0.0L, -0x0.ffffffffffffffffp0L, -0.0L, -1.570796326465624365239962068302568888898L),
4626 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, 0.0L, 8.813735870195430251942769895627079569917e-1L, 0.0L),
4627 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, 0.0L, -8.813735870195430251942769895627079569917e-1L, 0.0L),
4628 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, -0.0L, 8.813735870195430251942769895627079569917e-1L, -0.0L),
4629 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, -0.0L, -8.813735870195430251942769895627079569917e-1L, -0.0L),
4630#endif
4631 TEST_c_c (casinh, 0x1p-63L, 0.5L, 1.251928832280966098829878787499365228659e-19L, 5.235987755982988730771072305465838140283e-1L),
4632 TEST_c_c (casinh, 0x1p-63L, -0.5L, 1.251928832280966098829878787499365228659e-19L, -5.235987755982988730771072305465838140283e-1L),
4633 TEST_c_c (casinh, -0x1p-63L, 0.5L, -1.251928832280966098829878787499365228659e-19L, 5.235987755982988730771072305465838140283e-1L),
4634 TEST_c_c (casinh, -0x1p-63L, -0.5L, -1.251928832280966098829878787499365228659e-19L, -5.235987755982988730771072305465838140283e-1L),
4635 TEST_c_c (casinh, 0.5L, 0x1p-63L, 4.812118250596034474977589134243684231373e-1L, 9.697399036122160144833087173623140436413e-20L),
4636 TEST_c_c (casinh, -0.5L, 0x1p-63L, -4.812118250596034474977589134243684231373e-1L, 9.697399036122160144833087173623140436413e-20L),
4637 TEST_c_c (casinh, 0.5L, -0x1p-63L, 4.812118250596034474977589134243684231373e-1L, -9.697399036122160144833087173623140436413e-20L),
4638 TEST_c_c (casinh, -0.5L, -0x1p-63L, -4.812118250596034474977589134243684231373e-1L, -9.697399036122160144833087173623140436413e-20L),
ccc8cadf 4639#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 4640 TEST_c_c (casinh, 0x1.fp-16385L, 0.5L, 9.402257155670418112159334875199821342890e-4933L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION),
4641 TEST_c_c (casinh, 0x1.fp-16385L, -0.5L, 9.402257155670418112159334875199821342890e-4933L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION),
4642 TEST_c_c (casinh, -0x1.fp-16385L, 0.5L, -9.402257155670418112159334875199821342890e-4933L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION),
4643 TEST_c_c (casinh, -0x1.fp-16385L, -0.5L, -9.402257155670418112159334875199821342890e-4933L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION),
4644 TEST_c_c (casinh, 0.5L, 0x1.fp-16385L, 4.812118250596034474977589134243684231352e-1L, 7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
4645 TEST_c_c (casinh, -0.5L, 0x1.fp-16385L, -4.812118250596034474977589134243684231352e-1L, 7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
4646 TEST_c_c (casinh, 0.5L, -0x1.fp-16385L, 4.812118250596034474977589134243684231352e-1L, -7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
4647 TEST_c_c (casinh, -0.5L, -0x1.fp-16385L, -4.812118250596034474977589134243684231352e-1L, -7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
4648#endif
4649 TEST_c_c (casinh, 0x1p-63L, 0x1p-63L, 1.084202172485504434007452800869941711430e-19L, 1.084202172485504434007452800869941711422e-19L),
4650 TEST_c_c (casinh, 0x1p-63L, -0x1p-63L, 1.084202172485504434007452800869941711430e-19L, -1.084202172485504434007452800869941711422e-19L),
4651 TEST_c_c (casinh, -0x1p-63L, 0x1p-63L, -1.084202172485504434007452800869941711430e-19L, 1.084202172485504434007452800869941711422e-19L),
4652 TEST_c_c (casinh, -0x1p-63L, -0x1p-63L, -1.084202172485504434007452800869941711430e-19L, -1.084202172485504434007452800869941711422e-19L),
ccc8cadf 4653#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 4654 TEST_c_c (casinh, 0x1.fp-16385L, 0x1p-63L, 8.142593549724601460479922838826119584465e-4933L, 1.084202172485504434007452800869941711428e-19L, UNDERFLOW_EXCEPTION),
4655 TEST_c_c (casinh, 0x1.fp-16385L, -0x1p-63L, 8.142593549724601460479922838826119584465e-4933L, -1.084202172485504434007452800869941711428e-19L, UNDERFLOW_EXCEPTION),
4656 TEST_c_c (casinh, -0x1.fp-16385L, 0x1p-63L, -8.142593549724601460479922838826119584465e-4933L, 1.084202172485504434007452800869941711428e-19L, UNDERFLOW_EXCEPTION),
4657 TEST_c_c (casinh, -0x1.fp-16385L, -0x1p-63L, -8.142593549724601460479922838826119584465e-4933L, -1.084202172485504434007452800869941711428e-19L, UNDERFLOW_EXCEPTION),
4658 TEST_c_c (casinh, 0x1p-63L, 0x1.fp-16385L, 1.084202172485504434007452800869941711424e-19L, 8.142593549724601460479922838826119584369e-4933L, UNDERFLOW_EXCEPTION),
4659 TEST_c_c (casinh, -0x1p-63L, 0x1.fp-16385L, -1.084202172485504434007452800869941711424e-19L, 8.142593549724601460479922838826119584369e-4933L, UNDERFLOW_EXCEPTION),
4660 TEST_c_c (casinh, 0x1p-63L, -0x1.fp-16385L, 1.084202172485504434007452800869941711424e-19L, -8.142593549724601460479922838826119584369e-4933L, UNDERFLOW_EXCEPTION),
4661 TEST_c_c (casinh, -0x1p-63L, -0x1.fp-16385L, -1.084202172485504434007452800869941711424e-19L, -8.142593549724601460479922838826119584369e-4933L, UNDERFLOW_EXCEPTION),
4662#endif
4663 TEST_c_c (casinh, 0.0L, 0x1p-63L, 0.0L, 1.084202172485504434007452800869941711428e-19L),
4664 TEST_c_c (casinh, 0.0L, -0x1p-63L, 0.0L, -1.084202172485504434007452800869941711428e-19L),
4665 TEST_c_c (casinh, -0.0L, 0x1p-63L, -0.0L, 1.084202172485504434007452800869941711428e-19L),
4666 TEST_c_c (casinh, -0.0L, -0x1p-63L, -0.0L, -1.084202172485504434007452800869941711428e-19L),
4667 TEST_c_c (casinh, 0x1p-63L, 0.0L, 1.084202172485504434007452800869941711424e-19L, 0.0L),
4668 TEST_c_c (casinh, -0x1p-63L, 0.0L, -1.084202172485504434007452800869941711424e-19L, 0.0L),
4669 TEST_c_c (casinh, 0x1p-63L, -0.0L, 1.084202172485504434007452800869941711424e-19L, -0.0L),
4670 TEST_c_c (casinh, -0x1p-63L, -0.0L, -1.084202172485504434007452800869941711424e-19L, -0.0L),
ccc8cadf 4671#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 4672 TEST_c_c (casinh, 0x1.fp-16385L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4673 TEST_c_c (casinh, 0x1.fp-16385L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4674 TEST_c_c (casinh, -0x1.fp-16385L, 0x1.fp-16385L, -8.142593549724601460479922838826119584417e-4933L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4675 TEST_c_c (casinh, -0x1.fp-16385L, -0x1.fp-16385L, -8.142593549724601460479922838826119584417e-4933L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
ccc8cadf
JM		 4676#endif
4677#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 4678 TEST_c_c (casinh, 0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 1.234330349600789959989661887846005659983e-16L, 1.570796326794896419512475791677915736035L),
4679 TEST_c_c (casinh, 0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 1.234330349600789959989661887846005659983e-16L, -1.570796326794896419512475791677915736035L),
4680 TEST_c_c (casinh, -0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, -1.234330349600789959989661887846005659983e-16L, 1.570796326794896419512475791677915736035L),
4681 TEST_c_c (casinh, -0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, -1.234330349600789959989661887846005659983e-16L, -1.570796326794896419512475791677915736035L),
4682 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 8.813735870195430252326093249797835932642e-1L, 1.743152798421049375791483240187377443526e-32L),
4683 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, -8.813735870195430252326093249797835932642e-1L, 1.743152798421049375791483240187377443526e-32L),
4684 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 8.813735870195430252326093249797835932642e-1L, -1.743152798421049375791483240187377443526e-32L),
4685 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, -8.813735870195430252326093249797835932642e-1L, -1.743152798421049375791483240187377443526e-32L),
4686 TEST_c_c (casinh, 0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 3.432186888910770473784103112009399360940e-293L, 1.570796326794896462222075823262245502760L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4687 TEST_c_c (casinh, 0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 3.432186888910770473784103112009399360940e-293L, -1.570796326794896462222075823262245502760L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4688 TEST_c_c (casinh, -0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, -3.432186888910770473784103112009399360940e-293L, 1.570796326794896462222075823262245502760L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4689 TEST_c_c (casinh, -0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, -3.432186888910770473784103112009399360940e-293L, -1.570796326794896462222075823262245502760L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4690 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 8.813735870195430252326093249797835932642e-1L, 3.810492908885321743133304375216641110205e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4691 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, -8.813735870195430252326093249797835932642e-1L, 3.810492908885321743133304375216641110205e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4692 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 8.813735870195430252326093249797835932642e-1L, -3.810492908885321743133304375216641110205e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4693 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, -8.813735870195430252326093249797835932642e-1L, -3.810492908885321743133304375216641110205e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4694 TEST_c_c (casinh, 0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 1.570796326794896462222075823262245502760L),
4695 TEST_c_c (casinh, 0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, -1.570796326794896462222075823262245502760L),
4696 TEST_c_c (casinh, -0.0L, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 1.570796326794896462222075823262245502760L),
4697 TEST_c_c (casinh, -0.0L, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, -1.570796326794896462222075823262245502760L),
4698 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 8.813735870195430252326093249797835932642e-1L, 0.0L),
4699 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, -8.813735870195430252326093249797835932642e-1L, 0.0L),
4700 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 8.813735870195430252326093249797835932642e-1L, -0.0L),
4701 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, -8.813735870195430252326093249797835932642e-1L, -0.0L),
4702#endif
4703 TEST_c_c (casinh, 0x1p-105L, 0.5L, 2.846556599890768890940941645338546615370e-32L, 5.235987755982988730771072305465838140329e-1L),
4704 TEST_c_c (casinh, 0x1p-105L, -0.5L, 2.846556599890768890940941645338546615370e-32L, -5.235987755982988730771072305465838140329e-1L),
4705 TEST_c_c (casinh, -0x1p-105L, 0.5L, -2.846556599890768890940941645338546615370e-32L, 5.235987755982988730771072305465838140329e-1L),
4706 TEST_c_c (casinh, -0x1p-105L, -0.5L, -2.846556599890768890940941645338546615370e-32L, -5.235987755982988730771072305465838140329e-1L),
4707 TEST_c_c (casinh, 0.5L, 0x1p-105L, 4.812118250596034474977589134243684231352e-1L, 2.204933261082751447436996198490110245167e-32L),
4708 TEST_c_c (casinh, -0.5L, 0x1p-105L, -4.812118250596034474977589134243684231352e-1L, 2.204933261082751447436996198490110245167e-32L),
4709 TEST_c_c (casinh, 0.5L, -0x1p-105L, 4.812118250596034474977589134243684231352e-1L, -2.204933261082751447436996198490110245167e-32L),
4710 TEST_c_c (casinh, -0.5L, -0x1p-105L, -4.812118250596034474977589134243684231352e-1L, -2.204933261082751447436996198490110245167e-32L),
4711 TEST_c_c (casinh, 0x1p-105L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 2.465190328815661891911651766508706967729e-32L),
4712 TEST_c_c (casinh, 0x1p-105L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -2.465190328815661891911651766508706967729e-32L),
4713 TEST_c_c (casinh, -0x1p-105L, 0x1p-105L, -2.465190328815661891911651766508706967729e-32L, 2.465190328815661891911651766508706967729e-32L),
4714 TEST_c_c (casinh, -0x1p-105L, -0x1p-105L, -2.465190328815661891911651766508706967729e-32L, -2.465190328815661891911651766508706967729e-32L),
ccc8cadf 4715#ifndef TEST_FLOAT
08198877
JM		 4716 TEST_c_c (casinh, 0x1.fp-1025L, 0x1p-105L, 5.388850751072128349671657362289416093031e-309L, 2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_DOUBLE),
4717 TEST_c_c (casinh, 0x1.fp-1025L, -0x1p-105L, 5.388850751072128349671657362289416093031e-309L, -2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_DOUBLE),
4718 TEST_c_c (casinh, -0x1.fp-1025L, 0x1p-105L, -5.388850751072128349671657362289416093031e-309L, 2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_DOUBLE),
4719 TEST_c_c (casinh, -0x1.fp-1025L, -0x1p-105L, -5.388850751072128349671657362289416093031e-309L, -2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_DOUBLE),
4720 /* Bug 15319: underflow exception may be missing. */
4721 TEST_c_c (casinh, 0x1p-105L, 0x1.fp-1025L, 2.465190328815661891911651766508706967729e-32L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4722 TEST_c_c (casinh, -0x1p-105L, 0x1.fp-1025L, -2.465190328815661891911651766508706967729e-32L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4723 TEST_c_c (casinh, 0x1p-105L, -0x1.fp-1025L, 2.465190328815661891911651766508706967729e-32L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4724 TEST_c_c (casinh, -0x1p-105L, -0x1.fp-1025L, -2.465190328815661891911651766508706967729e-32L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4725#endif
4726 TEST_c_c (casinh, 0.0L, 0x1p-105L, 0.0L, 2.465190328815661891911651766508706967729e-32L),
4727 TEST_c_c (casinh, 0.0L, -0x1p-105L, 0.0L, -2.465190328815661891911651766508706967729e-32L),
4728 TEST_c_c (casinh, -0.0L, 0x1p-105L, -0.0L, 2.465190328815661891911651766508706967729e-32L),
4729 TEST_c_c (casinh, -0.0L, -0x1p-105L, -0.0L, -2.465190328815661891911651766508706967729e-32L),
4730 TEST_c_c (casinh, 0x1p-105L, 0.0L, 2.465190328815661891911651766508706967729e-32L, 0.0L),
4731 TEST_c_c (casinh, -0x1p-105L, 0.0L, -2.465190328815661891911651766508706967729e-32L, 0.0L),
4732 TEST_c_c (casinh, 0x1p-105L, -0.0L, 2.465190328815661891911651766508706967729e-32L, -0.0L),
4733 TEST_c_c (casinh, -0x1p-105L, -0.0L, -2.465190328815661891911651766508706967729e-32L, -0.0L),
ccc8cadf 4734#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 4735 TEST_c_c (casinh, 0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.091004200533850618345330909857103457781e-17L, 1.570796326794896601578502908312986698624L),
4736 TEST_c_c (casinh, 0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.091004200533850618345330909857103457781e-17L, -1.570796326794896601578502908312986698624L),
4737 TEST_c_c (casinh, -0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, -1.091004200533850618345330909857103457781e-17L, 1.570796326794896601578502908312986698624L),
4738 TEST_c_c (casinh, -0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, -1.091004200533850618345330909857103457781e-17L, -1.570796326794896601578502908312986698624L),
4739 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 8.813735870195430252326093249797922409363e-1L, 1.361838123766444824837096281396380300349e-34L),
4740 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, -8.813735870195430252326093249797922409363e-1L, 1.361838123766444824837096281396380300349e-34L),
4741 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 8.813735870195430252326093249797922409363e-1L, -1.361838123766444824837096281396380300349e-34L),
4742 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, -8.813735870195430252326093249797922409363e-1L, -1.361838123766444824837096281396380300349e-34L),
4743 TEST_c_c (casinh, 0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 5.867357004219059108790368268900490184505e-4916L, 1.570796326794896605353533883825294686803L),
4744 TEST_c_c (casinh, 0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 5.867357004219059108790368268900490184505e-4916L, -1.570796326794896605353533883825294686803L),
4745 TEST_c_c (casinh, -0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, -5.867357004219059108790368268900490184505e-4916L, 1.570796326794896605353533883825294686803L),
4746 TEST_c_c (casinh, -0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, -5.867357004219059108790368268900490184505e-4916L, -1.570796326794896605353533883825294686803L),
4747 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 8.813735870195430252326093249797922409363e-1L, 5.757683115456107044131264955348449231681e-4933L, UNDERFLOW_EXCEPTION),
4748 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, -8.813735870195430252326093249797922409363e-1L, 5.757683115456107044131264955348449231681e-4933L, UNDERFLOW_EXCEPTION),
4749 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 8.813735870195430252326093249797922409363e-1L, -5.757683115456107044131264955348449231681e-4933L, UNDERFLOW_EXCEPTION),
4750 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, -8.813735870195430252326093249797922409363e-1L, -5.757683115456107044131264955348449231681e-4933L, UNDERFLOW_EXCEPTION),
4751 TEST_c_c (casinh, 0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 1.570796326794896605353533883825294686803L),
4752 TEST_c_c (casinh, 0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, -1.570796326794896605353533883825294686803L),
4753 TEST_c_c (casinh, -0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 1.570796326794896605353533883825294686803L),
4754 TEST_c_c (casinh, -0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, -1.570796326794896605353533883825294686803L),
4755 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 8.813735870195430252326093249797922409363e-1L, 0.0L),
4756 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, -8.813735870195430252326093249797922409363e-1L, 0.0L),
4757 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 8.813735870195430252326093249797922409363e-1L, -0.0L),
4758 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, -8.813735870195430252326093249797922409363e-1L, -0.0L),
4759#endif
4760 TEST_c_c (casinh, 0x1p-112L, 0.5L, 2.223872343664663196047610660420739543258e-34L, 5.235987755982988730771072305465838140329e-1L),
4761 TEST_c_c (casinh, 0x1p-112L, -0.5L, 2.223872343664663196047610660420739543258e-34L, -5.235987755982988730771072305465838140329e-1L),
4762 TEST_c_c (casinh, -0x1p-112L, 0.5L, -2.223872343664663196047610660420739543258e-34L, 5.235987755982988730771072305465838140329e-1L),
4763 TEST_c_c (casinh, -0x1p-112L, -0.5L, -2.223872343664663196047610660420739543258e-34L, -5.235987755982988730771072305465838140329e-1L),
4764 TEST_c_c (casinh, 0.5L, 0x1p-112L, 4.812118250596034474977589134243684231352e-1L, 1.722604110220899568310153280070398629037e-34L),
4765 TEST_c_c (casinh, -0.5L, 0x1p-112L, -4.812118250596034474977589134243684231352e-1L, 1.722604110220899568310153280070398629037e-34L),
4766 TEST_c_c (casinh, 0.5L, -0x1p-112L, 4.812118250596034474977589134243684231352e-1L, -1.722604110220899568310153280070398629037e-34L),
4767 TEST_c_c (casinh, -0.5L, -0x1p-112L, -4.812118250596034474977589134243684231352e-1L, -1.722604110220899568310153280070398629037e-34L),
4768 TEST_c_c (casinh, 0x1p-112L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.925929944387235853055977942584927318538e-34L),
4769 TEST_c_c (casinh, 0x1p-112L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.925929944387235853055977942584927318538e-34L),
4770 TEST_c_c (casinh, -0x1p-112L, 0x1p-112L, -1.925929944387235853055977942584927318538e-34L, 1.925929944387235853055977942584927318538e-34L),
4771 TEST_c_c (casinh, -0x1p-112L, -0x1p-112L, -1.925929944387235853055977942584927318538e-34L, -1.925929944387235853055977942584927318538e-34L),
ccc8cadf 4772#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 4773 TEST_c_c (casinh, 0x1.fp-16385L, 0x1p-112L, 8.142593549724601460479922838826119584417e-4933L, 1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4774 TEST_c_c (casinh, 0x1.fp-16385L, -0x1p-112L, 8.142593549724601460479922838826119584417e-4933L, -1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4775 TEST_c_c (casinh, -0x1.fp-16385L, 0x1p-112L, -8.142593549724601460479922838826119584417e-4933L, 1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4776 TEST_c_c (casinh, -0x1.fp-16385L, -0x1p-112L, -8.142593549724601460479922838826119584417e-4933L, -1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4777 TEST_c_c (casinh, 0x1p-112L, 0x1.fp-16385L, 1.925929944387235853055977942584927318538e-34L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4778 TEST_c_c (casinh, -0x1p-112L, 0x1.fp-16385L, -1.925929944387235853055977942584927318538e-34L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4779 TEST_c_c (casinh, 0x1p-112L, -0x1.fp-16385L, 1.925929944387235853055977942584927318538e-34L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4780 TEST_c_c (casinh, -0x1p-112L, -0x1.fp-16385L, -1.925929944387235853055977942584927318538e-34L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4781#endif
4782 TEST_c_c (casinh, 0.0L, 0x1p-112L, 0.0L, 1.925929944387235853055977942584927318538e-34L),
4783 TEST_c_c (casinh, 0.0L, -0x1p-112L, 0.0L, -1.925929944387235853055977942584927318538e-34L),
4784 TEST_c_c (casinh, -0.0L, 0x1p-112L, -0.0L, 1.925929944387235853055977942584927318538e-34L),
4785 TEST_c_c (casinh, -0.0L, -0x1p-112L, -0.0L, -1.925929944387235853055977942584927318538e-34L),
4786 TEST_c_c (casinh, 0x1p-112L, 0.0L, 1.925929944387235853055977942584927318538e-34L, 0.0L),
4787 TEST_c_c (casinh, -0x1p-112L, 0.0L, -1.925929944387235853055977942584927318538e-34L, 0.0L),
4788 TEST_c_c (casinh, 0x1p-112L, -0.0L, 1.925929944387235853055977942584927318538e-34L, -0.0L),
4789 TEST_c_c (casinh, -0x1p-112L, -0.0L, -1.925929944387235853055977942584927318538e-34L, -0.0L),
4790
4791 TEST_c_c (casinh, 0.75L, 1.25L, 1.03171853444778027336364058631006594L, 0.911738290968487636358489564316731207L),
4792 TEST_c_c (casinh, -2, -3, -1.9686379257930962917886650952454982L, -0.96465850440760279204541105949953237L),
4793 END_DATA (casinh)
4794 };
8847214f
UD		 4795
4796static void
08198877 4797casinh_test (void)
8847214f 4798{
aaca11d8 4799 errno = 0;
08198877 4800 FUNC(casinh) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD		 4801 if (errno == ENOSYS)
4802 /* Function not implemented. */
4803 return;
4804
08198877
JM		 4805 START (casinh);
4806 RUN_TEST_LOOP_c_c (casinh, casinh_test_data, );
4807 END (casinh, complex);
4808}
4809
8847214f 4810
08198877
JM		 4811static const struct test_c_c_data catan_test_data[] =
4812 {
4813 START_DATA (catan),
4814 TEST_c_c (catan, 0, 0, 0, 0),
4815 TEST_c_c (catan, minus_zero, 0, minus_zero, 0),
4816 TEST_c_c (catan, 0, minus_zero, 0, minus_zero),
4817 TEST_c_c (catan, minus_zero, minus_zero, minus_zero, minus_zero),
4818
4819 TEST_c_c (catan, 1.0L, plus_zero, M_PI_4l, plus_zero),
4820 TEST_c_c (catan, 1.0L, minus_zero, M_PI_4l, minus_zero),
4821 TEST_c_c (catan, -1.0L, plus_zero, -M_PI_4l, plus_zero),
4822 TEST_c_c (catan, -1.0L, minus_zero, -M_PI_4l, minus_zero),
4823 TEST_c_c (catan, plus_zero, 1.0L, plus_zero, plus_infty, DIVIDE_BY_ZERO_EXCEPTION),
4824 TEST_c_c (catan, minus_zero, 1.0L, minus_zero, plus_infty, DIVIDE_BY_ZERO_EXCEPTION),
4825 TEST_c_c (catan, plus_zero, -1.0L, plus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
4826 TEST_c_c (catan, minus_zero, -1.0L, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
4827
4828 TEST_c_c (catan, plus_infty, plus_infty, M_PI_2l, 0),
4829 TEST_c_c (catan, plus_infty, minus_infty, M_PI_2l, minus_zero),
4830 TEST_c_c (catan, minus_infty, plus_infty, -M_PI_2l, 0),
4831 TEST_c_c (catan, minus_infty, minus_infty, -M_PI_2l, minus_zero),
4832
4833
4834 TEST_c_c (catan, plus_infty, -10.0, M_PI_2l, minus_zero),
4835 TEST_c_c (catan, minus_infty, -10.0, -M_PI_2l, minus_zero),
4836 TEST_c_c (catan, plus_infty, minus_zero, M_PI_2l, minus_zero),
4837 TEST_c_c (catan, minus_infty, minus_zero, -M_PI_2l, minus_zero),
4838 TEST_c_c (catan, plus_infty, 0.0, M_PI_2l, 0),
4839 TEST_c_c (catan, minus_infty, 0.0, -M_PI_2l, 0),
4840 TEST_c_c (catan, plus_infty, 0.1L, M_PI_2l, 0),
4841 TEST_c_c (catan, minus_infty, 0.1L, -M_PI_2l, 0),
4842
4843 TEST_c_c (catan, 0.0, minus_infty, M_PI_2l, minus_zero),
4844 TEST_c_c (catan, minus_zero, minus_infty, -M_PI_2l, minus_zero),
4845 TEST_c_c (catan, 100.0, minus_infty, M_PI_2l, minus_zero),
4846 TEST_c_c (catan, -100.0, minus_infty, -M_PI_2l, minus_zero),
4847
4848 TEST_c_c (catan, 0.0, plus_infty, M_PI_2l, 0),
4849 TEST_c_c (catan, minus_zero, plus_infty, -M_PI_2l, 0),
4850 TEST_c_c (catan, 0.5, plus_infty, M_PI_2l, 0),
4851 TEST_c_c (catan, -0.5, plus_infty, -M_PI_2l, 0),
4852
4853 TEST_c_c (catan, qnan_value, 0.0, qnan_value, 0),
4854 TEST_c_c (catan, qnan_value, minus_zero, qnan_value, minus_zero),
4855
4856 TEST_c_c (catan, qnan_value, plus_infty, qnan_value, 0),
4857 TEST_c_c (catan, qnan_value, minus_infty, qnan_value, minus_zero),
4858
4859 TEST_c_c (catan, 0.0, qnan_value, qnan_value, qnan_value),
4860 TEST_c_c (catan, minus_zero, qnan_value, qnan_value, qnan_value),
4861
4862 TEST_c_c (catan, plus_infty, qnan_value, M_PI_2l, 0, IGNORE_ZERO_INF_SIGN),
4863 TEST_c_c (catan, minus_infty, qnan_value, -M_PI_2l, 0, IGNORE_ZERO_INF_SIGN),
4864
4865 TEST_c_c (catan, qnan_value, 10.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4866 TEST_c_c (catan, qnan_value, -10.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4867
4868 TEST_c_c (catan, 0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4869 TEST_c_c (catan, -0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4870
4871 TEST_c_c (catan, qnan_value, qnan_value, qnan_value, qnan_value),
4872
4873 TEST_c_c (catan, 0x1p50L, 0.0L, 1.570796326794895731052901991514519103193L, 0.0L),
4874 TEST_c_c (catan, 0x1p50L, -0.0L, 1.570796326794895731052901991514519103193L, -0.0L),
4875 TEST_c_c (catan, -0x1p50L, 0.0L, -1.570796326794895731052901991514519103193L, 0.0L),
4876 TEST_c_c (catan, -0x1p50L, -0.0L, -1.570796326794895731052901991514519103193L, -0.0L),
4877 TEST_c_c (catan, 0.0L, 0x1p50L, 1.570796326794896619231321691639751442099L, 8.881784197001252323389053344728897997441e-16L),
4878 TEST_c_c (catan, -0.0L, 0x1p50L, -1.570796326794896619231321691639751442099L, 8.881784197001252323389053344728897997441e-16L),
4879 TEST_c_c (catan, 0.0L, -0x1p50L, 1.570796326794896619231321691639751442099L, -8.881784197001252323389053344728897997441e-16L),
4880 TEST_c_c (catan, -0.0L, -0x1p50L, -1.570796326794896619231321691639751442099L, -8.881784197001252323389053344728897997441e-16L),
2f38fbfe 4881#ifndef TEST_FLOAT
08198877
JM		 4882 TEST_c_c (catan, 0x1p500L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4883 TEST_c_c (catan, 0x1p500L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4884 TEST_c_c (catan, -0x1p500L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4885 TEST_c_c (catan, -0x1p500L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4886 TEST_c_c (catan, 0.0L, 0x1p500L, 1.570796326794896619231321691639751442099L, 3.054936363499604682051979393213617699789e-151L),
4887 TEST_c_c (catan, -0.0L, 0x1p500L, -1.570796326794896619231321691639751442099L, 3.054936363499604682051979393213617699789e-151L),
4888 TEST_c_c (catan, 0.0L, -0x1p500L, 1.570796326794896619231321691639751442099L, -3.054936363499604682051979393213617699789e-151L),
4889 TEST_c_c (catan, -0.0L, -0x1p500L, -1.570796326794896619231321691639751442099L, -3.054936363499604682051979393213617699789e-151L),
2f38fbfe
JM		 4890#endif
4891#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 4892 TEST_c_c (catan, 0x1p5000L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4893 TEST_c_c (catan, 0x1p5000L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4894 TEST_c_c (catan, -0x1p5000L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4895 TEST_c_c (catan, -0x1p5000L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4896 TEST_c_c (catan, 0.0L, 0x1p5000L, 1.570796326794896619231321691639751442099L, 7.079811261048172892385615158694057552948e-1506L),
4897 TEST_c_c (catan, -0.0L, 0x1p5000L, -1.570796326794896619231321691639751442099L, 7.079811261048172892385615158694057552948e-1506L),
4898 TEST_c_c (catan, 0.0L, -0x1p5000L, 1.570796326794896619231321691639751442099L, -7.079811261048172892385615158694057552948e-1506L),
4899 TEST_c_c (catan, -0.0L, -0x1p5000L, -1.570796326794896619231321691639751442099L, -7.079811261048172892385615158694057552948e-1506L),
4900#endif
4901 TEST_c_c (catan, 0x1p63L, 0.5L, 1.570796326794896619122901474391200998698L, 5.877471754111437539843682686111228389007e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4902 TEST_c_c (catan, 0x1p63L, -0.5L, 1.570796326794896619122901474391200998698L, -5.877471754111437539843682686111228389007e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4903 TEST_c_c (catan, -0x1p63L, 0.5L, -1.570796326794896619122901474391200998698L, 5.877471754111437539843682686111228389007e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4904 TEST_c_c (catan, -0x1p63L, -0.5L, -1.570796326794896619122901474391200998698L, -5.877471754111437539843682686111228389007e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4905 TEST_c_c (catan, 0.5L, 0x1p63L, 1.570796326794896619231321691639751442093L, 1.084202172485504434007452800869941711427e-19L),
4906 TEST_c_c (catan, -0.5L, 0x1p63L, -1.570796326794896619231321691639751442093L, 1.084202172485504434007452800869941711427e-19L),
4907 TEST_c_c (catan, 0.5L, -0x1p63L, 1.570796326794896619231321691639751442093L, -1.084202172485504434007452800869941711427e-19L),
4908 TEST_c_c (catan, -0.5L, -0x1p63L, -1.570796326794896619231321691639751442093L, -1.084202172485504434007452800869941711427e-19L),
9457fd95 4909#ifndef TEST_FLOAT
08198877
JM		 4910 TEST_c_c (catan, 0x1p511L, 0.5L, 1.570796326794896619231321691639751442099L, 1.112536929253600691545116358666202032110e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4911 TEST_c_c (catan, 0x1p511L, -0.5L, 1.570796326794896619231321691639751442099L, -1.112536929253600691545116358666202032110e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4912 TEST_c_c (catan, -0x1p511L, 0.5L, -1.570796326794896619231321691639751442099L, 1.112536929253600691545116358666202032110e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4913 TEST_c_c (catan, -0x1p511L, -0.5L, -1.570796326794896619231321691639751442099L, -1.112536929253600691545116358666202032110e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4914 TEST_c_c (catan, 0.5L, 0x1p511L, 1.570796326794896619231321691639751442099L, 1.491668146240041348658193063092586767475e-154L),
4915 TEST_c_c (catan, -0.5L, 0x1p511L, -1.570796326794896619231321691639751442099L, 1.491668146240041348658193063092586767475e-154L),
4916 TEST_c_c (catan, 0.5L, -0x1p511L, 1.570796326794896619231321691639751442099L, -1.491668146240041348658193063092586767475e-154L),
4917 TEST_c_c (catan, -0.5L, -0x1p511L, -1.570796326794896619231321691639751442099L, -1.491668146240041348658193063092586767475e-154L),
9457fd95
JM		 4918#endif
4919#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 4920 TEST_c_c (catan, 0x1p8191L, 0.5L, 1.570796326794896619231321691639751442099L, 1.681051571556046753131338908660876301299e-4932L, UNDERFLOW_EXCEPTION),
4921 TEST_c_c (catan, 0x1p8191L, -0.5L, 1.570796326794896619231321691639751442099L, -1.681051571556046753131338908660876301299e-4932L, UNDERFLOW_EXCEPTION),
4922 TEST_c_c (catan, -0x1p8191L, 0.5L, -1.570796326794896619231321691639751442099L, 1.681051571556046753131338908660876301299e-4932L, UNDERFLOW_EXCEPTION),
4923 TEST_c_c (catan, -0x1p8191L, -0.5L, -1.570796326794896619231321691639751442099L, -1.681051571556046753131338908660876301299e-4932L, UNDERFLOW_EXCEPTION),
4924 TEST_c_c (catan, 0.5L, 0x1p8191L, 1.570796326794896619231321691639751442099L, 1.833603867554847165621412392048483165956e-2466L),
4925 TEST_c_c (catan, -0.5L, 0x1p8191L, -1.570796326794896619231321691639751442099L, 1.833603867554847165621412392048483165956e-2466L),
4926 TEST_c_c (catan, 0.5L, -0x1p8191L, 1.570796326794896619231321691639751442099L, -1.833603867554847165621412392048483165956e-2466L),
4927 TEST_c_c (catan, -0.5L, -0x1p8191L, -1.570796326794896619231321691639751442099L, -1.833603867554847165621412392048483165956e-2466L),
4928#endif
4929 TEST_c_c (catan, 0x1p100L, 0.0L, 1.570796326794896619231321691638962581193L, 0.0L),
4930 TEST_c_c (catan, 0x1p100L, -0.0L, 1.570796326794896619231321691638962581193L, -0.0L),
4931 TEST_c_c (catan, -0x1p100L, 0.0L, -1.570796326794896619231321691638962581193L, 0.0L),
4932 TEST_c_c (catan, -0x1p100L, -0.0L, -1.570796326794896619231321691638962581193L, -0.0L),
4933 TEST_c_c (catan, 0.0L, 0x1p100L, 1.570796326794896619231321691639751442099L, 7.888609052210118054117285652827862296732e-31L),
4934 TEST_c_c (catan, -0.0L, 0x1p100L, -1.570796326794896619231321691639751442099L, 7.888609052210118054117285652827862296732e-31L),
4935 TEST_c_c (catan, 0.0L, -0x1p100L, 1.570796326794896619231321691639751442099L, -7.888609052210118054117285652827862296732e-31L),
4936 TEST_c_c (catan, -0.0L, -0x1p100L, -1.570796326794896619231321691639751442099L, -7.888609052210118054117285652827862296732e-31L),
4937 TEST_c_c (catan, 0x1.fp127L, 0.0L, 1.570796326794896619231321691639751442096L, 0.0L),
4938 TEST_c_c (catan, 0x1.fp127L, -0.0L, 1.570796326794896619231321691639751442096L, -0.0L),
4939 TEST_c_c (catan, -0x1.fp127L, 0.0L, -1.570796326794896619231321691639751442096L, 0.0L),
4940 TEST_c_c (catan, -0x1.fp127L, -0.0L, -1.570796326794896619231321691639751442096L, -0.0L),
4941 TEST_c_c (catan, 0.0L, 0x1.fp127L, 1.570796326794896619231321691639751442099L, 3.033533808573645181854803967025150136306e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4942 TEST_c_c (catan, -0.0L, 0x1.fp127L, -1.570796326794896619231321691639751442099L, 3.033533808573645181854803967025150136306e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4943 TEST_c_c (catan, 0.0L, -0x1.fp127L, 1.570796326794896619231321691639751442099L, -3.033533808573645181854803967025150136306e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4944 TEST_c_c (catan, -0.0L, -0x1.fp127L, -1.570796326794896619231321691639751442099L, -3.033533808573645181854803967025150136306e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4945 TEST_c_c (catan, 0x1.fp127L, 0x1.fp127L, 1.570796326794896619231321691639751442097L, 1.516766904286822590927401983512575068153e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4946 TEST_c_c (catan, 0x1.fp127L, -0x1.fp127L, 1.570796326794896619231321691639751442097L, -1.516766904286822590927401983512575068153e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4947 TEST_c_c (catan, -0x1.fp127L, 0x1.fp127L, -1.570796326794896619231321691639751442097L, 1.516766904286822590927401983512575068153e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4948 TEST_c_c (catan, -0x1.fp127L, -0x1.fp127L, -1.570796326794896619231321691639751442097L, -1.516766904286822590927401983512575068153e-39L, UNDERFLOW_EXCEPTION_FLOAT),
5b4217d7 4949#ifndef TEST_FLOAT
08198877
JM		 4950 TEST_c_c (catan, 0x1p900L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4951 TEST_c_c (catan, 0x1p900L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4952 TEST_c_c (catan, -0x1p900L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4953 TEST_c_c (catan, -0x1p900L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4954 TEST_c_c (catan, 0.0L, 0x1p900L, 1.570796326794896619231321691639751442099L, 1.183052186166774710972751597518026531652e-271L),
4955 TEST_c_c (catan, -0.0L, 0x1p900L, -1.570796326794896619231321691639751442099L, 1.183052186166774710972751597518026531652e-271L),
4956 TEST_c_c (catan, 0.0L, -0x1p900L, 1.570796326794896619231321691639751442099L, -1.183052186166774710972751597518026531652e-271L),
4957 TEST_c_c (catan, -0.0L, -0x1p900L, -1.570796326794896619231321691639751442099L, -1.183052186166774710972751597518026531652e-271L),
4958 TEST_c_c (catan, 0x1.fp1023L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4959 TEST_c_c (catan, 0x1.fp1023L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4960 TEST_c_c (catan, -0x1.fp1023L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4961 TEST_c_c (catan, -0x1.fp1023L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4962 TEST_c_c (catan, 0.0L, 0x1.fp1023L, 1.570796326794896619231321691639751442099L, 5.742126086470197117652213464083623391533e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4963 TEST_c_c (catan, -0.0L, 0x1.fp1023L, -1.570796326794896619231321691639751442099L, 5.742126086470197117652213464083623391533e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4964 TEST_c_c (catan, 0.0L, -0x1.fp1023L, 1.570796326794896619231321691639751442099L, -5.742126086470197117652213464083623391533e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4965 TEST_c_c (catan, -0.0L, -0x1.fp1023L, -1.570796326794896619231321691639751442099L, -5.742126086470197117652213464083623391533e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4966 TEST_c_c (catan, 0x1.fp1023L, 0x1.fp1023L, 1.570796326794896619231321691639751442099L, 2.871063043235098558826106732041811695767e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4967 TEST_c_c (catan, 0x1.fp1023L, -0x1.fp1023L, 1.570796326794896619231321691639751442099L, -2.871063043235098558826106732041811695767e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4968 TEST_c_c (catan, -0x1.fp1023L, 0x1.fp1023L, -1.570796326794896619231321691639751442099L, 2.871063043235098558826106732041811695767e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4969 TEST_c_c (catan, -0x1.fp1023L, -0x1.fp1023L, -1.570796326794896619231321691639751442099L, -2.871063043235098558826106732041811695767e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
5b4217d7
JM		 4970#endif
4971#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 4972 TEST_c_c (catan, 0x1p10000L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4973 TEST_c_c (catan, 0x1p10000L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4974 TEST_c_c (catan, -0x1p10000L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4975 TEST_c_c (catan, -0x1p10000L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4976 TEST_c_c (catan, 0.0L, 0x1p10000L, 1.570796326794896619231321691639751442099L, 5.012372749206452009297555933742977749322e-3011L),
4977 TEST_c_c (catan, -0.0L, 0x1p10000L, -1.570796326794896619231321691639751442099L, 5.012372749206452009297555933742977749322e-3011L),
4978 TEST_c_c (catan, 0.0L, -0x1p10000L, 1.570796326794896619231321691639751442099L, -5.012372749206452009297555933742977749322e-3011L),
4979 TEST_c_c (catan, -0.0L, -0x1p10000L, -1.570796326794896619231321691639751442099L, -5.012372749206452009297555933742977749322e-3011L),
4980 TEST_c_c (catan, 0x1.fp16383L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4981 TEST_c_c (catan, 0x1.fp16383L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4982 TEST_c_c (catan, -0x1.fp16383L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4983 TEST_c_c (catan, -0x1.fp16383L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4984 TEST_c_c (catan, 0.0L, 0x1.fp16383L, 1.570796326794896619231321691639751442099L, 8.676395208031209048419813722120651877672e-4933L, UNDERFLOW_EXCEPTION),
4985 TEST_c_c (catan, -0.0L, 0x1.fp16383L, -1.570796326794896619231321691639751442099L, 8.676395208031209048419813722120651877672e-4933L, UNDERFLOW_EXCEPTION),
4986 TEST_c_c (catan, 0.0L, -0x1.fp16383L, 1.570796326794896619231321691639751442099L, -8.676395208031209048419813722120651877672e-4933L, UNDERFLOW_EXCEPTION),
4987 TEST_c_c (catan, -0.0L, -0x1.fp16383L, -1.570796326794896619231321691639751442099L, -8.676395208031209048419813722120651877672e-4933L, UNDERFLOW_EXCEPTION),
4988 TEST_c_c (catan, 0x1.fp16383L, 0x1.fp16383L, 1.570796326794896619231321691639751442099L, 4.338197604015604524209906861060325938836e-4933L, UNDERFLOW_EXCEPTION),
4989 TEST_c_c (catan, 0x1.fp16383L, -0x1.fp16383L, 1.570796326794896619231321691639751442099L, -4.338197604015604524209906861060325938836e-4933L, UNDERFLOW_EXCEPTION),
4990 TEST_c_c (catan, -0x1.fp16383L, 0x1.fp16383L, -1.570796326794896619231321691639751442099L, 4.338197604015604524209906861060325938836e-4933L, UNDERFLOW_EXCEPTION),
4991 TEST_c_c (catan, -0x1.fp16383L, -0x1.fp16383L, -1.570796326794896619231321691639751442099L, -4.338197604015604524209906861060325938836e-4933L, UNDERFLOW_EXCEPTION),
4992#endif
4993 TEST_c_c (catan, 0x1p-13L, 1.0L, 7.854286809755354140031716771044626356262e-1L, 4.852030264850939738801379894163661227127L),
4994 TEST_c_c (catan, 0x1p-13L, -1.0L, 7.854286809755354140031716771044626356262e-1L, -4.852030264850939738801379894163661227127L),
4995 TEST_c_c (catan, -0x1p-13L, 1.0L, -7.854286809755354140031716771044626356262e-1L, 4.852030264850939738801379894163661227127L),
4996 TEST_c_c (catan, -0x1p-13L, -1.0L, -7.854286809755354140031716771044626356262e-1L, -4.852030264850939738801379894163661227127L),
4997 TEST_c_c (catan, 1.0L, 0x1p-13L, 7.853981671227386080775748393881580082970e-1L, 6.103515609841754902688560615027452023669e-5L),
4998 TEST_c_c (catan, -1.0L, 0x1p-13L, -7.853981671227386080775748393881580082970e-1L, 6.103515609841754902688560615027452023669e-5L),
4999 TEST_c_c (catan, 1.0L, -0x1p-13L, 7.853981671227386080775748393881580082970e-1L, -6.103515609841754902688560615027452023669e-5L),
5000 TEST_c_c (catan, -1.0L, -0x1p-13L, -7.853981671227386080775748393881580082970e-1L, -6.103515609841754902688560615027452023669e-5L),
5001 TEST_c_c (catan, 0x1p-27L, 1.0L, 7.853981652600934588466178684534110069553e-1L, 9.704060527839234335310696652368086117807L),
5002 TEST_c_c (catan, 0x1p-27L, -1.0L, 7.853981652600934588466178684534110069553e-1L, -9.704060527839234335310696652368086117807L),
5003 TEST_c_c (catan, -0x1p-27L, 1.0L, -7.853981652600934588466178684534110069553e-1L, 9.704060527839234335310696652368086117807L),
5004 TEST_c_c (catan, -0x1p-27L, -1.0L, -7.853981652600934588466178684534110069553e-1L, -9.704060527839234335310696652368086117807L),
5005 TEST_c_c (catan, 1.0L, 0x1p-27L, 7.853981633974483234934486536343324763447e-1L, 3.725290298461914028034141143623846306386e-9L),
5006 TEST_c_c (catan, -1.0L, 0x1p-27L, -7.853981633974483234934486536343324763447e-1L, 3.725290298461914028034141143623846306386e-9L),
5007 TEST_c_c (catan, 1.0L, -0x1p-27L, 7.853981633974483234934486536343324763447e-1L, -3.725290298461914028034141143623846306386e-9L),
5008 TEST_c_c (catan, -1.0L, -0x1p-27L, -7.853981633974483234934486536343324763447e-1L, -3.725290298461914028034141143623846306386e-9L),
5009 TEST_c_c (catan, 0x1p-33L, 1.0L, 7.853981634265521400723945494331241018449e-1L, 1.178350206951907026009379309773625595762e1L),
5010 TEST_c_c (catan, 0x1p-33L, -1.0L, 7.853981634265521400723945494331241018449e-1L, -1.178350206951907026009379309773625595762e1L),
5011 TEST_c_c (catan, -0x1p-33L, 1.0L, -7.853981634265521400723945494331241018449e-1L, 1.178350206951907026009379309773625595762e1L),
5012 TEST_c_c (catan, -0x1p-33L, -1.0L, -7.853981634265521400723945494331241018449e-1L, -1.178350206951907026009379309773625595762e1L),
5013 TEST_c_c (catan, 1.0L, 0x1p-33L, 7.853981633974483096190489776088929224056e-1L, 5.820766091346740722643102318246316469910e-11L),
5014 TEST_c_c (catan, -1.0L, 0x1p-33L, -7.853981633974483096190489776088929224056e-1L, 5.820766091346740722643102318246316469910e-11L),
5015 TEST_c_c (catan, 1.0L, -0x1p-33L, 7.853981633974483096190489776088929224056e-1L, -5.820766091346740722643102318246316469910e-11L),
5016 TEST_c_c (catan, -1.0L, -0x1p-33L, -7.853981633974483096190489776088929224056e-1L, -5.820766091346740722643102318246316469910e-11L),
5017 TEST_c_c (catan, 0x1p-54L, 1.0L, 7.853981633974483234934486536343324763447e-1L, 1.906154746539849600897388334009985581467e1L),
5018 TEST_c_c (catan, 0x1p-54L, -1.0L, 7.853981633974483234934486536343324763447e-1L, -1.906154746539849600897388334009985581467e1L),
5019 TEST_c_c (catan, -0x1p-54L, 1.0L, -7.853981633974483234934486536343324763447e-1L, 1.906154746539849600897388334009985581467e1L),
5020 TEST_c_c (catan, -0x1p-54L, -1.0L, -7.853981633974483234934486536343324763447e-1L, -1.906154746539849600897388334009985581467e1L),
5021 TEST_c_c (catan, 1.0L, 0x1p-54L, 7.853981633974483096156608458198764914213e-1L, 2.775557561562891351059079170227049355775e-17L),
5022 TEST_c_c (catan, -1.0L, 0x1p-54L, -7.853981633974483096156608458198764914213e-1L, 2.775557561562891351059079170227049355775e-17L),
5023 TEST_c_c (catan, 1.0L, -0x1p-54L, 7.853981633974483096156608458198764914213e-1L, -2.775557561562891351059079170227049355775e-17L),
5024 TEST_c_c (catan, -1.0L, -0x1p-54L, -7.853981633974483096156608458198764914213e-1L, -2.775557561562891351059079170227049355775e-17L),
5025 TEST_c_c (catan, 0x1p-57L, 1.0L, 7.853981633974483113503843217966828154612e-1L, 2.010126823623841397309973152228712047720e1L),
5026 TEST_c_c (catan, 0x1p-57L, -1.0L, 7.853981633974483113503843217966828154612e-1L, -2.010126823623841397309973152228712047720e1L),
5027 TEST_c_c (catan, -0x1p-57L, 1.0L, -7.853981633974483113503843217966828154612e-1L, 2.010126823623841397309973152228712047720e1L),
5028 TEST_c_c (catan, -0x1p-57L, -1.0L, -7.853981633974483113503843217966828154612e-1L, -2.010126823623841397309973152228712047720e1L),
5029 TEST_c_c (catan, 1.0L, 0x1p-57L, 7.853981633974483096156608458198757330864e-1L, 3.469446951953614188823848962783813448721e-18L),
5030 TEST_c_c (catan, -1.0L, 0x1p-57L, -7.853981633974483096156608458198757330864e-1L, 3.469446951953614188823848962783813448721e-18L),
5031 TEST_c_c (catan, 1.0L, -0x1p-57L, 7.853981633974483096156608458198757330864e-1L, -3.469446951953614188823848962783813448721e-18L),
5032 TEST_c_c (catan, -1.0L, -0x1p-57L, -7.853981633974483096156608458198757330864e-1L, -3.469446951953614188823848962783813448721e-18L),
5033 TEST_c_c (catan, 0x1p-13L, 0x1.000002p0L, 7.859169620684960844300240092596908675974e-1L, 4.852030056234795712498957387213592193975L),
5034 TEST_c_c (catan, 0x1p-13L, -0x1.000002p0L, 7.859169620684960844300240092596908675974e-1L, -4.852030056234795712498957387213592193975L),
5035 TEST_c_c (catan, -0x1p-13L, 0x1.000002p0L, -7.859169620684960844300240092596908675974e-1L, 4.852030056234795712498957387213592193975L),
5036 TEST_c_c (catan, -0x1p-13L, -0x1.000002p0L, -7.859169620684960844300240092596908675974e-1L, -4.852030056234795712498957387213592193975L),
5037 TEST_c_c (catan, 0x1.000002p0L, 0x1p-13L, 7.853982267273793866654490522673596014524e-1L, 6.103514882246036852433556327261700380577e-5L),
5038 TEST_c_c (catan, -0x1.000002p0L, 0x1p-13L, -7.853982267273793866654490522673596014524e-1L, 6.103514882246036852433556327261700380577e-5L),
5039 TEST_c_c (catan, 0x1.000002p0L, -0x1p-13L, 7.853982267273793866654490522673596014524e-1L, -6.103514882246036852433556327261700380577e-5L),
5040 TEST_c_c (catan, -0x1.000002p0L, -0x1p-13L, -7.853982267273793866654490522673596014524e-1L, -6.103514882246036852433556327261700380577e-5L),
5041 TEST_c_c (catan, 0x1p-13L, 0x0.ffffffp0L, 7.851845403708474595909269086711426246675e-1L, 4.852030190345140708455871037447717761868L),
5042 TEST_c_c (catan, 0x1p-13L, -0x0.ffffffp0L, 7.851845403708474595909269086711426246675e-1L, -4.852030190345140708455871037447717761868L),
5043 TEST_c_c (catan, -0x1p-13L, 0x0.ffffffp0L, -7.851845403708474595909269086711426246675e-1L, 4.852030190345140708455871037447717761868L),
5044 TEST_c_c (catan, -0x1p-13L, -0x0.ffffffp0L, -7.851845403708474595909269086711426246675e-1L, -4.852030190345140708455871037447717761868L),
5045 TEST_c_c (catan, 0x0.ffffffp0L, 0x1p-13L, 7.853981373204155542484315721351697277336e-1L, 6.103515973639646453881721999956617260502e-5L),
5046 TEST_c_c (catan, -0x0.ffffffp0L, 0x1p-13L, -7.853981373204155542484315721351697277336e-1L, 6.103515973639646453881721999956617260502e-5L),
5047 TEST_c_c (catan, 0x0.ffffffp0L, -0x1p-13L, 7.853981373204155542484315721351697277336e-1L, -6.103515973639646453881721999956617260502e-5L),
5048 TEST_c_c (catan, -0x0.ffffffp0L, -0x1p-13L, -7.853981373204155542484315721351697277336e-1L, -6.103515973639646453881721999956617260502e-5L),
caf84319 5049#ifndef TEST_FLOAT
08198877
JM		 5050 TEST_c_c (catan, 0x1p-27L, 0x1.0000000000001p0L, 7.853981801612546526942695000283242525531e-1L, 9.704060527839234168777242958594699810015L),
5051 TEST_c_c (catan, 0x1p-27L, -0x1.0000000000001p0L, 7.853981801612546526942695000283242525531e-1L, -9.704060527839234168777242958594699810015L),
5052 TEST_c_c (catan, -0x1p-27L, 0x1.0000000000001p0L, -7.853981801612546526942695000283242525531e-1L, 9.704060527839234168777242958594699810015L),
5053 TEST_c_c (catan, -0x1p-27L, -0x1.0000000000001p0L, -7.853981801612546526942695000283242525531e-1L, -9.704060527839234168777242958594699810015L),
5054 TEST_c_c (catan, 0x1.0000000000001p0L, 0x1p-27L, 7.853981633974484345157511161499711112683e-1L, 3.725290298461913200853528590596263270474e-9L),
5055 TEST_c_c (catan, -0x1.0000000000001p0L, 0x1p-27L, -7.853981633974484345157511161499711112683e-1L, 3.725290298461913200853528590596263270474e-9L),
5056 TEST_c_c (catan, 0x1.0000000000001p0L, -0x1p-27L, 7.853981633974484345157511161499711112683e-1L, -3.725290298461913200853528590596263270474e-9L),
5057 TEST_c_c (catan, -0x1.0000000000001p0L, -0x1p-27L, -7.853981633974484345157511161499711112683e-1L, -3.725290298461913200853528590596263270474e-9L),
5058 TEST_c_c (catan, 0x1p-27L, 0x0.fffffffffffff8p0L, 7.853981578095128619227903983047292781021e-1L, 9.704060527839234252043969805481351363824L),
5059 TEST_c_c (catan, 0x1p-27L, -0x0.fffffffffffff8p0L, 7.853981578095128619227903983047292781021e-1L, -9.704060527839234252043969805481351363824L),
5060 TEST_c_c (catan, -0x1p-27L, 0x0.fffffffffffff8p0L, -7.853981578095128619227903983047292781021e-1L, 9.704060527839234252043969805481351363824L),
5061 TEST_c_c (catan, -0x1p-27L, -0x0.fffffffffffff8p0L, -7.853981578095128619227903983047292781021e-1L, -9.704060527839234252043969805481351363824L),
5062 TEST_c_c (catan, 0x0.fffffffffffff8p0L, 0x1p-27L, 7.853981633974482679822974223765039144191e-1L, 3.725290298461914441624447420137706700965e-9L),
5063 TEST_c_c (catan, -0x0.fffffffffffff8p0L, 0x1p-27L, -7.853981633974482679822974223765039144191e-1L, 3.725290298461914441624447420137706700965e-9L),
5064 TEST_c_c (catan, 0x0.fffffffffffff8p0L, -0x1p-27L, 7.853981633974482679822974223765039144191e-1L, -3.725290298461914441624447420137706700965e-9L),
5065 TEST_c_c (catan, -0x0.fffffffffffff8p0L, -0x1p-27L, -7.853981633974482679822974223765039144191e-1L, -3.725290298461914441624447420137706700965e-9L),
caf84319
JM		 5066#endif
5067#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 5068 TEST_c_c (catan, 0x1p-33L, 0x1.0000000000000002p0L, 7.853981638922134273801338071094141188767e-1L, 1.178350206951907025990405771755129268176e1L),
5069 TEST_c_c (catan, 0x1p-33L, -0x1.0000000000000002p0L, 7.853981638922134273801338071094141188767e-1L, -1.178350206951907025990405771755129268176e1L),
5070 TEST_c_c (catan, -0x1p-33L, 0x1.0000000000000002p0L, -7.853981638922134273801338071094141188767e-1L, 1.178350206951907025990405771755129268176e1L),
5071 TEST_c_c (catan, -0x1p-33L, -0x1.0000000000000002p0L, -7.853981638922134273801338071094141188767e-1L, -1.178350206951907025990405771755129268176e1L),
5072 TEST_c_c (catan, 0x1.0000000000000002p0L, 0x1p-33L, 7.853981633974483096732590862331681441026e-1L, 5.820766091346740722012013594069507025615e-11L),
5073 TEST_c_c (catan, -0x1.0000000000000002p0L, 0x1p-33L, -7.853981633974483096732590862331681441026e-1L, 5.820766091346740722012013594069507025615e-11L),
5074 TEST_c_c (catan, 0x1.0000000000000002p0L, -0x1p-33L, 7.853981633974483096732590862331681441026e-1L, -5.820766091346740722012013594069507025615e-11L),
5075 TEST_c_c (catan, -0x1.0000000000000002p0L, -0x1p-33L, -7.853981633974483096732590862331681441026e-1L, -5.820766091346740722012013594069507025615e-11L),
5076 TEST_c_c (catan, 0x1p-33L, 0x0.ffffffffffffffffp0L, 7.853981631937214964185249205444919953948e-1L, 1.178350206951907026002603046195591193050e1L),
5077 TEST_c_c (catan, 0x1p-33L, -0x0.ffffffffffffffffp0L, 7.853981631937214964185249205444919953948e-1L, -1.178350206951907026002603046195591193050e1L),
5078 TEST_c_c (catan, -0x1p-33L, 0x0.ffffffffffffffffp0L, -7.853981631937214964185249205444919953948e-1L, 1.178350206951907026002603046195591193050e1L),
5079 TEST_c_c (catan, -0x1p-33L, -0x0.ffffffffffffffffp0L, -7.853981631937214964185249205444919953948e-1L, -1.178350206951907026002603046195591193050e1L),
5080 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, 0x1p-33L, 7.853981633974483095919439232967553115548e-1L, 5.820766091346740722958646680334721192083e-11L),
5081 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, 0x1p-33L, -7.853981633974483095919439232967553115548e-1L, 5.820766091346740722958646680334721192083e-11L),
5082 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, -0x1p-33L, 7.853981633974483095919439232967553115548e-1L, -5.820766091346740722958646680334721192083e-11L),
5083 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, -0x1p-33L, -7.853981633974483095919439232967553115548e-1L, -5.820766091346740722958646680334721192083e-11L),
caf84319
JM		 5084#endif
5085#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 5086 TEST_c_c (catan, 0x1p-54L, 0x1.000000000000000000000000008p0L, 7.853981633974485455380535786656405610710e-1L, 1.906154746539849600897388334009981267384e1L),
5087 TEST_c_c (catan, 0x1p-54L, -0x1.000000000000000000000000008p0L, 7.853981633974485455380535786656405610710e-1L, -1.906154746539849600897388334009981267384e1L),
5088 TEST_c_c (catan, -0x1p-54L, 0x1.000000000000000000000000008p0L, -7.853981633974485455380535786656405610710e-1L, 1.906154746539849600897388334009981267384e1L),
5089 TEST_c_c (catan, -0x1p-54L, -0x1.000000000000000000000000008p0L, -7.853981633974485455380535786656405610710e-1L, -1.906154746539849600897388334009981267384e1L),
5090 TEST_c_c (catan, 0x1.000000000000000000000000008p0L, 0x1p-54L, 7.853981633974483096156608458198888173729e-1L, 2.775557561562891351059079170226980932999e-17L),
5091 TEST_c_c (catan, -0x1.000000000000000000000000008p0L, 0x1p-54L, -7.853981633974483096156608458198888173729e-1L, 2.775557561562891351059079170226980932999e-17L),
5092 TEST_c_c (catan, 0x1.000000000000000000000000008p0L, -0x1p-54L, 7.853981633974483096156608458198888173729e-1L, -2.775557561562891351059079170226980932999e-17L),
5093 TEST_c_c (catan, -0x1.000000000000000000000000008p0L, -0x1p-54L, -7.853981633974483096156608458198888173729e-1L, -2.775557561562891351059079170226980932999e-17L),
5094 TEST_c_c (catan, 0x1p-54L, 0x0.ffffffffffffffffffffffffffcp0L, 7.853981633974482124711461911186784339815e-1L, 1.906154746539849600897388334009984040723e1L),
5095 TEST_c_c (catan, 0x1p-54L, -0x0.ffffffffffffffffffffffffffcp0L, 7.853981633974482124711461911186784339815e-1L, -1.906154746539849600897388334009984040723e1L),
5096 TEST_c_c (catan, -0x1p-54L, 0x0.ffffffffffffffffffffffffffcp0L, -7.853981633974482124711461911186784339815e-1L, 1.906154746539849600897388334009984040723e1L),
5097 TEST_c_c (catan, -0x1p-54L, -0x0.ffffffffffffffffffffffffffcp0L, -7.853981633974482124711461911186784339815e-1L, -1.906154746539849600897388334009984040723e1L),
5098 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-54L, 7.853981633974483096156608458198703284454e-1L, 2.775557561562891351059079170227083567164e-17L),
5099 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-54L, -7.853981633974483096156608458198703284454e-1L, 2.775557561562891351059079170227083567164e-17L),
5100 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-54L, 7.853981633974483096156608458198703284454e-1L, -2.775557561562891351059079170227083567164e-17L),
5101 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-54L, -7.853981633974483096156608458198703284454e-1L, -2.775557561562891351059079170227083567164e-17L),
caf84319
JM		 5102#endif
5103#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 5104 TEST_c_c (catan, 0x1p-57L, 0x1.0000000000000000000000000001p0L, 7.853981633974483252281721296111395707566e-1L, 2.010126823623841397309973152228712033275e1L),
5105 TEST_c_c (catan, 0x1p-57L, -0x1.0000000000000000000000000001p0L, 7.853981633974483252281721296111395707566e-1L, -2.010126823623841397309973152228712033275e1L),
5106 TEST_c_c (catan, -0x1p-57L, 0x1.0000000000000000000000000001p0L, -7.853981633974483252281721296111395707566e-1L, 2.010126823623841397309973152228712033275e1L),
5107 TEST_c_c (catan, -0x1p-57L, -0x1.0000000000000000000000000001p0L, -7.853981633974483252281721296111395707566e-1L, -2.010126823623841397309973152228712033275e1L),
5108 TEST_c_c (catan, 0x1.0000000000000000000000000001p0L, 0x1p-57L, 7.853981633974483096156608458198758293829e-1L, 3.469446951953614188823848962783812780530e-18L),
5109 TEST_c_c (catan, -0x1.0000000000000000000000000001p0L, 0x1p-57L, -7.853981633974483096156608458198758293829e-1L, 3.469446951953614188823848962783812780530e-18L),
5110 TEST_c_c (catan, 0x1.0000000000000000000000000001p0L, -0x1p-57L, 7.853981633974483096156608458198758293829e-1L, -3.469446951953614188823848962783812780530e-18L),
5111 TEST_c_c (catan, -0x1.0000000000000000000000000001p0L, -0x1p-57L, -7.853981633974483096156608458198758293829e-1L, -3.469446951953614188823848962783812780530e-18L),
5112 TEST_c_c (catan, 0x1p-57L, 0x0.ffffffffffffffffffffffffffff8p0L, 7.853981633974483044114904178894544378135e-1L, 2.010126823623841397309973152228712040498e1L),
5113 TEST_c_c (catan, 0x1p-57L, -0x0.ffffffffffffffffffffffffffff8p0L, 7.853981633974483044114904178894544378135e-1L, -2.010126823623841397309973152228712040498e1L),
5114 TEST_c_c (catan, -0x1p-57L, 0x0.ffffffffffffffffffffffffffff8p0L, -7.853981633974483044114904178894544378135e-1L, 2.010126823623841397309973152228712040498e1L),
5115 TEST_c_c (catan, -0x1p-57L, -0x0.ffffffffffffffffffffffffffff8p0L, -7.853981633974483044114904178894544378135e-1L, -2.010126823623841397309973152228712040498e1L),
5116 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-57L, 7.853981633974483096156608458198756849381e-1L, 3.469446951953614188823848962783813782817e-18L),
5117 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-57L, -7.853981633974483096156608458198756849381e-1L, 3.469446951953614188823848962783813782817e-18L),
5118 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-57L, 7.853981633974483096156608458198756849381e-1L, -3.469446951953614188823848962783813782817e-18L),
5119 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-57L, -7.853981633974483096156608458198756849381e-1L, -3.469446951953614188823848962783813782817e-18L),
5120#endif
5121 TEST_c_c (catan, 1.0L, 0x1p-64L, 7.853981633974483096156608458198757210500e-1L, 2.710505431213761085018632002174854278563e-20L),
5122 TEST_c_c (catan, 1.0L, -0x1p-64L, 7.853981633974483096156608458198757210500e-1L, -2.710505431213761085018632002174854278563e-20L),
5123 TEST_c_c (catan, -1.0L, 0x1p-64L, -7.853981633974483096156608458198757210500e-1L, 2.710505431213761085018632002174854278563e-20L),
5124 TEST_c_c (catan, -1.0L, -0x1p-64L, -7.853981633974483096156608458198757210500e-1L, -2.710505431213761085018632002174854278563e-20L),
5125 TEST_c_c (catan, 0x1p-64L, 1.0L, 7.853981633974483096292133729759445264744e-1L, 2.252728336819822255606004394739073846245e1L),
5126 TEST_c_c (catan, -0x1p-64L, 1.0L, -7.853981633974483096292133729759445264744e-1L, 2.252728336819822255606004394739073846245e1L),
5127 TEST_c_c (catan, 0x1p-64L, -1.0L, 7.853981633974483096292133729759445264744e-1L, -2.252728336819822255606004394739073846245e1L),
5128 TEST_c_c (catan, -0x1p-64L, -1.0L, -7.853981633974483096292133729759445264744e-1L, -2.252728336819822255606004394739073846245e1L),
5129 TEST_c_c (catan, 1.0L, 0x1.3p-73L, 7.853981633974483096156608458198757210493e-1L, 6.286572655403010329022706059731717687100e-23L),
5130 TEST_c_c (catan, 1.0L, -0x1.3p-73L, 7.853981633974483096156608458198757210493e-1L, -6.286572655403010329022706059731717687100e-23L),
5131 TEST_c_c (catan, -1.0L, 0x1.3p-73L, -7.853981633974483096156608458198757210493e-1L, 6.286572655403010329022706059731717687100e-23L),
5132 TEST_c_c (catan, -1.0L, -0x1.3p-73L, -7.853981633974483096156608458198757210493e-1L, -6.286572655403010329022706059731717687100e-23L),
5133 TEST_c_c (catan, 0x1.3p-73L, 1.0L, 7.853981633974483096156922786831527361009e-1L, 2.556052055225464683726753902092495938633e1L),
5134 TEST_c_c (catan, -0x1.3p-73L, 1.0L, -7.853981633974483096156922786831527361009e-1L, 2.556052055225464683726753902092495938633e1L),
5135 TEST_c_c (catan, 0x1.3p-73L, -1.0L, 7.853981633974483096156922786831527361009e-1L, -2.556052055225464683726753902092495938633e1L),
5136 TEST_c_c (catan, -0x1.3p-73L, -1.0L, -7.853981633974483096156922786831527361009e-1L, -2.556052055225464683726753902092495938633e1L),
5137 TEST_c_c (catan, 1.0L, 0x1p-124L, 7.853981633974483096156608458198757210493e-1L, 2.350988701644575015937473074444491355637e-38L),
5138 TEST_c_c (catan, 1.0L, -0x1p-124L, 7.853981633974483096156608458198757210493e-1L, -2.350988701644575015937473074444491355637e-38L),
5139 TEST_c_c (catan, -1.0L, 0x1p-124L, -7.853981633974483096156608458198757210493e-1L, 2.350988701644575015937473074444491355637e-38L),
5140 TEST_c_c (catan, -1.0L, -0x1p-124L, -7.853981633974483096156608458198757210493e-1L, -2.350988701644575015937473074444491355637e-38L),
5141 TEST_c_c (catan, 0x1p-124L, 1.0L, 7.853981633974483096156608458198757210610e-1L, 4.332169878499658183857700759113603550472e1L),
5142 TEST_c_c (catan, -0x1p-124L, 1.0L, -7.853981633974483096156608458198757210610e-1L, 4.332169878499658183857700759113603550472e1L),
5143 TEST_c_c (catan, 0x1p-124L, -1.0L, 7.853981633974483096156608458198757210610e-1L, -4.332169878499658183857700759113603550472e1L),
5144 TEST_c_c (catan, -0x1p-124L, -1.0L, -7.853981633974483096156608458198757210610e-1L, -4.332169878499658183857700759113603550472e1L),
5145 TEST_c_c (catan, 0x1.000002p0L, 0x1p-126L, 7.853982230020895322927482174768220815493e-1L, 5.877471053462247139383742414506671233336e-39L, UNDERFLOW_EXCEPTION_FLOAT),
5146 TEST_c_c (catan, 0x1.000002p0L, -0x1p-126L, 7.853982230020895322927482174768220815493e-1L, -5.877471053462247139383742414506671233336e-39L, UNDERFLOW_EXCEPTION_FLOAT),
5147 TEST_c_c (catan, -0x1.000002p0L, 0x1p-126L, -7.853982230020895322927482174768220815493e-1L, 5.877471053462247139383742414506671233336e-39L, UNDERFLOW_EXCEPTION_FLOAT),
5148 TEST_c_c (catan, -0x1.000002p0L, -0x1p-126L, -7.853982230020895322927482174768220815493e-1L, -5.877471053462247139383742414506671233336e-39L, UNDERFLOW_EXCEPTION_FLOAT),
5149 TEST_c_c (catan, 0x1p-126L, 0x1.000002p0L, 1.570796326794896619231321691639702138295L, 8.317766196521665212523713550410777685446L),
5150 TEST_c_c (catan, -0x1p-126L, 0x1.000002p0L, -1.570796326794896619231321691639702138295L, 8.317766196521665212523713550410777685446L),
5151 TEST_c_c (catan, 0x1p-126L, -0x1.000002p0L, 1.570796326794896619231321691639702138295L, -8.317766196521665212523713550410777685446L),
5152 TEST_c_c (catan, -0x1p-126L, -0x1.000002p0L, -1.570796326794896619231321691639702138295L, -8.317766196521665212523713550410777685446L),
5153 TEST_c_c (catan, 0x0.ffffffp0L, 0x1p-126L, 7.853981335951250337419109991749089175724e-1L, 5.877472104436064061535099214664320916184e-39L, UNDERFLOW_EXCEPTION_FLOAT),
5154 TEST_c_c (catan, 0x0.ffffffp0L, -0x1p-126L, 7.853981335951250337419109991749089175724e-1L, -5.877472104436064061535099214664320916184e-39L, UNDERFLOW_EXCEPTION_FLOAT),
5155 TEST_c_c (catan, -0x0.ffffffp0L, 0x1p-126L, -7.853981335951250337419109991749089175724e-1L, 5.877472104436064061535099214664320916184e-39L, UNDERFLOW_EXCEPTION_FLOAT),
5156 TEST_c_c (catan, -0x0.ffffffp0L, -0x1p-126L, -7.853981335951250337419109991749089175724e-1L, -5.877472104436064061535099214664320916184e-39L, UNDERFLOW_EXCEPTION_FLOAT),
5157 TEST_c_c (catan, 0x1p-126L, 0x0.ffffffp0L, 9.860761609136244031334147100512154160097e-32L, 8.664339742098154951823135931565866792454L),
5158 TEST_c_c (catan, -0x1p-126L, 0x0.ffffffp0L, -9.860761609136244031334147100512154160097e-32L, 8.664339742098154951823135931565866792454L),
5159 TEST_c_c (catan, 0x1p-126L, -0x0.ffffffp0L, 9.860761609136244031334147100512154160097e-32L, -8.664339742098154951823135931565866792454L),
5160 TEST_c_c (catan, -0x1p-126L, -0x0.ffffffp0L, -9.860761609136244031334147100512154160097e-32L, -8.664339742098154951823135931565866792454L),
10de07f5 5161#ifndef TEST_FLOAT
08198877
JM		 5162 TEST_c_c (catan, 1.0L, 0x1p-512L, 7.853981633974483096156608458198757210493e-1L, 3.729170365600103371645482657731466918688e-155L),
5163 TEST_c_c (catan, 1.0L, -0x1p-512L, 7.853981633974483096156608458198757210493e-1L, -3.729170365600103371645482657731466918688e-155L),
5164 TEST_c_c (catan, -1.0L, 0x1p-512L, -7.853981633974483096156608458198757210493e-1L, 3.729170365600103371645482657731466918688e-155L),
5165 TEST_c_c (catan, -1.0L, -0x1p-512L, -7.853981633974483096156608458198757210493e-1L, -3.729170365600103371645482657731466918688e-155L),
5166 TEST_c_c (catan, 0x1p-512L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 1.777922518136259718655200391540222897114e2L),
5167 TEST_c_c (catan, -0x1p-512L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 1.777922518136259718655200391540222897114e2L),
5168 TEST_c_c (catan, 0x1p-512L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -1.777922518136259718655200391540222897114e2L),
5169 TEST_c_c (catan, -0x1p-512L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -1.777922518136259718655200391540222897114e2L),
5170 TEST_c_c (catan, 1.0L, 0x1.3p-536L, 7.853981633974483096156608458198757210493e-1L, 2.639526015013529511588222179446290115084e-162L),
5171 TEST_c_c (catan, 1.0L, -0x1.3p-536L, 7.853981633974483096156608458198757210493e-1L, -2.639526015013529511588222179446290115084e-162L),
5172 TEST_c_c (catan, -1.0L, 0x1.3p-536L, -7.853981633974483096156608458198757210493e-1L, 2.639526015013529511588222179446290115084e-162L),
5173 TEST_c_c (catan, -1.0L, -0x1.3p-536L, -7.853981633974483096156608458198757210493e-1L, -2.639526015013529511588222179446290115084e-162L),
5174 TEST_c_c (catan, 0x1.3p-536L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 1.860240928518819859673567751384928348958e2L),
5175 TEST_c_c (catan, -0x1.3p-536L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 1.860240928518819859673567751384928348958e2L),
5176 TEST_c_c (catan, 0x1.3p-536L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -1.860240928518819859673567751384928348958e2L),
5177 TEST_c_c (catan, -0x1.3p-536L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -1.860240928518819859673567751384928348958e2L),
5178 TEST_c_c (catan, 1.0L, 0x1p-1020L, 7.853981633974483096156608458198757210493e-1L, 4.450147717014402766180465434664808128438e-308L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5179 TEST_c_c (catan, 1.0L, -0x1p-1020L, 7.853981633974483096156608458198757210493e-1L, -4.450147717014402766180465434664808128438e-308L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5180 TEST_c_c (catan, -1.0L, 0x1p-1020L, -7.853981633974483096156608458198757210493e-1L, 4.450147717014402766180465434664808128438e-308L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5181 TEST_c_c (catan, -1.0L, -0x1p-1020L, -7.853981633974483096156608458198757210493e-1L, -4.450147717014402766180465434664808128438e-308L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5182 TEST_c_c (catan, 0x1p-1020L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 3.538516356758520804574969980043991380025e2L),
5183 TEST_c_c (catan, -0x1p-1020L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 3.538516356758520804574969980043991380025e2L),
5184 TEST_c_c (catan, 0x1p-1020L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -3.538516356758520804574969980043991380025e2L),
5185 TEST_c_c (catan, -0x1p-1020L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -3.538516356758520804574969980043991380025e2L),
5186 TEST_c_c (catan, 0x1.0000000000001p0L, 0x1p-1022L, 7.853981633974484206379633083355174374608e-1L, 1.112536929253600444512293438042957369978e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5187 TEST_c_c (catan, 0x1.0000000000001p0L, -0x1p-1022L, 7.853981633974484206379633083355174374608e-1L, -1.112536929253600444512293438042957369978e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5188 TEST_c_c (catan, -0x1.0000000000001p0L, 0x1p-1022L, -7.853981633974484206379633083355174374608e-1L, 1.112536929253600444512293438042957369978e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5189 TEST_c_c (catan, -0x1.0000000000001p0L, -0x1p-1022L, -7.853981633974484206379633083355174374608e-1L, -1.112536929253600444512293438042957369978e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5190 TEST_c_c (catan, 0x1p-1022L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 1.836840028483855075506780244989950299369e1L),
5191 TEST_c_c (catan, -0x1p-1022L, 0x1.0000000000001p0L, -1.570796326794896619231321691639751442099L, 1.836840028483855075506780244989950299369e1L),
5192 TEST_c_c (catan, 0x1p-1022L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -1.836840028483855075506780244989950299369e1L),
5193 TEST_c_c (catan, -0x1p-1022L, -0x1.0000000000001p0L, -1.570796326794896619231321691639751442099L, -1.836840028483855075506780244989950299369e1L),
5194 TEST_c_c (catan, 0x0.fffffffffffff8p0L, 0x1p-1022L, 7.853981633974482541045096145620456183798e-1L, 1.112536929253600815061527818977844932790e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5195 TEST_c_c (catan, 0x0.fffffffffffff8p0L, -0x1p-1022L, 7.853981633974482541045096145620456183798e-1L, -1.112536929253600815061527818977844932790e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5196 TEST_c_c (catan, -0x0.fffffffffffff8p0L, 0x1p-1022L, -7.853981633974482541045096145620456183798e-1L, 1.112536929253600815061527818977844932790e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5197 TEST_c_c (catan, -0x0.fffffffffffff8p0L, -0x1p-1022L, -7.853981633974482541045096145620456183798e-1L, -1.112536929253600815061527818977844932790e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5198 TEST_c_c (catan, 0x1p-1022L, 0x0.fffffffffffff8p0L, 1.002084180004486444624900488355118689113e-292L, 1.871497387511852332650969166374185305708e1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5199 TEST_c_c (catan, -0x1p-1022L, 0x0.fffffffffffff8p0L, -1.002084180004486444624900488355118689113e-292L, 1.871497387511852332650969166374185305708e1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5200 TEST_c_c (catan, 0x1p-1022L, -0x0.fffffffffffff8p0L, 1.002084180004486444624900488355118689113e-292L, -1.871497387511852332650969166374185305708e1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5201 TEST_c_c (catan, -0x1p-1022L, -0x0.fffffffffffff8p0L, -1.002084180004486444624900488355118689113e-292L, -1.871497387511852332650969166374185305708e1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
10de07f5
JM		 5202#endif
5203#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 5204 TEST_c_c (catan, 0x1.0000000000000002p0L, 0x1p-1022L, 7.853981633974483096698709544441509427467e-1L, 1.112536929253600691424494863099491450042e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5205 TEST_c_c (catan, 0x1.0000000000000002p0L, -0x1p-1022L, 7.853981633974483096698709544441509427467e-1L, -1.112536929253600691424494863099491450042e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5206 TEST_c_c (catan, -0x1.0000000000000002p0L, 0x1p-1022L, -7.853981633974483096698709544441509427467e-1L, 1.112536929253600691424494863099491450042e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5207 TEST_c_c (catan, -0x1.0000000000000002p0L, -0x1p-1022L, -7.853981633974483096698709544441509427467e-1L, -1.112536929253600691424494863099491450042e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5208 TEST_c_c (catan, 0x1p-1022L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 2.218070977791824990137853294097378778927e1L),
5209 TEST_c_c (catan, -0x1p-1022L, 0x1.0000000000000002p0L, -1.570796326794896619231321691639751442099L, 2.218070977791824990137853294097378778927e1L),
5210 TEST_c_c (catan, 0x1p-1022L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -2.218070977791824990137853294097378778927e1L),
5211 TEST_c_c (catan, -0x1p-1022L, -0x1.0000000000000002p0L, -1.570796326794896619231321691639751442099L, -2.218070977791824990137853294097378778927e1L),
5212 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, 0x1p-1022L, 7.853981633974483095885557915077381101984e-1L, 1.112536929253600691605427106449557323148e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5213 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, -0x1p-1022L, 7.853981633974483095885557915077381101984e-1L, -1.112536929253600691605427106449557323148e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5214 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, 0x1p-1022L, -7.853981633974483095885557915077381101984e-1L, 1.112536929253600691605427106449557323148e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5215 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, -0x1p-1022L, -7.853981633974483095885557915077381101984e-1L, -1.112536929253600691605427106449557323148e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5216 TEST_c_c (catan, 0x1p-1022L, 0x0.ffffffffffffffffp0L, 2.052268400649188124723641491045245971623e-289L, 2.252728336819822255604649142023466965703e1L),
5217 TEST_c_c (catan, -0x1p-1022L, 0x0.ffffffffffffffffp0L, -2.052268400649188124723641491045245971623e-289L, 2.252728336819822255604649142023466965703e1L),
5218 TEST_c_c (catan, 0x1p-1022L, -0x0.ffffffffffffffffp0L, 2.052268400649188124723641491045245971623e-289L, -2.252728336819822255604649142023466965703e1L),
5219 TEST_c_c (catan, -0x1p-1022L, -0x0.ffffffffffffffffp0L, -2.052268400649188124723641491045245971623e-289L, -2.252728336819822255604649142023466965703e1L),
10de07f5
JM		 5220#endif
5221#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 5222 TEST_c_c (catan, 0x1.000000000000000000000000008p0L, 0x1p-1022L, 7.853981633974483096156608458198880470009e-1L, 1.112536929253600691545116358666174605957e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5223 TEST_c_c (catan, 0x1.000000000000000000000000008p0L, -0x1p-1022L, 7.853981633974483096156608458198880470009e-1L, -1.112536929253600691545116358666174605957e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5224 TEST_c_c (catan, -0x1.000000000000000000000000008p0L, 0x1p-1022L, -7.853981633974483096156608458198880470009e-1L, 1.112536929253600691545116358666174605957e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5225 TEST_c_c (catan, -0x1.000000000000000000000000008p0L, -0x1p-1022L, -7.853981633974483096156608458198880470009e-1L, -1.112536929253600691545116358666174605957e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5226 TEST_c_c (catan, 0x1p-1022L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 3.673680056967710139911330243728336427098e1L),
5227 TEST_c_c (catan, -0x1p-1022L, 0x1.000000000000000000000000008p0L, -1.570796326794896619231321691639751442099L, 3.673680056967710139911330243728336427098e1L),
5228 TEST_c_c (catan, 0x1p-1022L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -3.673680056967710139911330243728336427098e1L),
5229 TEST_c_c (catan, -0x1p-1022L, -0x1.000000000000000000000000008p0L, -1.570796326794896619231321691639751442099L, -3.673680056967710139911330243728336427098e1L),
5230 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-1022L, 7.853981633974483096156608458198695580735e-1L, 1.112536929253600691545116358666215745186e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5231 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-1022L, 7.853981633974483096156608458198695580735e-1L, -1.112536929253600691545116358666215745186e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5232 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-1022L, -7.853981633974483096156608458198695580735e-1L, 1.112536929253600691545116358666215745186e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5233 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-1022L, -7.853981633974483096156608458198695580735e-1L, -1.112536929253600691545116358666215745186e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5234 TEST_c_c (catan, 0x1p-1022L, 0x0.ffffffffffffffffffffffffffcp0L, 9.025971879324147880346310405868788320726e-277L, 3.708337415995707405382191849801244331055e1L),
5235 TEST_c_c (catan, -0x1p-1022L, 0x0.ffffffffffffffffffffffffffcp0L, -9.025971879324147880346310405868788320726e-277L, 3.708337415995707405382191849801244331055e1L),
5236 TEST_c_c (catan, 0x1p-1022L, -0x0.ffffffffffffffffffffffffffcp0L, 9.025971879324147880346310405868788320726e-277L, -3.708337415995707405382191849801244331055e1L),
5237 TEST_c_c (catan, -0x1p-1022L, -0x0.ffffffffffffffffffffffffffcp0L, -9.025971879324147880346310405868788320726e-277L, -3.708337415995707405382191849801244331055e1L),
10de07f5
JM		 5238#endif
5239#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5240 TEST_c_c (catan, 1.0L, 0x1p-8192L, 7.853981633974483096156608458198757210493e-1L, 4.584009668887117914053530980121207914891e-2467L),
5241 TEST_c_c (catan, 1.0L, -0x1p-8192L, 7.853981633974483096156608458198757210493e-1L, -4.584009668887117914053530980121207914891e-2467L),
5242 TEST_c_c (catan, -1.0L, 0x1p-8192L, -7.853981633974483096156608458198757210493e-1L, 4.584009668887117914053530980121207914891e-2467L),
5243 TEST_c_c (catan, -1.0L, -0x1p-8192L, -7.853981633974483096156608458198757210493e-1L, -4.584009668887117914053530980121207914891e-2467L),
5244 TEST_c_c (catan, 0x1p-8192L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 2.839477425163815960027691385553420311121e3L),
5245 TEST_c_c (catan, -0x1p-8192L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 2.839477425163815960027691385553420311121e3L),
5246 TEST_c_c (catan, 0x1p-8192L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -2.839477425163815960027691385553420311121e3L),
5247 TEST_c_c (catan, -0x1p-8192L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -2.839477425163815960027691385553420311121e3L),
5248 TEST_c_c (catan, 1.0L, 0x1.3p-8221L, 7.853981633974483096156608458198757210493e-1L, 1.013933025636421986471594877335044443409e-2475L),
5249 TEST_c_c (catan, 1.0L, -0x1.3p-8221L, 7.853981633974483096156608458198757210493e-1L, -1.013933025636421986471594877335044443409e-2475L),
5250 TEST_c_c (catan, -1.0L, 0x1.3p-8221L, -7.853981633974483096156608458198757210493e-1L, 1.013933025636421986471594877335044443409e-2475L),
5251 TEST_c_c (catan, -1.0L, -0x1.3p-8221L, -7.853981633974483096156608458198757210493e-1L, -1.013933025636421986471594877335044443409e-2475L),
5252 TEST_c_c (catan, 0x1.3p-8221L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 2.849442134153471837403071201841536297726e3L),
5253 TEST_c_c (catan, -0x1.3p-8221L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 2.849442134153471837403071201841536297726e3L),
5254 TEST_c_c (catan, 0x1.3p-8221L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -2.849442134153471837403071201841536297726e3L),
5255 TEST_c_c (catan, -0x1.3p-8221L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -2.849442134153471837403071201841536297726e3L),
5256 TEST_c_c (catan, 1.0L, 0x1.3p-8246L, 7.853981633974483096156608458198757210493e-1L, 3.021755890954798419688924781486524472858e-2483L),
5257 TEST_c_c (catan, 1.0L, -0x1.3p-8246L, 7.853981633974483096156608458198757210493e-1L, -3.021755890954798419688924781486524472858e-2483L),
5258 TEST_c_c (catan, -1.0L, 0x1.3p-8246L, -7.853981633974483096156608458198757210493e-1L, 3.021755890954798419688924781486524472858e-2483L),
5259 TEST_c_c (catan, -1.0L, -0x1.3p-8246L, -7.853981633974483096156608458198757210493e-1L, -3.021755890954798419688924781486524472858e-2483L),
5260 TEST_c_c (catan, 0x1.3p-8246L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 2.858106473910471153770786603359763504827e3L),
5261 TEST_c_c (catan, -0x1.3p-8246L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 2.858106473910471153770786603359763504827e3L),
5262 TEST_c_c (catan, 0x1.3p-8246L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -2.858106473910471153770786603359763504827e3L),
5263 TEST_c_c (catan, -0x1.3p-8246L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -2.858106473910471153770786603359763504827e3L),
5264 TEST_c_c (catan, 1.0L, 0x1p-16380L, 7.853981633974483096156608458198757210493e-1L, 6.724206286224187012525355634643505205196e-4932L),
5265 TEST_c_c (catan, 1.0L, -0x1p-16380L, 7.853981633974483096156608458198757210493e-1L, -6.724206286224187012525355634643505205196e-4932L),
5266 TEST_c_c (catan, -1.0L, 0x1p-16380L, -7.853981633974483096156608458198757210493e-1L, 6.724206286224187012525355634643505205196e-4932L),
5267 TEST_c_c (catan, -1.0L, -0x1p-16380L, -7.853981633974483096156608458198757210493e-1L, -6.724206286224187012525355634643505205196e-4932L),
5268 TEST_c_c (catan, 0x1p-16380L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 5.677221982376232056781839690803195180822e3L),
5269 TEST_c_c (catan, -0x1p-16380L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 5.677221982376232056781839690803195180822e3L),
5270 TEST_c_c (catan, 0x1p-16380L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -5.677221982376232056781839690803195180822e3L),
5271 TEST_c_c (catan, -0x1p-16380L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -5.677221982376232056781839690803195180822e3L),
5272 TEST_c_c (catan, 0x1.0000000000000002p0L, 0x1p-16382L, 7.853981633974483096698709544441509427467e-1L, 1.681051571556046752949078932066752571182e-4932L, UNDERFLOW_EXCEPTION),
5273 TEST_c_c (catan, 0x1.0000000000000002p0L, -0x1p-16382L, 7.853981633974483096698709544441509427467e-1L, -1.681051571556046752949078932066752571182e-4932L, UNDERFLOW_EXCEPTION),
5274 TEST_c_c (catan, -0x1.0000000000000002p0L, 0x1p-16382L, -7.853981633974483096698709544441509427467e-1L, 1.681051571556046752949078932066752571182e-4932L, UNDERFLOW_EXCEPTION),
5275 TEST_c_c (catan, -0x1.0000000000000002p0L, -0x1p-16382L, -7.853981633974483096698709544441509427467e-1L, -1.681051571556046752949078932066752571182e-4932L, UNDERFLOW_EXCEPTION),
5276 TEST_c_c (catan, 0x1p-16382L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 2.218070977791824990137853294097378778927e1L),
5277 TEST_c_c (catan, -0x1p-16382L, 0x1.0000000000000002p0L, -1.570796326794896619231321691639751442099L, 2.218070977791824990137853294097378778927e1L),
5278 TEST_c_c (catan, 0x1p-16382L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -2.218070977791824990137853294097378778927e1L),
5279 TEST_c_c (catan, -0x1p-16382L, -0x1.0000000000000002p0L, -1.570796326794896619231321691639751442099L, -2.218070977791824990137853294097378778927e1L),
5280 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, 0x1p-16382L, 7.853981633974483095885557915077381101984e-1L, 1.681051571556046753222468896957938166365e-4932L, UNDERFLOW_EXCEPTION),
5281 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, -0x1p-16382L, 7.853981633974483095885557915077381101984e-1L, -1.681051571556046753222468896957938166365e-4932L, UNDERFLOW_EXCEPTION),
5282 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, 0x1p-16382L, -7.853981633974483095885557915077381101984e-1L, 1.681051571556046753222468896957938166365e-4932L, UNDERFLOW_EXCEPTION),
5283 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, -0x1p-16382L, -7.853981633974483095885557915077381101984e-1L, -1.681051571556046753222468896957938166365e-4932L, UNDERFLOW_EXCEPTION),
5284 TEST_c_c (catan, 0x1p-16382L, 0x0.ffffffffffffffffp0L, 3.100992811520163369065387859792822623745e-4913L, 2.252728336819822255604649142023466965703e1L),
5285 TEST_c_c (catan, -0x1p-16382L, 0x0.ffffffffffffffffp0L, -3.100992811520163369065387859792822623745e-4913L, 2.252728336819822255604649142023466965703e1L),
5286 TEST_c_c (catan, 0x1p-16382L, -0x0.ffffffffffffffffp0L, 3.100992811520163369065387859792822623745e-4913L, -2.252728336819822255604649142023466965703e1L),
5287 TEST_c_c (catan, -0x1p-16382L, -0x0.ffffffffffffffffp0L, -3.100992811520163369065387859792822623745e-4913L, -2.252728336819822255604649142023466965703e1L),
10de07f5 5288# if LDBL_MANT_DIG >= 113
08198877
JM		 5289 TEST_c_c (catan, 0x1.0000000000000000000000000001p0L, 0x1p-16382L, 7.853981633974483096156608458198758173458e-1L, 1.681051571556046753131338908660875977540e-4932L, UNDERFLOW_EXCEPTION),
5290 TEST_c_c (catan, 0x1.0000000000000000000000000001p0L, -0x1p-16382L, 7.853981633974483096156608458198758173458e-1L, -1.681051571556046753131338908660875977540e-4932L, UNDERFLOW_EXCEPTION),
5291 TEST_c_c (catan, -0x1.0000000000000000000000000001p0L, 0x1p-16382L, -7.853981633974483096156608458198758173458e-1L, 1.681051571556046753131338908660875977540e-4932L, UNDERFLOW_EXCEPTION),
5292 TEST_c_c (catan, -0x1.0000000000000000000000000001p0L, -0x1p-16382L, -7.853981633974483096156608458198758173458e-1L, -1.681051571556046753131338908660875977540e-4932L, UNDERFLOW_EXCEPTION),
5293 TEST_c_c (catan, 0x1p-16382L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 3.916281570163690998207361486238697614441e1L),
5294 TEST_c_c (catan, -0x1p-16382L, 0x1.0000000000000000000000000001p0L, -1.570796326794896619231321691639751442099L, 3.916281570163690998207361486238697614441e1L),
5295 TEST_c_c (catan, 0x1p-16382L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -3.916281570163690998207361486238697614441e1L),
5296 TEST_c_c (catan, -0x1p-16382L, -0x1.0000000000000000000000000001p0L, -1.570796326794896619231321691639751442099L, -3.916281570163690998207361486238697614441e1L),
5297 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-16382L, 7.853981633974483096156608458198756729010e-1L, 1.681051571556046753131338908660876463178e-4932L, UNDERFLOW_EXCEPTION),
5298 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-16382L, 7.853981633974483096156608458198756729010e-1L, -1.681051571556046753131338908660876463178e-4932L, UNDERFLOW_EXCEPTION),
5299 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-16382L, -7.853981633974483096156608458198756729010e-1L, 1.681051571556046753131338908660876463178e-4932L, UNDERFLOW_EXCEPTION),
5300 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-16382L, -7.853981633974483096156608458198756729010e-1L, -1.681051571556046753131338908660876463178e-4932L, UNDERFLOW_EXCEPTION),
5301 TEST_c_c (catan, 0x1p-16382L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.745703758805099310527547423749501866998e-4898L, 3.950938929191688263678223092311606435623e1L),
5302 TEST_c_c (catan, -0x1p-16382L, 0x0.ffffffffffffffffffffffffffff8p0L, -1.745703758805099310527547423749501866998e-4898L, 3.950938929191688263678223092311606435623e1L),
5303 TEST_c_c (catan, 0x1p-16382L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.745703758805099310527547423749501866998e-4898L, -3.950938929191688263678223092311606435623e1L),
5304 TEST_c_c (catan, -0x1p-16382L, -0x0.ffffffffffffffffffffffffffff8p0L, -1.745703758805099310527547423749501866998e-4898L, -3.950938929191688263678223092311606435623e1L),
10de07f5 5305# endif
caf84319 5306#endif
2f38fbfe 5307
08198877
JM		 5308 TEST_c_c (catan, 0.75L, 1.25L, 1.10714871779409050301706546017853704L, 0.549306144334054845697622618461262852L),
5309 TEST_c_c (catan, -2, -3, -1.4099210495965755225306193844604208L, -0.22907268296853876629588180294200276L),
5310 END_DATA (catan)
5311 };
8847214f
UD		 5312
5313static void
08198877 5314catan_test (void)
8847214f 5315{
aaca11d8 5316 errno = 0;
08198877 5317 FUNC(catan) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD		 5318 if (errno == ENOSYS)
5319 /* Function not implemented. */
5320 return;
5321
08198877
JM		 5322 START (catan);
5323 RUN_TEST_LOOP_c_c (catan, catan_test_data, );
5324 END (catan, complex);
5325}
8847214f 5326
08198877
JM		 5327static const struct test_c_c_data catanh_test_data[] =
5328 {
5329 START_DATA (catanh),
5330 TEST_c_c (catanh, 0, 0, 0.0, 0.0),
5331 TEST_c_c (catanh, minus_zero, 0, minus_zero, 0.0),
5332 TEST_c_c (catanh, 0, minus_zero, 0.0, minus_zero),
5333 TEST_c_c (catanh, minus_zero, minus_zero, minus_zero, minus_zero),
5334
5335 TEST_c_c (catanh, 1.0L, plus_zero, plus_infty, plus_zero, DIVIDE_BY_ZERO_EXCEPTION),
5336 TEST_c_c (catanh, 1.0L, minus_zero, plus_infty, minus_zero, DIVIDE_BY_ZERO_EXCEPTION),
5337 TEST_c_c (catanh, -1.0L, plus_zero, minus_infty, plus_zero, DIVIDE_BY_ZERO_EXCEPTION),
5338 TEST_c_c (catanh, -1.0L, minus_zero, minus_infty, minus_zero, DIVIDE_BY_ZERO_EXCEPTION),
5339 TEST_c_c (catanh, plus_zero, 1.0L, plus_zero, M_PI_4l),
5340 TEST_c_c (catanh, minus_zero, 1.0L, minus_zero, M_PI_4l),
5341 TEST_c_c (catanh, plus_zero, -1.0L, plus_zero, -M_PI_4l),
5342 TEST_c_c (catanh, minus_zero, -1.0L, minus_zero, -M_PI_4l),
5343
5344 TEST_c_c (catanh, plus_infty, plus_infty, 0.0, M_PI_2l),
5345 TEST_c_c (catanh, plus_infty, minus_infty, 0.0, -M_PI_2l),
5346 TEST_c_c (catanh, minus_infty, plus_infty, minus_zero, M_PI_2l),
5347 TEST_c_c (catanh, minus_infty, minus_infty, minus_zero, -M_PI_2l),
5348
5349 TEST_c_c (catanh, -10.0, plus_infty, minus_zero, M_PI_2l),
5350 TEST_c_c (catanh, -10.0, minus_infty, minus_zero, -M_PI_2l),
5351 TEST_c_c (catanh, minus_zero, plus_infty, minus_zero, M_PI_2l),
5352 TEST_c_c (catanh, minus_zero, minus_infty, minus_zero, -M_PI_2l),
5353 TEST_c_c (catanh, 0, plus_infty, 0.0, M_PI_2l),
5354 TEST_c_c (catanh, 0, minus_infty, 0.0, -M_PI_2l),
5355 TEST_c_c (catanh, 0.1L, plus_infty, 0.0, M_PI_2l),
5356 TEST_c_c (catanh, 0.1L, minus_infty, 0.0, -M_PI_2l),
5357
5358 TEST_c_c (catanh, minus_infty, 0, minus_zero, M_PI_2l),
5359 TEST_c_c (catanh, minus_infty, minus_zero, minus_zero, -M_PI_2l),
5360 TEST_c_c (catanh, minus_infty, 100, minus_zero, M_PI_2l),
5361 TEST_c_c (catanh, minus_infty, -100, minus_zero, -M_PI_2l),
5362
5363 TEST_c_c (catanh, plus_infty, 0, 0.0, M_PI_2l),
5364 TEST_c_c (catanh, plus_infty, minus_zero, 0.0, -M_PI_2l),
5365 TEST_c_c (catanh, plus_infty, 0.5, 0.0, M_PI_2l),
5366 TEST_c_c (catanh, plus_infty, -0.5, 0.0, -M_PI_2l),
5367
5368 TEST_c_c (catanh, 0, qnan_value, 0.0, qnan_value),
5369 TEST_c_c (catanh, minus_zero, qnan_value, minus_zero, qnan_value),
5370
5371 TEST_c_c (catanh, plus_infty, qnan_value, 0.0, qnan_value),
5372 TEST_c_c (catanh, minus_infty, qnan_value, minus_zero, qnan_value),
5373
5374 TEST_c_c (catanh, qnan_value, 0, qnan_value, qnan_value),
5375 TEST_c_c (catanh, qnan_value, minus_zero, qnan_value, qnan_value),
5376
5377 TEST_c_c (catanh, qnan_value, plus_infty, 0.0, M_PI_2l, IGNORE_ZERO_INF_SIGN),
5378 TEST_c_c (catanh, qnan_value, minus_infty, 0.0, -M_PI_2l, IGNORE_ZERO_INF_SIGN),
5379
5380 TEST_c_c (catanh, 10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5381 TEST_c_c (catanh, -10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5382
5383 TEST_c_c (catanh, qnan_value, 0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5384 TEST_c_c (catanh, qnan_value, -0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5385
5386 TEST_c_c (catanh, qnan_value, qnan_value, qnan_value, qnan_value),
5387
5388 TEST_c_c (catanh, 0x1p50L, 0.0L, 8.881784197001252323389053344728897997441e-16L, 1.570796326794896619231321691639751442099L),
5389 TEST_c_c (catanh, 0x1p50L, -0.0L, 8.881784197001252323389053344728897997441e-16L, -1.570796326794896619231321691639751442099L),
5390 TEST_c_c (catanh, -0x1p50L, 0.0L, -8.881784197001252323389053344728897997441e-16L, 1.570796326794896619231321691639751442099L),
5391 TEST_c_c (catanh, -0x1p50L, -0.0L, -8.881784197001252323389053344728897997441e-16L, -1.570796326794896619231321691639751442099L),
5392 TEST_c_c (catanh, 0.0L, 0x1p50L, 0.0L, 1.570796326794895731052901991514519103193L),
5393 TEST_c_c (catanh, -0.0L, 0x1p50L, -0.0L, 1.570796326794895731052901991514519103193L),
5394 TEST_c_c (catanh, 0.0L, -0x1p50L, 0.0L, -1.570796326794895731052901991514519103193L),
5395 TEST_c_c (catanh, -0.0L, -0x1p50L, -0.0L, -1.570796326794895731052901991514519103193L),
2f38fbfe 5396#ifndef TEST_FLOAT
08198877
JM		 5397 TEST_c_c (catanh, 0x1p500L, 0.0L, 3.054936363499604682051979393213617699789e-151L, 1.570796326794896619231321691639751442099L),
5398 TEST_c_c (catanh, 0x1p500L, -0.0L, 3.054936363499604682051979393213617699789e-151L, -1.570796326794896619231321691639751442099L),
5399 TEST_c_c (catanh, -0x1p500L, 0.0L, -3.054936363499604682051979393213617699789e-151L, 1.570796326794896619231321691639751442099L),
5400 TEST_c_c (catanh, -0x1p500L, -0.0L, -3.054936363499604682051979393213617699789e-151L, -1.570796326794896619231321691639751442099L),
5401 TEST_c_c (catanh, 0.0L, 0x1p500L, 0.0L, 1.570796326794896619231321691639751442099L),
5402 TEST_c_c (catanh, -0.0L, 0x1p500L, -0.0L, 1.570796326794896619231321691639751442099L),
5403 TEST_c_c (catanh, 0.0L, -0x1p500L, 0.0L, -1.570796326794896619231321691639751442099L),
5404 TEST_c_c (catanh, -0.0L, -0x1p500L, -0.0L, -1.570796326794896619231321691639751442099L),
2f38fbfe
JM		 5405#endif
5406#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5407 TEST_c_c (catanh, 0x1p5000L, 0.0L, 7.079811261048172892385615158694057552948e-1506L, 1.570796326794896619231321691639751442099L),
5408 TEST_c_c (catanh, 0x1p5000L, -0.0L, 7.079811261048172892385615158694057552948e-1506L, -1.570796326794896619231321691639751442099L),
5409 TEST_c_c (catanh, -0x1p5000L, 0.0L, -7.079811261048172892385615158694057552948e-1506L, 1.570796326794896619231321691639751442099L),
5410 TEST_c_c (catanh, -0x1p5000L, -0.0L, -7.079811261048172892385615158694057552948e-1506L, -1.570796326794896619231321691639751442099L),
5411 TEST_c_c (catanh, 0.0L, 0x1p5000L, 0.0L, 1.570796326794896619231321691639751442099L),
5412 TEST_c_c (catanh, -0.0L, 0x1p5000L, -0.0L, 1.570796326794896619231321691639751442099L),
5413 TEST_c_c (catanh, 0.0L, -0x1p5000L, 0.0L, -1.570796326794896619231321691639751442099L),
5414 TEST_c_c (catanh, -0.0L, -0x1p5000L, -0.0L, -1.570796326794896619231321691639751442099L),
5415#endif
5416 TEST_c_c (catanh, 0x1p63L, 0.5L, 1.084202172485504434007452800869941711427e-19L, 1.570796326794896619231321691639751442093L),
5417 TEST_c_c (catanh, 0x1p63L, -0.5L, 1.084202172485504434007452800869941711427e-19L, -1.570796326794896619231321691639751442093L),
5418 TEST_c_c (catanh, -0x1p63L, 0.5L, -1.084202172485504434007452800869941711427e-19L, 1.570796326794896619231321691639751442093L),
5419 TEST_c_c (catanh, -0x1p63L, -0.5L, -1.084202172485504434007452800869941711427e-19L, -1.570796326794896619231321691639751442093L),
5420 TEST_c_c (catanh, 0.5L, 0x1p63L, 5.877471754111437539843682686111228389007e-39L, 1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
5421 TEST_c_c (catanh, -0.5L, 0x1p63L, -5.877471754111437539843682686111228389007e-39L, 1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
5422 TEST_c_c (catanh, 0.5L, -0x1p63L, 5.877471754111437539843682686111228389007e-39L, -1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
5423 TEST_c_c (catanh, -0.5L, -0x1p63L, -5.877471754111437539843682686111228389007e-39L, -1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
9457fd95 5424#ifndef TEST_FLOAT
08198877
JM		 5425 TEST_c_c (catanh, 0x1p511L, 0.5L, 1.491668146240041348658193063092586767475e-154L, 1.570796326794896619231321691639751442099L),
5426 TEST_c_c (catanh, 0x1p511L, -0.5L, 1.491668146240041348658193063092586767475e-154L, -1.570796326794896619231321691639751442099L),
5427 TEST_c_c (catanh, -0x1p511L, 0.5L, -1.491668146240041348658193063092586767475e-154L, 1.570796326794896619231321691639751442099L),
5428 TEST_c_c (catanh, -0x1p511L, -0.5L, -1.491668146240041348658193063092586767475e-154L, -1.570796326794896619231321691639751442099L),
5429 TEST_c_c (catanh, 0.5L, 0x1p511L, 1.112536929253600691545116358666202032110e-308L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5430 TEST_c_c (catanh, -0.5L, 0x1p511L, -1.112536929253600691545116358666202032110e-308L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5431 TEST_c_c (catanh, 0.5L, -0x1p511L, 1.112536929253600691545116358666202032110e-308L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5432 TEST_c_c (catanh, -0.5L, -0x1p511L, -1.112536929253600691545116358666202032110e-308L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
9457fd95
JM		 5433#endif
5434#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5435 TEST_c_c (catanh, 0x1p8191L, 0.5L, 1.833603867554847165621412392048483165956e-2466L, 1.570796326794896619231321691639751442099L),
5436 TEST_c_c (catanh, 0x1p8191L, -0.5L, 1.833603867554847165621412392048483165956e-2466L, -1.570796326794896619231321691639751442099L),
5437 TEST_c_c (catanh, -0x1p8191L, 0.5L, -1.833603867554847165621412392048483165956e-2466L, 1.570796326794896619231321691639751442099L),
5438 TEST_c_c (catanh, -0x1p8191L, -0.5L, -1.833603867554847165621412392048483165956e-2466L, -1.570796326794896619231321691639751442099L),
5439 TEST_c_c (catanh, 0.5L, 0x1p8191L, 1.681051571556046753131338908660876301299e-4932L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5440 TEST_c_c (catanh, -0.5L, 0x1p8191L, -1.681051571556046753131338908660876301299e-4932L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5441 TEST_c_c (catanh, 0.5L, -0x1p8191L, 1.681051571556046753131338908660876301299e-4932L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5442 TEST_c_c (catanh, -0.5L, -0x1p8191L, -1.681051571556046753131338908660876301299e-4932L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5443#endif
5444 TEST_c_c (catanh, 0x1p100L, 0.0L, 7.888609052210118054117285652827862296732e-31L, 1.570796326794896619231321691639751442099L),
5445 TEST_c_c (catanh, 0x1p100L, -0.0L, 7.888609052210118054117285652827862296732e-31L, -1.570796326794896619231321691639751442099L),
5446 TEST_c_c (catanh, -0x1p100L, 0.0L, -7.888609052210118054117285652827862296732e-31L, 1.570796326794896619231321691639751442099L),
5447 TEST_c_c (catanh, -0x1p100L, -0.0L, -7.888609052210118054117285652827862296732e-31L, -1.570796326794896619231321691639751442099L),
5448 TEST_c_c (catanh, 0.0L, 0x1p100L, 0.0L, 1.570796326794896619231321691638962581193L),
5449 TEST_c_c (catanh, -0.0L, 0x1p100L, -0.0L, 1.570796326794896619231321691638962581193L),
5450 TEST_c_c (catanh, 0.0L, -0x1p100L, 0.0L, -1.570796326794896619231321691638962581193L),
5451 TEST_c_c (catanh, -0.0L, -0x1p100L, -0.0L, -1.570796326794896619231321691638962581193L),
5452 TEST_c_c (catanh, 0x1.fp127L, 0.0L, 3.033533808573645181854803967025150136306e-39L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_FLOAT),
5453 TEST_c_c (catanh, 0x1.fp127L, -0.0L, 3.033533808573645181854803967025150136306e-39L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_FLOAT),
5454 TEST_c_c (catanh, -0x1.fp127L, 0.0L, -3.033533808573645181854803967025150136306e-39L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_FLOAT),
5455 TEST_c_c (catanh, -0x1.fp127L, -0.0L, -3.033533808573645181854803967025150136306e-39L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_FLOAT),
5456 TEST_c_c (catanh, 0.0L, 0x1.fp127L, 0.0L, 1.570796326794896619231321691639751442096L),
5457 TEST_c_c (catanh, -0.0L, 0x1.fp127L, -0.0L, 1.570796326794896619231321691639751442096L),
5458 TEST_c_c (catanh, 0.0L, -0x1.fp127L, 0.0L, -1.570796326794896619231321691639751442096L),
5459 TEST_c_c (catanh, -0.0L, -0x1.fp127L, -0.0L, -1.570796326794896619231321691639751442096L),
5460 TEST_c_c (catanh, 0x1.fp127L, 0x1.fp127L, 1.516766904286822590927401983512575068153e-39L, 1.570796326794896619231321691639751442097L, UNDERFLOW_EXCEPTION_FLOAT),
5461 TEST_c_c (catanh, 0x1.fp127L, -0x1.fp127L, 1.516766904286822590927401983512575068153e-39L, -1.570796326794896619231321691639751442097L, UNDERFLOW_EXCEPTION_FLOAT),
5462 TEST_c_c (catanh, -0x1.fp127L, 0x1.fp127L, -1.516766904286822590927401983512575068153e-39L, 1.570796326794896619231321691639751442097L, UNDERFLOW_EXCEPTION_FLOAT),
5463 TEST_c_c (catanh, -0x1.fp127L, -0x1.fp127L, -1.516766904286822590927401983512575068153e-39L, -1.570796326794896619231321691639751442097L, UNDERFLOW_EXCEPTION_FLOAT),
5b4217d7 5464#ifndef TEST_FLOAT
08198877
JM		 5465 TEST_c_c (catanh, 0x1p900L, 0.0L, 1.183052186166774710972751597518026531652e-271L, 1.570796326794896619231321691639751442099L),
5466 TEST_c_c (catanh, 0x1p900L, -0.0L, 1.183052186166774710972751597518026531652e-271L, -1.570796326794896619231321691639751442099L),
5467 TEST_c_c (catanh, -0x1p900L, 0.0L, -1.183052186166774710972751597518026531652e-271L, 1.570796326794896619231321691639751442099L),
5468 TEST_c_c (catanh, -0x1p900L, -0.0L, -1.183052186166774710972751597518026531652e-271L, -1.570796326794896619231321691639751442099L),
5469 TEST_c_c (catanh, 0.0L, 0x1p900L, 0.0L, 1.570796326794896619231321691639751442099L),
5470 TEST_c_c (catanh, -0.0L, 0x1p900L, -0.0L, 1.570796326794896619231321691639751442099L),
5471 TEST_c_c (catanh, 0.0L, -0x1p900L, 0.0L, -1.570796326794896619231321691639751442099L),
5472 TEST_c_c (catanh, -0.0L, -0x1p900L, -0.0L, -1.570796326794896619231321691639751442099L),
5473 TEST_c_c (catanh, 0x1.fp1023L, 0.0L, 5.742126086470197117652213464083623391533e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5474 TEST_c_c (catanh, 0x1.fp1023L, -0.0L, 5.742126086470197117652213464083623391533e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5475 TEST_c_c (catanh, -0x1.fp1023L, 0.0L, -5.742126086470197117652213464083623391533e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5476 TEST_c_c (catanh, -0x1.fp1023L, -0.0L, -5.742126086470197117652213464083623391533e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5477 TEST_c_c (catanh, 0.0L, 0x1.fp1023L, 0.0L, 1.570796326794896619231321691639751442099L),
5478 TEST_c_c (catanh, -0.0L, 0x1.fp1023L, -0.0L, 1.570796326794896619231321691639751442099L),
5479 TEST_c_c (catanh, 0.0L, -0x1.fp1023L, 0.0L, -1.570796326794896619231321691639751442099L),
5480 TEST_c_c (catanh, -0.0L, -0x1.fp1023L, -0.0L, -1.570796326794896619231321691639751442099L),
5481 TEST_c_c (catanh, 0x1.fp1023L, 0x1.fp1023L, 2.871063043235098558826106732041811695767e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5482 TEST_c_c (catanh, 0x1.fp1023L, -0x1.fp1023L, 2.871063043235098558826106732041811695767e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5483 TEST_c_c (catanh, -0x1.fp1023L, 0x1.fp1023L, -2.871063043235098558826106732041811695767e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5484 TEST_c_c (catanh, -0x1.fp1023L, -0x1.fp1023L, -2.871063043235098558826106732041811695767e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5b4217d7
JM		 5485#endif
5486#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5487 TEST_c_c (catanh, 0x1p10000L, 0.0L, 5.012372749206452009297555933742977749322e-3011L, 1.570796326794896619231321691639751442099L),
5488 TEST_c_c (catanh, 0x1p10000L, -0.0L, 5.012372749206452009297555933742977749322e-3011L, -1.570796326794896619231321691639751442099L),
5489 TEST_c_c (catanh, -0x1p10000L, 0.0L, -5.012372749206452009297555933742977749322e-3011L, 1.570796326794896619231321691639751442099L),
5490 TEST_c_c (catanh, -0x1p10000L, -0.0L, -5.012372749206452009297555933742977749322e-3011L, -1.570796326794896619231321691639751442099L),
5491 TEST_c_c (catanh, 0.0L, 0x1p10000L, 0.0L, 1.570796326794896619231321691639751442099L),
5492 TEST_c_c (catanh, -0.0L, 0x1p10000L, -0.0L, 1.570796326794896619231321691639751442099L),
5493 TEST_c_c (catanh, 0.0L, -0x1p10000L, 0.0L, -1.570796326794896619231321691639751442099L),
5494 TEST_c_c (catanh, -0.0L, -0x1p10000L, -0.0L, -1.570796326794896619231321691639751442099L),
5495 TEST_c_c (catanh, 0x1.fp16383L, 0.0L, 8.676395208031209048419813722120651877672e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5496 TEST_c_c (catanh, 0x1.fp16383L, -0.0L, 8.676395208031209048419813722120651877672e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5497 TEST_c_c (catanh, -0x1.fp16383L, 0.0L, -8.676395208031209048419813722120651877672e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5498 TEST_c_c (catanh, -0x1.fp16383L, -0.0L, -8.676395208031209048419813722120651877672e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5499 TEST_c_c (catanh, 0.0L, 0x1.fp16383L, 0.0L, 1.570796326794896619231321691639751442099L),
5500 TEST_c_c (catanh, -0.0L, 0x1.fp16383L, -0.0L, 1.570796326794896619231321691639751442099L),
5501 TEST_c_c (catanh, 0.0L, -0x1.fp16383L, 0.0L, -1.570796326794896619231321691639751442099L),
5502 TEST_c_c (catanh, -0.0L, -0x1.fp16383L, -0.0L, -1.570796326794896619231321691639751442099L),
5503 TEST_c_c (catanh, 0x1.fp16383L, 0x1.fp16383L, 4.338197604015604524209906861060325938836e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5504 TEST_c_c (catanh, 0x1.fp16383L, -0x1.fp16383L, 4.338197604015604524209906861060325938836e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5505 TEST_c_c (catanh, -0x1.fp16383L, 0x1.fp16383L, -4.338197604015604524209906861060325938836e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5506 TEST_c_c (catanh, -0x1.fp16383L, -0x1.fp16383L, -4.338197604015604524209906861060325938836e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5507#endif
5508 TEST_c_c (catanh, 0x1p-13L, 1.0L, 6.103515609841754902688560615027452023669e-5L, 7.853981671227386080775748393881580082970e-1L),
5509 TEST_c_c (catanh, 0x1p-13L, -1.0L, 6.103515609841754902688560615027452023669e-5L, -7.853981671227386080775748393881580082970e-1L),
5510 TEST_c_c (catanh, -0x1p-13L, 1.0L, -6.103515609841754902688560615027452023669e-5L, 7.853981671227386080775748393881580082970e-1L),
5511 TEST_c_c (catanh, -0x1p-13L, -1.0L, -6.103515609841754902688560615027452023669e-5L, -7.853981671227386080775748393881580082970e-1L),
5512 TEST_c_c (catanh, 1.0L, 0x1p-13L, 4.852030264850939738801379894163661227127L, 7.854286809755354140031716771044626356262e-1L),
5513 TEST_c_c (catanh, -1.0L, 0x1p-13L, -4.852030264850939738801379894163661227127L, 7.854286809755354140031716771044626356262e-1L),
5514 TEST_c_c (catanh, 1.0L, -0x1p-13L, 4.852030264850939738801379894163661227127L, -7.854286809755354140031716771044626356262e-1L),
5515 TEST_c_c (catanh, -1.0L, -0x1p-13L, -4.852030264850939738801379894163661227127L, -7.854286809755354140031716771044626356262e-1L),
5516 TEST_c_c (catanh, 0x1p-27L, 1.0L, 3.725290298461914028034141143623846306386e-9L, 7.853981633974483234934486536343324763447e-1L),
5517 TEST_c_c (catanh, 0x1p-27L, -1.0L, 3.725290298461914028034141143623846306386e-9L, -7.853981633974483234934486536343324763447e-1L),
5518 TEST_c_c (catanh, -0x1p-27L, 1.0L, -3.725290298461914028034141143623846306386e-9L, 7.853981633974483234934486536343324763447e-1L),
5519 TEST_c_c (catanh, -0x1p-27L, -1.0L, -3.725290298461914028034141143623846306386e-9L, -7.853981633974483234934486536343324763447e-1L),
5520 TEST_c_c (catanh, 1.0L, 0x1p-27L, 9.704060527839234335310696652368086117807L, 7.853981652600934588466178684534110069553e-1L),
5521 TEST_c_c (catanh, -1.0L, 0x1p-27L, -9.704060527839234335310696652368086117807L, 7.853981652600934588466178684534110069553e-1L),
5522 TEST_c_c (catanh, 1.0L, -0x1p-27L, 9.704060527839234335310696652368086117807L, -7.853981652600934588466178684534110069553e-1L),
5523 TEST_c_c (catanh, -1.0L, -0x1p-27L, -9.704060527839234335310696652368086117807L, -7.853981652600934588466178684534110069553e-1L),
5524 TEST_c_c (catanh, 0x1p-33L, 1.0L, 5.820766091346740722643102318246316469910e-11L, 7.853981633974483096190489776088929224056e-1L),
5525 TEST_c_c (catanh, 0x1p-33L, -1.0L, 5.820766091346740722643102318246316469910e-11L, -7.853981633974483096190489776088929224056e-1L),
5526 TEST_c_c (catanh, -0x1p-33L, 1.0L, -5.820766091346740722643102318246316469910e-11L, 7.853981633974483096190489776088929224056e-1L),
5527 TEST_c_c (catanh, -0x1p-33L, -1.0L, -5.820766091346740722643102318246316469910e-11L, -7.853981633974483096190489776088929224056e-1L),
5528 TEST_c_c (catanh, 1.0L, 0x1p-33L, 1.178350206951907026009379309773625595762e1L, 7.853981634265521400723945494331241018449e-1L),
5529 TEST_c_c (catanh, -1.0L, 0x1p-33L, -1.178350206951907026009379309773625595762e1L, 7.853981634265521400723945494331241018449e-1L),
5530 TEST_c_c (catanh, 1.0L, -0x1p-33L, 1.178350206951907026009379309773625595762e1L, -7.853981634265521400723945494331241018449e-1L),
5531 TEST_c_c (catanh, -1.0L, -0x1p-33L, -1.178350206951907026009379309773625595762e1L, -7.853981634265521400723945494331241018449e-1L),
5532 TEST_c_c (catanh, 0x1p-54L, 1.0L, 2.775557561562891351059079170227049355775e-17L, 7.853981633974483096156608458198764914213e-1L),
5533 TEST_c_c (catanh, 0x1p-54L, -1.0L, 2.775557561562891351059079170227049355775e-17L, -7.853981633974483096156608458198764914213e-1L),
5534 TEST_c_c (catanh, -0x1p-54L, 1.0L, -2.775557561562891351059079170227049355775e-17L, 7.853981633974483096156608458198764914213e-1L),
5535 TEST_c_c (catanh, -0x1p-54L, -1.0L, -2.775557561562891351059079170227049355775e-17L, -7.853981633974483096156608458198764914213e-1L),
5536 TEST_c_c (catanh, 1.0L, 0x1p-54L, 1.906154746539849600897388334009985581467e1L, 7.853981633974483234934486536343324763447e-1L),
5537 TEST_c_c (catanh, -1.0L, 0x1p-54L, -1.906154746539849600897388334009985581467e1L, 7.853981633974483234934486536343324763447e-1L),
5538 TEST_c_c (catanh, 1.0L, -0x1p-54L, 1.906154746539849600897388334009985581467e1L, -7.853981633974483234934486536343324763447e-1L),
5539 TEST_c_c (catanh, -1.0L, -0x1p-54L, -1.906154746539849600897388334009985581467e1L, -7.853981633974483234934486536343324763447e-1L),
5540 TEST_c_c (catanh, 0x1p-57L, 1.0L, 3.469446951953614188823848962783813448721e-18L, 7.853981633974483096156608458198757330864e-1L),
5541 TEST_c_c (catanh, 0x1p-57L, -1.0L, 3.469446951953614188823848962783813448721e-18L, -7.853981633974483096156608458198757330864e-1L),
5542 TEST_c_c (catanh, -0x1p-57L, 1.0L, -3.469446951953614188823848962783813448721e-18L, 7.853981633974483096156608458198757330864e-1L),
5543 TEST_c_c (catanh, -0x1p-57L, -1.0L, -3.469446951953614188823848962783813448721e-18L, -7.853981633974483096156608458198757330864e-1L),
5544 TEST_c_c (catanh, 1.0L, 0x1p-57L, 2.010126823623841397309973152228712047720e1L, 7.853981633974483113503843217966828154612e-1L),
5545 TEST_c_c (catanh, -1.0L, 0x1p-57L, -2.010126823623841397309973152228712047720e1L, 7.853981633974483113503843217966828154612e-1L),
5546 TEST_c_c (catanh, 1.0L, -0x1p-57L, 2.010126823623841397309973152228712047720e1L, -7.853981633974483113503843217966828154612e-1L),
5547 TEST_c_c (catanh, -1.0L, -0x1p-57L, -2.010126823623841397309973152228712047720e1L, -7.853981633974483113503843217966828154612e-1L),
5548 TEST_c_c (catanh, 0x1p-13L, 0x1.000002p0L, 6.103514882246036852433556327261700380577e-5L, 7.853982267273793866654490522673596014524e-1L),
5549 TEST_c_c (catanh, 0x1p-13L, -0x1.000002p0L, 6.103514882246036852433556327261700380577e-5L, -7.853982267273793866654490522673596014524e-1L),
5550 TEST_c_c (catanh, -0x1p-13L, 0x1.000002p0L, -6.103514882246036852433556327261700380577e-5L, 7.853982267273793866654490522673596014524e-1L),
5551 TEST_c_c (catanh, -0x1p-13L, -0x1.000002p0L, -6.103514882246036852433556327261700380577e-5L, -7.853982267273793866654490522673596014524e-1L),
5552 TEST_c_c (catanh, 0x1.000002p0L, 0x1p-13L, 4.852030056234795712498957387213592193975L, 7.859169620684960844300240092596908675974e-1L),
5553 TEST_c_c (catanh, -0x1.000002p0L, 0x1p-13L, -4.852030056234795712498957387213592193975L, 7.859169620684960844300240092596908675974e-1L),
5554 TEST_c_c (catanh, 0x1.000002p0L, -0x1p-13L, 4.852030056234795712498957387213592193975L, -7.859169620684960844300240092596908675974e-1L),
5555 TEST_c_c (catanh, -0x1.000002p0L, -0x1p-13L, -4.852030056234795712498957387213592193975L, -7.859169620684960844300240092596908675974e-1L),
5556 TEST_c_c (catanh, 0x1p-13L, 0x0.ffffffp0L, 6.103515973639646453881721999956617260502e-5L, 7.853981373204155542484315721351697277336e-1L),
5557 TEST_c_c (catanh, 0x1p-13L, -0x0.ffffffp0L, 6.103515973639646453881721999956617260502e-5L, -7.853981373204155542484315721351697277336e-1L),
5558 TEST_c_c (catanh, -0x1p-13L, 0x0.ffffffp0L, -6.103515973639646453881721999956617260502e-5L, 7.853981373204155542484315721351697277336e-1L),
5559 TEST_c_c (catanh, -0x1p-13L, -0x0.ffffffp0L, -6.103515973639646453881721999956617260502e-5L, -7.853981373204155542484315721351697277336e-1L),
5560 TEST_c_c (catanh, 0x0.ffffffp0L, 0x1p-13L, 4.852030190345140708455871037447717761868L, 7.851845403708474595909269086711426246675e-1L),
5561 TEST_c_c (catanh, -0x0.ffffffp0L, 0x1p-13L, -4.852030190345140708455871037447717761868L, 7.851845403708474595909269086711426246675e-1L),
5562 TEST_c_c (catanh, 0x0.ffffffp0L, -0x1p-13L, 4.852030190345140708455871037447717761868L, -7.851845403708474595909269086711426246675e-1L),
5563 TEST_c_c (catanh, -0x0.ffffffp0L, -0x1p-13L, -4.852030190345140708455871037447717761868L, -7.851845403708474595909269086711426246675e-1L),
caf84319 5564#ifndef TEST_FLOAT
08198877
JM		 5565 TEST_c_c (catanh, 0x1p-27L, 0x1.0000000000001p0L, 3.725290298461913200853528590596263270474e-9L, 7.853981633974484345157511161499711112683e-1L),
5566 TEST_c_c (catanh, 0x1p-27L, -0x1.0000000000001p0L, 3.725290298461913200853528590596263270474e-9L, -7.853981633974484345157511161499711112683e-1L),
5567 TEST_c_c (catanh, -0x1p-27L, 0x1.0000000000001p0L, -3.725290298461913200853528590596263270474e-9L, 7.853981633974484345157511161499711112683e-1L),
5568 TEST_c_c (catanh, -0x1p-27L, -0x1.0000000000001p0L, -3.725290298461913200853528590596263270474e-9L, -7.853981633974484345157511161499711112683e-1L),
5569 TEST_c_c (catanh, 0x1.0000000000001p0L, 0x1p-27L, 9.704060527839234168777242958594699810015L, 7.853981801612546526942695000283242525531e-1L),
5570 TEST_c_c (catanh, -0x1.0000000000001p0L, 0x1p-27L, -9.704060527839234168777242958594699810015L, 7.853981801612546526942695000283242525531e-1L),
5571 TEST_c_c (catanh, 0x1.0000000000001p0L, -0x1p-27L, 9.704060527839234168777242958594699810015L, -7.853981801612546526942695000283242525531e-1L),
5572 TEST_c_c (catanh, -0x1.0000000000001p0L, -0x1p-27L, -9.704060527839234168777242958594699810015L, -7.853981801612546526942695000283242525531e-1L),
5573 TEST_c_c (catanh, 0x1p-27L, 0x0.fffffffffffff8p0L, 3.725290298461914441624447420137706700965e-9L, 7.853981633974482679822974223765039144191e-1L),
5574 TEST_c_c (catanh, 0x1p-27L, -0x0.fffffffffffff8p0L, 3.725290298461914441624447420137706700965e-9L, -7.853981633974482679822974223765039144191e-1L),
5575 TEST_c_c (catanh, -0x1p-27L, 0x0.fffffffffffff8p0L, -3.725290298461914441624447420137706700965e-9L, 7.853981633974482679822974223765039144191e-1L),
5576 TEST_c_c (catanh, -0x1p-27L, -0x0.fffffffffffff8p0L, -3.725290298461914441624447420137706700965e-9L, -7.853981633974482679822974223765039144191e-1L),
5577 TEST_c_c (catanh, 0x0.fffffffffffff8p0L, 0x1p-27L, 9.704060527839234252043969805481351363824L, 7.853981578095128619227903983047292781021e-1L),
5578 TEST_c_c (catanh, -0x0.fffffffffffff8p0L, 0x1p-27L, -9.704060527839234252043969805481351363824L, 7.853981578095128619227903983047292781021e-1L),
5579 TEST_c_c (catanh, 0x0.fffffffffffff8p0L, -0x1p-27L, 9.704060527839234252043969805481351363824L, -7.853981578095128619227903983047292781021e-1L),
5580 TEST_c_c (catanh, -0x0.fffffffffffff8p0L, -0x1p-27L, -9.704060527839234252043969805481351363824L, -7.853981578095128619227903983047292781021e-1L),
caf84319
JM		 5581#endif
5582#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 5583 TEST_c_c (catanh, 0x1p-33L, 0x1.0000000000000002p0L, 5.820766091346740722012013594069507025615e-11L, 7.853981633974483096732590862331681441026e-1L),
5584 TEST_c_c (catanh, 0x1p-33L, -0x1.0000000000000002p0L, 5.820766091346740722012013594069507025615e-11L, -7.853981633974483096732590862331681441026e-1L),
5585 TEST_c_c (catanh, -0x1p-33L, 0x1.0000000000000002p0L, -5.820766091346740722012013594069507025615e-11L, 7.853981633974483096732590862331681441026e-1L),
5586 TEST_c_c (catanh, -0x1p-33L, -0x1.0000000000000002p0L, -5.820766091346740722012013594069507025615e-11L, -7.853981633974483096732590862331681441026e-1L),
5587 TEST_c_c (catanh, 0x1.0000000000000002p0L, 0x1p-33L, 1.178350206951907025990405771755129268176e1L, 7.853981638922134273801338071094141188767e-1L),
5588 TEST_c_c (catanh, -0x1.0000000000000002p0L, 0x1p-33L, -1.178350206951907025990405771755129268176e1L, 7.853981638922134273801338071094141188767e-1L),
5589 TEST_c_c (catanh, 0x1.0000000000000002p0L, -0x1p-33L, 1.178350206951907025990405771755129268176e1L, -7.853981638922134273801338071094141188767e-1L),
5590 TEST_c_c (catanh, -0x1.0000000000000002p0L, -0x1p-33L, -1.178350206951907025990405771755129268176e1L, -7.853981638922134273801338071094141188767e-1L),
5591 TEST_c_c (catanh, 0x1p-33L, 0x0.ffffffffffffffffp0L, 5.820766091346740722958646680334721192083e-11L, 7.853981633974483095919439232967553115548e-1L),
5592 TEST_c_c (catanh, 0x1p-33L, -0x0.ffffffffffffffffp0L, 5.820766091346740722958646680334721192083e-11L, -7.853981633974483095919439232967553115548e-1L),
5593 TEST_c_c (catanh, -0x1p-33L, 0x0.ffffffffffffffffp0L, -5.820766091346740722958646680334721192083e-11L, 7.853981633974483095919439232967553115548e-1L),
5594 TEST_c_c (catanh, -0x1p-33L, -0x0.ffffffffffffffffp0L, -5.820766091346740722958646680334721192083e-11L, -7.853981633974483095919439232967553115548e-1L),
5595 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, 0x1p-33L, 1.178350206951907026002603046195591193050e1L, 7.853981631937214964185249205444919953948e-1L),
5596 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, 0x1p-33L, -1.178350206951907026002603046195591193050e1L, 7.853981631937214964185249205444919953948e-1L),
5597 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, -0x1p-33L, 1.178350206951907026002603046195591193050e1L, -7.853981631937214964185249205444919953948e-1L),
5598 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, -0x1p-33L, -1.178350206951907026002603046195591193050e1L, -7.853981631937214964185249205444919953948e-1L),
caf84319
JM		 5599#endif
5600#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 5601 TEST_c_c (catanh, 0x1p-54L, 0x1.000000000000000000000000008p0L, 2.775557561562891351059079170226980932999e-17L, 7.853981633974483096156608458198888173729e-1L),
5602 TEST_c_c (catanh, 0x1p-54L, -0x1.000000000000000000000000008p0L, 2.775557561562891351059079170226980932999e-17L, -7.853981633974483096156608458198888173729e-1L),
5603 TEST_c_c (catanh, -0x1p-54L, 0x1.000000000000000000000000008p0L, -2.775557561562891351059079170226980932999e-17L, 7.853981633974483096156608458198888173729e-1L),
5604 TEST_c_c (catanh, -0x1p-54L, -0x1.000000000000000000000000008p0L, -2.775557561562891351059079170226980932999e-17L, -7.853981633974483096156608458198888173729e-1L),
5605 TEST_c_c (catanh, 0x1.000000000000000000000000008p0L, 0x1p-54L, 1.906154746539849600897388334009981267384e1L, 7.853981633974485455380535786656405610710e-1L),
5606 TEST_c_c (catanh, -0x1.000000000000000000000000008p0L, 0x1p-54L, -1.906154746539849600897388334009981267384e1L, 7.853981633974485455380535786656405610710e-1L),
5607 TEST_c_c (catanh, 0x1.000000000000000000000000008p0L, -0x1p-54L, 1.906154746539849600897388334009981267384e1L, -7.853981633974485455380535786656405610710e-1L),
5608 TEST_c_c (catanh, -0x1.000000000000000000000000008p0L, -0x1p-54L, -1.906154746539849600897388334009981267384e1L, -7.853981633974485455380535786656405610710e-1L),
5609 TEST_c_c (catanh, 0x1p-54L, 0x0.ffffffffffffffffffffffffffcp0L, 2.775557561562891351059079170227083567164e-17L, 7.853981633974483096156608458198703284454e-1L),
5610 TEST_c_c (catanh, 0x1p-54L, -0x0.ffffffffffffffffffffffffffcp0L, 2.775557561562891351059079170227083567164e-17L, -7.853981633974483096156608458198703284454e-1L),
5611 TEST_c_c (catanh, -0x1p-54L, 0x0.ffffffffffffffffffffffffffcp0L, -2.775557561562891351059079170227083567164e-17L, 7.853981633974483096156608458198703284454e-1L),
5612 TEST_c_c (catanh, -0x1p-54L, -0x0.ffffffffffffffffffffffffffcp0L, -2.775557561562891351059079170227083567164e-17L, -7.853981633974483096156608458198703284454e-1L),
5613 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-54L, 1.906154746539849600897388334009984040723e1L, 7.853981633974482124711461911186784339815e-1L),
5614 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-54L, -1.906154746539849600897388334009984040723e1L, 7.853981633974482124711461911186784339815e-1L),
5615 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-54L, 1.906154746539849600897388334009984040723e1L, -7.853981633974482124711461911186784339815e-1L),
5616 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-54L, -1.906154746539849600897388334009984040723e1L, -7.853981633974482124711461911186784339815e-1L),
caf84319
JM		 5617#endif
5618#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 5619 TEST_c_c (catanh, 0x1p-57L, 0x1.0000000000000000000000000001p0L, 3.469446951953614188823848962783812780530e-18L, 7.853981633974483096156608458198758293829e-1L),
5620 TEST_c_c (catanh, 0x1p-57L, -0x1.0000000000000000000000000001p0L, 3.469446951953614188823848962783812780530e-18L, -7.853981633974483096156608458198758293829e-1L),
5621 TEST_c_c (catanh, -0x1p-57L, 0x1.0000000000000000000000000001p0L, -3.469446951953614188823848962783812780530e-18L, 7.853981633974483096156608458198758293829e-1L),
5622 TEST_c_c (catanh, -0x1p-57L, -0x1.0000000000000000000000000001p0L, -3.469446951953614188823848962783812780530e-18L, -7.853981633974483096156608458198758293829e-1L),
5623 TEST_c_c (catanh, 0x1.0000000000000000000000000001p0L, 0x1p-57L, 2.010126823623841397309973152228712033275e1L, 7.853981633974483252281721296111395707566e-1L),
5624 TEST_c_c (catanh, -0x1.0000000000000000000000000001p0L, 0x1p-57L, -2.010126823623841397309973152228712033275e1L, 7.853981633974483252281721296111395707566e-1L),
5625 TEST_c_c (catanh, 0x1.0000000000000000000000000001p0L, -0x1p-57L, 2.010126823623841397309973152228712033275e1L, -7.853981633974483252281721296111395707566e-1L),
5626 TEST_c_c (catanh, -0x1.0000000000000000000000000001p0L, -0x1p-57L, -2.010126823623841397309973152228712033275e1L, -7.853981633974483252281721296111395707566e-1L),
5627 TEST_c_c (catanh, 0x1p-57L, 0x0.ffffffffffffffffffffffffffff8p0L, 3.469446951953614188823848962783813782817e-18L, 7.853981633974483096156608458198756849381e-1L),
5628 TEST_c_c (catanh, 0x1p-57L, -0x0.ffffffffffffffffffffffffffff8p0L, 3.469446951953614188823848962783813782817e-18L, -7.853981633974483096156608458198756849381e-1L),
5629 TEST_c_c (catanh, -0x1p-57L, 0x0.ffffffffffffffffffffffffffff8p0L, -3.469446951953614188823848962783813782817e-18L, 7.853981633974483096156608458198756849381e-1L),
5630 TEST_c_c (catanh, -0x1p-57L, -0x0.ffffffffffffffffffffffffffff8p0L, -3.469446951953614188823848962783813782817e-18L, -7.853981633974483096156608458198756849381e-1L),
5631 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-57L, 2.010126823623841397309973152228712040498e1L, 7.853981633974483044114904178894544378135e-1L),
5632 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-57L, -2.010126823623841397309973152228712040498e1L, 7.853981633974483044114904178894544378135e-1L),
5633 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-57L, 2.010126823623841397309973152228712040498e1L, -7.853981633974483044114904178894544378135e-1L),
5634 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-57L, -2.010126823623841397309973152228712040498e1L, -7.853981633974483044114904178894544378135e-1L),
5635#endif
5636 TEST_c_c (catanh, 1.0L, 0x1p-64L, 2.252728336819822255606004394739073846245e1L, 7.853981633974483096292133729759445264744e-1L),
5637 TEST_c_c (catanh, 1.0L, -0x1p-64L, 2.252728336819822255606004394739073846245e1L, -7.853981633974483096292133729759445264744e-1L),
5638 TEST_c_c (catanh, -1.0L, 0x1p-64L, -2.252728336819822255606004394739073846245e1L, 7.853981633974483096292133729759445264744e-1L),
5639 TEST_c_c (catanh, -1.0L, -0x1p-64L, -2.252728336819822255606004394739073846245e1L, -7.853981633974483096292133729759445264744e-1L),
5640 TEST_c_c (catanh, 0x1p-64L, 1.0L, 2.710505431213761085018632002174854278563e-20L, 7.853981633974483096156608458198757210500e-1L),
5641 TEST_c_c (catanh, -0x1p-64L, 1.0L, -2.710505431213761085018632002174854278563e-20L, 7.853981633974483096156608458198757210500e-1L),
5642 TEST_c_c (catanh, 0x1p-64L, -1.0L, 2.710505431213761085018632002174854278563e-20L, -7.853981633974483096156608458198757210500e-1L),
5643 TEST_c_c (catanh, -0x1p-64L, -1.0L, -2.710505431213761085018632002174854278563e-20L, -7.853981633974483096156608458198757210500e-1L),
5644 TEST_c_c (catanh, 1.0L, 0x1.3p-73L, 2.556052055225464683726753902092495938633e1L, 7.853981633974483096156922786831527361009e-1L),
5645 TEST_c_c (catanh, 1.0L, -0x1.3p-73L, 2.556052055225464683726753902092495938633e1L, -7.853981633974483096156922786831527361009e-1L),
5646 TEST_c_c (catanh, -1.0L, 0x1.3p-73L, -2.556052055225464683726753902092495938633e1L, 7.853981633974483096156922786831527361009e-1L),
5647 TEST_c_c (catanh, -1.0L, -0x1.3p-73L, -2.556052055225464683726753902092495938633e1L, -7.853981633974483096156922786831527361009e-1L),
5648 TEST_c_c (catanh, 0x1.3p-73L, 1.0L, 6.286572655403010329022706059731717687100e-23L, 7.853981633974483096156608458198757210493e-1L),
5649 TEST_c_c (catanh, -0x1.3p-73L, 1.0L, -6.286572655403010329022706059731717687100e-23L, 7.853981633974483096156608458198757210493e-1L),
5650 TEST_c_c (catanh, 0x1.3p-73L, -1.0L, 6.286572655403010329022706059731717687100e-23L, -7.853981633974483096156608458198757210493e-1L),
5651 TEST_c_c (catanh, -0x1.3p-73L, -1.0L, -6.286572655403010329022706059731717687100e-23L, -7.853981633974483096156608458198757210493e-1L),
5652 TEST_c_c (catanh, 1.0L, 0x1p-124L, 4.332169878499658183857700759113603550472e1L, 7.853981633974483096156608458198757210610e-1L),
5653 TEST_c_c (catanh, 1.0L, -0x1p-124L, 4.332169878499658183857700759113603550472e1L, -7.853981633974483096156608458198757210610e-1L),
5654 TEST_c_c (catanh, -1.0L, 0x1p-124L, -4.332169878499658183857700759113603550472e1L, 7.853981633974483096156608458198757210610e-1L),
5655 TEST_c_c (catanh, -1.0L, -0x1p-124L, -4.332169878499658183857700759113603550472e1L, -7.853981633974483096156608458198757210610e-1L),
5656 TEST_c_c (catanh, 0x1p-124L, 1.0L, 2.350988701644575015937473074444491355637e-38L, 7.853981633974483096156608458198757210493e-1L),
5657 TEST_c_c (catanh, -0x1p-124L, 1.0L, -2.350988701644575015937473074444491355637e-38L, 7.853981633974483096156608458198757210493e-1L),
5658 TEST_c_c (catanh, 0x1p-124L, -1.0L, 2.350988701644575015937473074444491355637e-38L, -7.853981633974483096156608458198757210493e-1L),
5659 TEST_c_c (catanh, -0x1p-124L, -1.0L, -2.350988701644575015937473074444491355637e-38L, -7.853981633974483096156608458198757210493e-1L),
5660 TEST_c_c (catanh, 0x1.000002p0L, 0x1p-126L, 8.317766196521665212523713550410777685446L, 1.570796326794896619231321691639702138295L),
5661 TEST_c_c (catanh, 0x1.000002p0L, -0x1p-126L, 8.317766196521665212523713550410777685446L, -1.570796326794896619231321691639702138295L),
5662 TEST_c_c (catanh, -0x1.000002p0L, 0x1p-126L, -8.317766196521665212523713550410777685446L, 1.570796326794896619231321691639702138295L),
5663 TEST_c_c (catanh, -0x1.000002p0L, -0x1p-126L, -8.317766196521665212523713550410777685446L, -1.570796326794896619231321691639702138295L),
5664 TEST_c_c (catanh, 0x1p-126L, 0x1.000002p0L, 5.877471053462247139383742414506671233336e-39L, 7.853982230020895322927482174768220815493e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5665 TEST_c_c (catanh, -0x1p-126L, 0x1.000002p0L, -5.877471053462247139383742414506671233336e-39L, 7.853982230020895322927482174768220815493e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5666 TEST_c_c (catanh, 0x1p-126L, -0x1.000002p0L, 5.877471053462247139383742414506671233336e-39L, -7.853982230020895322927482174768220815493e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5667 TEST_c_c (catanh, -0x1p-126L, -0x1.000002p0L, -5.877471053462247139383742414506671233336e-39L, -7.853982230020895322927482174768220815493e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5668 TEST_c_c (catanh, 0x0.ffffffp0L, 0x1p-126L, 8.664339742098154951823135931565866792454L, 9.860761609136244031334147100512154160097e-32L),
5669 TEST_c_c (catanh, 0x0.ffffffp0L, -0x1p-126L, 8.664339742098154951823135931565866792454L, -9.860761609136244031334147100512154160097e-32L),
5670 TEST_c_c (catanh, -0x0.ffffffp0L, 0x1p-126L, -8.664339742098154951823135931565866792454L, 9.860761609136244031334147100512154160097e-32L),
5671 TEST_c_c (catanh, -0x0.ffffffp0L, -0x1p-126L, -8.664339742098154951823135931565866792454L, -9.860761609136244031334147100512154160097e-32L),
5672 TEST_c_c (catanh, 0x1p-126L, 0x0.ffffffp0L, 5.877472104436064061535099214664320916184e-39L, 7.853981335951250337419109991749089175724e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5673 TEST_c_c (catanh, -0x1p-126L, 0x0.ffffffp0L, -5.877472104436064061535099214664320916184e-39L, 7.853981335951250337419109991749089175724e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5674 TEST_c_c (catanh, 0x1p-126L, -0x0.ffffffp0L, 5.877472104436064061535099214664320916184e-39L, -7.853981335951250337419109991749089175724e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5675 TEST_c_c (catanh, -0x1p-126L, -0x0.ffffffp0L, -5.877472104436064061535099214664320916184e-39L, -7.853981335951250337419109991749089175724e-1L, UNDERFLOW_EXCEPTION_FLOAT),
10de07f5 5676#ifndef TEST_FLOAT
08198877
JM		 5677 TEST_c_c (catanh, 1.0L, 0x1p-512L, 1.777922518136259718655200391540222897114e2L, 7.853981633974483096156608458198757210493e-1L),
5678 TEST_c_c (catanh, 1.0L, -0x1p-512L, 1.777922518136259718655200391540222897114e2L, -7.853981633974483096156608458198757210493e-1L),
5679 TEST_c_c (catanh, -1.0L, 0x1p-512L, -1.777922518136259718655200391540222897114e2L, 7.853981633974483096156608458198757210493e-1L),
5680 TEST_c_c (catanh, -1.0L, -0x1p-512L, -1.777922518136259718655200391540222897114e2L, -7.853981633974483096156608458198757210493e-1L),
5681 TEST_c_c (catanh, 0x1p-512L, 1.0L, 3.729170365600103371645482657731466918688e-155L, 7.853981633974483096156608458198757210493e-1L),
5682 TEST_c_c (catanh, -0x1p-512L, 1.0L, -3.729170365600103371645482657731466918688e-155L, 7.853981633974483096156608458198757210493e-1L),
5683 TEST_c_c (catanh, 0x1p-512L, -1.0L, 3.729170365600103371645482657731466918688e-155L, -7.853981633974483096156608458198757210493e-1L),
5684 TEST_c_c (catanh, -0x1p-512L, -1.0L, -3.729170365600103371645482657731466918688e-155L, -7.853981633974483096156608458198757210493e-1L),
5685 TEST_c_c (catanh, 1.0L, 0x1.3p-536L, 1.860240928518819859673567751384928348958e2L, 7.853981633974483096156608458198757210493e-1L),
5686 TEST_c_c (catanh, 1.0L, -0x1.3p-536L, 1.860240928518819859673567751384928348958e2L, -7.853981633974483096156608458198757210493e-1L),
5687 TEST_c_c (catanh, -1.0L, 0x1.3p-536L, -1.860240928518819859673567751384928348958e2L, 7.853981633974483096156608458198757210493e-1L),
5688 TEST_c_c (catanh, -1.0L, -0x1.3p-536L, -1.860240928518819859673567751384928348958e2L, -7.853981633974483096156608458198757210493e-1L),
5689 TEST_c_c (catanh, 0x1.3p-536L, 1.0L, 2.639526015013529511588222179446290115084e-162L, 7.853981633974483096156608458198757210493e-1L),
5690 TEST_c_c (catanh, -0x1.3p-536L, 1.0L, -2.639526015013529511588222179446290115084e-162L, 7.853981633974483096156608458198757210493e-1L),
5691 TEST_c_c (catanh, 0x1.3p-536L, -1.0L, 2.639526015013529511588222179446290115084e-162L, -7.853981633974483096156608458198757210493e-1L),
5692 TEST_c_c (catanh, -0x1.3p-536L, -1.0L, -2.639526015013529511588222179446290115084e-162L, -7.853981633974483096156608458198757210493e-1L),
5693 TEST_c_c (catanh, 1.0L, 0x1p-1020L, 3.538516356758520804574969980043991380025e2L, 7.853981633974483096156608458198757210493e-1L),
5694 TEST_c_c (catanh, 1.0L, -0x1p-1020L, 3.538516356758520804574969980043991380025e2L, -7.853981633974483096156608458198757210493e-1L),
5695 TEST_c_c (catanh, -1.0L, 0x1p-1020L, -3.538516356758520804574969980043991380025e2L, 7.853981633974483096156608458198757210493e-1L),
5696 TEST_c_c (catanh, -1.0L, -0x1p-1020L, -3.538516356758520804574969980043991380025e2L, -7.853981633974483096156608458198757210493e-1L),
5697 TEST_c_c (catanh, 0x1p-1020L, 1.0L, 4.450147717014402766180465434664808128438e-308L, 7.853981633974483096156608458198757210493e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5698 TEST_c_c (catanh, -0x1p-1020L, 1.0L, -4.450147717014402766180465434664808128438e-308L, 7.853981633974483096156608458198757210493e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5699 TEST_c_c (catanh, 0x1p-1020L, -1.0L, 4.450147717014402766180465434664808128438e-308L, -7.853981633974483096156608458198757210493e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5700 TEST_c_c (catanh, -0x1p-1020L, -1.0L, -4.450147717014402766180465434664808128438e-308L, -7.853981633974483096156608458198757210493e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5701 TEST_c_c (catanh, 0x1.0000000000001p0L, 0x1p-1022L, 1.836840028483855075506780244989950299369e1L, 1.570796326794896619231321691639751442099L),
5702 TEST_c_c (catanh, 0x1.0000000000001p0L, -0x1p-1022L, 1.836840028483855075506780244989950299369e1L, -1.570796326794896619231321691639751442099L),
5703 TEST_c_c (catanh, -0x1.0000000000001p0L, 0x1p-1022L, -1.836840028483855075506780244989950299369e1L, 1.570796326794896619231321691639751442099L),
5704 TEST_c_c (catanh, -0x1.0000000000001p0L, -0x1p-1022L, -1.836840028483855075506780244989950299369e1L, -1.570796326794896619231321691639751442099L),
5705 TEST_c_c (catanh, 0x1p-1022L, 0x1.0000000000001p0L, 1.112536929253600444512293438042957369978e-308L, 7.853981633974484206379633083355174374608e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5706 TEST_c_c (catanh, -0x1p-1022L, 0x1.0000000000001p0L, -1.112536929253600444512293438042957369978e-308L, 7.853981633974484206379633083355174374608e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5707 TEST_c_c (catanh, 0x1p-1022L, -0x1.0000000000001p0L, 1.112536929253600444512293438042957369978e-308L, -7.853981633974484206379633083355174374608e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5708 TEST_c_c (catanh, -0x1p-1022L, -0x1.0000000000001p0L, -1.112536929253600444512293438042957369978e-308L, -7.853981633974484206379633083355174374608e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5709 TEST_c_c (catanh, 0x0.fffffffffffff8p0L, 0x1p-1022L, 1.871497387511852332650969166374185305708e1L, 1.002084180004486444624900488355118689113e-292L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5710 TEST_c_c (catanh, 0x0.fffffffffffff8p0L, -0x1p-1022L, 1.871497387511852332650969166374185305708e1L, -1.002084180004486444624900488355118689113e-292L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5711 TEST_c_c (catanh, -0x0.fffffffffffff8p0L, 0x1p-1022L, -1.871497387511852332650969166374185305708e1L, 1.002084180004486444624900488355118689113e-292L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5712 TEST_c_c (catanh, -0x0.fffffffffffff8p0L, -0x1p-1022L, -1.871497387511852332650969166374185305708e1L, -1.002084180004486444624900488355118689113e-292L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5713 TEST_c_c (catanh, 0x1p-1022L, 0x0.fffffffffffff8p0L, 1.112536929253600815061527818977844932790e-308L, 7.853981633974482541045096145620456183798e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5714 TEST_c_c (catanh, -0x1p-1022L, 0x0.fffffffffffff8p0L, -1.112536929253600815061527818977844932790e-308L, 7.853981633974482541045096145620456183798e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5715 TEST_c_c (catanh, 0x1p-1022L, -0x0.fffffffffffff8p0L, 1.112536929253600815061527818977844932790e-308L, -7.853981633974482541045096145620456183798e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5716 TEST_c_c (catanh, -0x1p-1022L, -0x0.fffffffffffff8p0L, -1.112536929253600815061527818977844932790e-308L, -7.853981633974482541045096145620456183798e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
10de07f5
JM		 5717#endif
5718#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 5719 TEST_c_c (catanh, 0x1.0000000000000002p0L, 0x1p-1022L, 2.218070977791824990137853294097378778927e1L, 1.570796326794896619231321691639751442099L),
5720 TEST_c_c (catanh, 0x1.0000000000000002p0L, -0x1p-1022L, 2.218070977791824990137853294097378778927e1L, -1.570796326794896619231321691639751442099L),
5721 TEST_c_c (catanh, -0x1.0000000000000002p0L, 0x1p-1022L, -2.218070977791824990137853294097378778927e1L, 1.570796326794896619231321691639751442099L),
5722 TEST_c_c (catanh, -0x1.0000000000000002p0L, -0x1p-1022L, -2.218070977791824990137853294097378778927e1L, -1.570796326794896619231321691639751442099L),
5723 TEST_c_c (catanh, 0x1p-1022L, 0x1.0000000000000002p0L, 1.112536929253600691424494863099491450042e-308L, 7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5724 TEST_c_c (catanh, -0x1p-1022L, 0x1.0000000000000002p0L, -1.112536929253600691424494863099491450042e-308L, 7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5725 TEST_c_c (catanh, 0x1p-1022L, -0x1.0000000000000002p0L, 1.112536929253600691424494863099491450042e-308L, -7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5726 TEST_c_c (catanh, -0x1p-1022L, -0x1.0000000000000002p0L, -1.112536929253600691424494863099491450042e-308L, -7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5727 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, 0x1p-1022L, 2.252728336819822255604649142023466965703e1L, 2.052268400649188124723641491045245971623e-289L),
5728 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, -0x1p-1022L, 2.252728336819822255604649142023466965703e1L, -2.052268400649188124723641491045245971623e-289L),
5729 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, 0x1p-1022L, -2.252728336819822255604649142023466965703e1L, 2.052268400649188124723641491045245971623e-289L),
5730 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, -0x1p-1022L, -2.252728336819822255604649142023466965703e1L, -2.052268400649188124723641491045245971623e-289L),
5731 TEST_c_c (catanh, 0x1p-1022L, 0x0.ffffffffffffffffp0L, 1.112536929253600691605427106449557323148e-308L, 7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5732 TEST_c_c (catanh, -0x1p-1022L, 0x0.ffffffffffffffffp0L, -1.112536929253600691605427106449557323148e-308L, 7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5733 TEST_c_c (catanh, 0x1p-1022L, -0x0.ffffffffffffffffp0L, 1.112536929253600691605427106449557323148e-308L, -7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5734 TEST_c_c (catanh, -0x1p-1022L, -0x0.ffffffffffffffffp0L, -1.112536929253600691605427106449557323148e-308L, -7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
10de07f5
JM		 5735#endif
5736#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 5737 TEST_c_c (catanh, 0x1.000000000000000000000000008p0L, 0x1p-1022L, 3.673680056967710139911330243728336427098e1L, 1.570796326794896619231321691639751442099L),
5738 TEST_c_c (catanh, 0x1.000000000000000000000000008p0L, -0x1p-1022L, 3.673680056967710139911330243728336427098e1L, -1.570796326794896619231321691639751442099L),
5739 TEST_c_c (catanh, -0x1.000000000000000000000000008p0L, 0x1p-1022L, -3.673680056967710139911330243728336427098e1L, 1.570796326794896619231321691639751442099L),
5740 TEST_c_c (catanh, -0x1.000000000000000000000000008p0L, -0x1p-1022L, -3.673680056967710139911330243728336427098e1L, -1.570796326794896619231321691639751442099L),
5741 TEST_c_c (catanh, 0x1p-1022L, 0x1.000000000000000000000000008p0L, 1.112536929253600691545116358666174605957e-308L, 7.853981633974483096156608458198880470009e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5742 TEST_c_c (catanh, -0x1p-1022L, 0x1.000000000000000000000000008p0L, -1.112536929253600691545116358666174605957e-308L, 7.853981633974483096156608458198880470009e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5743 TEST_c_c (catanh, 0x1p-1022L, -0x1.000000000000000000000000008p0L, 1.112536929253600691545116358666174605957e-308L, -7.853981633974483096156608458198880470009e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5744 TEST_c_c (catanh, -0x1p-1022L, -0x1.000000000000000000000000008p0L, -1.112536929253600691545116358666174605957e-308L, -7.853981633974483096156608458198880470009e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5745 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-1022L, 3.708337415995707405382191849801244331055e1L, 9.025971879324147880346310405868788320726e-277L),
5746 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-1022L, 3.708337415995707405382191849801244331055e1L, -9.025971879324147880346310405868788320726e-277L),
5747 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-1022L, -3.708337415995707405382191849801244331055e1L, 9.025971879324147880346310405868788320726e-277L),
5748 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-1022L, -3.708337415995707405382191849801244331055e1L, -9.025971879324147880346310405868788320726e-277L),
5749 TEST_c_c (catanh, 0x1p-1022L, 0x0.ffffffffffffffffffffffffffcp0L, 1.112536929253600691545116358666215745186e-308L, 7.853981633974483096156608458198695580735e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5750 TEST_c_c (catanh, -0x1p-1022L, 0x0.ffffffffffffffffffffffffffcp0L, -1.112536929253600691545116358666215745186e-308L, 7.853981633974483096156608458198695580735e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5751 TEST_c_c (catanh, 0x1p-1022L, -0x0.ffffffffffffffffffffffffffcp0L, 1.112536929253600691545116358666215745186e-308L, -7.853981633974483096156608458198695580735e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5752 TEST_c_c (catanh, -0x1p-1022L, -0x0.ffffffffffffffffffffffffffcp0L, -1.112536929253600691545116358666215745186e-308L, -7.853981633974483096156608458198695580735e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
10de07f5
JM		 5753#endif
5754#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5755 TEST_c_c (catanh, 1.0L, 0x1p-8192L, 2.839477425163815960027691385553420311121e3L, 7.853981633974483096156608458198757210493e-1L),
5756 TEST_c_c (catanh, 1.0L, -0x1p-8192L, 2.839477425163815960027691385553420311121e3L, -7.853981633974483096156608458198757210493e-1L),
5757 TEST_c_c (catanh, -1.0L, 0x1p-8192L, -2.839477425163815960027691385553420311121e3L, 7.853981633974483096156608458198757210493e-1L),
5758 TEST_c_c (catanh, -1.0L, -0x1p-8192L, -2.839477425163815960027691385553420311121e3L, -7.853981633974483096156608458198757210493e-1L),
5759 TEST_c_c (catanh, 0x1p-8192L, 1.0L, 4.584009668887117914053530980121207914891e-2467L, 7.853981633974483096156608458198757210493e-1L),
5760 TEST_c_c (catanh, -0x1p-8192L, 1.0L, -4.584009668887117914053530980121207914891e-2467L, 7.853981633974483096156608458198757210493e-1L),
5761 TEST_c_c (catanh, 0x1p-8192L, -1.0L, 4.584009668887117914053530980121207914891e-2467L, -7.853981633974483096156608458198757210493e-1L),
5762 TEST_c_c (catanh, -0x1p-8192L, -1.0L, -4.584009668887117914053530980121207914891e-2467L, -7.853981633974483096156608458198757210493e-1L),
5763 TEST_c_c (catanh, 1.0L, 0x1.3p-8221L, 2.849442134153471837403071201841536297726e3L, 7.853981633974483096156608458198757210493e-1L),
5764 TEST_c_c (catanh, 1.0L, -0x1.3p-8221L, 2.849442134153471837403071201841536297726e3L, -7.853981633974483096156608458198757210493e-1L),
5765 TEST_c_c (catanh, -1.0L, 0x1.3p-8221L, -2.849442134153471837403071201841536297726e3L, 7.853981633974483096156608458198757210493e-1L),
5766 TEST_c_c (catanh, -1.0L, -0x1.3p-8221L, -2.849442134153471837403071201841536297726e3L, -7.853981633974483096156608458198757210493e-1L),
5767 TEST_c_c (catanh, 0x1.3p-8221L, 1.0L, 1.013933025636421986471594877335044443409e-2475L, 7.853981633974483096156608458198757210493e-1L),
5768 TEST_c_c (catanh, -0x1.3p-8221L, 1.0L, -1.013933025636421986471594877335044443409e-2475L, 7.853981633974483096156608458198757210493e-1L),
5769 TEST_c_c (catanh, 0x1.3p-8221L, -1.0L, 1.013933025636421986471594877335044443409e-2475L, -7.853981633974483096156608458198757210493e-1L),
5770 TEST_c_c (catanh, -0x1.3p-8221L, -1.0L, -1.013933025636421986471594877335044443409e-2475L, -7.853981633974483096156608458198757210493e-1L),
5771 TEST_c_c (catanh, 1.0L, 0x1.3p-8246L, 2.858106473910471153770786603359763504827e3L, 7.853981633974483096156608458198757210493e-1L),
5772 TEST_c_c (catanh, 1.0L, -0x1.3p-8246L, 2.858106473910471153770786603359763504827e3L, -7.853981633974483096156608458198757210493e-1L),
5773 TEST_c_c (catanh, -1.0L, 0x1.3p-8246L, -2.858106473910471153770786603359763504827e3L, 7.853981633974483096156608458198757210493e-1L),
5774 TEST_c_c (catanh, -1.0L, -0x1.3p-8246L, -2.858106473910471153770786603359763504827e3L, -7.853981633974483096156608458198757210493e-1L),
5775 TEST_c_c (catanh, 0x1.3p-8246L, 1.0L, 3.021755890954798419688924781486524472858e-2483L, 7.853981633974483096156608458198757210493e-1L),
5776 TEST_c_c (catanh, -0x1.3p-8246L, 1.0L, -3.021755890954798419688924781486524472858e-2483L, 7.853981633974483096156608458198757210493e-1L),
5777 TEST_c_c (catanh, 0x1.3p-8246L, -1.0L, 3.021755890954798419688924781486524472858e-2483L, -7.853981633974483096156608458198757210493e-1L),
5778 TEST_c_c (catanh, -0x1.3p-8246L, -1.0L, -3.021755890954798419688924781486524472858e-2483L, -7.853981633974483096156608458198757210493e-1L),
5779 TEST_c_c (catanh, 1.0L, 0x1p-16380L, 5.677221982376232056781839690803195180822e3L, 7.853981633974483096156608458198757210493e-1L),
5780 TEST_c_c (catanh, 1.0L, -0x1p-16380L, 5.677221982376232056781839690803195180822e3L, -7.853981633974483096156608458198757210493e-1L),
5781 TEST_c_c (catanh, -1.0L, 0x1p-16380L, -5.677221982376232056781839690803195180822e3L, 7.853981633974483096156608458198757210493e-1L),
5782 TEST_c_c (catanh, -1.0L, -0x1p-16380L, -5.677221982376232056781839690803195180822e3L, -7.853981633974483096156608458198757210493e-1L),
5783 TEST_c_c (catanh, 0x1p-16380L, 1.0L, 6.724206286224187012525355634643505205196e-4932L, 7.853981633974483096156608458198757210493e-1L),
5784 TEST_c_c (catanh, -0x1p-16380L, 1.0L, -6.724206286224187012525355634643505205196e-4932L, 7.853981633974483096156608458198757210493e-1L),
5785 TEST_c_c (catanh, 0x1p-16380L, -1.0L, 6.724206286224187012525355634643505205196e-4932L, -7.853981633974483096156608458198757210493e-1L),
5786 TEST_c_c (catanh, -0x1p-16380L, -1.0L, -6.724206286224187012525355634643505205196e-4932L, -7.853981633974483096156608458198757210493e-1L),
5787 TEST_c_c (catanh, 0x1.0000000000000002p0L, 0x1p-16382L, 2.218070977791824990137853294097378778927e1L, 1.570796326794896619231321691639751442099L),
5788 TEST_c_c (catanh, 0x1.0000000000000002p0L, -0x1p-16382L, 2.218070977791824990137853294097378778927e1L, -1.570796326794896619231321691639751442099L),
5789 TEST_c_c (catanh, -0x1.0000000000000002p0L, 0x1p-16382L, -2.218070977791824990137853294097378778927e1L, 1.570796326794896619231321691639751442099L),
5790 TEST_c_c (catanh, -0x1.0000000000000002p0L, -0x1p-16382L, -2.218070977791824990137853294097378778927e1L, -1.570796326794896619231321691639751442099L),
5791 TEST_c_c (catanh, 0x1p-16382L, 0x1.0000000000000002p0L, 1.681051571556046752949078932066752571182e-4932L, 7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION),
5792 TEST_c_c (catanh, -0x1p-16382L, 0x1.0000000000000002p0L, -1.681051571556046752949078932066752571182e-4932L, 7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION),
5793 TEST_c_c (catanh, 0x1p-16382L, -0x1.0000000000000002p0L, 1.681051571556046752949078932066752571182e-4932L, -7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION),
5794 TEST_c_c (catanh, -0x1p-16382L, -0x1.0000000000000002p0L, -1.681051571556046752949078932066752571182e-4932L, -7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION),
5795 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, 0x1p-16382L, 2.252728336819822255604649142023466965703e1L, 3.100992811520163369065387859792822623745e-4913L),
5796 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, -0x1p-16382L, 2.252728336819822255604649142023466965703e1L, -3.100992811520163369065387859792822623745e-4913L),
5797 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, 0x1p-16382L, -2.252728336819822255604649142023466965703e1L, 3.100992811520163369065387859792822623745e-4913L),
5798 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, -0x1p-16382L, -2.252728336819822255604649142023466965703e1L, -3.100992811520163369065387859792822623745e-4913L),
5799 TEST_c_c (catanh, 0x1p-16382L, 0x0.ffffffffffffffffp0L, 1.681051571556046753222468896957938166365e-4932L, 7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION),
5800 TEST_c_c (catanh, -0x1p-16382L, 0x0.ffffffffffffffffp0L, -1.681051571556046753222468896957938166365e-4932L, 7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION),
5801 TEST_c_c (catanh, 0x1p-16382L, -0x0.ffffffffffffffffp0L, 1.681051571556046753222468896957938166365e-4932L, -7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION),
5802 TEST_c_c (catanh, -0x1p-16382L, -0x0.ffffffffffffffffp0L, -1.681051571556046753222468896957938166365e-4932L, -7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION),
10de07f5 5803# if LDBL_MANT_DIG >= 113
08198877
JM		 5804 TEST_c_c (catanh, 0x1.0000000000000000000000000001p0L, 0x1p-16382L, 3.916281570163690998207361486238697614441e1L, 1.570796326794896619231321691639751442099L),
5805 TEST_c_c (catanh, 0x1.0000000000000000000000000001p0L, -0x1p-16382L, 3.916281570163690998207361486238697614441e1L, -1.570796326794896619231321691639751442099L),
5806 TEST_c_c (catanh, -0x1.0000000000000000000000000001p0L, 0x1p-16382L, -3.916281570163690998207361486238697614441e1L, 1.570796326794896619231321691639751442099L),
5807 TEST_c_c (catanh, -0x1.0000000000000000000000000001p0L, -0x1p-16382L, -3.916281570163690998207361486238697614441e1L, -1.570796326794896619231321691639751442099L),
5808 TEST_c_c (catanh, 0x1p-16382L, 0x1.0000000000000000000000000001p0L, 1.681051571556046753131338908660875977540e-4932L, 7.853981633974483096156608458198758173458e-1L, UNDERFLOW_EXCEPTION),
5809 TEST_c_c (catanh, -0x1p-16382L, 0x1.0000000000000000000000000001p0L, -1.681051571556046753131338908660875977540e-4932L, 7.853981633974483096156608458198758173458e-1L, UNDERFLOW_EXCEPTION),
5810 TEST_c_c (catanh, 0x1p-16382L, -0x1.0000000000000000000000000001p0L, 1.681051571556046753131338908660875977540e-4932L, -7.853981633974483096156608458198758173458e-1L, UNDERFLOW_EXCEPTION),
5811 TEST_c_c (catanh, -0x1p-16382L, -0x1.0000000000000000000000000001p0L, -1.681051571556046753131338908660875977540e-4932L, -7.853981633974483096156608458198758173458e-1L, UNDERFLOW_EXCEPTION),
5812 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-16382L, 3.950938929191688263678223092311606435623e1L, 1.745703758805099310527547423749501866998e-4898L),
5813 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-16382L, 3.950938929191688263678223092311606435623e1L, -1.745703758805099310527547423749501866998e-4898L),
5814 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-16382L, -3.950938929191688263678223092311606435623e1L, 1.745703758805099310527547423749501866998e-4898L),
5815 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-16382L, -3.950938929191688263678223092311606435623e1L, -1.745703758805099310527547423749501866998e-4898L),
5816 TEST_c_c (catanh, 0x1p-16382L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.681051571556046753131338908660876463178e-4932L, 7.853981633974483096156608458198756729010e-1L, UNDERFLOW_EXCEPTION),
5817 TEST_c_c (catanh, -0x1p-16382L, 0x0.ffffffffffffffffffffffffffff8p0L, -1.681051571556046753131338908660876463178e-4932L, 7.853981633974483096156608458198756729010e-1L, UNDERFLOW_EXCEPTION),
5818 TEST_c_c (catanh, 0x1p-16382L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.681051571556046753131338908660876463178e-4932L, -7.853981633974483096156608458198756729010e-1L, UNDERFLOW_EXCEPTION),
5819 TEST_c_c (catanh, -0x1p-16382L, -0x0.ffffffffffffffffffffffffffff8p0L, -1.681051571556046753131338908660876463178e-4932L, -7.853981633974483096156608458198756729010e-1L, UNDERFLOW_EXCEPTION),
10de07f5 5820# endif
caf84319 5821#endif
2f38fbfe 5822
08198877
JM		 5823 TEST_c_c (catanh, 0.75L, 1.25L, 0.261492138795671927078652057366532140L, 0.996825126463918666098902241310446708L),
5824 TEST_c_c (catanh, -2, -3, -0.14694666622552975204743278515471595L, -1.3389725222944935611241935759091443L),
5825 END_DATA (catanh)
5826 };
8847214f 5827
08198877
JM		 5828static void
5829catanh_test (void)
5830{
5831 errno = 0;
5832 FUNC(catanh) (BUILD_COMPLEX (0.7L, 1.2L));
5833 if (errno == ENOSYS)
5834 /* Function not implemented. */
5835 return;
5836
5837 START (catanh);
5838 RUN_TEST_LOOP_c_c (catanh, catanh_test_data, );
6815fabc 5839 END (catanh, complex);
8847214f
UD		 5840}
5841
74c57478
JM		 5842static const struct test_f_f_data cbrt_test_data[] =
5843 {
5844 START_DATA (cbrt),
5845 TEST_f_f (cbrt, 0.0, 0.0),
5846 TEST_f_f (cbrt, minus_zero, minus_zero),
5847
5848 TEST_f_f (cbrt, plus_infty, plus_infty),
5849 TEST_f_f (cbrt, minus_infty, minus_infty),
5850 TEST_f_f (cbrt, qnan_value, qnan_value),
5851
5852 TEST_f_f (cbrt, -0.001L, -0.1L),
5853 TEST_f_f (cbrt, 8, 2),
5854 TEST_f_f (cbrt, -27.0, -3.0),
5855 TEST_f_f (cbrt, 0.9921875L, 0.997389022060725270579075195353955217L),
5856 TEST_f_f (cbrt, 0.75L, 0.908560296416069829445605878163630251L),
5857 END_DATA (cbrt)
5858 };
5859
8847214f
UD		 5860static void
5861cbrt_test (void)
5862{
42be70d4
UD		 5863 errno = 0;
5864 FUNC(cbrt) (8);
5865 if (errno == ENOSYS)
5866 /* Function not implemented. */
5867 return;
5868
8847214f 5869 START (cbrt);
74c57478 5870 RUN_TEST_LOOP_f_f (cbrt, cbrt_test_data, );
8847214f
UD		 5871 END (cbrt);
5872}
5873
2550dfe9 5874
08198877
JM		 5875static const struct test_c_c_data ccos_test_data[] =
5876 {
5877 START_DATA (ccos),
5878 TEST_c_c (ccos, 0.0, 0.0, 1.0, minus_zero),
5879 TEST_c_c (ccos, minus_zero, 0.0, 1.0, 0.0),
5880 TEST_c_c (ccos, 0.0, minus_zero, 1.0, 0.0),
5881 TEST_c_c (ccos, minus_zero, minus_zero, 1.0, minus_zero),
8847214f 5882
08198877
JM		 5883 TEST_c_c (ccos, plus_infty, 0.0, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5884 TEST_c_c (ccos, plus_infty, minus_zero, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5885 TEST_c_c (ccos, minus_infty, 0.0, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5886 TEST_c_c (ccos, minus_infty, minus_zero, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 5887
08198877
JM		 5888 TEST_c_c (ccos, 0.0, plus_infty, plus_infty, minus_zero),
5889 TEST_c_c (ccos, 0.0, minus_infty, plus_infty, 0.0),
5890 TEST_c_c (ccos, minus_zero, plus_infty, plus_infty, 0.0),
5891 TEST_c_c (ccos, minus_zero, minus_infty, plus_infty, minus_zero),
8847214f 5892
08198877
JM		 5893 TEST_c_c (ccos, plus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5894 TEST_c_c (ccos, minus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5895 TEST_c_c (ccos, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5896 TEST_c_c (ccos, minus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8847214f 5897
08198877
JM		 5898 TEST_c_c (ccos, 4.625, plus_infty, minus_infty, plus_infty),
5899 TEST_c_c (ccos, 4.625, minus_infty, minus_infty, minus_infty),
5900 TEST_c_c (ccos, -4.625, plus_infty, minus_infty, minus_infty),
5901 TEST_c_c (ccos, -4.625, minus_infty, minus_infty, plus_infty),
8847214f 5902
08198877
JM		 5903 TEST_c_c (ccos, plus_infty, 6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
5904 TEST_c_c (ccos, plus_infty, -6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
5905 TEST_c_c (ccos, minus_infty, 6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
5906 TEST_c_c (ccos, minus_infty, -6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 5907
08198877
JM		 5908 TEST_c_c (ccos, qnan_value, 0.0, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5909 TEST_c_c (ccos, qnan_value, minus_zero, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 5910
08198877
JM		 5911 TEST_c_c (ccos, qnan_value, plus_infty, plus_infty, qnan_value),
5912 TEST_c_c (ccos, qnan_value, minus_infty, plus_infty, qnan_value),
8847214f 5913
08198877
JM		 5914 TEST_c_c (ccos, qnan_value, 9.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5915 TEST_c_c (ccos, qnan_value, -9.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5916
08198877
JM		 5917 TEST_c_c (ccos, 0.0, qnan_value, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5918 TEST_c_c (ccos, minus_zero, qnan_value, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 5919
08198877
JM		 5920 TEST_c_c (ccos, 10.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5921 TEST_c_c (ccos, -10.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5922
08198877
JM		 5923 TEST_c_c (ccos, plus_infty, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5924 TEST_c_c (ccos, minus_infty, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5925
08198877 5926 TEST_c_c (ccos, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 5927
08198877
JM		 5928 TEST_c_c (ccos, 0.75L, 1.25L, 1.38173873063425888530729933139078645L, -1.09193013555397466170919531722024128L),
5929 TEST_c_c (ccos, -2, -3, -4.18962569096880723013255501961597373L, -9.10922789375533659797919726277886212L),
8847214f 5930
08198877
JM		 5931 TEST_c_c (ccos, 0.75, 89.5, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
5932 TEST_c_c (ccos, 0.75, -89.5, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
5933 TEST_c_c (ccos, -0.75, 89.5, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
5934 TEST_c_c (ccos, -0.75, -89.5, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
e0b16cc2
JM		 5935
5936#ifndef TEST_FLOAT
08198877
JM		 5937 TEST_c_c (ccos, 0.75, 710.5, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
5938 TEST_c_c (ccos, 0.75, -710.5, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
5939 TEST_c_c (ccos, -0.75, 710.5, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
5940 TEST_c_c (ccos, -0.75, -710.5, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
e0b16cc2
JM		 5941#endif
5942
5943#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5944 TEST_c_c (ccos, 0.75, 11357.25, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
5945 TEST_c_c (ccos, 0.75, -11357.25, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
5946 TEST_c_c (ccos, -0.75, 11357.25, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
5947 TEST_c_c (ccos, -0.75, -11357.25, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
e0b16cc2
JM		 5948#endif
5949
5950#ifdef TEST_FLOAT
08198877 5951 TEST_c_c (ccos, 0x1p-149, 180, plus_infty, -1.043535896672617552965983803453927655332e33L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 5952#endif
5953
5954#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 5955 TEST_c_c (ccos, 0x1p-1074, 1440, plus_infty, -5.981479269486130556466515778180916082415e301L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 5956#endif
5957
5958#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 5959 TEST_c_c (ccos, 0x1p-16434L, 22730, plus_infty, -1.217853148905605987081057582351152052687e4924L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 5960#endif
5961
08198877
JM		 5962 TEST_c_c (ccos, min_subnorm_value * 0x1p120, 0x1p-120, 1.0, -min_subnorm_value, UNDERFLOW_EXCEPTION),
5963 TEST_c_c (ccos, 0x1p-120, min_subnorm_value * 0x1p120, 1.0, -min_subnorm_value, UNDERFLOW_EXCEPTION),
5964 END_DATA (ccos)
5965 };
8847214f
UD		 5966
5967static void
08198877 5968ccos_test (void)
8847214f 5969{
aaca11d8 5970 errno = 0;
08198877 5971 FUNC(ccos) (BUILD_COMPLEX (0, 0));
aaca11d8
UD		 5972 if (errno == ENOSYS)
5973 /* Function not implemented. */
5974 return;
8847214f 5975
08198877
JM		 5976 START (ccos);
5977 RUN_TEST_LOOP_c_c (ccos, ccos_test_data, );
5978 END (ccos, complex);
5979}
8847214f 5980
8847214f 5981
08198877
JM		 5982static const struct test_c_c_data ccosh_test_data[] =
5983 {
5984 START_DATA (ccosh),
5985 TEST_c_c (ccosh, 0.0, 0.0, 1.0, 0.0),
5986 TEST_c_c (ccosh, minus_zero, 0.0, 1.0, minus_zero),
5987 TEST_c_c (ccosh, 0.0, minus_zero, 1.0, minus_zero),
5988 TEST_c_c (ccosh, minus_zero, minus_zero, 1.0, 0.0),
5989
5990 TEST_c_c (ccosh, 0.0, plus_infty, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5991 TEST_c_c (ccosh, minus_zero, plus_infty, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5992 TEST_c_c (ccosh, 0.0, minus_infty, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5993 TEST_c_c (ccosh, minus_zero, minus_infty, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 5994
08198877
JM		 5995 TEST_c_c (ccosh, plus_infty, 0.0, plus_infty, 0.0),
5996 TEST_c_c (ccosh, minus_infty, 0.0, plus_infty, minus_zero),
5997 TEST_c_c (ccosh, plus_infty, minus_zero, plus_infty, minus_zero),
5998 TEST_c_c (ccosh, minus_infty, minus_zero, plus_infty, 0.0),
8847214f 5999
08198877
JM		 6000 TEST_c_c (ccosh, plus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
6001 TEST_c_c (ccosh, minus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
6002 TEST_c_c (ccosh, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
6003 TEST_c_c (ccosh, minus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8847214f 6004
08198877
JM		 6005 TEST_c_c (ccosh, plus_infty, 4.625, minus_infty, minus_infty),
6006 TEST_c_c (ccosh, minus_infty, 4.625, minus_infty, plus_infty),
6007 TEST_c_c (ccosh, plus_infty, -4.625, minus_infty, plus_infty),
6008 TEST_c_c (ccosh, minus_infty, -4.625, minus_infty, minus_infty),
8847214f 6009
08198877
JM		 6010 TEST_c_c (ccosh, 6.75, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
6011 TEST_c_c (ccosh, -6.75, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
6012 TEST_c_c (ccosh, 6.75, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
6013 TEST_c_c (ccosh, -6.75, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 6014
08198877
JM		 6015 TEST_c_c (ccosh, 0.0, qnan_value, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
6016 TEST_c_c (ccosh, minus_zero, qnan_value, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 6017
08198877
JM		 6018 TEST_c_c (ccosh, plus_infty, qnan_value, plus_infty, qnan_value),
6019 TEST_c_c (ccosh, minus_infty, qnan_value, plus_infty, qnan_value),
8847214f 6020
08198877
JM		 6021 TEST_c_c (ccosh, 9.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6022 TEST_c_c (ccosh, -9.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6023
08198877
JM		 6024 TEST_c_c (ccosh, qnan_value, 0.0, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
6025 TEST_c_c (ccosh, qnan_value, minus_zero, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 6026
08198877
JM		 6027 TEST_c_c (ccosh, qnan_value, 10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6028 TEST_c_c (ccosh, qnan_value, -10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6029
08198877
JM		 6030 TEST_c_c (ccosh, qnan_value, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6031 TEST_c_c (ccosh, qnan_value, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6032
08198877 6033 TEST_c_c (ccosh, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 6034
08198877 6035 TEST_c_c (ccosh, 0.75L, 1.25L, 0.408242591877968807788852146397499084L, 0.780365930845853240391326216300863152L),
8847214f 6036
08198877 6037 TEST_c_c (ccosh, -2, -3, -3.72454550491532256547397070325597253L, 0.511822569987384608834463849801875634L),
8847214f 6038
08198877
JM		 6039 TEST_c_c (ccosh, 89.5, 0.75, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
6040 TEST_c_c (ccosh, -89.5, 0.75, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
6041 TEST_c_c (ccosh, 89.5, -0.75, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
6042 TEST_c_c (ccosh, -89.5, -0.75, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
e0b16cc2
JM		 6043
6044#ifndef TEST_FLOAT
08198877
JM		 6045 TEST_c_c (ccosh, 710.5, 0.75, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
6046 TEST_c_c (ccosh, -710.5, 0.75, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
6047 TEST_c_c (ccosh, 710.5, -0.75, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
6048 TEST_c_c (ccosh, -710.5, -0.75, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
e0b16cc2
JM		 6049#endif
6050
6051#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6052 TEST_c_c (ccosh, 11357.25, 0.75, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
6053 TEST_c_c (ccosh, -11357.25, 0.75, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
6054 TEST_c_c (ccosh, 11357.25, -0.75, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
6055 TEST_c_c (ccosh, -11357.25, -0.75, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
e0b16cc2
JM		 6056#endif
6057
6058#ifdef TEST_FLOAT
08198877 6059 TEST_c_c (ccosh, 180, 0x1p-149, plus_infty, 1.043535896672617552965983803453927655332e33L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 6060#endif
6061
6062#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 6063 TEST_c_c (ccosh, 1440, 0x1p-1074, plus_infty, 5.981479269486130556466515778180916082415e301L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 6064#endif
6065
6066#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 6067 TEST_c_c (ccosh, 22730, 0x1p-16434L, plus_infty, 1.217853148905605987081057582351152052687e4924L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 6068#endif
6069
08198877
JM		 6070 TEST_c_c (ccosh, min_subnorm_value * 0x1p120, 0x1p-120, 1.0, min_subnorm_value, UNDERFLOW_EXCEPTION),
6071 TEST_c_c (ccosh, 0x1p-120, min_subnorm_value * 0x1p120, 1.0, min_subnorm_value, UNDERFLOW_EXCEPTION),
6072 END_DATA (ccosh)
6073 };
6074
6075static void
6076ccosh_test (void)
6077{
6078 errno = 0;
6079 FUNC(ccosh) (BUILD_COMPLEX (0.7L, 1.2L));
6080 if (errno == ENOSYS)
6081 /* Function not implemented. */
6082 return;
f0302940 6083
08198877
JM		 6084 START (ccosh);
6085 RUN_TEST_LOOP_c_c (ccosh, ccosh_test_data, );
6815fabc 6086 END (ccosh, complex);
8847214f
UD		 6087}
6088
6089
74c57478
JM		 6090static const struct test_f_f_data ceil_test_data[] =
6091 {
6092 START_DATA (ceil),
6093 TEST_f_f (ceil, 0.0, 0.0),
6094 TEST_f_f (ceil, minus_zero, minus_zero),
6095 TEST_f_f (ceil, plus_infty, plus_infty),
6096 TEST_f_f (ceil, minus_infty, minus_infty),
6097 TEST_f_f (ceil, qnan_value, qnan_value),
6098
6099 TEST_f_f (ceil, M_PIl, 4.0),
6100 TEST_f_f (ceil, -M_PIl, -3.0),
6101 TEST_f_f (ceil, 0.1, 1.0),
6102 TEST_f_f (ceil, 0.25, 1.0),
6103 TEST_f_f (ceil, 0.625, 1.0),
6104 TEST_f_f (ceil, -0.1, minus_zero),
6105 TEST_f_f (ceil, -0.25, minus_zero),
6106 TEST_f_f (ceil, -0.625, minus_zero),
8847214f 6107
f964490f 6108#ifdef TEST_LDOUBLE
74c57478
JM		 6109 /* The result can only be represented in long double. */
6110 TEST_f_f (ceil, 4503599627370495.5L, 4503599627370496.0L),
6111 TEST_f_f (ceil, 4503599627370496.25L, 4503599627370497.0L),
6112 TEST_f_f (ceil, 4503599627370496.5L, 4503599627370497.0L),
6113 TEST_f_f (ceil, 4503599627370496.75L, 4503599627370497.0L),
6114 TEST_f_f (ceil, 4503599627370497.5L, 4503599627370498.0L),
6115
6116 TEST_f_f (ceil, -4503599627370495.5L, -4503599627370495.0L),
6117 TEST_f_f (ceil, -4503599627370496.25L, -4503599627370496.0L),
6118 TEST_f_f (ceil, -4503599627370496.5L, -4503599627370496.0L),
6119 TEST_f_f (ceil, -4503599627370496.75L, -4503599627370496.0L),
6120 TEST_f_f (ceil, -4503599627370497.5L, -4503599627370497.0L),
f964490f 6121
5c68d401 6122# if LDBL_MANT_DIG > 100
74c57478
JM		 6123 TEST_f_f (ceil, 4503599627370494.5000000000001L, 4503599627370495.0L),
6124 TEST_f_f (ceil, 4503599627370495.5000000000001L, 4503599627370496.0L),
6125 TEST_f_f (ceil, 4503599627370496.5000000000001L, 4503599627370497.0L),
6126 TEST_f_f (ceil, -4503599627370494.5000000000001L, -4503599627370494.0L),
6127 TEST_f_f (ceil, -4503599627370495.5000000000001L, -4503599627370495.0L),
6128 TEST_f_f (ceil, -4503599627370496.5000000000001L, -4503599627370496.0L),
5c68d401
RM		 6129# endif
6130
74c57478
JM		 6131 TEST_f_f (ceil, 9007199254740991.5L, 9007199254740992.0L),
6132 TEST_f_f (ceil, 9007199254740992.25L, 9007199254740993.0L),
6133 TEST_f_f (ceil, 9007199254740992.5L, 9007199254740993.0L),
6134 TEST_f_f (ceil, 9007199254740992.75L, 9007199254740993.0L),
6135 TEST_f_f (ceil, 9007199254740993.5L, 9007199254740994.0L),
f964490f 6136
74c57478
JM		 6137 TEST_f_f (ceil, -9007199254740991.5L, -9007199254740991.0L),
6138 TEST_f_f (ceil, -9007199254740992.25L, -9007199254740992.0L),
6139 TEST_f_f (ceil, -9007199254740992.5L, -9007199254740992.0L),
6140 TEST_f_f (ceil, -9007199254740992.75L, -9007199254740992.0L),
6141 TEST_f_f (ceil, -9007199254740993.5L, -9007199254740993.0L),
f964490f 6142
5c68d401 6143# if LDBL_MANT_DIG > 100
74c57478
JM		 6144 TEST_f_f (ceil, 9007199254740991.0000000000001L, 9007199254740992.0L),
6145 TEST_f_f (ceil, 9007199254740992.0000000000001L, 9007199254740993.0L),
6146 TEST_f_f (ceil, 9007199254740993.0000000000001L, 9007199254740994.0L),
6147 TEST_f_f (ceil, 9007199254740991.5000000000001L, 9007199254740992.0L),
6148 TEST_f_f (ceil, 9007199254740992.5000000000001L, 9007199254740993.0L),
6149 TEST_f_f (ceil, 9007199254740993.5000000000001L, 9007199254740994.0L),
6150
6151 TEST_f_f (ceil, -9007199254740991.0000000000001L, -9007199254740991.0L),
6152 TEST_f_f (ceil, -9007199254740992.0000000000001L, -9007199254740992.0L),
6153 TEST_f_f (ceil, -9007199254740993.0000000000001L, -9007199254740993.0L),
6154 TEST_f_f (ceil, -9007199254740991.5000000000001L, -9007199254740991.0L),
6155 TEST_f_f (ceil, -9007199254740992.5000000000001L, -9007199254740992.0L),
6156 TEST_f_f (ceil, -9007199254740993.5000000000001L, -9007199254740993.0L),
5c68d401
RM		 6157# endif
6158
74c57478
JM		 6159 TEST_f_f (ceil, 72057594037927935.5L, 72057594037927936.0L),
6160 TEST_f_f (ceil, 72057594037927936.25L, 72057594037927937.0L),
6161 TEST_f_f (ceil, 72057594037927936.5L, 72057594037927937.0L),
6162 TEST_f_f (ceil, 72057594037927936.75L, 72057594037927937.0L),
6163 TEST_f_f (ceil, 72057594037927937.5L, 72057594037927938.0L),
6164
6165 TEST_f_f (ceil, -72057594037927935.5L, -72057594037927935.0L),
6166 TEST_f_f (ceil, -72057594037927936.25L, -72057594037927936.0L),
6167 TEST_f_f (ceil, -72057594037927936.5L, -72057594037927936.0L),
6168 TEST_f_f (ceil, -72057594037927936.75L, -72057594037927936.0L),
6169 TEST_f_f (ceil, -72057594037927937.5L, -72057594037927937.0L),
6170
6171 TEST_f_f (ceil, 10141204801825835211973625643007.5L, 10141204801825835211973625643008.0L),
6172 TEST_f_f (ceil, 10141204801825835211973625643008.25L, 10141204801825835211973625643009.0L),
6173 TEST_f_f (ceil, 10141204801825835211973625643008.5L, 10141204801825835211973625643009.0L),
6174 TEST_f_f (ceil, 10141204801825835211973625643008.75L, 10141204801825835211973625643009.0L),
6175 TEST_f_f (ceil, 10141204801825835211973625643009.5L, 10141204801825835211973625643010.0L),
6176#endif
6177 END_DATA (ceil)
6178 };
f964490f 6179
74c57478
JM		 6180static void
6181ceil_test (void)
6182{
6183 START (ceil);
6184 RUN_TEST_LOOP_f_f (ceil, ceil_test_data, );
8847214f
UD		 6185 END (ceil);
6186}
6187
6188
08198877
JM		 6189static const struct test_c_c_data cexp_test_data[] =
6190 {
6191 START_DATA (cexp),
6192 TEST_c_c (cexp, plus_zero, plus_zero, 1, 0.0),
6193 TEST_c_c (cexp, minus_zero, plus_zero, 1, 0.0),
6194 TEST_c_c (cexp, plus_zero, minus_zero, 1, minus_zero),
6195 TEST_c_c (cexp, minus_zero, minus_zero, 1, minus_zero),
8847214f 6196
08198877
JM		 6197 TEST_c_c (cexp, plus_infty, plus_zero, plus_infty, 0.0),
6198 TEST_c_c (cexp, plus_infty, minus_zero, plus_infty, minus_zero),
8847214f 6199
08198877
JM		 6200 TEST_c_c (cexp, minus_infty, plus_zero, 0.0, 0.0),
6201 TEST_c_c (cexp, minus_infty, minus_zero, 0.0, minus_zero),
8847214f 6202
08198877
JM		 6203 TEST_c_c (cexp, 0.0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
6204 TEST_c_c (cexp, minus_zero, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 6205
08198877
JM		 6206 TEST_c_c (cexp, 0.0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
6207 TEST_c_c (cexp, minus_zero, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 6208
08198877
JM		 6209 TEST_c_c (cexp, 100.0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
6210 TEST_c_c (cexp, -100.0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 6211
08198877
JM		 6212 TEST_c_c (cexp, 100.0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
6213 TEST_c_c (cexp, -100.0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 6214
08198877
JM		 6215 TEST_c_c (cexp, minus_infty, 2.0, minus_zero, 0.0),
6216 TEST_c_c (cexp, minus_infty, 4.0, minus_zero, minus_zero),
6217 TEST_c_c (cexp, plus_infty, 2.0, minus_infty, plus_infty),
6218 TEST_c_c (cexp, plus_infty, 4.0, minus_infty, minus_infty),
8847214f 6219
08198877
JM		 6220 TEST_c_c (cexp, plus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
6221 TEST_c_c (cexp, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 6222
08198877
JM		 6223 TEST_c_c (cexp, minus_infty, plus_infty, 0.0, 0.0, IGNORE_ZERO_INF_SIGN),
6224 TEST_c_c (cexp, minus_infty, minus_infty, 0.0, minus_zero, IGNORE_ZERO_INF_SIGN),
8847214f 6225
08198877 6226 TEST_c_c (cexp, minus_infty, qnan_value, 0, 0, IGNORE_ZERO_INF_SIGN),
8847214f 6227
08198877 6228 TEST_c_c (cexp, plus_infty, qnan_value, plus_infty, qnan_value),
8847214f 6229
08198877
JM		 6230 TEST_c_c (cexp, qnan_value, 0.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6231 TEST_c_c (cexp, qnan_value, 1.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6232
08198877
JM		 6233 TEST_c_c (cexp, qnan_value, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6234 TEST_c_c (cexp, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6235 TEST_c_c (cexp, 1, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6236 TEST_c_c (cexp, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 6237
08198877
JM		 6238 TEST_c_c (cexp, 0.75L, 1.25L, 0.667537446429131586942201977015932112L, 2.00900045494094876258347228145863909L),
6239 TEST_c_c (cexp, -2.0, -3.0, -0.13398091492954261346140525546115575L, -0.019098516261135196432576240858800925L),
8847214f 6240
08198877
JM		 6241 TEST_c_c (cexp, 0, 0x1p65, 0.99888622066058013610642172179340364209972L, -0.047183876212354673805106149805700013943218L),
6242 TEST_c_c (cexp, 0, -0x1p65, 0.99888622066058013610642172179340364209972L, 0.047183876212354673805106149805700013943218L),
6243 TEST_c_c (cexp, 50, 0x1p127, 4.053997150228616856622417636046265337193e21L, 3.232070315463388524466674772633810238819e21L),
1a4ac776
JM		 6244
6245#ifndef TEST_FLOAT
08198877
JM		 6246 TEST_c_c (cexp, 0, 1e22, 0.5232147853951389454975944733847094921409L, -0.8522008497671888017727058937530293682618L),
6247 TEST_c_c (cexp, 0, 0x1p1023, -0.826369834614147994500785680811743734805L, 0.5631277798508840134529434079444683477104L),
6248 TEST_c_c (cexp, 500, 0x1p1023, -1.159886268932754433233243794561351783426e217L, 7.904017694554466595359379965081774849708e216L),
1a4ac776
JM		 6249#endif
6250
6251#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6252 TEST_c_c (cexp, 0, 0x1p16383L, 0.9210843909921906206874509522505756251609L, 0.3893629985894208126948115852610595405563L),
6253 TEST_c_c (cexp, -10000, 0x1p16383L, 1.045876464564882298442774542991176546722e-4343L, 4.421154026488516836023811173959413420548e-4344L),
1a4ac776
JM		 6254#endif
6255
08198877
JM		 6256 TEST_c_c (cexp, 88.75, 0.75, 2.558360358486542817001900410314204322891e38L, 2.383359453227311447654736314679677655100e38L),
6257 TEST_c_c (cexp, -95, 0.75, 4.039714446238306526889476684000081624047e-42L, 3.763383677300535390271646960780570275931e-42L, UNDERFLOW_EXCEPTION_FLOAT),
7c69cd14
JM		 6258
6259#ifndef TEST_FLOAT
08198877
JM		 6260 TEST_c_c (cexp, 709.8125, 0.75, 1.355121963080879535248452862759108365762e308L, 1.262426823598609432507811340856186873507e308L),
6261 TEST_c_c (cexp, -720, 0.75, 1.486960657116368433685753325516638551722e-313L, 1.385247284245720590980701226843815229385e-313L, UNDERFLOW_EXCEPTION_DOUBLE),
7c69cd14
JM		 6262#endif
6263
6264#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6265 TEST_c_c (cexp, 11356.5625, 0.75, 9.052188470850960144814815984311663764287e4931L, 8.432986734191301036267148978260970230200e4931L),
6266 TEST_c_c (cexp, -11370, 0.75, 8.631121063182211587489310508568170739592e-4939L, 8.040721827809267291427062346918413482824e-4939L, UNDERFLOW_EXCEPTION),
7c69cd14
JM		 6267#endif
6268
6269#ifdef TEST_FLOAT
08198877 6270 TEST_c_c (cexp, 180, 0x1p-149, plus_infty, 2.087071793345235105931967606907855310664e33L, OVERFLOW_EXCEPTION),
7c69cd14
JM		 6271#endif
6272
6273#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 6274 TEST_c_c (cexp, 1440, 0x1p-1074, plus_infty, 1.196295853897226111293303155636183216483e302L, OVERFLOW_EXCEPTION),
7c69cd14
JM		 6275#endif
6276
6277#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 6278 TEST_c_c (cexp, 22730, 0x1p-16434L, plus_infty, 2.435706297811211974162115164702304105374e4924L, OVERFLOW_EXCEPTION),
7c69cd14
JM		 6279#endif
6280
08198877
JM		 6281 TEST_c_c (cexp, 1e6, 0, plus_infty, 0, OVERFLOW_EXCEPTION),
6282 TEST_c_c (cexp, 1e6, min_value, plus_infty, plus_infty, OVERFLOW_EXCEPTION),
6283 TEST_c_c (cexp, 1e6, -min_value, plus_infty, minus_infty, OVERFLOW_EXCEPTION),
7c69cd14 6284
08198877
JM		 6285 TEST_c_c (cexp, min_value, min_subnorm_value, 1.0, min_subnorm_value, UNDERFLOW_EXCEPTION),
6286 TEST_c_c (cexp, min_value, -min_subnorm_value, 1.0, -min_subnorm_value, UNDERFLOW_EXCEPTION),
6287 END_DATA (cexp)
6288 };
6289
6290static void
6291cexp_test (void)
6292{
6293 errno = 0;
6294 FUNC(cexp) (BUILD_COMPLEX (0, 0));
6295 if (errno == ENOSYS)
6296 /* Function not implemented. */
6297 return;
05e166c8 6298
08198877
JM		 6299 START (cexp);
6300 RUN_TEST_LOOP_c_c (cexp, cexp_test_data, );
6815fabc 6301 END (cexp, complex);
8847214f
UD		 6302}
6303
2550dfe9 6304
6a1992e2
JM		 6305static const struct test_c_f_data cimag_test_data[] =
6306 {
6307 START_DATA (cimag);
6308 TEST_c_f (cimag, 1.0, 0.0, 0.0),
6309 TEST_c_f (cimag, 1.0, minus_zero, minus_zero),
6310 TEST_c_f (cimag, 1.0, qnan_value, qnan_value),
6311 TEST_c_f (cimag, qnan_value, qnan_value, qnan_value),
6312 TEST_c_f (cimag, 1.0, plus_infty, plus_infty),
6313 TEST_c_f (cimag, 1.0, minus_infty, minus_infty),
6314 TEST_c_f (cimag, 2.0, 3.0, 3.0),
6315 END_DATA (cimag);
6316 };
6317
0cdc8e6f
UD		 6318static void
6319cimag_test (void)
6320{
6321 START (cimag);
6a1992e2 6322 RUN_TEST_LOOP_c_f (cimag, cimag_test_data, );
0cdc8e6f
UD		 6323 END (cimag);
6324}
6325
08198877
JM		 6326static const struct test_c_c_data clog_test_data[] =
6327 {
6328 START_DATA (clog),
6329 TEST_c_c (clog, minus_zero, 0, minus_infty, M_PIl, DIVIDE_BY_ZERO_EXCEPTION),
6330 TEST_c_c (clog, minus_zero, minus_zero, minus_infty, -M_PIl, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 6331
08198877
JM		 6332 TEST_c_c (clog, 0, 0, minus_infty, 0.0, DIVIDE_BY_ZERO_EXCEPTION),
6333 TEST_c_c (clog, 0, minus_zero, minus_infty, minus_zero, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 6334
08198877
JM		 6335 TEST_c_c (clog, minus_infty, plus_infty, plus_infty, M_PI_34l),
6336 TEST_c_c (clog, minus_infty, minus_infty, plus_infty, -M_PI_34l),
8847214f 6337
08198877
JM		 6338 TEST_c_c (clog, plus_infty, plus_infty, plus_infty, M_PI_4l),
6339 TEST_c_c (clog, plus_infty, minus_infty, plus_infty, -M_PI_4l),
8847214f 6340
08198877
JM		 6341 TEST_c_c (clog, 0, plus_infty, plus_infty, M_PI_2l),
6342 TEST_c_c (clog, 3, plus_infty, plus_infty, M_PI_2l),
6343 TEST_c_c (clog, minus_zero, plus_infty, plus_infty, M_PI_2l),
6344 TEST_c_c (clog, -3, plus_infty, plus_infty, M_PI_2l),
6345 TEST_c_c (clog, 0, minus_infty, plus_infty, -M_PI_2l),
6346 TEST_c_c (clog, 3, minus_infty, plus_infty, -M_PI_2l),
6347 TEST_c_c (clog, minus_zero, minus_infty, plus_infty, -M_PI_2l),
6348 TEST_c_c (clog, -3, minus_infty, plus_infty, -M_PI_2l),
8847214f 6349
08198877
JM		 6350 TEST_c_c (clog, minus_infty, 0, plus_infty, M_PIl),
6351 TEST_c_c (clog, minus_infty, 1, plus_infty, M_PIl),
6352 TEST_c_c (clog, minus_infty, minus_zero, plus_infty, -M_PIl),
6353 TEST_c_c (clog, minus_infty, -1, plus_infty, -M_PIl),
8847214f 6354
08198877
JM		 6355 TEST_c_c (clog, plus_infty, 0, plus_infty, 0.0),
6356 TEST_c_c (clog, plus_infty, 1, plus_infty, 0.0),
6357 TEST_c_c (clog, plus_infty, minus_zero, plus_infty, minus_zero),
6358 TEST_c_c (clog, plus_infty, -1, plus_infty, minus_zero),
8847214f 6359
08198877
JM		 6360 TEST_c_c (clog, plus_infty, qnan_value, plus_infty, qnan_value),
6361 TEST_c_c (clog, minus_infty, qnan_value, plus_infty, qnan_value),
8847214f 6362
08198877
JM		 6363 TEST_c_c (clog, qnan_value, plus_infty, plus_infty, qnan_value),
6364 TEST_c_c (clog, qnan_value, minus_infty, plus_infty, qnan_value),
8847214f 6365
08198877
JM		 6366 TEST_c_c (clog, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6367 TEST_c_c (clog, 3, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6368 TEST_c_c (clog, minus_zero, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6369 TEST_c_c (clog, -3, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6370
08198877
JM		 6371 TEST_c_c (clog, qnan_value, 0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6372 TEST_c_c (clog, qnan_value, 5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6373 TEST_c_c (clog, qnan_value, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6374 TEST_c_c (clog, qnan_value, -5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6375
08198877 6376 TEST_c_c (clog, qnan_value, qnan_value, qnan_value, qnan_value),
2550dfe9 6377
08198877
JM		 6378 TEST_c_c (clog, 0.75L, 1.25L, 0.376885901188190075998919126749298416L, 1.03037682652431246378774332703115153L),
6379 TEST_c_c (clog, -2, -3, 1.2824746787307683680267437207826593L, -2.1587989303424641704769327722648368L),
8847214f 6380
08198877
JM		 6381 TEST_c_c (clog, 0x1.fffffep+127L, 0x1.fffffep+127L, 89.06941264234832570836679262104313101776L, M_PI_4l),
6382 TEST_c_c (clog, 0x1.fffffep+127L, 1.0L, 88.72283905206835305365817656031404273372L, 2.938736052218037251011746307725933020145e-39L, UNDERFLOW_EXCEPTION_FLOAT),
6383 TEST_c_c (clog, 0x1p-149L, 0x1p-149L, -102.9323563131518784484589700365392203592L, M_PI_4l),
6384 TEST_c_c (clog, 0x1p-147L, 0x1p-147L, -101.5460619520319878296245057936228672231L, M_PI_4l),
1897ad44
JM		 6385
6386#ifndef TEST_FLOAT
08198877
JM		 6387 TEST_c_c (clog, 0x1.fffffffffffffp+1023L, 0x1.fffffffffffffp+1023L, 710.1292864836639693869320059713862337880L, M_PI_4l),
6388 TEST_c_c (clog, 0x1.fffffffffffffp+1023L, 0x1p+1023L, 709.8942846690411016323109979483151967689L, 0.4636476090008061606231772164674799632783L),
6389 TEST_c_c (clog, 0x1p-1074L, 0x1p-1074L, -744.0934983311012896593986823853525458290L, M_PI_4l),
6390 TEST_c_c (clog, 0x1p-1073L, 0x1p-1073L, -743.4003511505413443499814502638943692610L, M_PI_4l),
1897ad44
JM		 6391#endif
6392
6393#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6394 TEST_c_c (clog, 0x1.fp+16383L, 0x1.fp+16383L, 11356.83823118610934184548269774874545400L, M_PI_4l),
6395 TEST_c_c (clog, 0x1.fp+16383L, 0x1p+16383L, 11356.60974243783798653123798337822335902L, 0.4764674194737066993385333770295162295856L),
6396 TEST_c_c (clog, 0x1p-16440L, 0x1p-16441L, -11395.22807662984378194141292922726786191L, 0.4636476090008061162142562314612144020285L),
1897ad44
JM		 6397#endif
6398
08198877
JM		 6399 TEST_c_c (clog, 0x1p-149L, 0x1.fp+127L, 88.69109041335841930424871526389807508374L, M_PI_2l),
6400 TEST_c_c (clog, -0x1p-149L, 0x1.fp+127L, 88.69109041335841930424871526389807508374L, M_PI_2l),
6401 TEST_c_c (clog, 0x1p-149L, -0x1.fp+127L, 88.69109041335841930424871526389807508374L, -M_PI_2l),
6402 TEST_c_c (clog, -0x1p-149L, -0x1.fp+127L, 88.69109041335841930424871526389807508374L, -M_PI_2l),
6403 TEST_c_c (clog, -0x1.fp+127L, 0x1p-149L, 88.69109041335841930424871526389807508374L, M_PIl),
6404 TEST_c_c (clog, -0x1.fp+127L, -0x1p-149L, 88.69109041335841930424871526389807508374L, -M_PIl),
638a572e 6405#ifdef TEST_FLOAT
08198877
JM		 6406 TEST_c_c (clog, 0x1.fp+127L, 0x1p-149L, 88.69109041335841930424871526389807508374L, plus_zero, UNDERFLOW_EXCEPTION),
6407 TEST_c_c (clog, 0x1.fp+127L, -0x1p-149L, 88.69109041335841930424871526389807508374L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM		 6408#endif
6409
6410#ifndef TEST_FLOAT
08198877
JM		 6411 TEST_c_c (clog, 0x1p-1074L, 0x1.fp+1023L, 709.7509641950694165420886960904242800794L, M_PI_2l),
6412 TEST_c_c (clog, -0x1p-1074L, 0x1.fp+1023L, 709.7509641950694165420886960904242800794L, M_PI_2l),
6413 TEST_c_c (clog, 0x1p-1074L, -0x1.fp+1023L, 709.7509641950694165420886960904242800794L, -M_PI_2l),
6414 TEST_c_c (clog, -0x1p-1074L, -0x1.fp+1023L, 709.7509641950694165420886960904242800794L, -M_PI_2l),
6415 TEST_c_c (clog, -0x1.fp+1023L, 0x1p-1074L, 709.7509641950694165420886960904242800794L, M_PIl),
6416 TEST_c_c (clog, -0x1.fp+1023L, -0x1p-1074L, 709.7509641950694165420886960904242800794L, -M_PIl),
638a572e
JM		 6417#endif
6418#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877
JM		 6419 TEST_c_c (clog, 0x1.fp+1023L, 0x1p-1074L, 709.7509641950694165420886960904242800794L, plus_zero, UNDERFLOW_EXCEPTION),
6420 TEST_c_c (clog, 0x1.fp+1023L, -0x1p-1074L, 709.7509641950694165420886960904242800794L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM		 6421#endif
6422
6423#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6424 TEST_c_c (clog, 0x1p-16445L, 0x1.fp+16383L, 11356.49165759582936919077408168801636572L, M_PI_2l),
6425 TEST_c_c (clog, -0x1p-16445L, 0x1.fp+16383L, 11356.49165759582936919077408168801636572L, M_PI_2l),
6426 TEST_c_c (clog, 0x1p-16445L, -0x1.fp+16383L, 11356.49165759582936919077408168801636572L, -M_PI_2l),
6427 TEST_c_c (clog, -0x1p-16445L, -0x1.fp+16383L, 11356.49165759582936919077408168801636572L, -M_PI_2l),
6428 TEST_c_c (clog, -0x1.fp+16383L, 0x1p-16445L, 11356.49165759582936919077408168801636572L, M_PIl),
6429 TEST_c_c (clog, -0x1.fp+16383L, -0x1p-16445L, 11356.49165759582936919077408168801636572L, -M_PIl),
6430 TEST_c_c (clog, 0x1.fp+16383L, 0x1p-16445L, 11356.49165759582936919077408168801636572L, plus_zero, UNDERFLOW_EXCEPTION),
6431 TEST_c_c (clog, 0x1.fp+16383L, -0x1p-16445L, 11356.49165759582936919077408168801636572L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e 6432# if LDBL_MANT_DIG >= 113
08198877
JM		 6433 TEST_c_c (clog, 0x1p-16494L, 0x1.fp+16383L, 11356.49165759582936919077408168801636572L, M_PI_2l),
6434 TEST_c_c (clog, -0x1p-16494L, 0x1.fp+16383L, 11356.49165759582936919077408168801636572L, M_PI_2l),
6435 TEST_c_c (clog, 0x1p-16494L, -0x1.fp+16383L, 11356.49165759582936919077408168801636572L, -M_PI_2l),
6436 TEST_c_c (clog, -0x1p-16494L, -0x1.fp+16383L, 11356.49165759582936919077408168801636572L, -M_PI_2l),
6437 TEST_c_c (clog, -0x1.fp+16383L, 0x1p-16494L, 11356.49165759582936919077408168801636572L, M_PIl),
6438 TEST_c_c (clog, -0x1.fp+16383L, -0x1p-16494L, 11356.49165759582936919077408168801636572L, -M_PIl),
6439 TEST_c_c (clog, 0x1.fp+16383L, 0x1p-16494L, 11356.49165759582936919077408168801636572L, plus_zero, UNDERFLOW_EXCEPTION),
6440 TEST_c_c (clog, 0x1.fp+16383L, -0x1p-16494L, 11356.49165759582936919077408168801636572L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM		 6441# endif
6442#endif
6443
08198877
JM		 6444 TEST_c_c (clog, 1.0L, 0x1.234566p-10L, 6.172834701221959432440126967147726538097e-7L, 1.111110564353742042376451655136933182201e-3L),
6445 TEST_c_c (clog, -1.0L, 0x1.234566p-20L, 5.886877547844618300918562490463748605537e-13L, 3.141591568520436206990380699322226378452L),
6446 TEST_c_c (clog, 0x1.234566p-30L, 1.0L, 5.614163921211322622623353961365728040115e-19L, 1.570796325735258575254858696548386439740L),
6447 TEST_c_c (clog, -0x1.234566p-40L, -1.0L, 5.354083939753840089583620652120903838944e-25L, -1.570796326795931422008642456283782656359L),
6448 TEST_c_c (clog, 0x1.234566p-50L, 1.0L, 5.106052341226425256332038420428899201070e-31L, 1.570796326794895608681734464330528755366L),
6449 TEST_c_c (clog, 0x1.234566p-60L, 1.0L, 4.869510976053643471080816669875627875933e-37L, 1.570796326794896618244456860363082279319L),
6450 TEST_c_c (clog, 0x1p-62L, 1.0L, 2.350988701644575015937473074444491355582e-38L, 1.570796326794896619014481257142650555297L),
6451 TEST_c_c (clog, 0x1p-63L, 1.0L, 5.877471754111437539843682686111228389059e-39L, 1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
6452 TEST_c_c (clog, 0x1p-64L, 1.0L, 1.469367938527859384960920671527807097271e-39L, 1.570796326794896619177111583015476220398L, UNDERFLOW_EXCEPTION_FLOAT),
da865e95 6453#ifndef TEST_FLOAT
08198877
JM		 6454 TEST_c_c (clog, 0x1p-510L, 1.0L, 4.450147717014402766180465434664808128438e-308L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
6455 TEST_c_c (clog, 0x1p-511L, 1.0L, 1.112536929253600691545116358666202032110e-308L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
6456 TEST_c_c (clog, 0x1p-512L, 1.0L, 2.781342323134001728862790896665505080274e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
da865e95
JM		 6457#endif
6458#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6459 TEST_c_c (clog, 0x1p-8190L, 1.0L, 6.724206286224187012525355634643505205196e-4932L, 1.570796326794896619231321691639751442099L),
6460 TEST_c_c (clog, 0x1p-8191L, 1.0L, 1.681051571556046753131338908660876301299e-4932L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
6461 TEST_c_c (clog, 0x1p-8192L, 1.0L, 4.202628928890116882828347271652190753248e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
da865e95
JM		 6462#endif
6463
08198877
JM		 6464 TEST_c_c (clog, 0x1.000566p0L, 0x1.234p-10L, 8.298731898331237038231468223024422855654e-5L, 1.110938609507128729312743251313024793990e-3L),
6465 TEST_c_c (clog, 0x1.000566p0L, 0x1.234p-100L, 8.237022655933121125560939513260027133767e-5L, 8.974094312218060110948251664314290484113e-31L),
d0419dbf 6466#ifndef TEST_FLOAT
08198877
JM		 6467 TEST_c_c (clog, -0x1.0000000123456p0L, 0x1.2345678p-30L, 2.649094282537168795982991778475646793277e-10L, 3.141592652530155111500161671113150737892L),
6468 TEST_c_c (clog, -0x1.0000000123456p0L, 0x1.2345678p-1000L, 2.649094276923003995420209214900915462737e-10L, 3.141592653589793238462643383279502884197L),
d0419dbf
JM		 6469#endif
6470#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 6471 TEST_c_c (clog, 0x1.00000000000000123456789abcp0L, 0x1.23456789p-60L, 9.868649107778739757272772275265050767867e-19L, 9.868649106423871142816660980898339912137e-19L),
6472 TEST_c_c (clog, 0x1.00000000000000123456789abcp0L, 0x1.23456789p-1000L, 9.868649107778739752403260515979017248596e-19L, 1.061846605795612822522063052130030717368e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d0419dbf
JM		 6473#endif
6474
08198877 6475 TEST_c_c (clog, 0x0.ffffffp0L, 0x0.ffffffp-100L, -5.960464655174753498633255797994360530379e-8L, 7.888609052210118054117285652827862296732e-31L),
d032e0d2 6476#ifndef TEST_FLOAT
08198877 6477 TEST_c_c (clog, 0x0.fffffffffffff8p0L, 0x0.fffffffffffff8p-1000L, -1.110223024625156602053389888482372171810e-16L, 9.332636185032188789900895447238171696171e-302L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d032e0d2
JM		 6478#endif
6479#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 6480 TEST_c_c (clog, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp-15000L, -5.421010862427522170184200798202494495630e-20L, 3.548665303440282824232502561095699343814e-4516L),
6481#endif
6482
6483 TEST_c_c (clog, 0x1a6p-10L, 0x3a5p-10L, -1.4305135209763571252847059962654228661815e-06L, 1.1460277178115757370775644871674016684074L),
6484 TEST_c_c (clog, 0xf2p-10L, 0x3e3p-10L, 6.1988446308070710970664736815277450078106e-06L, 1.3322126499153926210226335249558203898460L),
6485 TEST_c_c (clog, 0x4d4ep-15L, 0x6605p-15L, -1.6298145321400412054744424587143483169412e-08L, 0.9223574537155056772124552172295398141249L),
6486 TEST_c_c (clog, 0x2818p-15L, 0x798fp-15L, 1.5366822245016167178749091974664853785194e-08L, 1.2522014929038946066987318471922169174157L),
6487 TEST_c_c (clog, 0x9b57bp-20L, 0xcb7b4p-20L, -3.9563019528687610863490232935890272740908e-11L, 0.9187593477446338910857133065497364950682L),
6488 TEST_c_c (clog, 0x2731p-20L, 0xfffd0p-20L, 4.4110493034041283943115971658295280288115e-11L, 1.5612279663766352262688735061954290528838L),
6489 TEST_c_c (clog, 0x2ede88p-23L, 0x771c3fp-23L, -4.4764192352906350039050902870893173560494e-13L, 1.1959106857549200806818600493552847793381L),
6490 TEST_c_c (clog, 0x11682p-23L, 0x7ffed1p-23L, 1.1723955140027907954461000991619077811832e-12L, 1.5622968405332756349813737986164832897108L),
6491 TEST_c_c (clog, 0xa1f2c1p-24L, 0xc643aep-24L, -1.0480505352462576151523512837107080269981e-13L, 0.8858771987699967480545613322309315260313L),
6492 TEST_c_c (clog, 0x659feap-24L, 0xeaf6f9p-24L, 3.7303493627403868207597214252239749960738e-14L, 1.1625816408046866464773042283673653469061L),
d032e0d2 6493#ifndef TEST_FLOAT
08198877
JM		 6494 TEST_c_c (clog, 0x4447d7175p-35L, 0x6c445e00ap-35L, -1.4823076576950255933915367361099865652625e-20L, 1.0081311552703893116404606212158840190615L),
6495 TEST_c_c (clog, 0x2dd46725bp-35L, 0x7783a1284p-35L, 4.4469229730850767799109418892826021157328e-20L, 1.2046235979300843056806465045930070146351L),
6496 TEST_c_c (clog, 0x164c74eea876p-45L, 0x16f393482f77p-45L, -3.0292258760486853327810377824479932031744e-26L, 0.7998237934177411746093524982030330293980L),
6497 TEST_c_c (clog, 0xfe961079616p-45L, 0x1bc37e09e6d1p-45L, 5.3718272201930019901317065495843842735179e-26L, 1.0503831592447830576186444373011142397404L),
6498 TEST_c_c (clog, 0xa4722f19346cp-51L, 0x7f9631c5e7f07p-51L, -6.2122796286154679676173624516405339768606e-30L, 1.4904138780720095276446375492434049214172L),
6499 TEST_c_c (clog, 0x10673dd0f2481p-51L, 0x7ef1d17cefbd2p-51L, 3.2047474274603604594851472963586149973093e-29L, 1.4422922682185099608731642353544207976604L),
6500 TEST_c_c (clog, 0x8ecbf810c4ae6p-52L, 0xd479468b09a37p-52L, -9.7375017988218644730510244778042114638107e-30L, 0.9790637929494922564724108399524154766631L),
6501 TEST_c_c (clog, 0x5b06b680ea2ccp-52L, 0xef452b965da9fp-52L, 8.3076914081087805757422664530653247447136e-30L, 1.2072712126771536614482822173033535043206L),
6502 TEST_c_c (clog, 0x659b70ab7971bp-53L, 0x1f5d111e08abecp-53L, -2.5083311595699359750201056724289010648701e-30L, 1.3710185432462268491534742969536240564640L),
6503 TEST_c_c (clog, 0x15cfbd1990d1ffp-53L, 0x176a3973e09a9ap-53L, 1.0168910106364605304135563536838075568606e-30L, 0.8208373755522359859870890246475340086663L),
6504 TEST_c_c (clog, 0x1367a310575591p-54L, 0x3cfcc0a0541f60p-54L, 5.0844550531823026520677817684239496041087e-32L, 1.2627468605458094918919206628466016525397L),
6505 TEST_c_c (clog, 0x55cb6d0c83af5p-55L, 0x7fe33c0c7c4e90p-55L, -5.2000108498455368032511404449795741611813e-32L, 1.5288921536982513453421343495466824420259L),
d032e0d2
JM		 6506#endif
6507#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 6508 TEST_c_c (clog, 0x298c62cb546588a7p-63L, 0x7911b1dfcc4ecdaep-63L, -1.1931267660846218205882675852805793644095e-36L, 1.2402109774337032400594953899784058127412L),
6509 TEST_c_c (clog, 0x4d9c37e2b5cb4533p-63L, 0x65c98be2385a042ep-63L, 6.4064442119814669184296141278612389400075e-37L, 0.9193591364645830864185131402313014890145L),
6510 TEST_c_c (clog, 0x602fd5037c4792efp-64L, 0xed3e2086dcca80b8p-64L, -2.3362950222592964220878638677292132852104e-37L, 1.1856121127236268105413184264288408265852L),
6511 TEST_c_c (clog, 0x6b10b4f3520217b6p-64L, 0xe8893cbb449253a1p-64L, 2.4244570985709679851855191080208817099132e-37L, 1.1393074519572050614551047548718495655972L),
6512 TEST_c_c (clog, 0x81b7efa81fc35ad1p-65L, 0x1ef4b835f1c79d812p-65L, -9.9182335850630508484862145328126979066934e-39L, 1.3146479888794807046338799047003947008804L),
d032e0d2
JM		 6513#endif
6514#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 6515 TEST_c_c (clog, 0x3f96469050f650869c2p-75L, 0x6f16b2c9c8b05988335p-75L, -1.0509738482436128031927971874674370984602e-45L, 1.0509191467640012308402149909370784281448L),
6516 TEST_c_c (clog, 0x3157fc1d73233e580c8p-75L, 0x761b52ccd435d7c7f5fp-75L, 1.3487497719126364307640897239165442763573e-43L, 1.1750493008528425228929764149024375035382L),
6517 TEST_c_c (clog, 0x155f8afc4c48685bf63610p-85L, 0x17d0cf2652cdbeb1294e19p-85L, -4.7775669192897997174762089350332738583822e-50L, 0.8393953487996880419413728440067635213372L),
6518 TEST_c_c (clog, 0x13836d58a13448d750b4b9p-85L, 0x195ca7bc3ab4f9161edbe6p-85L, 2.8398125044729578740243199963484494962411e-50L, 0.9149964976334130461795060758257083099706L),
6519 TEST_c_c (clog, 0x1df515eb171a808b9e400266p-95L, 0x7c71eb0cd4688dfe98581c77p-95L, -3.5048022044913950094635368750889659723004e-57L, 1.3345633256521815205858155673950177421079L),
6520 TEST_c_c (clog, 0xe33f66c9542ca25cc43c867p-95L, 0x7f35a68ebd3704a43c465864p-95L, 4.1101771307217268747345114262406964584250e-56L, 1.4596065864518742494094402406719567059585L),
6521 TEST_c_c (clog, 0x6771f22c64ed551b857c128b4cp-105L, 0x1f570e7a13cc3cf2f44fd793ea1p-105L, -1.4281333889622737316199756373421183559948e-62L, 1.3673546561165378090903506783353927980633L),
6522 TEST_c_c (clog, 0x15d8ab6ed05ca514086ac3a1e84p-105L, 0x1761e480aa094c0b10b34b09ce9p-105L, 1.0027319539522347477331743836657426754857e-62L, 0.8193464073721167323313606647411269414759L),
6523 TEST_c_c (clog, 0x187190c1a334497bdbde5a95f48p-106L, 0x3b25f08062d0a095c4cfbbc338dp-106L, -1.7471844652198029695350765775994001163767e-63L, 1.1789110097072986038243729592318526094314L),
6524 TEST_c_c (clog, 0x6241ef0da53f539f02fad67dabp-106L, 0x3fb46641182f7efd9caa769dac0p-106L, 4.3299788920664682288477984749202524623248e-63L, 1.4746938237585656250866370987773473745867L),
d032e0d2
JM		 6525#endif
6526#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 6527 TEST_c_c (clog, 0x3e1d0a105ac4ebeacd9c6952d34cp-112L, 0xf859b3d1b06d005dcbb5516d5479p-112L, -1.1683999374665377365054966073875064467108e-66L, 1.3257197596350832748781065387304444940172L),
6528 TEST_c_c (clog, 0x47017a2e36807acb1e5214b209dep-112L, 0xf5f4a550c9d75e3bb1839d865f0dp-112L, 1.5077923002544367932999503838191154621839e-65L, 1.2897445708311412721399861948957141824914L),
6529 TEST_c_c (clog, 0x148f818cb7a9258fca942ade2a0cap-113L, 0x18854a34780b8333ec53310ad7001p-113L, -7.1865869169568789348552370692485515571497e-67L, 0.8730167479365994646287897223471819363668L),
6530 TEST_c_c (clog, 0xfd95243681c055c2632286921092p-113L, 0x1bccabcd29ca2152860ec29e34ef7p-113L, 6.6255694866654064502633121109394710807528e-66L, 1.0526409614996288387567810726095850312049L),
6531 TEST_c_c (clog, 0xdb85c467ee2aadd5f425fe0f4b8dp-114L, 0x3e83162a0f95f1dcbf97dddf410eap-114L, 4.6017338806965821566734340588575402712716e-67L, 1.3547418904611758959096647942223384691728L),
6532 TEST_c_c (clog, 0x1415bcaf2105940d49a636e98ae59p-115L, 0x7e6a150adfcd1b0921d44b31f40f4p-115L, 2.5993421227864195179698176012564317527271e-67L, 1.4132318089683022770487383611430906982461L),
6533#endif
6534 END_DATA (clog)
6535 };
8847214f
UD		 6536
6537static void
08198877 6538clog_test (void)
8847214f 6539{
aaca11d8 6540 errno = 0;
08198877 6541 FUNC(clog) (BUILD_COMPLEX (-2, -3));
aaca11d8
UD		 6542 if (errno == ENOSYS)
6543 /* Function not implemented. */
6544 return;
6545
08198877
JM		 6546 START (clog);
6547 RUN_TEST_LOOP_c_c (clog, clog_test_data, );
6548 END (clog, complex);
6549}
6550
8847214f 6551
08198877
JM		 6552static const struct test_c_c_data clog10_test_data[] =
6553 {
6554 START_DATA (clog10),
6555 TEST_c_c (clog10, minus_zero, 0, minus_infty, M_PIl, DIVIDE_BY_ZERO_EXCEPTION),
6556 TEST_c_c (clog10, minus_zero, minus_zero, minus_infty, -M_PIl, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 6557
08198877
JM		 6558 TEST_c_c (clog10, 0, 0, minus_infty, 0.0, DIVIDE_BY_ZERO_EXCEPTION),
6559 TEST_c_c (clog10, 0, minus_zero, minus_infty, minus_zero, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 6560
08198877 6561 TEST_c_c (clog10, minus_infty, plus_infty, plus_infty, M_PI_34_LOG10El),
8847214f 6562
08198877
JM		 6563 TEST_c_c (clog10, plus_infty, plus_infty, plus_infty, M_PI4_LOG10El),
6564 TEST_c_c (clog10, plus_infty, minus_infty, plus_infty, -M_PI4_LOG10El),
8847214f 6565
08198877
JM		 6566 TEST_c_c (clog10, 0, plus_infty, plus_infty, M_PI2_LOG10El),
6567 TEST_c_c (clog10, 3, plus_infty, plus_infty, M_PI2_LOG10El),
6568 TEST_c_c (clog10, minus_zero, plus_infty, plus_infty, M_PI2_LOG10El),
6569 TEST_c_c (clog10, -3, plus_infty, plus_infty, M_PI2_LOG10El),
6570 TEST_c_c (clog10, 0, minus_infty, plus_infty, -M_PI2_LOG10El),
6571 TEST_c_c (clog10, 3, minus_infty, plus_infty, -M_PI2_LOG10El),
6572 TEST_c_c (clog10, minus_zero, minus_infty, plus_infty, -M_PI2_LOG10El),
6573 TEST_c_c (clog10, -3, minus_infty, plus_infty, -M_PI2_LOG10El),
8847214f 6574
08198877
JM		 6575 TEST_c_c (clog10, minus_infty, 0, plus_infty, M_PI_LOG10El),
6576 TEST_c_c (clog10, minus_infty, 1, plus_infty, M_PI_LOG10El),
6577 TEST_c_c (clog10, minus_infty, minus_zero, plus_infty, -M_PI_LOG10El),
6578 TEST_c_c (clog10, minus_infty, -1, plus_infty, -M_PI_LOG10El),
8847214f 6579
08198877
JM		 6580 TEST_c_c (clog10, plus_infty, 0, plus_infty, 0.0),
6581 TEST_c_c (clog10, plus_infty, 1, plus_infty, 0.0),
6582 TEST_c_c (clog10, plus_infty, minus_zero, plus_infty, minus_zero),
6583 TEST_c_c (clog10, plus_infty, -1, plus_infty, minus_zero),
8847214f 6584
08198877
JM		 6585 TEST_c_c (clog10, plus_infty, qnan_value, plus_infty, qnan_value),
6586 TEST_c_c (clog10, minus_infty, qnan_value, plus_infty, qnan_value),
8847214f 6587
08198877
JM		 6588 TEST_c_c (clog10, qnan_value, plus_infty, plus_infty, qnan_value),
6589 TEST_c_c (clog10, qnan_value, minus_infty, plus_infty, qnan_value),
8847214f 6590
08198877
JM		 6591 TEST_c_c (clog10, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6592 TEST_c_c (clog10, 3, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6593 TEST_c_c (clog10, minus_zero, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6594 TEST_c_c (clog10, -3, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6595
08198877
JM		 6596 TEST_c_c (clog10, qnan_value, 0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6597 TEST_c_c (clog10, qnan_value, 5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6598 TEST_c_c (clog10, qnan_value, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6599 TEST_c_c (clog10, qnan_value, -5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6600
08198877 6601 TEST_c_c (clog10, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 6602
08198877
JM		 6603 TEST_c_c (clog10, 0.75L, 1.25L, 0.163679467193165171449476605077428975L, 0.447486970040493067069984724340855636L),
6604 TEST_c_c (clog10, -2, -3, 0.556971676153418384603252578971164214L, -0.937554462986374708541507952140189646L),
8847214f 6605
08198877
JM		 6606 TEST_c_c (clog10, 0x1.fffffep+127L, 0x1.fffffep+127L, 38.68235441693561449174780668781319348761L, M_PI4_LOG10El),
6607 TEST_c_c (clog10, 0x1.fffffep+127L, 1.0L, 38.53183941910362389414093724045094697423L, 1.276276851248440096917018665609900318458e-39L, UNDERFLOW_EXCEPTION_FLOAT),
6608 TEST_c_c (clog10, 0x1p-149L, 0x1p-149L, -44.70295435610120748924022586658721447508L, M_PI4_LOG10El),
6609 TEST_c_c (clog10, 0x1p-147L, 0x1p-147L, -44.10089436477324509881274807713822842154L, M_PI4_LOG10El),
1897ad44
JM		 6610
6611#ifndef TEST_FLOAT
08198877
JM		 6612 TEST_c_c (clog10, 0x1.fffffffffffffp+1023L, 0x1.fffffffffffffp+1023L, 308.4052305577487344482591243175787477115L, M_PI4_LOG10El),
6613 TEST_c_c (clog10, 0x1.fffffffffffffp+1023L, 0x1p+1023L, 308.3031705664207720674749211936626341569L, 0.2013595981366865903254995612594728746470L),
6614 TEST_c_c (clog10, 0x1p-1074L, 0x1p-1074L, -323.1557003452838130619487034867432642357L, M_PI4_LOG10El),
6615 TEST_c_c (clog10, 0x1p-1073L, 0x1p-1073L, -322.8546703496198318667349645920187712089L, M_PI4_LOG10El),
1897ad44
JM		 6616#endif
6617
6618#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6619 TEST_c_c (clog10, 0x1.fp+16383L, 0x1.fp+16383L, 4932.212175672014259683102930239951947672L, M_PI4_LOG10El),
6620 TEST_c_c (clog10, 0x1.fp+16383L, 0x1p+16383L, 4932.112944269463028900262609694408579449L, 0.2069271710841128115912940666587802677383L),
6621 TEST_c_c (clog10, 0x1p-16440L, 0x1p-16441L, -4948.884673709346821106688037612752099609L, 0.2013595981366865710389502301937289472543L),
1897ad44
JM		 6622#endif
6623
08198877
JM		 6624 TEST_c_c (clog10, 0x1p-149L, 0x1.fp+127L, 38.51805116050395969095658815123105801479L, 0.6821881769209206737428918127156778851051L),
6625 TEST_c_c (clog10, -0x1p-149L, 0x1.fp+127L, 38.51805116050395969095658815123105801479L, 0.6821881769209206737428918127156778851051L),
6626 TEST_c_c (clog10, 0x1p-149L, -0x1.fp+127L, 38.51805116050395969095658815123105801479L, -0.6821881769209206737428918127156778851051L),
6627 TEST_c_c (clog10, -0x1p-149L, -0x1.fp+127L, 38.51805116050395969095658815123105801479L, -0.6821881769209206737428918127156778851051L),
6628 TEST_c_c (clog10, -0x1.fp+127L, 0x1p-149L, 38.51805116050395969095658815123105801479L, 1.364376353841841347485783625431355770210L),
6629 TEST_c_c (clog10, -0x1.fp+127L, -0x1p-149L, 38.51805116050395969095658815123105801479L, -1.364376353841841347485783625431355770210L),
638a572e 6630#ifdef TEST_FLOAT
08198877
JM		 6631 TEST_c_c (clog10, 0x1.fp+127L, 0x1p-149L, 38.51805116050395969095658815123105801479L, plus_zero, UNDERFLOW_EXCEPTION),
6632 TEST_c_c (clog10, 0x1.fp+127L, -0x1p-149L, 38.51805116050395969095658815123105801479L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM		 6633#endif
6634
6635#ifndef TEST_FLOAT
08198877
JM		 6636 TEST_c_c (clog10, 0x1p-1074L, 0x1.fp+1023L, 308.2409272754311106024666378243768099991L, 0.6821881769209206737428918127156778851051L),
6637 TEST_c_c (clog10, -0x1p-1074L, 0x1.fp+1023L, 308.2409272754311106024666378243768099991L, 0.6821881769209206737428918127156778851051L),
6638 TEST_c_c (clog10, 0x1p-1074L, -0x1.fp+1023L, 308.2409272754311106024666378243768099991L, -0.6821881769209206737428918127156778851051L),
6639 TEST_c_c (clog10, -0x1p-1074L, -0x1.fp+1023L, 308.2409272754311106024666378243768099991L, -0.6821881769209206737428918127156778851051L),
6640 TEST_c_c (clog10, -0x1.fp+1023L, 0x1p-1074L, 308.2409272754311106024666378243768099991L, 1.364376353841841347485783625431355770210L),
6641 TEST_c_c (clog10, -0x1.fp+1023L, -0x1p-1074L, 308.2409272754311106024666378243768099991L, -1.364376353841841347485783625431355770210L),
638a572e
JM		 6642#endif
6643#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877
JM		 6644 TEST_c_c (clog10, 0x1.fp+1023L, 0x1p-1074L, 308.2409272754311106024666378243768099991L, plus_zero, UNDERFLOW_EXCEPTION),
6645 TEST_c_c (clog10, 0x1.fp+1023L, -0x1p-1074L, 308.2409272754311106024666378243768099991L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM		 6646#endif
6647
6648#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6649 TEST_c_c (clog10, 0x1p-16445L, 0x1.fp+16383L, 4932.061660674182269085496060792589701158L, 0.6821881769209206737428918127156778851051L),
6650 TEST_c_c (clog10, -0x1p-16445L, 0x1.fp+16383L, 4932.061660674182269085496060792589701158L, 0.6821881769209206737428918127156778851051L),
6651 TEST_c_c (clog10, 0x1p-16445L, -0x1.fp+16383L, 4932.061660674182269085496060792589701158L, -0.6821881769209206737428918127156778851051L),
6652 TEST_c_c (clog10, -0x1p-16445L, -0x1.fp+16383L, 4932.061660674182269085496060792589701158L, -0.6821881769209206737428918127156778851051L),
6653 TEST_c_c (clog10, -0x1.fp+16383L, 0x1p-16445L, 4932.061660674182269085496060792589701158L, 1.364376353841841347485783625431355770210L),
6654 TEST_c_c (clog10, -0x1.fp+16383L, -0x1p-16445L, 4932.061660674182269085496060792589701158L, -1.364376353841841347485783625431355770210L),
6655 TEST_c_c (clog10, 0x1.fp+16383L, 0x1p-16445L, 4932.061660674182269085496060792589701158L, plus_zero, UNDERFLOW_EXCEPTION),
6656 TEST_c_c (clog10, 0x1.fp+16383L, -0x1p-16445L, 4932.061660674182269085496060792589701158L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e 6657# if LDBL_MANT_DIG >= 113
08198877
JM		 6658 TEST_c_c (clog10, 0x1p-16494L, 0x1.fp+16383L, 4932.061660674182269085496060792589701158L, 0.6821881769209206737428918127156778851051L),
6659 TEST_c_c (clog10, -0x1p-16494L, 0x1.fp+16383L, 4932.061660674182269085496060792589701158L, 0.6821881769209206737428918127156778851051L),
6660 TEST_c_c (clog10, 0x1p-16494L, -0x1.fp+16383L, 4932.061660674182269085496060792589701158L, -0.6821881769209206737428918127156778851051L),
6661 TEST_c_c (clog10, -0x1p-16494L, -0x1.fp+16383L, 4932.061660674182269085496060792589701158L, -0.6821881769209206737428918127156778851051L),
6662 TEST_c_c (clog10, -0x1.fp+16383L, 0x1p-16494L, 4932.061660674182269085496060792589701158L, 1.364376353841841347485783625431355770210L),
6663 TEST_c_c (clog10, -0x1.fp+16383L, -0x1p-16494L, 4932.061660674182269085496060792589701158L, -1.364376353841841347485783625431355770210L),
6664 TEST_c_c (clog10, 0x1.fp+16383L, 0x1p-16494L, 4932.061660674182269085496060792589701158L, plus_zero, UNDERFLOW_EXCEPTION),
6665 TEST_c_c (clog10, 0x1.fp+16383L, -0x1p-16494L, 4932.061660674182269085496060792589701158L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM		 6666# endif
6667#endif
6668
08198877
JM		 6669 TEST_c_c (clog10, 1.0L, 0x1.234566p-10L, 2.680828048441605163181684680300513080769e-7L, 4.825491868832381486767558728169977751564e-4L),
6670 TEST_c_c (clog10, -1.0L, 0x1.234566p-20L, 2.556638434669064077889576526006849923281e-13L, 1.364375882602207106407956770293808181427L),
6671 TEST_c_c (clog10, 0x1.234566p-30L, 1.0L, 2.438200411482400072282924063740535840474e-19L, 6.821881764607257184291586401763604544928e-1L),
6672 TEST_c_c (clog10, -0x1.234566p-40L, -1.0L, 2.325249110681915353442924915876654139373e-25L, -6.821881769213700828789403802671540158935e-1L),
6673 TEST_c_c (clog10, 0x1.234566p-50L, 1.0L, 2.217530356103816369479108963807448194409e-31L, 6.821881769209202348667823902864283966959e-1L),
6674 TEST_c_c (clog10, 0x1.234566p-60L, 1.0L, 2.114801746467415208319767917450504756866e-37L, 6.821881769209206733143018621078368211515e-1L),
6675 TEST_c_c (clog10, 0x1p-61L, 1.0L, 4.084085680564517578238994467153626207224e-38L, 6.821881769209206735545466044044889962925e-1L),
6676 TEST_c_c (clog10, 0x1p-62L, 1.0L, 1.021021420141129394559748616788406551878e-38L, 6.821881769209206736487192085600834406988e-1L, UNDERFLOW_EXCEPTION_FLOAT),
6677 TEST_c_c (clog10, 0x1p-63L, 1.0L, 2.552553550352823486399371541971016379740e-39L, 6.821881769209206736958055106378806629019e-1L, UNDERFLOW_EXCEPTION_FLOAT),
da865e95 6678#ifndef TEST_FLOAT
08198877
JM		 6679 TEST_c_c (clog10, 0x1p-509L, 1.0L, 7.730698388614835910296270976605350994446e-308L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
6680 TEST_c_c (clog10, 0x1p-510L, 1.0L, 1.932674597153708977574067744151337748612e-308L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
6681 TEST_c_c (clog10, 0x1p-511L, 1.0L, 4.831686492884272443935169360378344371529e-309L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
da865e95
JM		 6682#endif
6683#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6684 TEST_c_c (clog10, 0x1p-8189L, 1.0L, 1.168114274114528946314738738025008370069e-4931L, 6.821881769209206737428918127156778851051e-1L),
6685 TEST_c_c (clog10, 0x1p-8190L, 1.0L, 2.920285685286322365786846845062520925172e-4932L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION),
6686 TEST_c_c (clog10, 0x1p-8191L, 1.0L, 7.300714213215805914467117112656302312931e-4933L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION),
da865e95
JM		 6687#endif
6688
08198877
JM		 6689 TEST_c_c (clog10, 0x1.000566p0L, 0x1.234p-10L, 3.604093470239754109961125085078190708674e-5L, 4.824745078422174667425851670822596859720e-4L),
6690 TEST_c_c (clog10, 0x1.000566p0L, 0x1.234p-100L, 3.577293486783822178310971763308187385546e-5L, 3.897399639875661463735636919790792140598e-31L),
d0419dbf 6691#ifndef TEST_FLOAT
08198877
JM		 6692 TEST_c_c (clog10, -0x1.0000000123456p0L, 0x1.2345678p-30L, 1.150487028947346337782682105935961875822e-10L, 1.364376353381646356131680448946397884147L),
6693 TEST_c_c (clog10, -0x1.0000000123456p0L, 0x1.2345678p-1000L, 1.150487026509145544402795327729455391948e-10L, 1.364376353841841347485783625431355770210L),
d0419dbf
JM		 6694#endif
6695#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 6696 TEST_c_c (clog10, 0x1.00000000000000123456789abcp0L, 0x1.23456789p-60L, 4.285899851347756188767674032946882584784e-19L, 4.285899850759344225805480528847018395861e-19L),
6697 TEST_c_c (clog10, 0x1.00000000000000123456789abcp0L, 0x1.23456789p-1000L, 4.285899851347756186652871946325962330640e-19L, 4.611541215247321502041995872887317363241e-302L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d0419dbf
JM		 6698#endif
6699
08198877 6700 TEST_c_c (clog10, 0x0.ffffffp0L, 0x0.ffffffp-100L, -2.588596909321764128428416045209904492216e-8L, 3.425979381266895667295625489912064603415e-31L),
d032e0d2 6701#ifndef TEST_FLOAT
08198877 6702 TEST_c_c (clog10, 0x0.fffffffffffff8p0L, 0x0.fffffffffffff8p-1000L, -4.821637332766435821255375046554377090472e-17L, 4.053112396770095089737411317782466262176e-302L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d032e0d2
JM		 6703#endif
6704#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 6705 TEST_c_c (clog10, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp-15000L, -2.354315103889861110220423157644627849164e-20L, 1.541165759405643564697852372112893034397e-4516L),
6706#endif
6707
6708 TEST_c_c (clog10, 0x1a6p-10L, 0x3a5p-10L, -6.2126412844802358329771948751248003038444e-07L, 0.4977135139537443711784513409096950995985L),
6709 TEST_c_c (clog10, 0xf2p-10L, 0x3e3p-10L, 2.6921240173351112953324592659528481616879e-06L, 0.5785726025799636431142862788413361783862L),
6710 TEST_c_c (clog10, 0x4d4ep-15L, 0x6605p-15L, -7.0781945783414996953799915941870192015212e-09L, 0.4005747524909781155537088181659175147564L),
6711 TEST_c_c (clog10, 0x2818p-15L, 0x798fp-15L, 6.6737261053986614395049481326819059203910e-09L, 0.5438241985991753781478398141908629586460L),
6712 TEST_c_c (clog10, 0x9b57bp-20L, 0xcb7b4p-20L, -1.7182001068739620267773842120965071561416e-11L, 0.3990121149225253562859800593935899629087L),
6713 TEST_c_c (clog10, 0x2731p-20L, 0xfffd0p-20L, 1.9156943718715958194239364991329064049438e-11L, 0.6780326907904082601285090019969008967595L),
6714 TEST_c_c (clog10, 0x2ede88p-23L, 0x771c3fp-23L, -1.9440841725722970687903291200493082253766e-13L, 0.5193774116724956222518530053006822210323L),
6715 TEST_c_c (clog10, 0x11682p-23L, 0x7ffed1p-23L, 5.0916490233953865181284669870035717560498e-13L, 0.6784968969384861816694467029319146542069L),
6716 TEST_c_c (clog10, 0xa1f2c1p-24L, 0xc643aep-24L, -4.5516256421319921959681423447271490869664e-14L, 0.3847315790697197749315054516562206543710L),
6717 TEST_c_c (clog10, 0x659feap-24L, 0xeaf6f9p-24L, 1.6200701438094619117335617123525612051457e-14L, 0.5049027913635038013499728086604870749732L),
d032e0d2 6718#ifndef TEST_FLOAT
08198877
JM		 6719 TEST_c_c (clog10, 0x4447d7175p-35L, 0x6c445e00ap-35L, -6.4375803621988389731799033530075237868110e-21L, 0.4378257977686804492768642780897650927167L),
6720 TEST_c_c (clog10, 0x2dd46725bp-35L, 0x7783a1284p-35L, 1.9312741086596516918394613098872836703188e-20L, 0.5231613813514771042838490538484014771862L),
6721 TEST_c_c (clog10, 0x164c74eea876p-45L, 0x16f393482f77p-45L, -1.3155760824064879362415202279780039150764e-26L, 0.3473590599762514228227328130640352044313L),
6722 TEST_c_c (clog10, 0xfe961079616p-45L, 0x1bc37e09e6d1p-45L, 2.3329549194675052736016290082882121135546e-26L, 0.4561756099441139182878993697611751382976L),
6723 TEST_c_c (clog10, 0xa4722f19346cp-51L, 0x7f9631c5e7f07p-51L, -2.6979587627476803379953050733225113494503e-30L, 0.6472785229986997177606324374555347813105L),
6724 TEST_c_c (clog10, 0x10673dd0f2481p-51L, 0x7ef1d17cefbd2p-51L, 1.3918041236396763648388478552321724382899e-29L, 0.6263795733790237053262025311642907438291L),
6725 TEST_c_c (clog10, 0x8ecbf810c4ae6p-52L, 0xd479468b09a37p-52L, -4.2289432987513243393180377141513840878196e-30L, 0.4252020027092323591068799049905597805296L),
6726 TEST_c_c (clog10, 0x5b06b680ea2ccp-52L, 0xef452b965da9fp-52L, 3.6079845358966994996207055940336690133424e-30L, 0.5243112258263349992771652393178033846555L),
6727 TEST_c_c (clog10, 0x659b70ab7971bp-53L, 0x1f5d111e08abecp-53L, -1.0893543813872082317104059174982092534059e-30L, 0.5954257879188711495921161433751775633232L),
6728 TEST_c_c (clog10, 0x15cfbd1990d1ffp-53L, 0x176a3973e09a9ap-53L, 4.4163015461643576961232672330852798804976e-31L, 0.3564851427422832755956993418877523303529L),
6729 TEST_c_c (clog10, 0x1367a310575591p-54L, 0x3cfcc0a0541f60p-54L, 2.2081507730821788480616336165447731164865e-32L, 0.5484039935757001196548030312819898864760L),
6730 TEST_c_c (clog10, 0x55cb6d0c83af5p-55L, 0x7fe33c0c7c4e90p-55L, -2.2583360179249556400630343805573865814771e-32L, 0.6639894257763289307423302343317622430835L),
d032e0d2
JM		 6731#endif
6732#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 6733 TEST_c_c (clog10, 0x298c62cb546588a7p-63L, 0x7911b1dfcc4ecdaep-63L, -5.1816837072162316773907242302011632570857e-37L, 0.5386167838952956925896424154370364458140L),
6734 TEST_c_c (clog10, 0x4d9c37e2b5cb4533p-63L, 0x65c98be2385a042ep-63L, 2.7822833698845776001753149807484078521508e-37L, 0.3992725998539071066769046272515417679815L),
6735 TEST_c_c (clog10, 0x602fd5037c4792efp-64L, 0xed3e2086dcca80b8p-64L, -1.0146400362652473358437501879334790111898e-37L, 0.5149047982335273098246594109614460842099L),
6736 TEST_c_c (clog10, 0x6b10b4f3520217b6p-64L, 0xe8893cbb449253a1p-64L, 1.0529283395205396881397407610630442563938e-37L, 0.4947949395762683446121140513971996916447L),
6737 TEST_c_c (clog10, 0x81b7efa81fc35ad1p-65L, 0x1ef4b835f1c79d812p-65L, -4.3074341162203896332989394770760901408798e-39L, 0.5709443672155660428417571212549720987784L),
d032e0d2
JM		 6738#endif
6739#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 6740 TEST_c_c (clog10, 0x3f96469050f650869c2p-75L, 0x6f16b2c9c8b05988335p-75L, -4.5643214291682663316715446865040356750881e-46L, 0.4564083863660793840592614609053162690362L),
6741 TEST_c_c (clog10, 0x3157fc1d73233e580c8p-75L, 0x761b52ccd435d7c7f5fp-75L, 5.8575458340992751256451490143468457830297e-44L, 0.5103174273246635294300470585396890237265L),
6742 TEST_c_c (clog10, 0x155f8afc4c48685bf63610p-85L, 0x17d0cf2652cdbeb1294e19p-85L, -2.0748709499710785084693619097712106753591e-50L, 0.3645447681189598740620098186365764884771L),
6743 TEST_c_c (clog10, 0x13836d58a13448d750b4b9p-85L, 0x195ca7bc3ab4f9161edbe6p-85L, 1.2333149003324592532859843519619084433953e-50L, 0.3973779298829931059309198145608711073016L),
6744 TEST_c_c (clog10, 0x1df515eb171a808b9e400266p-95L, 0x7c71eb0cd4688dfe98581c77p-95L, -1.5221162575729652613635150540947625639689e-57L, 0.5795934880811949230121092882659698986043L),
6745 TEST_c_c (clog10, 0xe33f66c9542ca25cc43c867p-95L, 0x7f35a68ebd3704a43c465864p-95L, 1.7850272475173865337808494725293124613817e-56L, 0.6338990862456906754888183278564382516852L),
6746 TEST_c_c (clog10, 0x6771f22c64ed551b857c128b4cp-105L, 0x1f570e7a13cc3cf2f44fd793ea1p-105L, -6.2023045024810589256360494043570293518879e-63L, 0.5938345819561308555003145899438513900776L),
6747 TEST_c_c (clog10, 0x15d8ab6ed05ca514086ac3a1e84p-105L, 0x1761e480aa094c0b10b34b09ce9p-105L, 4.3548095442952115860848857519953610343042e-63L, 0.3558376234889641500775150477035448866763L),
6748 TEST_c_c (clog10, 0x187190c1a334497bdbde5a95f48p-106L, 0x3b25f08062d0a095c4cfbbc338dp-106L, -7.5879257211204444302994221436282805900756e-64L, 0.5119945461708707332160859198685423099187L),
6749 TEST_c_c (clog10, 0x6241ef0da53f539f02fad67dabp-106L, 0x3fb46641182f7efd9caa769dac0p-106L, 1.8804859395820231849002915747252695375405e-63L, 0.6404513901551516189871978418046651877394L),
d032e0d2
JM		 6750#endif
6751#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 6752 TEST_c_c (clog10, 0x3e1d0a105ac4ebeacd9c6952d34cp-112L, 0xf859b3d1b06d005dcbb5516d5479p-112L, -5.0742964549782184008668435276046798273476e-67L, 0.5757527761596220360985719127090110408283L),
6753 TEST_c_c (clog10, 0x47017a2e36807acb1e5214b209dep-112L, 0xf5f4a550c9d75e3bb1839d865f0dp-112L, 6.5482587585671294601662599808612773010057e-66L, 0.5601289501766423782280643144987875760229L),
6754 TEST_c_c (clog10, 0x148f818cb7a9258fca942ade2a0cap-113L, 0x18854a34780b8333ec53310ad7001p-113L, -3.1210950417524756037077807411854181477733e-67L, 0.3791463562379872585396164879981280044658L),
6755 TEST_c_c (clog10, 0xfd95243681c055c2632286921092p-113L, 0x1bccabcd29ca2152860ec29e34ef7p-113L, 2.8774482675253468630312378575186855052697e-66L, 0.4571561610046221605554903008571429975493L),
6756 TEST_c_c (clog10, 0xdb85c467ee2aadd5f425fe0f4b8dp-114L, 0x3e83162a0f95f1dcbf97dddf410eap-114L, 1.9985076315737626043096596036300177494613e-67L, 0.5883569274304683249184005177865521205198L),
6757 TEST_c_c (clog10, 0x1415bcaf2105940d49a636e98ae59p-115L, 0x7e6a150adfcd1b0921d44b31f40f4p-115L, 1.1288799405048268615023706955013387413519e-67L, 0.6137587762850841972073301550420510507903L),
6758#endif
6759 END_DATA (clog10)
6760 };
d032e0d2 6761
08198877
JM		 6762static void
6763clog10_test (void)
6764{
6765 errno = 0;
6766 FUNC(clog10) (BUILD_COMPLEX (0.7L, 1.2L));
6767 if (errno == ENOSYS)
6768 /* Function not implemented. */
6769 return;
6770
6771 START (clog10);
6772 RUN_TEST_LOOP_c_c (clog10, clog10_test_data, );
6815fabc 6773 END (clog10, complex);
8847214f
UD		 6774}
6775
2550dfe9 6776
08198877
JM		 6777static const struct test_c_c_data conj_test_data[] =
6778 {
6779 START_DATA (conj),
6780 TEST_c_c (conj, 0.0, 0.0, 0.0, minus_zero),
6781 TEST_c_c (conj, 0.0, minus_zero, 0.0, 0.0),
6782 TEST_c_c (conj, qnan_value, qnan_value, qnan_value, qnan_value),
6783 TEST_c_c (conj, plus_infty, minus_infty, plus_infty, plus_infty),
6784 TEST_c_c (conj, plus_infty, plus_infty, plus_infty, minus_infty),
6785 TEST_c_c (conj, 1.0, 2.0, 1.0, -2.0),
6786 TEST_c_c (conj, 3.0, -4.0, 3.0, 4.0),
6787 END_DATA (conj)
6788 };
6789
0cdc8e6f
UD		 6790static void
6791conj_test (void)
6792{
6793 START (conj);
08198877 6794 RUN_TEST_LOOP_c_c (conj, conj_test_data, );
0cdc8e6f
UD		 6795 END (conj, complex);
6796}
6797
6798
601a3a5f
JM		 6799static const struct test_ff_f_data copysign_test_data[] =
6800 {
6801 START_DATA (copysign),
6802 TEST_ff_f (copysign, 0, 4, 0),
6803 TEST_ff_f (copysign, 0, -4, minus_zero),
6804 TEST_ff_f (copysign, minus_zero, 4, 0),
6805 TEST_ff_f (copysign, minus_zero, -4, minus_zero),
6806
6807 TEST_ff_f (copysign, plus_infty, 0, plus_infty),
6808 TEST_ff_f (copysign, plus_infty, minus_zero, minus_infty),
6809 TEST_ff_f (copysign, minus_infty, 0, plus_infty),
6810 TEST_ff_f (copysign, minus_infty, minus_zero, minus_infty),
6811
6812 TEST_ff_f (copysign, 0, plus_infty, 0),
6813 TEST_ff_f (copysign, 0, minus_zero, minus_zero),
6814 TEST_ff_f (copysign, minus_zero, plus_infty, 0),
6815 TEST_ff_f (copysign, minus_zero, minus_zero, minus_zero),
6816
6817 /* XXX More correctly we would have to check the sign of the NaN. */
6818 TEST_ff_f (copysign, qnan_value, 0, qnan_value),
6819 TEST_ff_f (copysign, qnan_value, minus_zero, qnan_value),
6820 TEST_ff_f (copysign, -qnan_value, 0, qnan_value),
6821 TEST_ff_f (copysign, -qnan_value, minus_zero, qnan_value),
6822 END_DATA (copysign)
6823 };
6824
8847214f
UD		 6825static void
6826copysign_test (void)
6827{
6828 START (copysign);
601a3a5f 6829 RUN_TEST_LOOP_ff_f (copysign, copysign_test_data, );
8847214f
UD		 6830 END (copysign);
6831}
6832
2550dfe9 6833
74c57478
JM		 6834static const struct test_f_f_data cos_test_data[] =
6835 {
6836 START_DATA (cos),
6837 TEST_f_f (cos, 0, 1),
6838 TEST_f_f (cos, minus_zero, 1),
6839 TEST_f_f (cos, plus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
6840 TEST_f_f (cos, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
6841 TEST_f_f (cos, qnan_value, qnan_value, ERRNO_UNCHANGED),
6842
6843 TEST_f_f (cos, M_PI_6l * 2.0, 0.5),
6844 TEST_f_f (cos, M_PI_6l * 4.0, -0.5),
6845
6846 /* The value of M_PI_2l is never exactly PI/2, and therefore the
6847 answer is never exactly zero. The answer is equal to the error
6848 in rounding PI/2 for the type used. Thus the answer is unique
6849 to each type. */
aba5e333 6850#ifdef TEST_FLOAT
74c57478
JM		 6851 /* 32-bit float. */
6852 TEST_f_f (cos, M_PI_2l, -0x1.777a5cp-25L),
aba5e333
CD		 6853#endif
6854#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MANT_DIG == 53)
74c57478
JM		 6855 /* 64-bit double or 64-bit long double. */
6856 TEST_f_f (cos, M_PI_2l, 0x1.1a62633145c07p-54L),
aba5e333
CD		 6857#endif
6858#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 64
74c57478
JM		 6859 /* 96-bit long double. */
6860 TEST_f_f (cos, M_PI_2l, -0xe.ce675d1fc8f8cbbp-69L),
aba5e333
CD		 6861#endif
6862#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 106
74c57478
JM		 6863 /* 128-bit IBM long double. */
6864 TEST_f_f (cos, M_PI_2l, 0x1.c1cd129024e088a67cc74020bcp-107L),
aba5e333
CD		 6865#endif
6866#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 113
74c57478
JM		 6867 /* 128-bit long double. */
6868 TEST_f_f (cos, M_PI_2l, 0x1.cd129024e088a67cc74020bbea64p-115L),
aba5e333 6869#endif
8847214f 6870
74c57478 6871 TEST_f_f (cos, 0.75L, 0.731688868873820886311838753000084544L),
8847214f 6872
74c57478
JM		 6873 TEST_f_f (cos, 0x1p65, 0.99888622066058013610642172179340364209972L),
6874 TEST_f_f (cos, -0x1p65, 0.99888622066058013610642172179340364209972L),
8c0247db 6875
d32e4346 6876#ifdef TEST_DOUBLE
74c57478 6877 TEST_f_f (cos, 0.80190127184058835, 0.69534156199418473),
8848d99d
JM		 6878#endif
6879
74c57478 6880 TEST_f_f (cos, 0x1.442f74p+15, 2.4407839902314016628485779006274989801517e-06L),
7a845b2c 6881
8848d99d 6882#ifndef TEST_FLOAT
74c57478
JM		 6883 TEST_f_f (cos, 1e22, 0.5232147853951389454975944733847094921409L),
6884 TEST_f_f (cos, 0x1p1023, -0.826369834614147994500785680811743734805L),
8848d99d
JM		 6885#endif
6886
6887#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478 6888 TEST_f_f (cos, 0x1p16383L, 0.9210843909921906206874509522505756251609L),
d32e4346
RM		 6889#endif
6890
74c57478
JM		 6891 TEST_f_f (cos, 0x1p+120, -9.25879022854837867303861764107414946730833e-01L),
6892 TEST_f_f (cos, 0x1p+127, 7.81914638714960072263910298466369236613162e-01L),
6893 TEST_f_f (cos, 0x1.fffff8p+127, 9.98819362551949040703862043664101081064641e-01L),
6894 TEST_f_f (cos, 0x1.fffffep+127, 8.53021039830304158051791467692161107353094e-01L),
6895 TEST_f_f (cos, 0x1p+50, 8.68095904660550604334592502063501320395739e-01L),
6896 TEST_f_f (cos, 0x1p+28, -1.65568979490578758865468278195361551113358e-01L),
6897 END_DATA (cos)
6898 };
6899
6900static void
6901cos_test (void)
6902{
6903 errno = 0;
6904 FUNC(cos) (0);
6905 if (errno == ENOSYS)
6906 /* Function not implemented. */
6907 return;
4ffffbd2 6908
74c57478
JM		 6909 START (cos);
6910 RUN_TEST_LOOP_f_f (cos, cos_test_data, );
8847214f
UD		 6911 END (cos);
6912}
6913
2550dfe9 6914
74c57478
JM		 6915static const struct test_f_f_data cos_tonearest_test_data[] =
6916 {
6917 START_DATA (cos_tonearest),
6918 TEST_f_f (cos, 1, 0.5403023058681397174009366074429766037323L),
6919 TEST_f_f (cos, 2, -0.4161468365471423869975682295007621897660L),
6920 TEST_f_f (cos, 3, -0.9899924966004454572715727947312613023937L),
6921 TEST_f_f (cos, 4, -0.6536436208636119146391681830977503814241L),
6922 TEST_f_f (cos, 5, 0.2836621854632262644666391715135573083344L),
6923 TEST_f_f (cos, 6, 0.9601702866503660205456522979229244054519L),
6924 TEST_f_f (cos, 7, 0.7539022543433046381411975217191820122183L),
6925 TEST_f_f (cos, 8, -0.1455000338086135258688413818311946826093L),
6926 TEST_f_f (cos, 9, -0.9111302618846769883682947111811653112463L),
6927 TEST_f_f (cos, 10, -0.8390715290764524522588639478240648345199L),
6928 END_DATA (cos_tonearest)
6929 };
6930
804360ed
JM		 6931static void
6932cos_test_tonearest (void)
6933{
804360ed
JM		 6934 errno = 0;
6935 FUNC(cos) (0);
6936 if (errno == ENOSYS)
6937 /* Function not implemented. */
6938 return;
6939
6940 START (cos_tonearest);
74c57478 6941 RUN_TEST_LOOP_f_f (cos, cos_tonearest_test_data, FE_TONEAREST);
804360ed
JM		 6942 END (cos_tonearest);
6943}
6944
6945
74c57478
JM		 6946static const struct test_f_f_data cos_towardzero_test_data[] =
6947 {
6948 START_DATA (cos_towardzero),
6949 TEST_f_f (cos, 1, 0.5403023058681397174009366074429766037323L),
6950 TEST_f_f (cos, 2, -0.4161468365471423869975682295007621897660L),
6951 TEST_f_f (cos, 3, -0.9899924966004454572715727947312613023937L),
6952 TEST_f_f (cos, 4, -0.6536436208636119146391681830977503814241L),
6953 TEST_f_f (cos, 5, 0.2836621854632262644666391715135573083344L),
6954 TEST_f_f (cos, 6, 0.9601702866503660205456522979229244054519L),
6955 TEST_f_f (cos, 7, 0.7539022543433046381411975217191820122183L),
6956 TEST_f_f (cos, 8, -0.1455000338086135258688413818311946826093L),
6957 TEST_f_f (cos, 9, -0.9111302618846769883682947111811653112463L),
6958 TEST_f_f (cos, 10, -0.8390715290764524522588639478240648345199L),
6959 END_DATA (cos_towardzero)
6960 };
6961
804360ed
JM		 6962static void
6963cos_test_towardzero (void)
6964{
804360ed
JM		 6965 errno = 0;
6966 FUNC(cos) (0);
6967 if (errno == ENOSYS)
6968 /* Function not implemented. */
6969 return;
6970
6971 START (cos_towardzero);
74c57478 6972 RUN_TEST_LOOP_f_f (cos, cos_towardzero_test_data, FE_TOWARDZERO);
804360ed
JM		 6973 END (cos_towardzero);
6974}
6975
6976
74c57478
JM		 6977static const struct test_f_f_data cos_downward_test_data[] =
6978 {
6979 START_DATA (cos_downward),
6980 TEST_f_f (cos, 1, 0.5403023058681397174009366074429766037323L),
6981 TEST_f_f (cos, 2, -0.4161468365471423869975682295007621897660L),
6982 TEST_f_f (cos, 3, -0.9899924966004454572715727947312613023937L),
6983 TEST_f_f (cos, 4, -0.6536436208636119146391681830977503814241L),
6984 TEST_f_f (cos, 5, 0.2836621854632262644666391715135573083344L),
6985 TEST_f_f (cos, 6, 0.9601702866503660205456522979229244054519L),
6986 TEST_f_f (cos, 7, 0.7539022543433046381411975217191820122183L),
6987 TEST_f_f (cos, 8, -0.1455000338086135258688413818311946826093L),
6988 TEST_f_f (cos, 9, -0.9111302618846769883682947111811653112463L),
6989 TEST_f_f (cos, 10, -0.8390715290764524522588639478240648345199L),
6990 END_DATA (cos_downward)
6991 };
6992
804360ed
JM		 6993static void
6994cos_test_downward (void)
6995{
804360ed
JM		 6996 errno = 0;
6997 FUNC(cos) (0);
6998 if (errno == ENOSYS)
6999 /* Function not implemented. */
7000 return;
7001
7002 START (cos_downward);
74c57478
JM		 7003 RUN_TEST_LOOP_f_f (cos, cos_downward_test_data, FE_DOWNWARD);
7004 END (cos_downward);
7005}
804360ed 7006
804360ed 7007
74c57478
JM		 7008static const struct test_f_f_data cos_upward_test_data[] =
7009 {
7010 START_DATA (cos_upward),
7011 TEST_f_f (cos, 1, 0.5403023058681397174009366074429766037323L),
7012 TEST_f_f (cos, 2, -0.4161468365471423869975682295007621897660L),
7013 TEST_f_f (cos, 3, -0.9899924966004454572715727947312613023937L),
7014 TEST_f_f (cos, 4, -0.6536436208636119146391681830977503814241L),
7015 TEST_f_f (cos, 5, 0.2836621854632262644666391715135573083344L),
7016 TEST_f_f (cos, 6, 0.9601702866503660205456522979229244054519L),
7017 TEST_f_f (cos, 7, 0.7539022543433046381411975217191820122183L),
7018 TEST_f_f (cos, 8, -0.1455000338086135258688413818311946826093L),
7019 TEST_f_f (cos, 9, -0.9111302618846769883682947111811653112463L),
7020 TEST_f_f (cos, 10, -0.8390715290764524522588639478240648345199L),
7021 END_DATA (cos_upward)
7022 };
804360ed
JM		 7023
7024static void
7025cos_test_upward (void)
7026{
804360ed
JM		 7027 errno = 0;
7028 FUNC(cos) (0);
7029 if (errno == ENOSYS)
7030 /* Function not implemented. */
7031 return;
7032
7033 START (cos_upward);
74c57478
JM		 7034 RUN_TEST_LOOP_f_f (cos, cos_upward_test_data, FE_UPWARD);
7035 END (cos_upward);
7036}
804360ed 7037
804360ed 7038
74c57478
JM		 7039static const struct test_f_f_data cosh_test_data[] =
7040 {
7041 START_DATA (cosh),
7042 TEST_f_f (cosh, 0, 1),
7043 TEST_f_f (cosh, minus_zero, 1),
804360ed 7044
74c57478
JM		 7045#ifndef TEST_INLINE
7046 TEST_f_f (cosh, plus_infty, plus_infty),
7047 TEST_f_f (cosh, minus_infty, plus_infty),
7048#endif
7049 TEST_f_f (cosh, qnan_value, qnan_value),
804360ed 7050
74c57478 7051 TEST_f_f (cosh, 0.75L, 1.29468328467684468784170818539018176L),
804360ed 7052
74c57478
JM		 7053#ifndef TEST_FLOAT
7054 TEST_f_f (cosh, 709.8893558127259666434838436543941497802734375L, 9.9999998999995070652573675944761818416035e+307L),
7055 TEST_f_f (cosh, -709.8893558127259666434838436543941497802734375L, 9.9999998999995070652573675944761818416035e+307L),
7056#endif
7057 END_DATA (cosh)
7058 };
804360ed 7059
8847214f
UD		 7060static void
7061cosh_test (void)
7062{
aaca11d8 7063 errno = 0;
3c6cad26 7064 FUNC(cosh) (0.7L);
aaca11d8
UD		 7065 if (errno == ENOSYS)
7066 /* Function not implemented. */
7067 return;
7068
8847214f 7069 START (cosh);
74c57478 7070 RUN_TEST_LOOP_f_f (cosh, cosh_test_data, );
8847214f
UD		 7071 END (cosh);
7072}
7073
7074
74c57478
JM		 7075static const struct test_f_f_data cosh_tonearest_test_data[] =
7076 {
7077 START_DATA (cosh_tonearest),
7078 TEST_f_f (cosh, 22, 1792456423.065795780980053377632656584997L),
7079 TEST_f_f (cosh, 23, 4872401723.124451300068625740569997090344L),
7080 TEST_f_f (cosh, 24, 13244561064.92173614708845674912733665919L),
7081 END_DATA (cosh_tonearest)
7082 };
7083
ca811b22
JM		 7084static void
7085cosh_test_tonearest (void)
7086{
ca811b22
JM		 7087 errno = 0;
7088 FUNC(cosh) (0);
7089 if (errno == ENOSYS)
7090 /* Function not implemented. */
7091 return;
7092
7093 START (cosh_tonearest);
74c57478 7094 RUN_TEST_LOOP_f_f (cosh, cosh_tonearest_test_data, FE_TONEAREST);
ca811b22
JM		 7095 END (cosh_tonearest);
7096}
7097
7098
74c57478
JM		 7099static const struct test_f_f_data cosh_towardzero_test_data[] =
7100 {
7101 START_DATA (cosh_towardzero),
7102 TEST_f_f (cosh, 22, 1792456423.065795780980053377632656584997L),
7103 TEST_f_f (cosh, 23, 4872401723.124451300068625740569997090344L),
7104 TEST_f_f (cosh, 24, 13244561064.92173614708845674912733665919L),
7105 END_DATA (cosh_towardzero)
7106 };
7107
ca811b22
JM		 7108static void
7109cosh_test_towardzero (void)
7110{
ca811b22
JM		 7111 errno = 0;
7112 FUNC(cosh) (0);
7113 if (errno == ENOSYS)
7114 /* Function not implemented. */
7115 return;
7116
7117 START (cosh_towardzero);
74c57478 7118 RUN_TEST_LOOP_f_f (cosh, cosh_towardzero_test_data, FE_TOWARDZERO);
ca811b22
JM		 7119 END (cosh_towardzero);
7120}
7121
7122
74c57478
JM		 7123static const struct test_f_f_data cosh_downward_test_data[] =
7124 {
7125 START_DATA (cosh_downward),
7126 TEST_f_f (cosh, 22, 1792456423.065795780980053377632656584997L),
7127 TEST_f_f (cosh, 23, 4872401723.124451300068625740569997090344L),
7128 TEST_f_f (cosh, 24, 13244561064.92173614708845674912733665919L),
7129 END_DATA (cosh_downward)
7130 };
7131
ca811b22
JM		 7132static void
7133cosh_test_downward (void)
7134{
ca811b22
JM		 7135 errno = 0;
7136 FUNC(cosh) (0);
7137 if (errno == ENOSYS)
7138 /* Function not implemented. */
7139 return;
7140
7141 START (cosh_downward);
74c57478 7142 RUN_TEST_LOOP_f_f (cosh, cosh_downward_test_data, FE_DOWNWARD);
ca811b22
JM		 7143 END (cosh_downward);
7144}
7145
7146
74c57478
JM		 7147static const struct test_f_f_data cosh_upward_test_data[] =
7148 {
7149 START_DATA (cosh_upward),
7150 TEST_f_f (cosh, 22, 1792456423.065795780980053377632656584997L),
7151 TEST_f_f (cosh, 23, 4872401723.124451300068625740569997090344L),
7152 TEST_f_f (cosh, 24, 13244561064.92173614708845674912733665919L),
7153 END_DATA (cosh_upward)
7154 };
7155
ca811b22
JM		 7156static void
7157cosh_test_upward (void)
7158{
ca811b22
JM		 7159 errno = 0;
7160 FUNC(cosh) (0);
7161 if (errno == ENOSYS)
7162 /* Function not implemented. */
7163 return;
7164
7165 START (cosh_upward);
74c57478 7166 RUN_TEST_LOOP_f_f (cosh, cosh_upward_test_data, FE_UPWARD);
ca811b22
JM		 7167 END (cosh_upward);
7168}
7169
7170
1c38ff73
JM		 7171static const struct test_cc_c_data cpow_test_data[] =
7172 {
7173 START_DATA (cpow),
7174 TEST_cc_c (cpow, 1, 0, 0, 0, 1.0, 0.0),
7175 TEST_cc_c (cpow, 2, 0, 10, 0, 1024.0, 0.0),
7176
7177 TEST_cc_c (cpow, M_El, 0, 0, 2 * M_PIl, 1.0, 0.0),
7178 TEST_cc_c (cpow, 2, 3, 4, 0, -119.0, -120.0),
7179
7180 TEST_cc_c (cpow, qnan_value, qnan_value, qnan_value, qnan_value, qnan_value, qnan_value),
7181
7182 TEST_cc_c (cpow, 0.75L, 1.25L, 0.75L, 1.25L, 0.117506293914473555420279832210420483L, 0.346552747708338676483025352060418001L),
7183 TEST_cc_c (cpow, 0.75L, 1.25L, 1.0L, 1.0L, 0.0846958290317209430433805274189191353L, 0.513285749182902449043287190519090481L),
7184 TEST_cc_c (cpow, 0.75L, 1.25L, 1.0L, 0.0L, 0.75L, 1.25L),
7185 TEST_cc_c (cpow, 0.75L, 1.25L, 0.0L, 1.0L, 0.331825439177608832276067945276730566L, 0.131338600281188544930936345230903032L),
7186 END_DATA (cpow)
7187 };
7188
8847214f
UD		 7189static void
7190cpow_test (void)
7191{
aaca11d8
UD		 7192 errno = 0;
7193 FUNC(cpow) (BUILD_COMPLEX (1, 0), BUILD_COMPLEX (0, 0));
7194 if (errno == ENOSYS)
7195 /* Function not implemented. */
7196 return;
7197
8847214f 7198 START (cpow);
1c38ff73 7199 RUN_TEST_LOOP_cc_c (cpow, cpow_test_data, );
6815fabc 7200 END (cpow, complex);
8847214f
UD		 7201}
7202
2550dfe9 7203
08198877
JM		 7204static const struct test_c_c_data cproj_test_data[] =
7205 {
7206 START_DATA (cproj),
7207 TEST_c_c (cproj, 0.0, 0.0, 0.0, 0.0),
7208 TEST_c_c (cproj, minus_zero, minus_zero, minus_zero, minus_zero),
7209 TEST_c_c (cproj, 0.0, minus_zero, 0.0, minus_zero),
7210 TEST_c_c (cproj, minus_zero, 0.0, minus_zero, 0.0),
7211
7212 TEST_c_c (cproj, qnan_value, qnan_value, qnan_value, qnan_value),
7213
7214 TEST_c_c (cproj, plus_infty, plus_infty, plus_infty, 0.0),
7215 TEST_c_c (cproj, plus_infty, minus_infty, plus_infty, minus_zero),
7216 TEST_c_c (cproj, minus_infty, plus_infty, plus_infty, 0.0),
7217 TEST_c_c (cproj, minus_infty, minus_infty, plus_infty, minus_zero),
7218
7219 TEST_c_c (cproj, 1.0, 0.0, 1.0, 0.0),
7220 TEST_c_c (cproj, 2.0, 3.0, 2.0, 3.0),
7221 END_DATA (cproj)
7222 };
7223
8847214f
UD		 7224static void
7225cproj_test (void)
7226{
7227 START (cproj);
08198877 7228 RUN_TEST_LOOP_c_c (cproj, cproj_test_data, );
6815fabc 7229 END (cproj, complex);
8847214f
UD		 7230}
7231
2550dfe9 7232
6a1992e2
JM		 7233static const struct test_c_f_data creal_test_data[] =
7234 {
7235 START_DATA (creal);
7236 TEST_c_f (creal, 0.0, 1.0, 0.0),
7237 TEST_c_f (creal, minus_zero, 1.0, minus_zero),
7238 TEST_c_f (creal, qnan_value, 1.0, qnan_value),
7239 TEST_c_f (creal, qnan_value, qnan_value, qnan_value),
7240 TEST_c_f (creal, plus_infty, 1.0, plus_infty),
7241 TEST_c_f (creal, minus_infty, 1.0, minus_infty),
7242 TEST_c_f (creal, 2.0, 3.0, 2.0),
7243 END_DATA (creal);
7244 };
7245
0cdc8e6f
UD		 7246static void
7247creal_test (void)
7248{
7249 START (creal);
6a1992e2 7250 RUN_TEST_LOOP_c_f (creal, creal_test_data, );
0cdc8e6f
UD		 7251 END (creal);
7252}
8847214f 7253
08198877
JM		 7254static const struct test_c_c_data csin_test_data[] =
7255 {
7256 START_DATA (csin),
7257 TEST_c_c (csin, 0.0, 0.0, 0.0, 0.0),
7258 TEST_c_c (csin, minus_zero, 0.0, minus_zero, 0.0),
7259 TEST_c_c (csin, 0.0, minus_zero, 0, minus_zero),
7260 TEST_c_c (csin, minus_zero, minus_zero, minus_zero, minus_zero),
8847214f 7261
08198877
JM		 7262 TEST_c_c (csin, 0.0, plus_infty, 0.0, plus_infty),
7263 TEST_c_c (csin, minus_zero, plus_infty, minus_zero, plus_infty),
7264 TEST_c_c (csin, 0.0, minus_infty, 0.0, minus_infty),
7265 TEST_c_c (csin, minus_zero, minus_infty, minus_zero, minus_infty),
8847214f 7266
08198877
JM		 7267 TEST_c_c (csin, plus_infty, 0.0, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7268 TEST_c_c (csin, minus_infty, 0.0, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7269 TEST_c_c (csin, plus_infty, minus_zero, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7270 TEST_c_c (csin, minus_infty, minus_zero, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 7271
08198877
JM		 7272 TEST_c_c (csin, plus_infty, plus_infty, qnan_value, plus_infty, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7273 TEST_c_c (csin, minus_infty, plus_infty, qnan_value, plus_infty, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7274 TEST_c_c (csin, plus_infty, minus_infty, qnan_value, plus_infty, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7275 TEST_c_c (csin, minus_infty, minus_infty, qnan_value, plus_infty, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 7276
08198877
JM		 7277 TEST_c_c (csin, plus_infty, 6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
7278 TEST_c_c (csin, plus_infty, -6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
7279 TEST_c_c (csin, minus_infty, 6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
7280 TEST_c_c (csin, minus_infty, -6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 7281
08198877
JM		 7282 TEST_c_c (csin, 4.625, plus_infty, minus_infty, minus_infty),
7283 TEST_c_c (csin, 4.625, minus_infty, minus_infty, plus_infty),
7284 TEST_c_c (csin, -4.625, plus_infty, plus_infty, minus_infty),
7285 TEST_c_c (csin, -4.625, minus_infty, plus_infty, plus_infty),
8847214f 7286
08198877
JM		 7287 TEST_c_c (csin, qnan_value, 0.0, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
7288 TEST_c_c (csin, qnan_value, minus_zero, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 7289
08198877
JM		 7290 TEST_c_c (csin, qnan_value, plus_infty, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
7291 TEST_c_c (csin, qnan_value, minus_infty, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
8847214f 7292
08198877
JM		 7293 TEST_c_c (csin, qnan_value, 9.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7294 TEST_c_c (csin, qnan_value, -9.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7295
08198877
JM		 7296 TEST_c_c (csin, 0.0, qnan_value, 0.0, qnan_value),
7297 TEST_c_c (csin, minus_zero, qnan_value, minus_zero, qnan_value),
8847214f 7298
08198877
JM		 7299 TEST_c_c (csin, 10.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7300 TEST_c_c (csin, qnan_value, -10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7301
08198877
JM		 7302 TEST_c_c (csin, plus_infty, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7303 TEST_c_c (csin, minus_infty, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7304
08198877 7305 TEST_c_c (csin, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 7306
08198877
JM		 7307 TEST_c_c (csin, 0.75L, 1.25L, 1.28722291002649188575873510790565441L, 1.17210635989270256101081285116138863L),
7308 TEST_c_c (csin, -2, -3, -9.15449914691142957346729954460983256L, 4.16890695996656435075481305885375484L),
8847214f 7309
08198877
JM		 7310 TEST_c_c (csin, 0.75, 89.5, 2.522786001038096774676288412995370563339e38L, 2.708024460708609732016532185663087200560e38L),
7311 TEST_c_c (csin, 0.75, -89.5, 2.522786001038096774676288412995370563339e38L, -2.708024460708609732016532185663087200560e38L),
7312 TEST_c_c (csin, -0.75, 89.5, -2.522786001038096774676288412995370563339e38L, 2.708024460708609732016532185663087200560e38L),
7313 TEST_c_c (csin, -0.75, -89.5, -2.522786001038096774676288412995370563339e38L, -2.708024460708609732016532185663087200560e38L),
e0b16cc2
JM		 7314
7315#ifndef TEST_FLOAT
08198877
JM		 7316 TEST_c_c (csin, 0.75, 710.5, 1.255317763348154410745082950806112487736e308L, 1.347490911916428129246890157395342279438e308L),
7317 TEST_c_c (csin, 0.75, -710.5, 1.255317763348154410745082950806112487736e308L, -1.347490911916428129246890157395342279438e308L),
7318 TEST_c_c (csin, -0.75, 710.5, -1.255317763348154410745082950806112487736e308L, 1.347490911916428129246890157395342279438e308L),
7319 TEST_c_c (csin, -0.75, -710.5, -1.255317763348154410745082950806112487736e308L, -1.347490911916428129246890157395342279438e308L),
e0b16cc2
JM		 7320#endif
7321
7322#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 7323 TEST_c_c (csin, 0.75, 11357.25, 8.385498349388321535962327491346664141020e4931L, 9.001213196851067077465606717616495588201e4931L),
7324 TEST_c_c (csin, 0.75, -11357.25, 8.385498349388321535962327491346664141020e4931L, -9.001213196851067077465606717616495588201e4931L),
7325 TEST_c_c (csin, -0.75, 11357.25, -8.385498349388321535962327491346664141020e4931L, 9.001213196851067077465606717616495588201e4931L),
7326 TEST_c_c (csin, -0.75, -11357.25, -8.385498349388321535962327491346664141020e4931L, -9.001213196851067077465606717616495588201e4931L),
e0b16cc2
JM		 7327#endif
7328
7329#ifdef TEST_FLOAT
08198877 7330 TEST_c_c (csin, 0x1p-149, 180, 1.043535896672617552965983803453927655332e33L, plus_infty, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 7331#endif
7332
7333#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 7334 TEST_c_c (csin, 0x1p-1074, 1440, 5.981479269486130556466515778180916082415e301L, plus_infty, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 7335#endif
7336
7337#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 7338 TEST_c_c (csin, 0x1p-16434L, 22730, 1.217853148905605987081057582351152052687e4924L, plus_infty, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 7339#endif
7340
08198877
JM		 7341 TEST_c_c (csin, min_subnorm_value, min_value, min_subnorm_value, min_value, UNDERFLOW_EXCEPTION),
7342 TEST_c_c (csin, min_value, min_subnorm_value, min_value, min_subnorm_value, UNDERFLOW_EXCEPTION),
7343 END_DATA (csin)
7344 };
8847214f
UD		 7345
7346static void
08198877 7347csin_test (void)
8847214f 7348{
aaca11d8 7349 errno = 0;
08198877 7350 FUNC(csin) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD		 7351 if (errno == ENOSYS)
7352 /* Function not implemented. */
7353 return;
8847214f 7354
08198877
JM		 7355 START (csin);
7356 RUN_TEST_LOOP_c_c (csin, csin_test_data, );
7357 END (csin, complex);
7358}
7359
8847214f 7360
08198877
JM		 7361static const struct test_c_c_data csinh_test_data[] =
7362 {
7363 START_DATA (csinh),
7364 TEST_c_c (csinh, 0.0, 0.0, 0.0, 0.0),
7365 TEST_c_c (csinh, minus_zero, 0.0, minus_zero, 0.0),
7366 TEST_c_c (csinh, 0.0, minus_zero, 0.0, minus_zero),
7367 TEST_c_c (csinh, minus_zero, minus_zero, minus_zero, minus_zero),
8847214f 7368
08198877
JM		 7369 TEST_c_c (csinh, 0.0, plus_infty, 0.0, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7370 TEST_c_c (csinh, minus_zero, plus_infty, 0.0, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7371 TEST_c_c (csinh, 0.0, minus_infty, 0.0, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7372 TEST_c_c (csinh, minus_zero, minus_infty, 0.0, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 7373
08198877
JM		 7374 TEST_c_c (csinh, plus_infty, 0.0, plus_infty, 0.0),
7375 TEST_c_c (csinh, minus_infty, 0.0, minus_infty, 0.0),
7376 TEST_c_c (csinh, plus_infty, minus_zero, plus_infty, minus_zero),
7377 TEST_c_c (csinh, minus_infty, minus_zero, minus_infty, minus_zero),
8847214f 7378
08198877
JM		 7379 TEST_c_c (csinh, plus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7380 TEST_c_c (csinh, minus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7381 TEST_c_c (csinh, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7382 TEST_c_c (csinh, minus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 7383
08198877
JM		 7384 TEST_c_c (csinh, plus_infty, 4.625, minus_infty, minus_infty),
7385 TEST_c_c (csinh, minus_infty, 4.625, plus_infty, minus_infty),
7386 TEST_c_c (csinh, plus_infty, -4.625, minus_infty, plus_infty),
7387 TEST_c_c (csinh, minus_infty, -4.625, plus_infty, plus_infty),
8847214f 7388
08198877
JM		 7389 TEST_c_c (csinh, 6.75, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7390 TEST_c_c (csinh, -6.75, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7391 TEST_c_c (csinh, 6.75, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7392 TEST_c_c (csinh, -6.75, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 7393
08198877
JM		 7394 TEST_c_c (csinh, 0.0, qnan_value, 0.0, qnan_value, IGNORE_ZERO_INF_SIGN),
7395 TEST_c_c (csinh, minus_zero, qnan_value, 0.0, qnan_value, IGNORE_ZERO_INF_SIGN),
8847214f 7396
08198877
JM		 7397 TEST_c_c (csinh, plus_infty, qnan_value, plus_infty, qnan_value, IGNORE_ZERO_INF_SIGN),
7398 TEST_c_c (csinh, minus_infty, qnan_value, plus_infty, qnan_value, IGNORE_ZERO_INF_SIGN),
8847214f 7399
08198877
JM		 7400 TEST_c_c (csinh, 9.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7401 TEST_c_c (csinh, -9.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7402
08198877
JM		 7403 TEST_c_c (csinh, qnan_value, 0.0, qnan_value, 0.0),
7404 TEST_c_c (csinh, qnan_value, minus_zero, qnan_value, minus_zero),
8847214f 7405
08198877
JM		 7406 TEST_c_c (csinh, qnan_value, 10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7407 TEST_c_c (csinh, qnan_value, -10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7408
08198877
JM		 7409 TEST_c_c (csinh, qnan_value, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7410 TEST_c_c (csinh, qnan_value, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7411
08198877 7412 TEST_c_c (csinh, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 7413
08198877
JM		 7414 TEST_c_c (csinh, 0.75L, 1.25L, 0.259294854551162779153349830618433028L, 1.22863452409509552219214606515777594L),
7415 TEST_c_c (csinh, -2, -3, 3.59056458998577995201256544779481679L, -0.530921086248519805267040090660676560L),
8847214f 7416
08198877
JM		 7417 TEST_c_c (csinh, 89.5, 0.75, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
7418 TEST_c_c (csinh, -89.5, 0.75, -2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
7419 TEST_c_c (csinh, 89.5, -0.75, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
7420 TEST_c_c (csinh, -89.5, -0.75, -2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
e0b16cc2
JM		 7421
7422#ifndef TEST_FLOAT
08198877
JM		 7423 TEST_c_c (csinh, 710.5, 0.75, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
7424 TEST_c_c (csinh, -710.5, 0.75, -1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
7425 TEST_c_c (csinh, 710.5, -0.75, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
7426 TEST_c_c (csinh, -710.5, -0.75, -1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
e0b16cc2
JM		 7427#endif
7428
7429#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 7430 TEST_c_c (csinh, 11357.25, 0.75, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
7431 TEST_c_c (csinh, -11357.25, 0.75, -9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
7432 TEST_c_c (csinh, 11357.25, -0.75, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
7433 TEST_c_c (csinh, -11357.25, -0.75, -9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
e0b16cc2
JM		 7434#endif
7435
7436#ifdef TEST_FLOAT
08198877 7437 TEST_c_c (csinh, 180, 0x1p-149, plus_infty, 1.043535896672617552965983803453927655332e33L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 7438#endif
7439
7440#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 7441 TEST_c_c (csinh, 1440, 0x1p-1074, plus_infty, 5.981479269486130556466515778180916082415e301L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 7442#endif
7443
7444#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 7445 TEST_c_c (csinh, 22730, 0x1p-16434L, plus_infty, 1.217853148905605987081057582351152052687e4924L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 7446#endif
7447
08198877
JM		 7448 TEST_c_c (csinh, min_subnorm_value, min_value, min_subnorm_value, min_value, UNDERFLOW_EXCEPTION),
7449 TEST_c_c (csinh, min_value, min_subnorm_value, min_value, min_subnorm_value, UNDERFLOW_EXCEPTION),
7450 END_DATA (csinh)
7451 };
2550dfe9 7452
8847214f 7453static void
08198877 7454csinh_test (void)
8847214f 7455{
aaca11d8 7456 errno = 0;
08198877 7457 FUNC(csinh) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD		 7458 if (errno == ENOSYS)
7459 /* Function not implemented. */
7460 return;
7461
08198877
JM		 7462 START (csinh);
7463 RUN_TEST_LOOP_c_c (csinh, csinh_test_data, );
7464 END (csinh, complex);
7465}
8847214f 7466
08198877
JM		 7467
7468static const struct test_c_c_data csqrt_test_data[] =
7469 {
7470 START_DATA (csqrt),
7471 TEST_c_c (csqrt, 0, 0, 0.0, 0.0),
7472 TEST_c_c (csqrt, 0, minus_zero, 0, minus_zero),
7473 TEST_c_c (csqrt, minus_zero, 0, 0.0, 0.0),
7474 TEST_c_c (csqrt, minus_zero, minus_zero, 0.0, minus_zero),
7475
7476 TEST_c_c (csqrt, minus_infty, 0, 0.0, plus_infty),
7477 TEST_c_c (csqrt, minus_infty, 6, 0.0, plus_infty),
7478 TEST_c_c (csqrt, minus_infty, minus_zero, 0.0, minus_infty),
7479 TEST_c_c (csqrt, minus_infty, -6, 0.0, minus_infty),
7480
7481 TEST_c_c (csqrt, plus_infty, 0, plus_infty, 0.0),
7482 TEST_c_c (csqrt, plus_infty, 6, plus_infty, 0.0),
7483 TEST_c_c (csqrt, plus_infty, minus_zero, plus_infty, minus_zero),
7484 TEST_c_c (csqrt, plus_infty, -6, plus_infty, minus_zero),
7485
7486 TEST_c_c (csqrt, 0, plus_infty, plus_infty, plus_infty),
7487 TEST_c_c (csqrt, 4, plus_infty, plus_infty, plus_infty),
7488 TEST_c_c (csqrt, plus_infty, plus_infty, plus_infty, plus_infty),
7489 TEST_c_c (csqrt, minus_zero, plus_infty, plus_infty, plus_infty),
7490 TEST_c_c (csqrt, -4, plus_infty, plus_infty, plus_infty),
7491 TEST_c_c (csqrt, minus_infty, plus_infty, plus_infty, plus_infty),
7492 TEST_c_c (csqrt, 0, minus_infty, plus_infty, minus_infty),
7493 TEST_c_c (csqrt, 4, minus_infty, plus_infty, minus_infty),
7494 TEST_c_c (csqrt, plus_infty, minus_infty, plus_infty, minus_infty),
7495 TEST_c_c (csqrt, minus_zero, minus_infty, plus_infty, minus_infty),
7496 TEST_c_c (csqrt, -4, minus_infty, plus_infty, minus_infty),
7497 TEST_c_c (csqrt, minus_infty, minus_infty, plus_infty, minus_infty),
7498
7499 TEST_c_c (csqrt, minus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
7500
7501 TEST_c_c (csqrt, plus_infty, qnan_value, plus_infty, qnan_value),
7502
7503 TEST_c_c (csqrt, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7504 TEST_c_c (csqrt, 1, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7505 TEST_c_c (csqrt, minus_zero, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7506 TEST_c_c (csqrt, -1, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7507
7508 TEST_c_c (csqrt, qnan_value, 0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7509 TEST_c_c (csqrt, qnan_value, 8, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7510 TEST_c_c (csqrt, qnan_value, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7511 TEST_c_c (csqrt, qnan_value, -8, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7512
7513 TEST_c_c (csqrt, qnan_value, qnan_value, qnan_value, qnan_value),
7514
7515 TEST_c_c (csqrt, 16.0, -30.0, 5.0, -3.0),
7516 TEST_c_c (csqrt, -1, 0, 0.0, 1.0),
7517 TEST_c_c (csqrt, 0, 2, 1.0, 1.0),
7518 TEST_c_c (csqrt, 119, 120, 12.0, 5.0),
7519 TEST_c_c (csqrt, 0.75L, 1.25L, 1.05065169626078392338656675760808326L, 0.594868882070379067881984030639932657L),
7520 TEST_c_c (csqrt, -2, -3, 0.89597747612983812471573375529004348L, -1.6741492280355400404480393008490519L),
7521 TEST_c_c (csqrt, -2, 3, 0.89597747612983812471573375529004348L, 1.6741492280355400404480393008490519L),
7522 /* Principal square root should be returned (i.e., non-negative real
7523 part). */
7524 TEST_c_c (csqrt, 0, -1, M_SQRT1_2l, -M_SQRT1_2l),
7525
7526 TEST_c_c (csqrt, 0x1.fffffep+127L, 0x1.fffffep+127L, 2.026714405498316804978751017492482558075e+19L, 8.394925938143272988211878516208015586281e+18L),
7527 TEST_c_c (csqrt, 0x1.fffffep+127L, 1.0L, 1.844674352395372953599975585936590505260e+19L, 2.710505511993121390769065968615872097053e-20L),
7528 TEST_c_c (csqrt, 0x1p-149L, 0x1p-149L, 4.112805464342778798097003462770175200803e-23L, 1.703579802732953750368659735601389709551e-23L),
7529 TEST_c_c (csqrt, 0x1p-147L, 0x1p-147L, 8.225610928685557596194006925540350401606e-23L, 3.407159605465907500737319471202779419102e-23L),
7530
7531 TEST_c_c (csqrt, plus_zero, 0x1p-149L, 2.646977960169688559588507814623881131411e-23L, 2.646977960169688559588507814623881131411e-23L),
7532 TEST_c_c (csqrt, 0x1p-50L, 0x1p-149L, 2.980232238769531250000000000000000000000e-8L, 2.350988701644575015937473074444491355637e-38L),
cdfe2c5e 7533#ifdef TEST_FLOAT
08198877 7534 TEST_c_c (csqrt, 0x1p+127L, 0x1p-149L, 1.304381782533278221234957180625250836888e19L, plus_zero, UNDERFLOW_EXCEPTION),
cdfe2c5e 7535#endif
08198877
JM		 7536 TEST_c_c (csqrt, 0x1p-149L, 0x1p+127L, 9.223372036854775808000000000000000000000e18L, 9.223372036854775808000000000000000000000e18L),
7537 TEST_c_c (csqrt, 0x1.000002p-126L, 0x1.000002p-126L, 1.191195773697904627170323731331667740087e-19L, 4.934094449071842328766868579214125217132e-20L),
7538 TEST_c_c (csqrt, -0x1.000002p-126L, -0x1.000002p-126L, 4.934094449071842328766868579214125217132e-20L, -1.191195773697904627170323731331667740087e-19L),
cdfe2c5e 7539
e456826d 7540#ifndef TEST_FLOAT
08198877
JM		 7541 TEST_c_c (csqrt, 0x1.fffffffffffffp+1023L, 0x1.fffffffffffffp+1023L, 1.473094556905565378990473658199034571917e+154L, 6.101757441282702188537080005372547713595e+153L),
7542 TEST_c_c (csqrt, 0x1.fffffffffffffp+1023L, 0x1p+1023L, 1.379778091031440685006200821918878702861e+154L, 3.257214233483129514781233066898042490248e+153L),
7543 TEST_c_c (csqrt, 0x1p-1074L, 0x1p-1074L, 2.442109726130830256743814843868934877597e-162L, 1.011554969366634726113090867589031782487e-162L),
7544 TEST_c_c (csqrt, 0x1p-1073L, 0x1p-1073L, 3.453664695497464982856905711457966660085e-162L, 1.430554756764195530630723976279903095110e-162L),
cdfe2c5e 7545
08198877
JM		 7546 TEST_c_c (csqrt, plus_zero, 0x1p-1074L, 1.571727784702628688909515672805082228285e-162L, 1.571727784702628688909515672805082228285e-162L),
7547 TEST_c_c (csqrt, 0x1p-500L, 0x1p-1074L, 5.527147875260444560247265192192255725514e-76L, 4.469444793151709302716387622440056066334e-249L),
cdfe2c5e 7548#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 7549 TEST_c_c (csqrt, 0x1p+1023L, 0x1p-1074L, 9.480751908109176726832526455652159260085e153L, plus_zero, UNDERFLOW_EXCEPTION),
cdfe2c5e 7550#endif
08198877
JM		 7551 TEST_c_c (csqrt, 0x1p-1074L, 0x1p+1023L, 6.703903964971298549787012499102923063740e153L, 6.703903964971298549787012499102923063740e153L),
7552 TEST_c_c (csqrt, 0x1.0000000000001p-1022L, 0x1.0000000000001p-1022L, 1.638872094839911521020410942677082920935e-154L, 6.788430486774966350907249113759995429568e-155L),
7553 TEST_c_c (csqrt, -0x1.0000000000001p-1022L, -0x1.0000000000001p-1022L, 6.788430486774966350907249113759995429568e-155L, -1.638872094839911521020410942677082920935e-154L),
e456826d
JM		 7554#endif
7555
7556#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 7557 TEST_c_c (csqrt, 0x1.fp+16383L, 0x1.fp+16383L, 1.179514222452201722651836720466795901016e+2466L, 4.885707879516577666702435054303191575148e+2465L),
7558 TEST_c_c (csqrt, 0x1.fp+16383L, 0x1p+16383L, 1.106698967236475180613254276996359485630e+2466L, 2.687568007603946993388538156299100955642e+2465L),
7559 TEST_c_c (csqrt, 0x1p-16440L, 0x1p-16441L, 3.514690655930285351254618340783294558136e-2475L, 8.297059146828716918029689466551384219370e-2476L),
cdfe2c5e 7560
08198877
JM		 7561 TEST_c_c (csqrt, plus_zero, 0x1p-16445L, 4.269191686890197837775136325621239761720e-2476L, 4.269191686890197837775136325621239761720e-2476L),
7562 TEST_c_c (csqrt, 0x1p-5000L, 0x1p-16445L, 2.660791472672778409283210520357607795518e-753L, 6.849840675828785164910701384823702064234e-4199L),
7563 TEST_c_c (csqrt, 0x1p+16383L, 0x1p-16445L, 7.712754032630730034273323365543179095045e2465L, plus_zero, UNDERFLOW_EXCEPTION),
7564 TEST_c_c (csqrt, 0x1p-16445L, 0x1p+16383L, 5.453740678097079647314921223668914312241e2465L, 5.453740678097079647314921223668914312241e2465L),
7565 TEST_c_c (csqrt, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-16382L, 2.014551439675644900131815801350165472778e-2466L, 8.344545284118961664300307045791497724440e-2467L),
7566 TEST_c_c (csqrt, -0x1.0000000000000002p-16382L, -0x1.0000000000000002p-16382L, 8.344545284118961664300307045791497724440e-2467L, -2.014551439675644900131815801350165472778e-2466L),
cdfe2c5e
JM		 7567
7568# if LDBL_MANT_DIG >= 113
08198877
JM		 7569 TEST_c_c (csqrt, plus_zero, 0x1p-16494L, 1.799329752913293143453817328207572571442e-2483L, 1.799329752913293143453817328207572571442e-2483L),
7570 TEST_c_c (csqrt, 0x1p-5000L, 0x1p-16494L, 2.660791472672778409283210520357607795518e-753L, 1.216776133331049643422030716668249905907e-4213L),
7571 TEST_c_c (csqrt, 0x1p+16383L, 0x1p-16494L, 7.712754032630730034273323365543179095045e2465L, plus_zero, UNDERFLOW_EXCEPTION),
7572 TEST_c_c (csqrt, 0x1p-16494L, 0x1p+16383L, 5.453740678097079647314921223668914312241e2465L, 5.453740678097079647314921223668914312241e2465L),
7573 TEST_c_c (csqrt, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-16382L, 2.014551439675644900022606748976158925145e-2466L, 8.344545284118961663847948339519226074126e-2467L),
7574 TEST_c_c (csqrt, -0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-16382L, 8.344545284118961663847948339519226074126e-2467L, -2.014551439675644900022606748976158925145e-2466L),
cdfe2c5e 7575# endif
e456826d 7576#endif
08198877
JM		 7577 END_DATA (csqrt)
7578 };
8847214f
UD		 7579
7580static void
08198877 7581csqrt_test (void)
8847214f 7582{
aaca11d8 7583 errno = 0;
08198877 7584 FUNC(csqrt) (BUILD_COMPLEX (-1, 0));
aaca11d8
UD		 7585 if (errno == ENOSYS)
7586 /* Function not implemented. */
7587 return;
7588
08198877
JM		 7589 START (csqrt);
7590 RUN_TEST_LOOP_c_c (csqrt, csqrt_test_data, );
7591 END (csqrt, complex);
7592}
8847214f 7593
08198877
JM		 7594static const struct test_c_c_data ctan_test_data[] =
7595 {
7596 START_DATA (ctan),
7597 TEST_c_c (ctan, 0, 0, 0.0, 0.0),
7598 TEST_c_c (ctan, 0, minus_zero, 0.0, minus_zero),
7599 TEST_c_c (ctan, minus_zero, 0, minus_zero, 0.0),
7600 TEST_c_c (ctan, minus_zero, minus_zero, minus_zero, minus_zero),
8847214f 7601
08198877
JM		 7602 TEST_c_c (ctan, 0, plus_infty, 0.0, 1.0),
7603 TEST_c_c (ctan, 1, plus_infty, 0.0, 1.0),
7604 TEST_c_c (ctan, minus_zero, plus_infty, minus_zero, 1.0),
7605 TEST_c_c (ctan, -1, plus_infty, minus_zero, 1.0),
8847214f 7606
08198877
JM		 7607 TEST_c_c (ctan, 0, minus_infty, 0.0, -1.0),
7608 TEST_c_c (ctan, 1, minus_infty, 0.0, -1.0),
7609 TEST_c_c (ctan, minus_zero, minus_infty, minus_zero, -1.0),
7610 TEST_c_c (ctan, -1, minus_infty, minus_zero, -1.0),
8847214f 7611
08198877
JM		 7612 TEST_c_c (ctan, plus_infty, 0, qnan_value, qnan_value, INVALID_EXCEPTION),
7613 TEST_c_c (ctan, plus_infty, 2, qnan_value, qnan_value, INVALID_EXCEPTION),
7614 TEST_c_c (ctan, minus_infty, 0, qnan_value, qnan_value, INVALID_EXCEPTION),
7615 TEST_c_c (ctan, minus_infty, 2, qnan_value, qnan_value, INVALID_EXCEPTION),
7616 TEST_c_c (ctan, plus_infty, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION),
7617 TEST_c_c (ctan, plus_infty, -2, qnan_value, qnan_value, INVALID_EXCEPTION),
7618 TEST_c_c (ctan, minus_infty, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION),
7619 TEST_c_c (ctan, minus_infty, -2, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 7620
08198877
JM		 7621 TEST_c_c (ctan, qnan_value, plus_infty, 0.0, 1.0, IGNORE_ZERO_INF_SIGN),
7622 TEST_c_c (ctan, qnan_value, minus_infty, 0.0, -1.0, IGNORE_ZERO_INF_SIGN),
8847214f 7623
08198877
JM		 7624 TEST_c_c (ctan, 0, qnan_value, 0.0, qnan_value),
7625 TEST_c_c (ctan, minus_zero, qnan_value, minus_zero, qnan_value),
8847214f 7626
08198877
JM		 7627 TEST_c_c (ctan, 0.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7628 TEST_c_c (ctan, -4.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7629
08198877
JM		 7630 TEST_c_c (ctan, qnan_value, 0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7631 TEST_c_c (ctan, qnan_value, 5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7632 TEST_c_c (ctan, qnan_value, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7633 TEST_c_c (ctan, qnan_value, -0.25, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7634
08198877 7635 TEST_c_c (ctan, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 7636
08198877
JM		 7637 TEST_c_c (ctan, 0.75L, 1.25L, 0.160807785916206426725166058173438663L, 0.975363285031235646193581759755216379L),
7638 TEST_c_c (ctan, -2, -3, 0.376402564150424829275122113032269084e-2L, -1.00323862735360980144635859782192726L),
8847214f 7639
08198877
JM		 7640 TEST_c_c (ctan, 1, 45, 1.490158918874345552942703234806348520895e-39L, 1.000000000000000000000000000000000000001L, UNDERFLOW_EXCEPTION_FLOAT),
7641 TEST_c_c (ctan, 1, 47, 2.729321264492904590777293425576722354636e-41L, 1.0, UNDERFLOW_EXCEPTION_FLOAT),
bcc8d661
JM		 7642
7643#ifndef TEST_FLOAT
08198877
JM		 7644 TEST_c_c (ctan, 1, 355, 8.140551093483276762350406321792653551513e-309L, 1.0, UNDERFLOW_EXCEPTION_DOUBLE),
7645 TEST_c_c (ctan, 1, 365, 1.677892637497921890115075995898773550884e-317L, 1.0, UNDERFLOW_EXCEPTION_DOUBLE),
bcc8d661
JM		 7646#endif
7647
7648#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 7649 TEST_c_c (ctan, 1, 5680, 4.725214596136812019616700920476949798307e-4934L, 1.0, UNDERFLOW_EXCEPTION),
7650 TEST_c_c (ctan, 1, 5690, 9.739393181626937151720816611272607059057e-4943L, 1.0, UNDERFLOW_EXCEPTION),
bcc8d661
JM		 7651#endif
7652
08198877 7653 TEST_c_c (ctan, 0x3.243f6cp-1, 0, -2.287733242885645987394874673945769518150e7L, 0.0),
bcc8d661 7654
08198877 7655 TEST_c_c (ctan, 0x1p127, 1, 0.2446359391192790896381501310437708987204L, 0.9101334047676183761532873794426475906201L),
bcc8d661
JM		 7656
7657#ifndef TEST_FLOAT
08198877 7658 TEST_c_c (ctan, 0x1p1023, 1, -0.2254627924997545057926782581695274244229L, 0.8786063118883068695462540226219865087189L),
bcc8d661
JM		 7659#endif
7660
7661#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 7662 TEST_c_c (ctan, 0x1p16383L, 1, 0.1608598776370396607204448234354670036772L, 0.8133818522051542536316746743877629761488L),
bcc8d661
JM		 7663#endif
7664
08198877
JM		 7665 TEST_c_c (ctan, 50000, 50000, plus_zero, 1.0, UNDERFLOW_EXCEPTION),
7666 TEST_c_c (ctan, 50000, -50000, plus_zero, -1.0, UNDERFLOW_EXCEPTION),
7667 TEST_c_c (ctan, -50000, 50000, minus_zero, 1.0, UNDERFLOW_EXCEPTION),
7668 TEST_c_c (ctan, -50000, -50000, minus_zero, -1.0, UNDERFLOW_EXCEPTION),
7669 END_DATA (ctan)
7670 };
bcc8d661 7671
08198877
JM		 7672static void
7673ctan_test (void)
7674{
7675 errno = 0;
7676 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7677 if (errno == ENOSYS)
7678 /* Function not implemented. */
7679 return;
7680
7681 START (ctan);
7682 RUN_TEST_LOOP_c_c (ctan, ctan_test_data, );
6815fabc 7683 END (ctan, complex);
8847214f
UD		 7684}
7685
7686
08198877
JM		 7687static const struct test_c_c_data ctan_tonearest_test_data[] =
7688 {
7689 START_DATA (ctan_tonearest),
7690 TEST_c_c (ctan, 0x1.921fb6p+0, 0x1p-149, -2.287733242885645987394874673945769518150e7L, 7.334008549954377778731880988481078535821e-31L),
7691
7692#ifndef TEST_FLOAT
7693 TEST_c_c (ctan, 0x1.921fb54442d18p+0, 0x1p-1074, 1.633123935319536975596773704152891653086e16L, 1.317719414943508315995636961402669067843e-291L),
7694#endif
7695
7696#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
7697 TEST_c_c (ctan, 0x1.921fb54442d1846ap+0L, 0x1p-16445L, -3.986797629811710706723242948653362815645e19L, 5.793882568875674066286163141055208625180e-4912L),
7698#endif
7699 END_DATA (ctan_tonearest)
7700 };
7701
ca61cf32
JM		 7702static void
7703ctan_test_tonearest (void)
7704{
ca61cf32
JM		 7705 errno = 0;
7706 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7707 if (errno == ENOSYS)
7708 /* Function not implemented. */
7709 return;
7710
7711 START (ctan_tonearest);
08198877
JM		 7712 RUN_TEST_LOOP_c_c (ctan, ctan_tonearest_test_data, FE_TONEAREST);
7713 END (ctan_tonearest, complex);
7714}
ca61cf32 7715
ca61cf32 7716
08198877
JM		 7717static const struct test_c_c_data ctan_towardzero_test_data[] =
7718 {
7719 START_DATA (ctan_towardzero),
7720 TEST_c_c (ctan, 0x1.921fb6p+0, 0x1p-149, -2.287733242885645987394874673945769518150e7L, 7.334008549954377778731880988481078535821e-31L),
ca61cf32
JM		 7721
7722#ifndef TEST_FLOAT
08198877 7723 TEST_c_c (ctan, 0x1.921fb54442d18p+0, 0x1p-1074, 1.633123935319536975596773704152891653086e16L, 1.317719414943508315995636961402669067843e-291L),
ca61cf32
JM		 7724#endif
7725
7726#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7727 TEST_c_c (ctan, 0x1.921fb54442d1846ap+0L, 0x1p-16445L, -3.986797629811710706723242948653362815645e19L, 5.793882568875674066286163141055208625180e-4912L),
ca61cf32 7728#endif
08198877
JM		 7729 END_DATA (ctan_towardzero)
7730 };
ca61cf32
JM		 7731
7732static void
7733ctan_test_towardzero (void)
7734{
ca61cf32
JM		 7735 errno = 0;
7736 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7737 if (errno == ENOSYS)
7738 /* Function not implemented. */
7739 return;
7740
7741 START (ctan_towardzero);
08198877
JM		 7742 RUN_TEST_LOOP_c_c (ctan, ctan_towardzero_test_data, FE_TOWARDZERO);
7743 END (ctan_towardzero, complex);
7744}
ca61cf32 7745
ca61cf32 7746
08198877
JM		 7747static const struct test_c_c_data ctan_downward_test_data[] =
7748 {
7749 START_DATA (ctan_downward),
7750 TEST_c_c (ctan, 0x1.921fb6p+0, 0x1p-149, -2.287733242885645987394874673945769518150e7L, 7.334008549954377778731880988481078535821e-31L),
ca61cf32
JM		 7751
7752#ifndef TEST_FLOAT
08198877 7753 TEST_c_c (ctan, 0x1.921fb54442d18p+0, 0x1p-1074, 1.633123935319536975596773704152891653086e16L, 1.317719414943508315995636961402669067843e-291L),
ca61cf32
JM		 7754#endif
7755
7756#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7757 TEST_c_c (ctan, 0x1.921fb54442d1846ap+0L, 0x1p-16445L, -3.986797629811710706723242948653362815645e19L, 5.793882568875674066286163141055208625180e-4912L),
ca61cf32 7758#endif
08198877
JM		 7759 END_DATA (ctan_downward)
7760 };
ca61cf32
JM		 7761
7762static void
7763ctan_test_downward (void)
7764{
ca61cf32
JM		 7765 errno = 0;
7766 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7767 if (errno == ENOSYS)
7768 /* Function not implemented. */
7769 return;
7770
7771 START (ctan_downward);
08198877
JM		 7772 RUN_TEST_LOOP_c_c (ctan, ctan_downward_test_data, FE_DOWNWARD);
7773 END (ctan_downward, complex);
7774}
ca61cf32 7775
ca61cf32 7776
08198877
JM		 7777static const struct test_c_c_data ctan_upward_test_data[] =
7778 {
7779 START_DATA (ctan_upward),
7780 TEST_c_c (ctan, 0x1.921fb6p+0, 0x1p-149, -2.287733242885645987394874673945769518150e7L, 7.334008549954377778731880988481078535821e-31L),
ca61cf32
JM		 7781
7782#ifndef TEST_FLOAT
08198877 7783 TEST_c_c (ctan, 0x1.921fb54442d18p+0, 0x1p-1074, 1.633123935319536975596773704152891653086e16L, 1.317719414943508315995636961402669067843e-291L),
ca61cf32
JM		 7784#endif
7785
7786#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7787 TEST_c_c (ctan, 0x1.921fb54442d1846ap+0L, 0x1p-16445L, -3.986797629811710706723242948653362815645e19L, 5.793882568875674066286163141055208625180e-4912L),
ca61cf32 7788#endif
08198877
JM		 7789 END_DATA (ctan_upward)
7790 };
ca61cf32
JM		 7791
7792static void
7793ctan_test_upward (void)
7794{
ca61cf32
JM		 7795 errno = 0;
7796 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7797 if (errno == ENOSYS)
7798 /* Function not implemented. */
7799 return;
7800
7801 START (ctan_upward);
08198877
JM		 7802 RUN_TEST_LOOP_c_c (ctan, ctan_upward_test_data, FE_UPWARD);
7803 END (ctan_upward, complex);
7804}
ca61cf32 7805
ca61cf32 7806
08198877
JM		 7807static const struct test_c_c_data ctanh_test_data[] =
7808 {
7809 START_DATA (ctanh),
7810 TEST_c_c (ctanh, 0, 0, 0.0, 0.0),
7811 TEST_c_c (ctanh, 0, minus_zero, 0.0, minus_zero),
7812 TEST_c_c (ctanh, minus_zero, 0, minus_zero, 0.0),
7813 TEST_c_c (ctanh, minus_zero, minus_zero, minus_zero, minus_zero),
7814
7815 TEST_c_c (ctanh, plus_infty, 0, 1.0, 0.0),
7816 TEST_c_c (ctanh, plus_infty, 1, 1.0, 0.0),
7817 TEST_c_c (ctanh, plus_infty, minus_zero, 1.0, minus_zero),
7818 TEST_c_c (ctanh, plus_infty, -1, 1.0, minus_zero),
7819 TEST_c_c (ctanh, minus_infty, 0, -1.0, 0.0),
7820 TEST_c_c (ctanh, minus_infty, 1, -1.0, 0.0),
7821 TEST_c_c (ctanh, minus_infty, minus_zero, -1.0, minus_zero),
7822 TEST_c_c (ctanh, minus_infty, -1, -1.0, minus_zero),
7823
7824 TEST_c_c (ctanh, 0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7825 TEST_c_c (ctanh, 2, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7826 TEST_c_c (ctanh, 0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7827 TEST_c_c (ctanh, 2, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7828 TEST_c_c (ctanh, minus_zero, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7829 TEST_c_c (ctanh, -2, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7830 TEST_c_c (ctanh, minus_zero, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7831 TEST_c_c (ctanh, -2, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7832
7833 TEST_c_c (ctanh, plus_infty, qnan_value, 1.0, 0.0, IGNORE_ZERO_INF_SIGN),
7834 TEST_c_c (ctanh, minus_infty, qnan_value, -1.0, 0.0, IGNORE_ZERO_INF_SIGN),
7835
7836 TEST_c_c (ctanh, qnan_value, 0, qnan_value, 0.0),
7837 TEST_c_c (ctanh, qnan_value, minus_zero, qnan_value, minus_zero),
7838
7839 TEST_c_c (ctanh, qnan_value, 0.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7840 TEST_c_c (ctanh, qnan_value, -4.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7841
7842 TEST_c_c (ctanh, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7843 TEST_c_c (ctanh, 5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7844 TEST_c_c (ctanh, minus_zero, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7845 TEST_c_c (ctanh, -0.25, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7846
7847 TEST_c_c (ctanh, qnan_value, qnan_value, qnan_value, qnan_value),
7848
7849 TEST_c_c (ctanh, 0, M_PI_4l, 0.0, 1.0),
7850
7851 TEST_c_c (ctanh, 0.75L, 1.25L, 1.37260757053378320258048606571226857L, 0.385795952609750664177596760720790220L),
7852 TEST_c_c (ctanh, -2, -3, -0.965385879022133124278480269394560686L, 0.988437503832249372031403430350121098e-2L),
7853
7854 TEST_c_c (ctanh, 45, 1, 1.000000000000000000000000000000000000001L, 1.490158918874345552942703234806348520895e-39L, UNDERFLOW_EXCEPTION_FLOAT),
7855 TEST_c_c (ctanh, 47, 1, 1.0, 2.729321264492904590777293425576722354636e-41L, UNDERFLOW_EXCEPTION_FLOAT),
ca61cf32
JM		 7856
7857#ifndef TEST_FLOAT
08198877
JM		 7858 TEST_c_c (ctanh, 355, 1, 1.0, 8.140551093483276762350406321792653551513e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
7859 TEST_c_c (ctanh, 365, 1, 1.0, 1.677892637497921890115075995898773550884e-317L, UNDERFLOW_EXCEPTION_DOUBLE),
ca61cf32
JM		 7860#endif
7861
08198877
JM		 7862#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
7863 TEST_c_c (ctanh, 5680, 1, 1.0, 4.725214596136812019616700920476949798307e-4934L, UNDERFLOW_EXCEPTION),
7864 TEST_c_c (ctanh, 5690, 1, 1.0, 9.739393181626937151720816611272607059057e-4943L, UNDERFLOW_EXCEPTION),
ca61cf32 7865#endif
ca61cf32 7866
08198877 7867 TEST_c_c (ctanh, 0, 0x3.243f6cp-1, 0.0, -2.287733242885645987394874673945769518150e7L),
ca61cf32 7868
08198877 7869 TEST_c_c (ctanh, 1, 0x1p127, 0.9101334047676183761532873794426475906201L, 0.2446359391192790896381501310437708987204L),
ca61cf32 7870
08198877
JM		 7871#ifndef TEST_FLOAT
7872 TEST_c_c (ctanh, 1, 0x1p1023, 0.8786063118883068695462540226219865087189L, -0.2254627924997545057926782581695274244229L),
7873#endif
7874
7875#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
7876 TEST_c_c (ctanh, 1, 0x1p16383L, 0.8133818522051542536316746743877629761488L, 0.1608598776370396607204448234354670036772L),
7877#endif
7878
7879 TEST_c_c (ctanh, 50000, 50000, 1.0, plus_zero, UNDERFLOW_EXCEPTION),
7880 TEST_c_c (ctanh, 50000, -50000, 1.0, minus_zero, UNDERFLOW_EXCEPTION),
7881 TEST_c_c (ctanh, -50000, 50000, -1.0, plus_zero, UNDERFLOW_EXCEPTION),
7882 TEST_c_c (ctanh, -50000, -50000, -1.0, minus_zero, UNDERFLOW_EXCEPTION),
7883 END_DATA (ctanh)
7884 };
ca61cf32 7885
8847214f
UD		 7886static void
7887ctanh_test (void)
7888{
aaca11d8
UD		 7889 errno = 0;
7890 FUNC(ctanh) (BUILD_COMPLEX (0, 0));
7891 if (errno == ENOSYS)
7892 /* Function not implemented. */
7893 return;
7894
8847214f 7895 START (ctanh);
08198877
JM		 7896 RUN_TEST_LOOP_c_c (ctanh, ctanh_test_data, );
7897 END (ctanh, complex);
7898}
8847214f 7899
bcc8d661 7900
08198877
JM		 7901static const struct test_c_c_data ctanh_tonearest_test_data[] =
7902 {
7903 START_DATA (ctanh_tonearest),
7904 TEST_c_c (ctanh, 0x1p-149, 0x1.921fb6p+0, 7.334008549954377778731880988481078535821e-31L, -2.287733242885645987394874673945769518150e7L),
bcc8d661
JM		 7905
7906#ifndef TEST_FLOAT
08198877 7907 TEST_c_c (ctanh, 0x1p-1074, 0x1.921fb54442d18p+0, 1.317719414943508315995636961402669067843e-291L, 1.633123935319536975596773704152891653086e16L),
bcc8d661
JM		 7908#endif
7909
08198877
JM		 7910#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
7911 TEST_c_c (ctanh, 0x1p-16445L, 0x1.921fb54442d1846ap+0L, 5.793882568875674066286163141055208625180e-4912L, -3.986797629811710706723242948653362815645e19L),
bcc8d661 7912#endif
08198877
JM		 7913 END_DATA (ctanh_tonearest)
7914 };
2550dfe9 7915
ca61cf32
JM		 7916static void
7917ctanh_test_tonearest (void)
7918{
ca61cf32
JM		 7919 errno = 0;
7920 FUNC(ctanh) (BUILD_COMPLEX (0.7L, 1.2L));
7921 if (errno == ENOSYS)
7922 /* Function not implemented. */
7923 return;
7924
7925 START (ctanh_tonearest);
08198877
JM		 7926 RUN_TEST_LOOP_c_c (ctanh, ctanh_tonearest_test_data, FE_TONEAREST);
7927 END (ctanh_tonearest, complex);
7928}
ca61cf32 7929
ca61cf32 7930
08198877
JM		 7931static const struct test_c_c_data ctanh_towardzero_test_data[] =
7932 {
7933 START_DATA (ctanh_towardzero),
7934 TEST_c_c (ctanh, 0x1p-149, 0x1.921fb6p+0, 7.334008549954377778731880988481078535821e-31L, -2.287733242885645987394874673945769518150e7L),
ca61cf32
JM		 7935
7936#ifndef TEST_FLOAT
08198877 7937 TEST_c_c (ctanh, 0x1p-1074, 0x1.921fb54442d18p+0, 1.317719414943508315995636961402669067843e-291L, 1.633123935319536975596773704152891653086e16L),
ca61cf32
JM		 7938#endif
7939
7940#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7941 TEST_c_c (ctanh, 0x1p-16445L, 0x1.921fb54442d1846ap+0L, 5.793882568875674066286163141055208625180e-4912L, -3.986797629811710706723242948653362815645e19L),
ca61cf32 7942#endif
08198877
JM		 7943 END_DATA (ctanh_towardzero)
7944 };
ca61cf32
JM		 7945
7946static void
7947ctanh_test_towardzero (void)
7948{
ca61cf32
JM		 7949 errno = 0;
7950 FUNC(ctanh) (BUILD_COMPLEX (0.7L, 1.2L));
7951 if (errno == ENOSYS)
7952 /* Function not implemented. */
7953 return;
7954
7955 START (ctanh_towardzero);
08198877
JM		 7956 RUN_TEST_LOOP_c_c (ctanh, ctanh_towardzero_test_data, FE_TOWARDZERO);
7957 END (ctanh_towardzero, complex);
7958}
ca61cf32 7959
ca61cf32 7960
08198877
JM		 7961static const struct test_c_c_data ctanh_downward_test_data[] =
7962 {
7963 START_DATA (ctanh_downward),
7964 TEST_c_c (ctanh, 0x1p-149, 0x1.921fb6p+0, 7.334008549954377778731880988481078535821e-31L, -2.287733242885645987394874673945769518150e7L),
ca61cf32
JM		 7965
7966#ifndef TEST_FLOAT
08198877 7967 TEST_c_c (ctanh, 0x1p-1074, 0x1.921fb54442d18p+0, 1.317719414943508315995636961402669067843e-291L, 1.633123935319536975596773704152891653086e16L),
ca61cf32
JM		 7968#endif
7969
7970#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7971 TEST_c_c (ctanh, 0x1p-16445L, 0x1.921fb54442d1846ap+0L, 5.793882568875674066286163141055208625180e-4912L, -3.986797629811710706723242948653362815645e19L),
ca61cf32 7972#endif
08198877
JM		 7973 END_DATA (ctanh_downward)
7974 };
ca61cf32
JM		 7975
7976static void
7977ctanh_test_downward (void)
7978{
ca61cf32
JM		 7979 errno = 0;
7980 FUNC(ctanh) (BUILD_COMPLEX (0.7L, 1.2L));
7981 if (errno == ENOSYS)
7982 /* Function not implemented. */
7983 return;
7984
7985 START (ctanh_downward);
08198877
JM		 7986 RUN_TEST_LOOP_c_c (ctanh, ctanh_downward_test_data, FE_DOWNWARD);
7987 END (ctanh_downward, complex);
7988}
ca61cf32 7989
ca61cf32 7990
08198877
JM		 7991static const struct test_c_c_data ctanh_upward_test_data[] =
7992 {
7993 START_DATA (ctanh_upward),
7994 TEST_c_c (ctanh, 0x1p-149, 0x1.921fb6p+0, 7.334008549954377778731880988481078535821e-31L, -2.287733242885645987394874673945769518150e7L),
ca61cf32
JM		 7995
7996#ifndef TEST_FLOAT
08198877 7997 TEST_c_c (ctanh, 0x1p-1074, 0x1.921fb54442d18p+0, 1.317719414943508315995636961402669067843e-291L, 1.633123935319536975596773704152891653086e16L),
ca61cf32
JM		 7998#endif
7999
8000#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 8001 TEST_c_c (ctanh, 0x1p-16445L, 0x1.921fb54442d1846ap+0L, 5.793882568875674066286163141055208625180e-4912L, -3.986797629811710706723242948653362815645e19L),
ca61cf32 8002#endif
08198877
JM		 8003 END_DATA (ctanh_upward)
8004 };
ca61cf32
JM		 8005
8006static void
8007ctanh_test_upward (void)
8008{
ca61cf32
JM		 8009 errno = 0;
8010 FUNC(ctanh) (BUILD_COMPLEX (0.7L, 1.2L));
8011 if (errno == ENOSYS)
8012 /* Function not implemented. */
8013 return;
8014
8015 START (ctanh_upward);
08198877 8016 RUN_TEST_LOOP_c_c (ctanh, ctanh_upward_test_data, FE_UPWARD);
ca61cf32
JM		 8017 END (ctanh_upward, complex);
8018}
8019
8020
74c57478
JM		 8021static const struct test_f_f_data erf_test_data[] =
8022 {
8023 START_DATA (erf),
8024 TEST_f_f (erf, 0, 0),
8025 TEST_f_f (erf, minus_zero, minus_zero),
8026 TEST_f_f (erf, plus_infty, 1),
8027 TEST_f_f (erf, minus_infty, -1),
8028 TEST_f_f (erf, qnan_value, qnan_value),
8029
8030 TEST_f_f (erf, 0.125L, 0.140316204801333817393029446521623398L),
8031 TEST_f_f (erf, 0.75L, 0.711155633653515131598937834591410777L),
8032 TEST_f_f (erf, 1.25L, 0.922900128256458230136523481197281140L),
8033 TEST_f_f (erf, 2.0L, 0.995322265018952734162069256367252929L),
8034 TEST_f_f (erf, 4.125L, 0.999999994576599200434933994687765914L),
8035 TEST_f_f (erf, 27.0L, 1.0L),
8036 END_DATA (erf)
8037 };
8038
8847214f
UD		 8039static void
8040erf_test (void)
8041{
8042 errno = 0;
8043 FUNC(erf) (0);
8044 if (errno == ENOSYS)
8045 /* Function not implemented. */
8046 return;
8047
8048 START (erf);
74c57478 8049 RUN_TEST_LOOP_f_f (erf, erf_test_data, );
8847214f
UD		 8050 END (erf);
8051}
8052
8053
74c57478
JM		 8054static const struct test_f_f_data erfc_test_data[] =
8055 {
8056 START_DATA (erfc),
8057 TEST_f_f (erfc, plus_infty, 0.0),
8058 TEST_f_f (erfc, minus_infty, 2.0),
8059 TEST_f_f (erfc, 0.0, 1.0),
8060 TEST_f_f (erfc, minus_zero, 1.0),
8061 TEST_f_f (erfc, qnan_value, qnan_value),
8062
8063 TEST_f_f (erfc, 0.125L, 0.859683795198666182606970553478376602L),
8064 TEST_f_f (erfc, 0.75L, 0.288844366346484868401062165408589223L),
8065 TEST_f_f (erfc, 1.25L, 0.0770998717435417698634765188027188596L),
8066 TEST_f_f (erfc, 2.0L, 0.00467773498104726583793074363274707139L),
8067 TEST_f_f (erfc, 0x1.f7303cp+1L, 2.705500297238986897105236321218861842255e-8L),
8068 TEST_f_f (erfc, 4.125L, 0.542340079956506600531223408575531062e-8L),
8069 TEST_f_f (erfc, 0x1.ffa002p+2L, 1.233585992097580296336099501489175967033e-29L),
8070 TEST_f_f (erfc, 0x1.ffffc8p+2L, 1.122671365033056305522366683719541099329e-29L),
2550dfe9 8071#ifdef TEST_LDOUBLE
74c57478 8072 /* The result can only be represented in long double. */
f964490f 8073# if LDBL_MIN_10_EXP < -319
74c57478 8074 TEST_f_f (erfc, 27.0L, 0.523704892378925568501606768284954709e-318L),
f964490f 8075# endif
7b1902cb 8076# if LDBL_MANT_DIG >= 106
74c57478 8077 TEST_f_f (erfc, 0x1.ffff56789abcdef0123456789a8p+2L, 1.123161416304655390092138725253789378459e-29L),
7b1902cb 8078# endif
2550dfe9 8079#endif
74c57478
JM		 8080 END_DATA (erfc)
8081 };
2550dfe9 8082
8847214f 8083static void
74c57478 8084erfc_test (void)
8847214f 8085{
e6d3c4a7 8086 errno = 0;
74c57478 8087 FUNC(erfc) (0);
e6d3c4a7
AJ		 8088 if (errno == ENOSYS)
8089 /* Function not implemented. */
8090 return;
8091
74c57478
JM		 8092 START (erfc);
8093 RUN_TEST_LOOP_f_f (erfc, erfc_test_data, );
8094 END (erfc);
8095}
8847214f 8096
74c57478
JM		 8097
8098static const struct test_f_f_data exp_test_data[] =
8099 {
8100 START_DATA (exp),
8101 TEST_f_f (exp, 0, 1),
8102 TEST_f_f (exp, minus_zero, 1),
8847214f 8103
15daa639 8104#ifndef TEST_INLINE
74c57478
JM		 8105 TEST_f_f (exp, plus_infty, plus_infty),
8106 TEST_f_f (exp, minus_infty, 0),
15daa639 8107#endif
74c57478
JM		 8108 TEST_f_f (exp, qnan_value, qnan_value),
8109 TEST_f_f (exp, 1, M_El),
8847214f 8110
74c57478
JM		 8111 TEST_f_f (exp, 2, M_E2l),
8112 TEST_f_f (exp, 3, M_E3l),
8113 TEST_f_f (exp, 0.75L, 2.11700001661267466854536981983709561L),
8114 TEST_f_f (exp, 50.0L, 5184705528587072464087.45332293348538L),
8115 TEST_f_f (exp, 88.72269439697265625L, 3.40233126623160774937554134772290447915e38L),
e42a38dd 8116#ifndef TEST_FLOAT
74c57478 8117 TEST_f_f (exp, 709.75L, 1.739836873264160557698252711673830393864768e+308L),
e42a38dd 8118#endif
8fb0af98 8119#if defined TEST_LDOUBLE && __LDBL_MAX_EXP__ > 1024
74c57478
JM		 8120 /* The result can only be represented in sane long double. */
8121 TEST_f_f (exp, 1000.0L, 0.197007111401704699388887935224332313e435L),
4c95adde 8122#endif
2550dfe9 8123
41498f4d 8124#if !(defined TEST_LDOUBLE && LDBL_MAX_EXP > 1024)
e9eee333 8125 TEST_f_f (exp, 710, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
74c57478 8126 TEST_f_f (exp, -1234, plus_zero, UNDERFLOW_EXCEPTION),
41498f4d 8127#endif
e9eee333
JM		 8128 TEST_f_f (exp, 1e5, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
8129 TEST_f_f (exp, max_value, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
74c57478
JM		 8130 TEST_f_f (exp, -max_value, 0, UNDERFLOW_EXCEPTION),
8131 END_DATA (exp)
8132 };
8133
8134static void
8135exp_test (void)
8136{
8137 errno = 0;
8138 FUNC(exp) (0);
8139 if (errno == ENOSYS)
8140 /* Function not implemented. */
8141 return;
41bf21a1 8142
74c57478
JM		 8143 START (exp);
8144 RUN_TEST_LOOP_f_f (exp, exp_test_data, );
8847214f
UD		 8145 END (exp);
8146}
8147
8148
74c57478
JM		 8149static const struct test_f_f_data exp_tonearest_test_data[] =
8150 {
8151 START_DATA (exp_tonearest),
8152 TEST_f_f (exp, 1, M_El),
8153 TEST_f_f (exp, 2, M_E2l),
8154 TEST_f_f (exp, 3, M_E3l),
8155 END_DATA (exp_tonearest)
8156 };
8157
28afd92d
JM		 8158static void
8159exp_test_tonearest (void)
8160{
28afd92d
JM		 8161 errno = 0;
8162 FUNC(exp) (0);
8163 if (errno == ENOSYS)
8164 /* Function not implemented. */
8165 return;
8166
8167 START (exp_tonearest);
74c57478 8168 RUN_TEST_LOOP_f_f (exp, exp_tonearest_test_data, FE_TONEAREST);
28afd92d
JM		 8169 END (exp_tonearest);
8170}
8171
8172
74c57478
JM		 8173static const struct test_f_f_data exp_towardzero_test_data[] =
8174 {
8175 START_DATA (exp_towardzero),
8176 TEST_f_f (exp, 1, M_El),
8177 TEST_f_f (exp, 2, M_E2l),
8178 TEST_f_f (exp, 3, M_E3l),
8179 END_DATA (exp_towardzero)
8180 };
8181
28afd92d
JM		 8182static void
8183exp_test_towardzero (void)
8184{
28afd92d
JM		 8185 errno = 0;
8186 FUNC(exp) (0);
8187 if (errno == ENOSYS)
8188 /* Function not implemented. */
8189 return;
8190
8191 START (exp_towardzero);
74c57478 8192 RUN_TEST_LOOP_f_f (exp, exp_towardzero_test_data, FE_TOWARDZERO);
28afd92d
JM		 8193 END (exp_towardzero);
8194}
8195
8196
74c57478
JM		 8197static const struct test_f_f_data exp_downward_test_data[] =
8198 {
8199 START_DATA (exp_downward),
8200 TEST_f_f (exp, 1, M_El),
8201 TEST_f_f (exp, 2, M_E2l),
8202 TEST_f_f (exp, 3, M_E3l),
8203 END_DATA (exp_downward)
8204 };
8205
28afd92d
JM		 8206static void
8207exp_test_downward (void)
8208{
28afd92d
JM		 8209 errno = 0;
8210 FUNC(exp) (0);
8211 if (errno == ENOSYS)
8212 /* Function not implemented. */
8213 return;
8214
8215 START (exp_downward);
74c57478 8216 RUN_TEST_LOOP_f_f (exp, exp_downward_test_data, FE_DOWNWARD);
28afd92d
JM		 8217 END (exp_downward);
8218}
8219
8220
74c57478
JM		 8221static const struct test_f_f_data exp_upward_test_data[] =
8222 {
8223 START_DATA (exp_upward),
8224 TEST_f_f (exp, 1, M_El),
8225 TEST_f_f (exp, 2, M_E2l),
8226 TEST_f_f (exp, 3, M_E3l),
8227 END_DATA (exp_upward)
8228 };
8229
28afd92d
JM		 8230static void
8231exp_test_upward (void)
8232{
28afd92d
JM		 8233 errno = 0;
8234 FUNC(exp) (0);
8235 if (errno == ENOSYS)
8236 /* Function not implemented. */
8237 return;
8238
8239 START (exp_upward);
74c57478 8240 RUN_TEST_LOOP_f_f (exp, exp_upward_test_data, FE_UPWARD);
28afd92d
JM		 8241 END (exp_upward);
8242}
8243
8244
74c57478
JM		 8245static const struct test_f_f_data exp10_test_data[] =
8246 {
8247 START_DATA (exp10),
8248 TEST_f_f (exp10, 0, 1),
8249 TEST_f_f (exp10, minus_zero, 1),
8250
8251 TEST_f_f (exp10, plus_infty, plus_infty),
8252 TEST_f_f (exp10, minus_infty, 0),
8253 TEST_f_f (exp10, qnan_value, qnan_value),
8254 TEST_f_f (exp10, 3, 1000),
8255 TEST_f_f (exp10, -1, 0.1L),
8256 TEST_f_f (exp10, 36, 1.0e36L),
8257 TEST_f_f (exp10, -36, 1.0e-36L),
8258#ifndef TEST_FLOAT
8259 TEST_f_f (exp10, 305, 1.0e305L),
8260 TEST_f_f (exp10, -305, 1.0e-305L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
8261#endif
8262#if defined TEST_LDOUBLE && LDBL_MAX_10_EXP >= 4932
8263 TEST_f_f (exp10, 4932, 1.0e4932L),
8264 TEST_f_f (exp10, -4932, 1.0e-4932L, UNDERFLOW_EXCEPTION),
8265#endif
e9eee333 8266 TEST_f_f (exp10, 1e6, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
74c57478 8267 TEST_f_f (exp10, -1e6, 0, UNDERFLOW_EXCEPTION),
e9eee333 8268 TEST_f_f (exp10, max_value, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
74c57478
JM		 8269 TEST_f_f (exp10, -max_value, 0, UNDERFLOW_EXCEPTION),
8270 TEST_f_f (exp10, 0.75L, 5.62341325190349080394951039776481231L),
8271 END_DATA (exp10)
8272 };
8273
8847214f
UD		 8274static void
8275exp10_test (void)
8276{
8277 errno = 0;
8278 FUNC(exp10) (0);
8279 if (errno == ENOSYS)
8280 /* Function not implemented. */
8281 return;
8282
8283 START (exp10);
74c57478
JM		 8284 RUN_TEST_LOOP_f_f (exp10, exp10_test_data, );
8285 END (exp10);
8286}
8287
8288
8289static const struct test_f_f_data exp2_test_data[] =
8290 {
8291 START_DATA (exp2),
8292 TEST_f_f (exp2, 0, 1),
8293 TEST_f_f (exp2, minus_zero, 1),
8294 TEST_f_f (exp2, plus_infty, plus_infty),
8295 TEST_f_f (exp2, minus_infty, 0),
8296 TEST_f_f (exp2, qnan_value, qnan_value),
8297
8298 TEST_f_f (exp2, 10, 1024),
8299 TEST_f_f (exp2, -1, 0.5),
e9eee333 8300 TEST_f_f (exp2, 1e6, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
74c57478 8301 TEST_f_f (exp2, -1e6, 0, UNDERFLOW_EXCEPTION),
e9eee333 8302 TEST_f_f (exp2, max_value, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
74c57478
JM		 8303 TEST_f_f (exp2, -max_value, 0, UNDERFLOW_EXCEPTION),
8304 TEST_f_f (exp2, 0.75L, 1.68179283050742908606225095246642979L),
8847214f 8305
74c57478
JM		 8306 TEST_f_f (exp2, 100.5, 1.792728671193156477399422023278661496394e+30L),
8307 TEST_f_f (exp2, 127, 0x1p127),
8308 TEST_f_f (exp2, -149, 0x1p-149),
8847214f 8309
d8b82cad 8310#ifndef TEST_FLOAT
74c57478
JM		 8311 TEST_f_f (exp2, 1000.25, 1.274245659452564874772384918171765416737e+301L),
8312 TEST_f_f (exp2, 1023, 0x1p1023),
8313 TEST_f_f (exp2, -1074, 0x1p-1074),
9568c0c2 8314#endif
8847214f 8315
74c57478
JM		 8316#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
8317 TEST_f_f (exp2, 16383, 0x1p16383L),
8318 TEST_f_f (exp2, -16400, 0x1p-16400L),
8319#endif
8320 END_DATA (exp2)
8321 };
2550dfe9 8322
8847214f
UD		 8323static void
8324exp2_test (void)
8325{
8326 errno = 0;
8327 FUNC(exp2) (0);
8328 if (errno == ENOSYS)
8329 /* Function not implemented. */
8330 return;
8331
8332 START (exp2);
74c57478
JM		 8333 RUN_TEST_LOOP_f_f (exp2, exp2_test_data, );
8334 END (exp2);
8335}
8847214f 8336
15daa639 8337
74c57478
JM		 8338static const struct test_f_f_data expm1_test_data[] =
8339 {
8340 START_DATA (expm1),
8341 TEST_f_f (expm1, 0, 0),
8342 TEST_f_f (expm1, minus_zero, minus_zero),
8343
8344#ifndef TEST_INLINE
8345 TEST_f_f (expm1, plus_infty, plus_infty),
8346 TEST_f_f (expm1, minus_infty, -1),
8347#endif
8348 TEST_f_f (expm1, qnan_value, qnan_value),
8349
8350 TEST_f_f (expm1, 1, M_El - 1.0),
8351 TEST_f_f (expm1, 0.75L, 1.11700001661267466854536981983709561L),
8847214f 8352
74c57478 8353 TEST_f_f (expm1, 50.0L, 5.1847055285870724640864533229334853848275e+21L),
48e44791
JM		 8354
8355#ifndef TEST_FLOAT
74c57478
JM		 8356 TEST_f_f (expm1, 127.0L, 1.4302079958348104463583671072905261080748e+55L),
8357 TEST_f_f (expm1, 500.0L, 1.4035922178528374107397703328409120821806e+217L),
48e44791
JM		 8358#endif
8359
8360#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM		 8361 TEST_f_f (expm1, 11356.25L, 9.05128237311923300051376115753226014206e+4931L),
8362#endif
8363
8364 TEST_f_f (expm1, -10.0, -0.9999546000702375151484644084844394493898L),
8365 TEST_f_f (expm1, -16.0, -0.9999998874648252807408854862248209398728L),
8366 TEST_f_f (expm1, -17.0, -0.9999999586006228121483334034897228104472L),
8367 TEST_f_f (expm1, -18.0, -0.9999999847700202552873715638633707664826L),
8368 TEST_f_f (expm1, -36.0, -0.9999999999999997680477169756430611687736L),
8369 TEST_f_f (expm1, -37.0, -0.9999999999999999146695237425593420572195L),
8370 TEST_f_f (expm1, -38.0, -0.9999999999999999686086720795197037129104L),
8371 TEST_f_f (expm1, -44.0, -0.9999999999999999999221886775886620348429L),
8372 TEST_f_f (expm1, -45.0, -0.9999999999999999999713748141945060635553L),
8373 TEST_f_f (expm1, -46.0, -0.9999999999999999999894693826424461876212L),
8374 TEST_f_f (expm1, -73.0, -0.9999999999999999999999999999999802074012L),
8375 TEST_f_f (expm1, -74.0, -0.9999999999999999999999999999999927187098L),
8376 TEST_f_f (expm1, -75.0, -0.9999999999999999999999999999999973213630L),
8377 TEST_f_f (expm1, -78.0, -0.9999999999999999999999999999999998666385L),
8378 TEST_f_f (expm1, -79.0, -0.9999999999999999999999999999999999509391L),
8379 TEST_f_f (expm1, -80.0, -0.9999999999999999999999999999999999819515L),
8380 TEST_f_f (expm1, -100.0, -1.0),
8381 TEST_f_f (expm1, -1000.0, -1.0),
8382 TEST_f_f (expm1, -10000.0, -1.0),
8383 TEST_f_f (expm1, -100000.0, -1.0),
8384
8385 TEST_f_f (expm1, 100000.0, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
e9eee333 8386 TEST_f_f (expm1, max_value, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
74c57478
JM		 8387 TEST_f_f (expm1, -max_value, -1),
8388 END_DATA (expm1)
8389 };
2550dfe9 8390
8847214f
UD		 8391static void
8392expm1_test (void)
8393{
e6d3c4a7
AJ		 8394 errno = 0;
8395 FUNC(expm1) (0);
8396 if (errno == ENOSYS)
8397 /* Function not implemented. */
8398 return;
8399
8847214f 8400 START (expm1);
74c57478
JM		 8401 RUN_TEST_LOOP_f_f (expm1, expm1_test_data, );
8402 END (expm1);
8403}
8847214f 8404
495fd99f 8405
74c57478
JM		 8406static const struct test_f_f_data fabs_test_data[] =
8407 {
8408 START_DATA (fabs),
8409 TEST_f_f (fabs, 0, 0),
8410 TEST_f_f (fabs, minus_zero, 0),
bbc5d74d 8411
74c57478
JM		 8412 TEST_f_f (fabs, plus_infty, plus_infty),
8413 TEST_f_f (fabs, minus_infty, plus_infty),
8414 TEST_f_f (fabs, qnan_value, qnan_value),
8847214f 8415
74c57478
JM		 8416 TEST_f_f (fabs, 38.0, 38.0),
8417 TEST_f_f (fabs, -M_El, M_El),
8418 END_DATA (fabs)
8419 };
2550dfe9 8420
8847214f
UD		 8421static void
8422fabs_test (void)
8423{
8424 START (fabs);
74c57478 8425 RUN_TEST_LOOP_f_f (fabs, fabs_test_data, );
8847214f
UD		 8426 END (fabs);
8427}
8428
2550dfe9 8429
601a3a5f
JM		 8430static const struct test_ff_f_data fdim_test_data[] =
8431 {
8432 START_DATA (fdim),
8433 TEST_ff_f (fdim, 0, 0, 0),
8434 TEST_ff_f (fdim, 9, 0, 9),
8435 TEST_ff_f (fdim, 0, 9, 0),
8436 TEST_ff_f (fdim, -9, 0, 0),
8437 TEST_ff_f (fdim, 0, -9, 9),
8438
8439 TEST_ff_f (fdim, plus_infty, 9, plus_infty),
8440 TEST_ff_f (fdim, plus_infty, -9, plus_infty),
8441 TEST_ff_f (fdim, minus_infty, 9, 0),
8442 TEST_ff_f (fdim, minus_infty, -9, 0),
8443 TEST_ff_f (fdim, 9, minus_infty, plus_infty),
8444 TEST_ff_f (fdim, -9, minus_infty, plus_infty),
8445 TEST_ff_f (fdim, 9, plus_infty, 0),
8446 TEST_ff_f (fdim, -9, plus_infty, 0),
8447
8448 TEST_ff_f (fdim, 0, qnan_value, qnan_value),
8449 TEST_ff_f (fdim, 9, qnan_value, qnan_value),
8450 TEST_ff_f (fdim, -9, qnan_value, qnan_value),
8451 TEST_ff_f (fdim, qnan_value, 9, qnan_value),
8452 TEST_ff_f (fdim, qnan_value, -9, qnan_value),
8453 TEST_ff_f (fdim, plus_infty, qnan_value, qnan_value),
8454 TEST_ff_f (fdim, minus_infty, qnan_value, qnan_value),
8455 TEST_ff_f (fdim, qnan_value, plus_infty, qnan_value),
8456 TEST_ff_f (fdim, qnan_value, minus_infty, qnan_value),
8457 TEST_ff_f (fdim, qnan_value, qnan_value, qnan_value),
8458
8459 TEST_ff_f (fdim, plus_infty, plus_infty, 0),
8460 END_DATA (fdim)
8461 };
8462
8847214f
UD		 8463static void
8464fdim_test (void)
8465{
8466 START (fdim);
601a3a5f 8467 RUN_TEST_LOOP_ff_f (fdim, fdim_test_data, );
8847214f
UD		 8468 END (fdim);
8469}
8470
2550dfe9 8471
7abeee12
JM		 8472static const struct test_f_i_data finite_test_data[] =
8473 {
8474 START_DATA (finite),
8475 TEST_f_b (finite, 0, 1),
8476 TEST_f_b (finite, minus_zero, 1),
8477 TEST_f_b (finite, 10, 1),
8478 TEST_f_b (finite, min_subnorm_value, 1),
8479 TEST_f_b (finite, plus_infty, 0),
8480 TEST_f_b (finite, minus_infty, 0),
8481 TEST_f_b (finite, qnan_value, 0),
8482 END_DATA (finite)
8483 };
8484
ef1bb361
JM		 8485static void
8486finite_test (void)
8487{
8488 START (finite);
7abeee12 8489 RUN_TEST_LOOP_f_b (finite, finite_test_data, );
ef1bb361
JM		 8490 END (finite);
8491}
8492
8493
74c57478
JM		 8494static const struct test_f_f_data floor_test_data[] =
8495 {
8496 START_DATA (floor),
8497 TEST_f_f (floor, 0.0, 0.0),
8498 TEST_f_f (floor, minus_zero, minus_zero),
8499 TEST_f_f (floor, plus_infty, plus_infty),
8500 TEST_f_f (floor, minus_infty, minus_infty),
8501 TEST_f_f (floor, qnan_value, qnan_value),
8502
8503 TEST_f_f (floor, M_PIl, 3.0),
8504 TEST_f_f (floor, -M_PIl, -4.0),
8505
8506 TEST_f_f (floor, 0.1, 0.0),
8507 TEST_f_f (floor, 0.25, 0.0),
8508 TEST_f_f (floor, 0.625, 0.0),
8509 TEST_f_f (floor, -0.1, -1.0),
8510 TEST_f_f (floor, -0.25, -1.0),
8511 TEST_f_f (floor, -0.625, -1.0),
f964490f
RM		 8512
8513#ifdef TEST_LDOUBLE
74c57478
JM		 8514 /* The result can only be represented in long double. */
8515 TEST_f_f (floor, 4503599627370495.5L, 4503599627370495.0L),
8516 TEST_f_f (floor, 4503599627370496.25L, 4503599627370496.0L),
8517 TEST_f_f (floor, 4503599627370496.5L, 4503599627370496.0L),
8518 TEST_f_f (floor, 4503599627370496.75L, 4503599627370496.0L),
8519 TEST_f_f (floor, 4503599627370497.5L, 4503599627370497.0L),
5c68d401 8520# if LDBL_MANT_DIG > 100
74c57478
JM		 8521 TEST_f_f (floor, 4503599627370494.5000000000001L, 4503599627370494.0L),
8522 TEST_f_f (floor, 4503599627370495.5000000000001L, 4503599627370495.0L),
8523 TEST_f_f (floor, 4503599627370496.5000000000001L, 4503599627370496.0L),
5c68d401 8524# endif
f964490f 8525
74c57478
JM		 8526 TEST_f_f (floor, -4503599627370495.5L, -4503599627370496.0L),
8527 TEST_f_f (floor, -4503599627370496.25L, -4503599627370497.0L),
8528 TEST_f_f (floor, -4503599627370496.5L, -4503599627370497.0L),
8529 TEST_f_f (floor, -4503599627370496.75L, -4503599627370497.0L),
8530 TEST_f_f (floor, -4503599627370497.5L, -4503599627370498.0L),
5c68d401 8531# if LDBL_MANT_DIG > 100
74c57478
JM		 8532 TEST_f_f (floor, -4503599627370494.5000000000001L, -4503599627370495.0L),
8533 TEST_f_f (floor, -4503599627370495.5000000000001L, -4503599627370496.0L),
8534 TEST_f_f (floor, -4503599627370496.5000000000001L, -4503599627370497.0L),
5c68d401 8535# endif
f964490f 8536
74c57478
JM		 8537 TEST_f_f (floor, 9007199254740991.5L, 9007199254740991.0L),
8538 TEST_f_f (floor, 9007199254740992.25L, 9007199254740992.0L),
8539 TEST_f_f (floor, 9007199254740992.5L, 9007199254740992.0L),
8540 TEST_f_f (floor, 9007199254740992.75L, 9007199254740992.0L),
8541 TEST_f_f (floor, 9007199254740993.5L, 9007199254740993.0L),
f964490f 8542
5c68d401 8543# if LDBL_MANT_DIG > 100
74c57478
JM		 8544 TEST_f_f (floor, 9007199254740991.0000000000001L, 9007199254740991.0L),
8545 TEST_f_f (floor, 9007199254740992.0000000000001L, 9007199254740992.0L),
8546 TEST_f_f (floor, 9007199254740993.0000000000001L, 9007199254740993.0L),
8547 TEST_f_f (floor, 9007199254740991.5000000000001L, 9007199254740991.0L),
8548 TEST_f_f (floor, 9007199254740992.5000000000001L, 9007199254740992.0L),
8549 TEST_f_f (floor, 9007199254740993.5000000000001L, 9007199254740993.0L),
5c68d401
RM		 8550# endif
8551
74c57478
JM		 8552 TEST_f_f (floor, -9007199254740991.5L, -9007199254740992.0L),
8553 TEST_f_f (floor, -9007199254740992.25L, -9007199254740993.0L),
8554 TEST_f_f (floor, -9007199254740992.5L, -9007199254740993.0L),
8555 TEST_f_f (floor, -9007199254740992.75L, -9007199254740993.0L),
8556 TEST_f_f (floor, -9007199254740993.5L, -9007199254740994.0L),
f964490f 8557
5c68d401 8558# if LDBL_MANT_DIG > 100
74c57478
JM		 8559 TEST_f_f (floor, -9007199254740991.0000000000001L, -9007199254740992.0L),
8560 TEST_f_f (floor, -9007199254740992.0000000000001L, -9007199254740993.0L),
8561 TEST_f_f (floor, -9007199254740993.0000000000001L, -9007199254740994.0L),
8562 TEST_f_f (floor, -9007199254740991.5000000000001L, -9007199254740992.0L),
8563 TEST_f_f (floor, -9007199254740992.5000000000001L, -9007199254740993.0L),
8564 TEST_f_f (floor, -9007199254740993.5000000000001L, -9007199254740994.0L),
5c68d401
RM		 8565# endif
8566
74c57478
JM		 8567 TEST_f_f (floor, 72057594037927935.5L, 72057594037927935.0L),
8568 TEST_f_f (floor, 72057594037927936.25L, 72057594037927936.0L),
8569 TEST_f_f (floor, 72057594037927936.5L, 72057594037927936.0L),
8570 TEST_f_f (floor, 72057594037927936.75L, 72057594037927936.0L),
8571 TEST_f_f (floor, 72057594037927937.5L, 72057594037927937.0L),
f964490f 8572
74c57478
JM		 8573 TEST_f_f (floor, -72057594037927935.5L, -72057594037927936.0L),
8574 TEST_f_f (floor, -72057594037927936.25L, -72057594037927937.0L),
8575 TEST_f_f (floor, -72057594037927936.5L, -72057594037927937.0L),
8576 TEST_f_f (floor, -72057594037927936.75L, -72057594037927937.0L),
8577 TEST_f_f (floor, -72057594037927937.5L, -72057594037927938.0L),
f964490f 8578
74c57478
JM		 8579 TEST_f_f (floor, 10141204801825835211973625643007.5L, 10141204801825835211973625643007.0L),
8580 TEST_f_f (floor, 10141204801825835211973625643008.25L, 10141204801825835211973625643008.0L),
8581 TEST_f_f (floor, 10141204801825835211973625643008.5L, 10141204801825835211973625643008.0L),
8582 TEST_f_f (floor, 10141204801825835211973625643008.75L, 10141204801825835211973625643008.0L),
8583 TEST_f_f (floor, 10141204801825835211973625643009.5L, 10141204801825835211973625643009.0L),
94e02fc4 8584
74c57478
JM		 8585 TEST_f_f (floor, 0xf.ffffffffffffff8p+47L, 0xf.fffffffffffep+47L),
8586 TEST_f_f (floor, -0x8.000000000000004p+48L, -0x8.000000000001p+48L),
f964490f 8587#endif
74c57478
JM		 8588 END_DATA (floor)
8589 };
f964490f 8590
74c57478
JM		 8591static void
8592floor_test (void)
8593{
8594 START (floor);
8595 RUN_TEST_LOOP_f_f (floor, floor_test_data, );
8847214f
UD		 8596 END (floor);
8597}
8598
2550dfe9 8599
4f184d30
JM		 8600static const struct test_fff_f_data fma_test_data[] =
8601 {
8602 START_DATA (fma),
8603 TEST_fff_f (fma, 1.0, 2.0, 3.0, 5.0),
8604 TEST_fff_f (fma, qnan_value, 2.0, 3.0, qnan_value),
8605 TEST_fff_f (fma, 1.0, qnan_value, 3.0, qnan_value),
8606 TEST_fff_f (fma, 1.0, 2.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8607 TEST_fff_f (fma, plus_infty, 0.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8608 TEST_fff_f (fma, minus_infty, 0.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8609 TEST_fff_f (fma, 0.0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8610 TEST_fff_f (fma, 0.0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8611 TEST_fff_f (fma, plus_infty, 0.0, 1.0, qnan_value, INVALID_EXCEPTION),
8612 TEST_fff_f (fma, minus_infty, 0.0, 1.0, qnan_value, INVALID_EXCEPTION),
8613 TEST_fff_f (fma, 0.0, plus_infty, 1.0, qnan_value, INVALID_EXCEPTION),
8614 TEST_fff_f (fma, 0.0, minus_infty, 1.0, qnan_value, INVALID_EXCEPTION),
8615
8616 TEST_fff_f (fma, plus_infty, plus_infty, minus_infty, qnan_value, INVALID_EXCEPTION),
8617 TEST_fff_f (fma, minus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8618 TEST_fff_f (fma, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8619 TEST_fff_f (fma, minus_infty, minus_infty, minus_infty, qnan_value, INVALID_EXCEPTION),
8620 TEST_fff_f (fma, plus_infty, 3.5L, minus_infty, qnan_value, INVALID_EXCEPTION),
8621 TEST_fff_f (fma, minus_infty, -7.5L, minus_infty, qnan_value, INVALID_EXCEPTION),
8622 TEST_fff_f (fma, -13.5L, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8623 TEST_fff_f (fma, minus_infty, 7.5L, plus_infty, qnan_value, INVALID_EXCEPTION),
8624
8625 TEST_fff_f (fma, 1.25L, 0.75L, 0.0625L, 1.0L),
8626
8627 TEST_fff_f (fma, -max_value, -max_value, minus_infty, minus_infty),
8628 TEST_fff_f (fma, max_value / 2, max_value / 2, minus_infty, minus_infty),
8629 TEST_fff_f (fma, -max_value, max_value, plus_infty, plus_infty),
8630 TEST_fff_f (fma, max_value / 2, -max_value / 4, plus_infty, plus_infty),
8631 TEST_fff_f (fma, plus_infty, 4, plus_infty, plus_infty),
8632 TEST_fff_f (fma, 2, minus_infty, minus_infty, minus_infty),
8633 TEST_fff_f (fma, minus_infty, minus_infty, plus_infty, plus_infty),
8634 TEST_fff_f (fma, plus_infty, minus_infty, minus_infty, minus_infty),
8635
8636 TEST_fff_f (fma, plus_zero, plus_zero, plus_zero, plus_zero),
8637 TEST_fff_f (fma, plus_zero, plus_zero, minus_zero, plus_zero),
8638 TEST_fff_f (fma, plus_zero, minus_zero, plus_zero, plus_zero),
8639 TEST_fff_f (fma, plus_zero, minus_zero, minus_zero, minus_zero),
8640 TEST_fff_f (fma, minus_zero, plus_zero, plus_zero, plus_zero),
8641 TEST_fff_f (fma, minus_zero, plus_zero, minus_zero, minus_zero),
8642 TEST_fff_f (fma, minus_zero, minus_zero, plus_zero, plus_zero),
8643 TEST_fff_f (fma, minus_zero, minus_zero, minus_zero, plus_zero),
8644 TEST_fff_f (fma, 1.0, plus_zero, plus_zero, plus_zero),
8645 TEST_fff_f (fma, 1.0, plus_zero, minus_zero, plus_zero),
8646 TEST_fff_f (fma, 1.0, minus_zero, plus_zero, plus_zero),
8647 TEST_fff_f (fma, 1.0, minus_zero, minus_zero, minus_zero),
8648 TEST_fff_f (fma, -1.0, plus_zero, plus_zero, plus_zero),
8649 TEST_fff_f (fma, -1.0, plus_zero, minus_zero, minus_zero),
8650 TEST_fff_f (fma, -1.0, minus_zero, plus_zero, plus_zero),
8651 TEST_fff_f (fma, -1.0, minus_zero, minus_zero, plus_zero),
8652 TEST_fff_f (fma, plus_zero, 1.0, plus_zero, plus_zero),
8653 TEST_fff_f (fma, plus_zero, 1.0, minus_zero, plus_zero),
8654 TEST_fff_f (fma, plus_zero, -1.0, plus_zero, plus_zero),
8655 TEST_fff_f (fma, plus_zero, -1.0, minus_zero, minus_zero),
8656 TEST_fff_f (fma, minus_zero, 1.0, plus_zero, plus_zero),
8657 TEST_fff_f (fma, minus_zero, 1.0, minus_zero, minus_zero),
8658 TEST_fff_f (fma, minus_zero, -1.0, plus_zero, plus_zero),
8659 TEST_fff_f (fma, minus_zero, -1.0, minus_zero, plus_zero),
8660
8661 TEST_fff_f (fma, 1.0, 1.0, -1.0, plus_zero),
8662 TEST_fff_f (fma, 1.0, -1.0, 1.0, plus_zero),
8663 TEST_fff_f (fma, -1.0, 1.0, 1.0, plus_zero),
8664 TEST_fff_f (fma, -1.0, -1.0, -1.0, plus_zero),
8665
8666 TEST_fff_f (fma, min_value, min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8667 TEST_fff_f (fma, min_value, min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8668 TEST_fff_f (fma, min_value, -min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8669 TEST_fff_f (fma, min_value, -min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8670 TEST_fff_f (fma, -min_value, min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8671 TEST_fff_f (fma, -min_value, min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8672 TEST_fff_f (fma, -min_value, -min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8673 TEST_fff_f (fma, -min_value, -min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8674
8675 TEST_fff_f (fma, max_value, max_value, min_value, plus_infty, OVERFLOW_EXCEPTION),
8676 TEST_fff_f (fma, max_value, max_value, -min_value, plus_infty, OVERFLOW_EXCEPTION),
8677 TEST_fff_f (fma, max_value, -max_value, min_value, minus_infty, OVERFLOW_EXCEPTION),
8678 TEST_fff_f (fma, max_value, -max_value, -min_value, minus_infty, OVERFLOW_EXCEPTION),
8679 TEST_fff_f (fma, -max_value, max_value, min_value, minus_infty, OVERFLOW_EXCEPTION),
8680 TEST_fff_f (fma, -max_value, max_value, -min_value, minus_infty, OVERFLOW_EXCEPTION),
8681 TEST_fff_f (fma, -max_value, -max_value, min_value, plus_infty, OVERFLOW_EXCEPTION),
8682 TEST_fff_f (fma, -max_value, -max_value, -min_value, plus_infty, OVERFLOW_EXCEPTION),
a0c2940d 8683
5e908464 8684#if defined (TEST_FLOAT) && FLT_MANT_DIG == 24
4f184d30
JM		 8685 TEST_fff_f (fma, 0x1.7ff8p+13, 0x1.000002p+0, 0x1.ffffp-24, 0x1.7ff802p+13),
8686 TEST_fff_f (fma, 0x1.fffp+0, 0x1.00001p+0, -0x1.fffp+0, 0x1.fffp-20),
8687 TEST_fff_f (fma, 0x1.9abcdep+127, 0x0.9abcdep-126, -0x1.f08948p+0, 0x1.bb421p-25),
8688 TEST_fff_f (fma, 0x1.9abcdep+100, 0x0.9abcdep-126, -0x1.f08948p-27, 0x1.bb421p-52),
8689 TEST_fff_f (fma, 0x1.fffffep+127, 0x1.001p+0, -0x1.fffffep+127, 0x1.fffffep+115),
8690 TEST_fff_f (fma, -0x1.fffffep+127, 0x1.fffffep+0, 0x1.fffffep+127, -0x1.fffffap+127),
8691 TEST_fff_f (fma, 0x1.fffffep+127, 2.0, -0x1.fffffep+127, 0x1.fffffep+127),
8692 TEST_fff_f (fma, 0x1.4p-126, 0x1.000004p-1, 0x1p-128, 0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8693 TEST_fff_f (fma, -0x1.4p-126, 0x1.000004p-1, -0x1p-128, -0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8694 TEST_fff_f (fma, 0x1.fffff8p-126, 0x1.000002p-1, 0x1p-149, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8695 TEST_fff_f (fma, -0x1.fffff8p-126, 0x1.000002p-1, -0x1p-149, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8696 TEST_fff_f (fma, 0x1p-149, 0x1p-1, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION),
8697 TEST_fff_f (fma, -0x1p-149, 0x1p-1, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION),
8698 TEST_fff_f (fma, 0x1p-149, 0x1.1p-1, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION),
8699 TEST_fff_f (fma, -0x1p-149, 0x1.1p-1, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION),
8700 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p127, 0x1p127),
8701 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p127, 0x1p127),
8702 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p127, -0x1p127),
8703 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p127, -0x1p127),
8704 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-126, 0x1p-126),
8705 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-126, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8706 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-126, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8707 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-126, -0x1p-126),
8708 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x0.fffffep-126, 0x0.fffffep-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, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8711 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8712 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
8713 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
8714 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
8715 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
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, -0x0.fffp0, 0x0.fffp0, 0x0.ffep0, -0x1p-24),
8719 TEST_fff_f (fma, -0x0.fffp0, -0x0.fffp0, -0x0.ffep0, 0x1p-24),
8720 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p127, 0x1p127),
8721 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p127, 0x1p127),
8722 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p127, -0x1p127),
8723 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p127, -0x1p127),
8724 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p103, 0x1p103),
8725 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p103, 0x1p103),
8726 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p103, -0x1p103),
8727 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p103, -0x1p103),
5e908464
JJ		 8728#endif
8729#if defined (TEST_DOUBLE) && DBL_MANT_DIG == 53
4f184d30
JM		 8730 TEST_fff_f (fma, 0x1.7fp+13, 0x1.0000000000001p+0, 0x1.ffep-48, 0x1.7f00000000001p+13),
8731 TEST_fff_f (fma, 0x1.fffp+0, 0x1.0000000000001p+0, -0x1.fffp+0, 0x1.fffp-52),
8732 TEST_fff_f (fma, 0x1.0000002p+0, 0x1.ffffffcp-1, 0x1p-300, 1.0),
8733 TEST_fff_f (fma, 0x1.0000002p+0, 0x1.ffffffcp-1, -0x1p-300, 0x1.fffffffffffffp-1),
8734 TEST_fff_f (fma, 0x1.deadbeef2feedp+1023, 0x0.deadbeef2feedp-1022, -0x1.a05f8c01a4bfbp+1, 0x1.0989687bc9da4p-53),
8735 TEST_fff_f (fma, 0x1.deadbeef2feedp+900, 0x0.deadbeef2feedp-1022, -0x1.a05f8c01a4bfbp-122, 0x1.0989687bc9da4p-176),
8736 TEST_fff_f (fma, 0x1.fffffffffffffp+1023, 0x1.001p+0, -0x1.fffffffffffffp+1023, 0x1.fffffffffffffp+1011),
8737 TEST_fff_f (fma, -0x1.fffffffffffffp+1023, 0x1.fffffffffffffp+0, 0x1.fffffffffffffp+1023, -0x1.ffffffffffffdp+1023),
8738 TEST_fff_f (fma, 0x1.fffffffffffffp+1023, 2.0, -0x1.fffffffffffffp+1023, 0x1.fffffffffffffp+1023),
8739 TEST_fff_f (fma, 0x1.6a09e667f3bccp-538, 0x1.6a09e667f3bccp-538, 0.0, 0.0, UNDERFLOW_EXCEPTION),
8740 TEST_fff_f (fma, 0x1.deadbeef2feedp-495, 0x1.deadbeef2feedp-495, -0x1.bf86a5786a574p-989, 0x0.0000042625a1fp-1022, UNDERFLOW_EXCEPTION),
8741 TEST_fff_f (fma, 0x1.deadbeef2feedp-503, 0x1.deadbeef2feedp-503, -0x1.bf86a5786a574p-1005, 0x0.0000000004262p-1022, UNDERFLOW_EXCEPTION),
8742 TEST_fff_f (fma, 0x1p-537, 0x1p-538, 0x1p-1074, 0x0.0000000000002p-1022, UNDERFLOW_EXCEPTION),
8743 TEST_fff_f (fma, 0x1.7fffff8p-968, 0x1p-106, 0x0.000001p-1022, 0x0.0000010000001p-1022, UNDERFLOW_EXCEPTION),
8744 TEST_fff_f (fma, 0x1.4000004p-967, 0x1p-106, 0x0.000001p-1022, 0x0.0000010000003p-1022, UNDERFLOW_EXCEPTION),
8745 TEST_fff_f (fma, 0x1.4p-967, -0x1p-106, -0x0.000001p-1022, -0x0.0000010000002p-1022, UNDERFLOW_EXCEPTION),
8746 TEST_fff_f (fma, -0x1.19cab66d73e17p-959, 0x1.c7108a8c5ff51p-107, -0x0.80b0ad65d9b64p-1022, -0x0.80b0ad65d9d59p-1022, UNDERFLOW_EXCEPTION),
8747 TEST_fff_f (fma, -0x1.d2eaed6e8e9d3p-979, -0x1.4e066c62ac9ddp-63, -0x0.9245e6b003454p-1022, -0x0.9245c09c5fb5dp-1022, UNDERFLOW_EXCEPTION),
8748 TEST_fff_f (fma, 0x1.153d650bb9f06p-907, 0x1.2d01230d48407p-125, -0x0.b278d5acfc3cp-1022, -0x0.b22757123bbe9p-1022, UNDERFLOW_EXCEPTION),
8749 TEST_fff_f (fma, -0x1.fffffffffffffp-711, 0x1.fffffffffffffp-275, 0x1.fffffe00007ffp-983, 0x1.7ffffe00007ffp-983),
8750 TEST_fff_f (fma, 0x1.4p-1022, 0x1.0000000000002p-1, 0x1p-1024, 0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8751 TEST_fff_f (fma, -0x1.4p-1022, 0x1.0000000000002p-1, -0x1p-1024, -0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8752 TEST_fff_f (fma, 0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, 0x1p-1074, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8753 TEST_fff_f (fma, -0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, -0x1p-1074, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8754 TEST_fff_f (fma, 0x1p-1074, 0x1p-1, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION),
8755 TEST_fff_f (fma, -0x1p-1074, 0x1p-1, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION),
8756 TEST_fff_f (fma, 0x1p-1074, 0x1.1p-1, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION),
8757 TEST_fff_f (fma, -0x1p-1074, 0x1.1p-1, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION),
8758 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p1023, 0x1p1023),
8759 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p1023, 0x1p1023),
8760 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p1023, -0x1p1023),
8761 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p1023, -0x1p1023),
8762 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1022, 0x1p-1022),
8763 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1022, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8764 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1022, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8765 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1022, -0x1p-1022),
8766 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8767 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8768 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8769 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8770 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
8771 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
8772 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
8773 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
8774 TEST_fff_f (fma, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8775 TEST_fff_f (fma, 0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8776 TEST_fff_f (fma, -0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8777 TEST_fff_f (fma, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8778 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
8779 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
8780 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
8781 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
8782 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p970, 0x1p970),
8783 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p970, 0x1p970),
8784 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p970, -0x1p970),
8785 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p970, -0x1p970),
3e692e05
JJ		 8786#endif
8787#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 64
4f184d30
JM		 8788 TEST_fff_f (fma, -0x8.03fcp+3696L, 0xf.fffffffffffffffp-6140L, 0x8.3ffffffffffffffp-2450L, -0x8.01ecp-2440L),
8789 TEST_fff_f (fma, 0x9.fcp+2033L, -0x8.000e1f000ff800fp-3613L, -0xf.fffffffffffc0ffp-1579L, -0xd.fc119fb093ed092p-1577L),
8790 TEST_fff_f (fma, 0xc.7fc000003ffffffp-1194L, 0x8.1e0003fffffffffp+15327L, -0x8.fffep+14072L, 0xc.ae9f164020effffp+14136L),
8791 TEST_fff_f (fma, -0x8.0001fc000000003p+1798L, 0xcp-2230L, 0x8.f7e000000000007p-468L, -0xc.0002f9ffee10404p-429L),
8792 TEST_fff_f (fma, 0xc.0000000000007ffp+10130L, -0x8.000000000000001p+4430L, 0xc.07000000001ffffp+14513L, -0xb.fffffffffffd7e4p+14563L),
8793 TEST_fff_f (fma, 0xb.ffffp-4777L, 0x8.000000fffffffffp-11612L, -0x0.3800fff8p-16385L, 0x5.c7fe80c7ffeffffp-16385L, UNDERFLOW_EXCEPTION),
8794 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000004p-1L, 0x1p-16384L, 0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8795 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000004p-1L, -0x1p-16384L, -0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8796 TEST_fff_f (fma, 0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, 0x1p-16445L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8797 TEST_fff_f (fma, -0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, -0x1p-16445L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8798 TEST_fff_f (fma, 0x1p-16445L, 0x1p-1L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
8799 TEST_fff_f (fma, -0x1p-16445L, 0x1p-1L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8800 TEST_fff_f (fma, 0x1p-16445L, 0x1.1p-1L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
8801 TEST_fff_f (fma, -0x1p-16445L, 0x1.1p-1L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8802 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p16383L, 0x1p16383L),
8803 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p16383L, 0x1p16383L),
8804 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p16383L, -0x1p16383L),
8805 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p16383L, -0x1p16383L),
8806 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16382L, 0x1p-16382L),
8807 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8808 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8809 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16382L, -0x1p-16382L),
8810 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8811 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8812 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8813 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8814 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
8815 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
8816 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
8817 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
8818 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
8819 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
8820 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
8821 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
8822 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
8823 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
8824 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
8825 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
8826 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
8827 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
8828 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
8829 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
9ff8d36f 8830#endif
7c08a05c 8831#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 113
4f184d30
JM		 8832 TEST_fff_f (fma, 0x1.bb2de33e02ccbbfa6e245a7c1f71p-2584L, -0x1.6b500daf0580d987f1bc0cadfcddp-13777L, 0x1.613cd91d9fed34b33820e5ab9d8dp-16378L, -0x1.3a79fb50eb9ce887cffa0f09bd9fp-16360L),
8833 TEST_fff_f (fma, -0x1.f949b880cacb0f0c61540105321dp-5954L, -0x1.3876cec84b4140f3bd6198731b7ep-10525L, -0x0.a5dc1c6cfbc498c54fb0b504bf19p-16382L, -0x0.a5dc1c6cfbc498c54fb0b5038abbp-16382L, UNDERFLOW_EXCEPTION),
8834 TEST_fff_f (fma, -0x1.0000fffffffffp-16221L, 0x1.0000001fffff8007fep-239L, 0x0.ff87ffffffffffffe000003fffffp-16382L, 0x0.ff87ffffffffffffdffc003bff7fp-16382L, UNDERFLOW_EXCEPTION),
8835 TEST_fff_f (fma, -0x1.ac79c9376ef447f3827c9e9de008p-2228L, -0x1.5ba830022b6139e21fbe7270cad8p-6314L, 0x1.e8282b6a26bb6a9daf5c8e73e9f9p-8616L, 0x1.22f14a0253878a730cd1aee373adp-8541L),
8836 TEST_fff_f (fma, -0x1.c69749ec574caaa2ab8e97ddb9f3p+2652L, 0x1.f34235ff9d095449c29b4831b62dp+3311L, 0x1.fbe4302df23354dbd0c4d3cfe606p+5879L, -0x1.bb473bfdfb7a6e18886ce6e57eafp+5964L),
8837 TEST_fff_f (fma, -0x1.ca8835fc6ecfb5398625fc891be5p-1686L, 0x1.621e1972bbe2180e5be9dd7d8df5p-7671L, -0x1.7d2d21b73b52cf20dec2a83902a4p-9395L, -0x1.3d2322191c9c88bc68a62ab8042cp-9356L),
8838 TEST_fff_f (fma, -0x1.55cff679ec49c2541fab41fc843ep-11819L, 0x1.e60e9f464f9e8df0509647c7c971p+12325L, 0x1.eaa2a7649d765c2f564f7a5beca7p+454L, -0x1.447e29fa7e406a285f4e350fcf86p+507L),
8839 TEST_fff_f (fma, 0x1.f0e7b1454908576f2537d863cf9bp+11432L, 0x1.cdce52f09d4ca76e68706f34b5d5p-1417L, -0x1.2e986187c70f146235ea2066e486p+9979L, 0x1.c030dad3cc5643f3dd0f5619f661p+10016L),
8840 TEST_fff_f (fma, 0x1.f102f7da4a57a3a4aab620e29452p-3098L, -0x1.cc06a4ff40248f9e2dcc4b6afd84p-11727L, 0x1.d512a11126b5ac8ed8973b8580c8p-14849L, -0x1.be8f1cf737ab4d1c31c54f5ec23bp-14824L),
8841 TEST_fff_f (fma, -0x1.fc47ac7434b993cd8dcb2b431f25p-3816L, 0x1.fbc9750da8468852d84558e1db6dp-5773L, -0x1.00a98abf783f75c40fe5b7a37d86p-9607L, -0x1.f81917b166f45e763cfcc057e2adp-9588L),
8842 TEST_fff_f (fma, 0x1.00000000000007ffffffffffffffp-9045L, -0x1.ffffffffffff80000001ffffffffp+4773L, -0x1.f8p-4316L, -0x1.00000000000f88000000fffffdffp-4271L),
8843 TEST_fff_f (fma, 0x1.4e922764c90701d4a2f21d01893dp-8683L, -0x1.955a12e2d7c9447c27fa022fc865p+212L, -0x1.e9634462eaef96528b90b6944578p-8521L, -0x1.08e1783184a371943d3598e10865p-8470L),
8844 TEST_fff_f (fma, 0x1.801181509c03bdbef10d6165588cp-15131L, 0x1.ad86f8e57d3d40bfa8007780af63p-368L, -0x1.6e9df0dab1c9f1d7a6043c390741p-15507L, 0x1.417c9b2b15e2ad57dc9e0e920844p-15498L),
8845 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, 0x1p-16384L, 0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
8846 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, -0x1p-16384L, -0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
8847 TEST_fff_f (fma, 0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, 0x1p-16494L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8848 TEST_fff_f (fma, -0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, -0x1p-16494L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8849 TEST_fff_f (fma, 0x1p-16494L, 0x1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
8850 TEST_fff_f (fma, -0x1p-16494L, 0x1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8851 TEST_fff_f (fma, 0x1p-16494L, 0x1.1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
8852 TEST_fff_f (fma, -0x1p-16494L, 0x1.1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8853 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p16383L, 0x1p16383L),
8854 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p16383L, 0x1p16383L),
8855 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p16383L, -0x1p16383L),
8856 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p16383L, -0x1p16383L),
8857 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16382L, 0x1p-16382L),
8858 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8859 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8860 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16382L, -0x1p-16382L),
8861 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8862 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8863 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8864 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8865 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
8866 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
8867 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
8868 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
8869 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
8870 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
8871 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
8872 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
8873 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
8874 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
8875 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
8876 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
8877 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
8878 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
8879 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
8880 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
8881#endif
8882 END_DATA (fma)
8883 };
8847214f 8884
8ec5b013 8885static void
4f184d30 8886fma_test (void)
8ec5b013 8887{
4f184d30
JM		 8888 START (fma);
8889 RUN_TEST_LOOP_fff_f (fma, fma_test_data, );
8890 END (fma);
8891}
8ec5b013 8892
8ec5b013 8893
4f184d30
JM		 8894static const struct test_fff_f_data fma_towardzero_test_data[] =
8895 {
8896 START_DATA (fma_towardzero),
8897 TEST_fff_f (fma, plus_zero, plus_zero, plus_zero, plus_zero),
8898 TEST_fff_f (fma, plus_zero, plus_zero, minus_zero, plus_zero),
8899 TEST_fff_f (fma, plus_zero, minus_zero, plus_zero, plus_zero),
8900 TEST_fff_f (fma, plus_zero, minus_zero, minus_zero, minus_zero),
8901 TEST_fff_f (fma, minus_zero, plus_zero, plus_zero, plus_zero),
8902 TEST_fff_f (fma, minus_zero, plus_zero, minus_zero, minus_zero),
8903 TEST_fff_f (fma, minus_zero, minus_zero, plus_zero, plus_zero),
8904 TEST_fff_f (fma, minus_zero, minus_zero, minus_zero, plus_zero),
8905 TEST_fff_f (fma, 1.0, plus_zero, plus_zero, plus_zero),
8906 TEST_fff_f (fma, 1.0, plus_zero, minus_zero, plus_zero),
8907 TEST_fff_f (fma, 1.0, minus_zero, plus_zero, plus_zero),
8908 TEST_fff_f (fma, 1.0, minus_zero, minus_zero, minus_zero),
8909 TEST_fff_f (fma, -1.0, plus_zero, plus_zero, plus_zero),
8910 TEST_fff_f (fma, -1.0, plus_zero, minus_zero, minus_zero),
8911 TEST_fff_f (fma, -1.0, minus_zero, plus_zero, plus_zero),
8912 TEST_fff_f (fma, -1.0, minus_zero, minus_zero, plus_zero),
8913 TEST_fff_f (fma, plus_zero, 1.0, plus_zero, plus_zero),
8914 TEST_fff_f (fma, plus_zero, 1.0, minus_zero, plus_zero),
8915 TEST_fff_f (fma, plus_zero, -1.0, plus_zero, plus_zero),
8916 TEST_fff_f (fma, plus_zero, -1.0, minus_zero, minus_zero),
8917 TEST_fff_f (fma, minus_zero, 1.0, plus_zero, plus_zero),
8918 TEST_fff_f (fma, minus_zero, 1.0, minus_zero, minus_zero),
8919 TEST_fff_f (fma, minus_zero, -1.0, plus_zero, plus_zero),
8920 TEST_fff_f (fma, minus_zero, -1.0, minus_zero, plus_zero),
8921
8922 TEST_fff_f (fma, 1.0, 1.0, -1.0, plus_zero),
8923 TEST_fff_f (fma, 1.0, -1.0, 1.0, plus_zero),
8924 TEST_fff_f (fma, -1.0, 1.0, 1.0, plus_zero),
8925 TEST_fff_f (fma, -1.0, -1.0, -1.0, plus_zero),
8926
8927 TEST_fff_f (fma, min_value, min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8928 TEST_fff_f (fma, min_value, min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8929 TEST_fff_f (fma, min_value, -min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8930 TEST_fff_f (fma, min_value, -min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8931 TEST_fff_f (fma, -min_value, min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8932 TEST_fff_f (fma, -min_value, min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8933 TEST_fff_f (fma, -min_value, -min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8934 TEST_fff_f (fma, -min_value, -min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8627a232 8935
7184dcdf 8936#if !(defined TEST_LDOUBLE && LDBL_MANT_DIG == 106) /* Bug 13304. */
4f184d30
JM		 8937 TEST_fff_f (fma, max_value, max_value, min_value, max_value, OVERFLOW_EXCEPTION),
8938 TEST_fff_f (fma, max_value, max_value, -min_value, max_value, OVERFLOW_EXCEPTION),
8939 TEST_fff_f (fma, max_value, -max_value, min_value, -max_value, OVERFLOW_EXCEPTION),
8940 TEST_fff_f (fma, max_value, -max_value, -min_value, -max_value, OVERFLOW_EXCEPTION),
8941 TEST_fff_f (fma, -max_value, max_value, min_value, -max_value, OVERFLOW_EXCEPTION),
8942 TEST_fff_f (fma, -max_value, max_value, -min_value, -max_value, OVERFLOW_EXCEPTION),
8943 TEST_fff_f (fma, -max_value, -max_value, min_value, max_value, OVERFLOW_EXCEPTION),
8944 TEST_fff_f (fma, -max_value, -max_value, -min_value, max_value, OVERFLOW_EXCEPTION),
7184dcdf 8945#endif
a0c2940d 8946
8627a232 8947#if defined (TEST_FLOAT) && FLT_MANT_DIG == 24
4f184d30
JM		 8948 TEST_fff_f (fma, 0x1.4p-126, 0x1.000004p-1, 0x1p-128, 0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8949 TEST_fff_f (fma, -0x1.4p-126, 0x1.000004p-1, -0x1p-128, -0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8950 TEST_fff_f (fma, 0x1.fffff8p-126, 0x1.000002p-1, 0x1p-149, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8951 TEST_fff_f (fma, -0x1.fffff8p-126, 0x1.000002p-1, -0x1p-149, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8952 TEST_fff_f (fma, 0x1p-149, 0x1p-1, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8953 TEST_fff_f (fma, -0x1p-149, 0x1p-1, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8954 TEST_fff_f (fma, 0x1p-149, 0x1.1p-1, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8955 TEST_fff_f (fma, -0x1p-149, 0x1.1p-1, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8956 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p127, 0x1p127),
8957 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p127, 0x0.ffffffp127),
8958 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p127, -0x0.ffffffp127),
8959 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p127, -0x1p127),
8960 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-126, 0x1p-126),
8961 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8962 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8963 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-126, -0x1p-126),
8964 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8965 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x0.fffffep-126, 0x0.fffffcp-126, UNDERFLOW_EXCEPTION),
8966 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x0.fffffep-126, -0x0.fffffcp-126, UNDERFLOW_EXCEPTION),
8967 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8968 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
8969 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-149, plus_zero, UNDERFLOW_EXCEPTION),
8970 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-149, minus_zero, UNDERFLOW_EXCEPTION),
8971 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
8972 TEST_fff_f (fma, 0x0.fffp0, 0x0.fffp0, -0x0.ffep0, 0x1p-24),
8973 TEST_fff_f (fma, 0x0.fffp0, -0x0.fffp0, 0x0.ffep0, -0x1p-24),
8974 TEST_fff_f (fma, -0x0.fffp0, 0x0.fffp0, 0x0.ffep0, -0x1p-24),
8975 TEST_fff_f (fma, -0x0.fffp0, -0x0.fffp0, -0x0.ffep0, 0x1p-24),
8976 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p127, 0x1p127),
8977 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p127, 0x0.ffffffp127),
8978 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p127, -0x0.ffffffp127),
8979 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p127, -0x1p127),
8980 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p103, 0x1p103),
8981 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p103, 0x0.ffffffp103),
8982 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p103, -0x0.ffffffp103),
8983 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p103, -0x1p103),
8627a232
JM		 8984#endif
8985#if defined (TEST_DOUBLE) && DBL_MANT_DIG == 53
4f184d30
JM		 8986 TEST_fff_f (fma, 0x1.4p-1022, 0x1.0000000000002p-1, 0x1p-1024, 0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8987 TEST_fff_f (fma, -0x1.4p-1022, 0x1.0000000000002p-1, -0x1p-1024, -0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8988 TEST_fff_f (fma, 0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, 0x1p-1074, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8989 TEST_fff_f (fma, -0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, -0x1p-1074, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8990 TEST_fff_f (fma, 0x1p-1074, 0x1p-1, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8991 TEST_fff_f (fma, -0x1p-1074, 0x1p-1, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8992 TEST_fff_f (fma, 0x1p-1074, 0x1.1p-1, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8993 TEST_fff_f (fma, -0x1p-1074, 0x1.1p-1, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8994 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p1023, 0x1p1023),
8995 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p1023, 0x0.fffffffffffff8p1023),
8996 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p1023, -0x0.fffffffffffff8p1023),
8997 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p1023, -0x1p1023),
8998 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1022, 0x1p-1022),
8999 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9000 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9001 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1022, -0x1p-1022),
9002 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9003 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.ffffffffffffep-1022, UNDERFLOW_EXCEPTION),
9004 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.ffffffffffffep-1022, UNDERFLOW_EXCEPTION),
9005 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9006 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
9007 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1074, plus_zero, UNDERFLOW_EXCEPTION),
9008 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1074, minus_zero, UNDERFLOW_EXCEPTION),
9009 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
9010 TEST_fff_f (fma, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
9011 TEST_fff_f (fma, 0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
9012 TEST_fff_f (fma, -0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
9013 TEST_fff_f (fma, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
9014 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
9015 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p1023, 0x0.fffffffffffff8p1023),
9016 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p1023, -0x0.fffffffffffff8p1023),
9017 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
9018 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p970, 0x1p970),
9019 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p970, 0x0.fffffffffffff8p970),
9020 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p970, -0x0.fffffffffffff8p970),
9021 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p970, -0x1p970),
8627a232
JM		 9022#endif
9023#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 64
4f184d30
JM		 9024 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000004p-1L, 0x1p-16384L, 0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
9025 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000004p-1L, -0x1p-16384L, -0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
9026 TEST_fff_f (fma, 0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9027 TEST_fff_f (fma, -0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9028 TEST_fff_f (fma, 0x1p-16445L, 0x1p-1L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9029 TEST_fff_f (fma, -0x1p-16445L, 0x1p-1L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9030 TEST_fff_f (fma, 0x1p-16445L, 0x1.1p-1L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9031 TEST_fff_f (fma, -0x1p-16445L, 0x1.1p-1L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9032 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p16383L, 0x1p16383L),
9033 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p16383L, 0x0.ffffffffffffffffp16383L),
9034 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p16383L, -0x0.ffffffffffffffffp16383L),
9035 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p16383L, -0x1p16383L),
9036 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16382L, 0x1p-16382L),
9037 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9038 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9039 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16382L, -0x1p-16382L),
9040 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9041 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffcp-16382L, UNDERFLOW_EXCEPTION),
9042 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffcp-16382L, UNDERFLOW_EXCEPTION),
9043 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9044 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
9045 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16445L, plus_zero, UNDERFLOW_EXCEPTION),
9046 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16445L, minus_zero, UNDERFLOW_EXCEPTION),
9047 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
9048 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9049 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
9050 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
9051 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9052 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
9053 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16383L, 0x0.ffffffffffffffffp16383L),
9054 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16383L, -0x0.ffffffffffffffffp16383L),
9055 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
9056 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
9057 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16319L, 0x0.ffffffffffffffffp16319L),
9058 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16319L, -0x0.ffffffffffffffffp16319L),
9059 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
8627a232
JM		 9060#endif
9061#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 113
4f184d30
JM		 9062 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, 0x1p-16384L, 0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
9063 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, -0x1p-16384L, -0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
9064 TEST_fff_f (fma, 0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9065 TEST_fff_f (fma, -0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9066 TEST_fff_f (fma, 0x1p-16494L, 0x1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9067 TEST_fff_f (fma, -0x1p-16494L, 0x1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9068 TEST_fff_f (fma, 0x1p-16494L, 0x1.1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9069 TEST_fff_f (fma, -0x1p-16494L, 0x1.1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9070 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p16383L, 0x1p16383L),
9071 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p16383L, 0x0.ffffffffffffffffffffffffffff8p16383L),
9072 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p16383L, -0x0.ffffffffffffffffffffffffffff8p16383L),
9073 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p16383L, -0x1p16383L),
9074 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16382L, 0x1p-16382L),
9075 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9076 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9077 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16382L, -0x1p-16382L),
9078 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9079 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.fffffffffffffffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9080 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.fffffffffffffffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9081 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9082 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
9083 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16494L, plus_zero, UNDERFLOW_EXCEPTION),
9084 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16494L, minus_zero, UNDERFLOW_EXCEPTION),
9085 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
9086 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9087 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9088 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9089 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9090 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
9091 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x0.ffffffffffffffffffffffffffff8p16383L),
9092 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x0.ffffffffffffffffffffffffffff8p16383L),
9093 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
9094 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
9095 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x0.ffffffffffffffffffffffffffff8p16319L),
9096 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x0.ffffffffffffffffffffffffffff8p16319L),
9097 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
9098#endif
9099 END_DATA (fma_towardzero)
9100 };
8ec5b013
JM		 9101
9102static void
4f184d30 9103fma_test_towardzero (void)
8ec5b013 9104{
4f184d30
JM		 9105 START (fma_towardzero);
9106 RUN_TEST_LOOP_fff_f (fma, fma_towardzero_test_data, FE_TOWARDZERO);
9107 END (fma_towardzero);
9108}
8ec5b013 9109
8ec5b013 9110
4f184d30
JM		 9111static const struct test_fff_f_data fma_downward_test_data[] =
9112 {
9113 START_DATA (fma_downward),
9114 TEST_fff_f (fma, plus_zero, plus_zero, plus_zero, plus_zero),
9115 TEST_fff_f (fma, plus_zero, plus_zero, minus_zero, minus_zero),
9116 TEST_fff_f (fma, plus_zero, minus_zero, plus_zero, minus_zero),
9117 TEST_fff_f (fma, plus_zero, minus_zero, minus_zero, minus_zero),
9118 TEST_fff_f (fma, minus_zero, plus_zero, plus_zero, minus_zero),
9119 TEST_fff_f (fma, minus_zero, plus_zero, minus_zero, minus_zero),
9120 TEST_fff_f (fma, minus_zero, minus_zero, plus_zero, plus_zero),
9121 TEST_fff_f (fma, minus_zero, minus_zero, minus_zero, minus_zero),
9122 TEST_fff_f (fma, 1.0, plus_zero, plus_zero, plus_zero),
9123 TEST_fff_f (fma, 1.0, plus_zero, minus_zero, minus_zero),
9124 TEST_fff_f (fma, 1.0, minus_zero, plus_zero, minus_zero),
9125 TEST_fff_f (fma, 1.0, minus_zero, minus_zero, minus_zero),
9126 TEST_fff_f (fma, -1.0, plus_zero, plus_zero, minus_zero),
9127 TEST_fff_f (fma, -1.0, plus_zero, minus_zero, minus_zero),
9128 TEST_fff_f (fma, -1.0, minus_zero, plus_zero, plus_zero),
9129 TEST_fff_f (fma, -1.0, minus_zero, minus_zero, minus_zero),
9130 TEST_fff_f (fma, plus_zero, 1.0, plus_zero, plus_zero),
9131 TEST_fff_f (fma, plus_zero, 1.0, minus_zero, minus_zero),
9132 TEST_fff_f (fma, plus_zero, -1.0, plus_zero, minus_zero),
9133 TEST_fff_f (fma, plus_zero, -1.0, minus_zero, minus_zero),
9134 TEST_fff_f (fma, minus_zero, 1.0, plus_zero, minus_zero),
9135 TEST_fff_f (fma, minus_zero, 1.0, minus_zero, minus_zero),
9136 TEST_fff_f (fma, minus_zero, -1.0, plus_zero, plus_zero),
9137 TEST_fff_f (fma, minus_zero, -1.0, minus_zero, minus_zero),
9138
9139 TEST_fff_f (fma, 1.0, 1.0, -1.0, minus_zero),
9140 TEST_fff_f (fma, 1.0, -1.0, 1.0, minus_zero),
9141 TEST_fff_f (fma, -1.0, 1.0, 1.0, minus_zero),
9142 TEST_fff_f (fma, -1.0, -1.0, -1.0, minus_zero),
9143
9144 TEST_fff_f (fma, min_value, min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
9145 TEST_fff_f (fma, min_value, min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
9146 TEST_fff_f (fma, min_value, -min_value, plus_zero, -min_subnorm_value, UNDERFLOW_EXCEPTION),
9147 TEST_fff_f (fma, min_value, -min_value, minus_zero, -min_subnorm_value, UNDERFLOW_EXCEPTION),
9148 TEST_fff_f (fma, -min_value, min_value, plus_zero, -min_subnorm_value, UNDERFLOW_EXCEPTION),
9149 TEST_fff_f (fma, -min_value, min_value, minus_zero, -min_subnorm_value, UNDERFLOW_EXCEPTION),
9150 TEST_fff_f (fma, -min_value, -min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
9151 TEST_fff_f (fma, -min_value, -min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8627a232 9152
7184dcdf 9153#if !(defined TEST_LDOUBLE && LDBL_MANT_DIG == 106) /* Bug 13304. */
4f184d30
JM		 9154 TEST_fff_f (fma, max_value, max_value, min_value, max_value, OVERFLOW_EXCEPTION),
9155 TEST_fff_f (fma, max_value, max_value, -min_value, max_value, OVERFLOW_EXCEPTION),
9156 TEST_fff_f (fma, max_value, -max_value, min_value, minus_infty, OVERFLOW_EXCEPTION),
9157 TEST_fff_f (fma, max_value, -max_value, -min_value, minus_infty, OVERFLOW_EXCEPTION),
9158 TEST_fff_f (fma, -max_value, max_value, min_value, minus_infty, OVERFLOW_EXCEPTION),
9159 TEST_fff_f (fma, -max_value, max_value, -min_value, minus_infty, OVERFLOW_EXCEPTION),
9160 TEST_fff_f (fma, -max_value, -max_value, min_value, max_value, OVERFLOW_EXCEPTION),
9161 TEST_fff_f (fma, -max_value, -max_value, -min_value, max_value, OVERFLOW_EXCEPTION),
7184dcdf 9162#endif
a0c2940d 9163
8627a232 9164#if defined (TEST_FLOAT) && FLT_MANT_DIG == 24
4f184d30
JM		 9165 TEST_fff_f (fma, 0x1.4p-126, 0x1.000004p-1, 0x1p-128, 0x1.c00004p-127, UNDERFLOW_EXCEPTION),
9166 TEST_fff_f (fma, -0x1.4p-126, 0x1.000004p-1, -0x1p-128, -0x1.c00008p-127, UNDERFLOW_EXCEPTION),
9167 TEST_fff_f (fma, 0x1.fffff8p-126, 0x1.000002p-1, 0x1p-149, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9168 TEST_fff_f (fma, -0x1.fffff8p-126, 0x1.000002p-1, -0x1p-149, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9169 TEST_fff_f (fma, 0x1p-149, 0x1p-1, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9170 TEST_fff_f (fma, -0x1p-149, 0x1p-1, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION),
9171 TEST_fff_f (fma, 0x1p-149, 0x1.1p-1, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9172 TEST_fff_f (fma, -0x1p-149, 0x1.1p-1, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9173 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p127, 0x1p127),
9174 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p127, 0x0.ffffffp127),
9175 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p127, -0x1p127),
9176 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p127, -0x1.000002p127),
9177 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-126, 0x1p-126),
9178 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9179 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-126, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9180 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-126, -0x1.000002p-126),
9181 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9182 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x0.fffffep-126, 0x0.fffffcp-126, UNDERFLOW_EXCEPTION),
9183 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9184 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION),
9185 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
9186 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-149, plus_zero, UNDERFLOW_EXCEPTION),
9187 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
9188 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-149, -0x1p-148, UNDERFLOW_EXCEPTION),
9189 TEST_fff_f (fma, 0x0.fffp0, 0x0.fffp0, -0x0.ffep0, 0x1p-24),
9190 TEST_fff_f (fma, 0x0.fffp0, -0x0.fffp0, 0x0.ffep0, -0x1p-24),
9191 TEST_fff_f (fma, -0x0.fffp0, 0x0.fffp0, 0x0.ffep0, -0x1p-24),
9192 TEST_fff_f (fma, -0x0.fffp0, -0x0.fffp0, -0x0.ffep0, 0x1p-24),
9193 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p127, 0x1p127),
9194 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p127, 0x0.ffffffp127),
9195 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p127, -0x1p127),
9196 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p127, -0x1.000002p127),
9197 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p103, 0x1p103),
9198 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p103, 0x0.ffffffp103),
9199 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p103, -0x1p103),
9200 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p103, -0x1.000002p103),
8627a232
JM		 9201#endif
9202#if defined (TEST_DOUBLE) && DBL_MANT_DIG == 53
4f184d30
JM		 9203 TEST_fff_f (fma, 0x1.4p-1022, 0x1.0000000000002p-1, 0x1p-1024, 0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
9204 TEST_fff_f (fma, -0x1.4p-1022, 0x1.0000000000002p-1, -0x1p-1024, -0x1.c000000000004p-1023, UNDERFLOW_EXCEPTION),
9205 TEST_fff_f (fma, 0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, 0x1p-1074, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9206 TEST_fff_f (fma, -0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, -0x1p-1074, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9207 TEST_fff_f (fma, 0x1p-1074, 0x1p-1, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9208 TEST_fff_f (fma, -0x1p-1074, 0x1p-1, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION),
9209 TEST_fff_f (fma, 0x1p-1074, 0x1.1p-1, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9210 TEST_fff_f (fma, -0x1p-1074, 0x1.1p-1, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9211 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p1023, 0x1p1023),
9212 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p1023, 0x0.fffffffffffff8p1023),
9213 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p1023, -0x1p1023),
9214 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p1023, -0x1.0000000000001p1023),
9215 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1022, 0x1p-1022),
9216 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9217 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1022, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9218 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1022, -0x1.0000000000001p-1022),
9219 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9220 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.ffffffffffffep-1022, UNDERFLOW_EXCEPTION),
9221 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9222 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION),
9223 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
9224 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1074, plus_zero, UNDERFLOW_EXCEPTION),
9225 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
9226 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1074, -0x1p-1073, UNDERFLOW_EXCEPTION),
9227 TEST_fff_f (fma, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
9228 TEST_fff_f (fma, 0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
9229 TEST_fff_f (fma, -0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
9230 TEST_fff_f (fma, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
9231 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
9232 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p1023, 0x0.fffffffffffff8p1023),
9233 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
9234 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p1023, -0x1.0000000000001p1023),
9235 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p970, 0x1p970),
9236 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p970, 0x0.fffffffffffff8p970),
9237 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p970, -0x1p970),
9238 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p970, -0x1.0000000000001p970),
8627a232
JM		 9239#endif
9240#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 64
4f184d30
JM		 9241 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000004p-1L, 0x1p-16384L, 0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
9242 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000004p-1L, -0x1p-16384L, -0x1.c000000000000008p-16383L, UNDERFLOW_EXCEPTION),
9243 TEST_fff_f (fma, 0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9244 TEST_fff_f (fma, -0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, -0x1p-16445L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9245 TEST_fff_f (fma, 0x1p-16445L, 0x1p-1L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9246 TEST_fff_f (fma, -0x1p-16445L, 0x1p-1L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
9247 TEST_fff_f (fma, 0x1p-16445L, 0x1.1p-1L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9248 TEST_fff_f (fma, -0x1p-16445L, 0x1.1p-1L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9249 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p16383L, 0x1p16383L),
9250 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p16383L, 0x0.ffffffffffffffffp16383L),
9251 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p16383L, -0x1p16383L),
9252 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p16383L, -0x1.0000000000000002p16383L),
9253 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16382L, 0x1p-16382L),
9254 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9255 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9256 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16382L, -0x1.0000000000000002p-16382L),
9257 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9258 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffcp-16382L, UNDERFLOW_EXCEPTION),
9259 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9260 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
9261 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
9262 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16445L, plus_zero, UNDERFLOW_EXCEPTION),
9263 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
9264 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, -0x1p-16444L, UNDERFLOW_EXCEPTION),
9265 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9266 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
9267 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
9268 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9269 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
9270 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16383L, 0x0.ffffffffffffffffp16383L),
9271 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
9272 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16383L, -0x1.0000000000000002p16383L),
9273 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
9274 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16319L, 0x0.ffffffffffffffffp16319L),
9275 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
9276 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16319L, -0x1.0000000000000002p16319L),
8627a232
JM		 9277#endif
9278#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 113
4f184d30
JM		 9279 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, 0x1p-16384L, 0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
9280 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, -0x1p-16384L, -0x1.c000000000000000000000000004p-16383L, UNDERFLOW_EXCEPTION),
9281 TEST_fff_f (fma, 0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9282 TEST_fff_f (fma, -0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, -0x1p-16494L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9283 TEST_fff_f (fma, 0x1p-16494L, 0x1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9284 TEST_fff_f (fma, -0x1p-16494L, 0x1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
9285 TEST_fff_f (fma, 0x1p-16494L, 0x1.1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9286 TEST_fff_f (fma, -0x1p-16494L, 0x1.1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9287 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p16383L, 0x1p16383L),
9288 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p16383L, 0x0.ffffffffffffffffffffffffffff8p16383L),
9289 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p16383L, -0x1p16383L),
9290 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p16383L, -0x1.0000000000000000000000000001p16383L),
9291 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16382L, 0x1p-16382L),
9292 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9293 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9294 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16382L, -0x1.0000000000000000000000000001p-16382L),
9295 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9296 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.fffffffffffffffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9297 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9298 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
9299 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
9300 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16494L, plus_zero, UNDERFLOW_EXCEPTION),
9301 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
9302 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, -0x1p-16493L, UNDERFLOW_EXCEPTION),
9303 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9304 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9305 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9306 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9307 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
9308 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x0.ffffffffffffffffffffffffffff8p16383L),
9309 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
9310 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1.0000000000000000000000000001p16383L),
9311 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
9312 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x0.ffffffffffffffffffffffffffff8p16319L),
9313 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
9314 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1.0000000000000000000000000001p16319L),
9315#endif
9316 END_DATA (fma_downward)
9317 };
8ec5b013
JM		 9318
9319static void
4f184d30 9320fma_test_downward (void)
8ec5b013 9321{
4f184d30
JM		 9322 START (fma_downward);
9323 RUN_TEST_LOOP_fff_f (fma, fma_downward_test_data, FE_DOWNWARD);
9324 END (fma_downward);
9325}
8ec5b013 9326
8ec5b013 9327
4f184d30
JM		 9328static const struct test_fff_f_data fma_upward_test_data[] =
9329 {
9330 START_DATA (fma_upward),
9331 TEST_fff_f (fma, plus_zero, plus_zero, plus_zero, plus_zero),
9332 TEST_fff_f (fma, plus_zero, plus_zero, minus_zero, plus_zero),
9333 TEST_fff_f (fma, plus_zero, minus_zero, plus_zero, plus_zero),
9334 TEST_fff_f (fma, plus_zero, minus_zero, minus_zero, minus_zero),
9335 TEST_fff_f (fma, minus_zero, plus_zero, plus_zero, plus_zero),
9336 TEST_fff_f (fma, minus_zero, plus_zero, minus_zero, minus_zero),
9337 TEST_fff_f (fma, minus_zero, minus_zero, plus_zero, plus_zero),
9338 TEST_fff_f (fma, minus_zero, minus_zero, minus_zero, plus_zero),
9339 TEST_fff_f (fma, 1.0, plus_zero, plus_zero, plus_zero),
9340 TEST_fff_f (fma, 1.0, plus_zero, minus_zero, plus_zero),
9341 TEST_fff_f (fma, 1.0, minus_zero, plus_zero, plus_zero),
9342 TEST_fff_f (fma, 1.0, minus_zero, minus_zero, minus_zero),
9343 TEST_fff_f (fma, -1.0, plus_zero, plus_zero, plus_zero),
9344 TEST_fff_f (fma, -1.0, plus_zero, minus_zero, minus_zero),
9345 TEST_fff_f (fma, -1.0, minus_zero, plus_zero, plus_zero),
9346 TEST_fff_f (fma, -1.0, minus_zero, minus_zero, plus_zero),
9347 TEST_fff_f (fma, plus_zero, 1.0, plus_zero, plus_zero),
9348 TEST_fff_f (fma, plus_zero, 1.0, minus_zero, plus_zero),
9349 TEST_fff_f (fma, plus_zero, -1.0, plus_zero, plus_zero),
9350 TEST_fff_f (fma, plus_zero, -1.0, minus_zero, minus_zero),
9351 TEST_fff_f (fma, minus_zero, 1.0, plus_zero, plus_zero),
9352 TEST_fff_f (fma, minus_zero, 1.0, minus_zero, minus_zero),
9353 TEST_fff_f (fma, minus_zero, -1.0, plus_zero, plus_zero),
9354 TEST_fff_f (fma, minus_zero, -1.0, minus_zero, plus_zero),
9355
9356 TEST_fff_f (fma, 1.0, 1.0, -1.0, plus_zero),
9357 TEST_fff_f (fma, 1.0, -1.0, 1.0, plus_zero),
9358 TEST_fff_f (fma, -1.0, 1.0, 1.0, plus_zero),
9359 TEST_fff_f (fma, -1.0, -1.0, -1.0, plus_zero),
9360
9361 TEST_fff_f (fma, min_value, min_value, plus_zero, min_subnorm_value, UNDERFLOW_EXCEPTION),
9362 TEST_fff_f (fma, min_value, min_value, minus_zero, min_subnorm_value, UNDERFLOW_EXCEPTION),
9363 TEST_fff_f (fma, min_value, -min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
9364 TEST_fff_f (fma, min_value, -min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
9365 TEST_fff_f (fma, -min_value, min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
9366 TEST_fff_f (fma, -min_value, min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
9367 TEST_fff_f (fma, -min_value, -min_value, plus_zero, min_subnorm_value, UNDERFLOW_EXCEPTION),
9368 TEST_fff_f (fma, -min_value, -min_value, minus_zero, min_subnorm_value, UNDERFLOW_EXCEPTION),
8627a232 9369
7184dcdf 9370#if !(defined TEST_LDOUBLE && LDBL_MANT_DIG == 106) /* Bug 13304. */
4f184d30
JM		 9371 TEST_fff_f (fma, max_value, max_value, min_value, plus_infty, OVERFLOW_EXCEPTION),
9372 TEST_fff_f (fma, max_value, max_value, -min_value, plus_infty, OVERFLOW_EXCEPTION),
9373 TEST_fff_f (fma, max_value, -max_value, min_value, -max_value, OVERFLOW_EXCEPTION),
9374 TEST_fff_f (fma, max_value, -max_value, -min_value, -max_value, OVERFLOW_EXCEPTION),
9375 TEST_fff_f (fma, -max_value, max_value, min_value, -max_value, OVERFLOW_EXCEPTION),
9376 TEST_fff_f (fma, -max_value, max_value, -min_value, -max_value, OVERFLOW_EXCEPTION),
9377 TEST_fff_f (fma, -max_value, -max_value, min_value, plus_infty, OVERFLOW_EXCEPTION),
9378 TEST_fff_f (fma, -max_value, -max_value, -min_value, plus_infty, OVERFLOW_EXCEPTION),
7184dcdf 9379#endif
a0c2940d 9380
8627a232 9381#if defined (TEST_FLOAT) && FLT_MANT_DIG == 24
4f184d30
JM		 9382 TEST_fff_f (fma, 0x1.4p-126, 0x1.000004p-1, 0x1p-128, 0x1.c00008p-127, UNDERFLOW_EXCEPTION),
9383 TEST_fff_f (fma, -0x1.4p-126, 0x1.000004p-1, -0x1p-128, -0x1.c00004p-127, UNDERFLOW_EXCEPTION),
9384 TEST_fff_f (fma, 0x1.fffff8p-126, 0x1.000002p-1, 0x1p-149, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9385 TEST_fff_f (fma, -0x1.fffff8p-126, 0x1.000002p-1, -0x1p-149, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9386 TEST_fff_f (fma, 0x1p-149, 0x1p-1, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION),
9387 TEST_fff_f (fma, -0x1p-149, 0x1p-1, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9388 TEST_fff_f (fma, 0x1p-149, 0x1.1p-1, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9389 TEST_fff_f (fma, -0x1p-149, 0x1.1p-1, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9390 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p127, 0x1.000002p127),
9391 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p127, 0x1p127),
9392 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p127, -0x0.ffffffp127),
9393 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p127, -0x1p127),
9394 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-126, 0x1.000002p-126),
9395 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-126, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9396 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9397 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-126, -0x1p-126),
9398 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION),
9399 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9400 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x0.fffffep-126, -0x0.fffffcp-126, UNDERFLOW_EXCEPTION),
9401 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9402 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-149, 0x1p-148, UNDERFLOW_EXCEPTION),
9403 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
9404 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-149, minus_zero, UNDERFLOW_EXCEPTION),
9405 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
9406 TEST_fff_f (fma, 0x0.fffp0, 0x0.fffp0, -0x0.ffep0, 0x1p-24),
9407 TEST_fff_f (fma, 0x0.fffp0, -0x0.fffp0, 0x0.ffep0, -0x1p-24),
9408 TEST_fff_f (fma, -0x0.fffp0, 0x0.fffp0, 0x0.ffep0, -0x1p-24),
9409 TEST_fff_f (fma, -0x0.fffp0, -0x0.fffp0, -0x0.ffep0, 0x1p-24),
9410 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p127, 0x1.000002p127),
9411 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p127, 0x1p127),
9412 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p127, -0x0.ffffffp127),
9413 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p127, -0x1p127),
9414 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p103, 0x1.000002p103),
9415 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p103, 0x1p103),
9416 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p103, -0x0.ffffffp103),
9417 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p103, -0x1p103),
8627a232
JM		 9418#endif
9419#if defined (TEST_DOUBLE) && DBL_MANT_DIG == 53
4f184d30
JM		 9420 TEST_fff_f (fma, 0x1.4p-1022, 0x1.0000000000002p-1, 0x1p-1024, 0x1.c000000000004p-1023, UNDERFLOW_EXCEPTION),
9421 TEST_fff_f (fma, -0x1.4p-1022, 0x1.0000000000002p-1, -0x1p-1024, -0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
9422 TEST_fff_f (fma, 0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, 0x1p-1074, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9423 TEST_fff_f (fma, -0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, -0x1p-1074, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9424 TEST_fff_f (fma, 0x1p-1074, 0x1p-1, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION),
9425 TEST_fff_f (fma, -0x1p-1074, 0x1p-1, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9426 TEST_fff_f (fma, 0x1p-1074, 0x1.1p-1, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9427 TEST_fff_f (fma, -0x1p-1074, 0x1.1p-1, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9428 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p1023, 0x1.0000000000001p1023),
9429 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p1023, 0x1p1023),
9430 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p1023, -0x0.fffffffffffff8p1023),
9431 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p1023, -0x1p1023),
9432 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1022, 0x1.0000000000001p-1022),
9433 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1022, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9434 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9435 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1022, -0x1p-1022),
9436 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION),
9437 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9438 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.ffffffffffffep-1022, UNDERFLOW_EXCEPTION),
9439 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9440 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1074, 0x1p-1073, UNDERFLOW_EXCEPTION),
9441 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
9442 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1074, minus_zero, UNDERFLOW_EXCEPTION),
9443 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
9444 TEST_fff_f (fma, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
9445 TEST_fff_f (fma, 0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
9446 TEST_fff_f (fma, -0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
9447 TEST_fff_f (fma, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
9448 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p1023, 0x1.0000000000001p1023),
9449 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
9450 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p1023, -0x0.fffffffffffff8p1023),
9451 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
9452 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p970, 0x1.0000000000001p970),
9453 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p970, 0x1p970),
9454 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p970, -0x0.fffffffffffff8p970),
9455 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p970, -0x1p970),
8627a232
JM		 9456#endif
9457#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 64
4f184d30
JM		 9458 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000004p-1L, 0x1p-16384L, 0x1.c000000000000008p-16383L, UNDERFLOW_EXCEPTION),
9459 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000004p-1L, -0x1p-16384L, -0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
9460 TEST_fff_f (fma, 0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, 0x1p-16445L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9461 TEST_fff_f (fma, -0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9462 TEST_fff_f (fma, 0x1p-16445L, 0x1p-1L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
9463 TEST_fff_f (fma, -0x1p-16445L, 0x1p-1L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9464 TEST_fff_f (fma, 0x1p-16445L, 0x1.1p-1L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9465 TEST_fff_f (fma, -0x1p-16445L, 0x1.1p-1L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9466 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p16383L, 0x1.0000000000000002p16383L),
9467 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p16383L, 0x1p16383L),
9468 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p16383L, -0x0.ffffffffffffffffp16383L),
9469 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p16383L, -0x1p16383L),
9470 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16382L, 0x1.0000000000000002p-16382L),
9471 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9472 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9473 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16382L, -0x1p-16382L),
9474 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
9475 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9476 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffcp-16382L, UNDERFLOW_EXCEPTION),
9477 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9478 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, 0x1p-16444L, UNDERFLOW_EXCEPTION),
9479 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
9480 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16445L, minus_zero, UNDERFLOW_EXCEPTION),
9481 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
9482 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9483 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
9484 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
9485 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9486 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16383L, 0x1.0000000000000002p16383L),
9487 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
9488 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16383L, -0x0.ffffffffffffffffp16383L),
9489 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
9490 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16319L, 0x1.0000000000000002p16319L),
9491 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
9492 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16319L, -0x0.ffffffffffffffffp16319L),
9493 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
8627a232
JM		 9494#endif
9495#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 113
4f184d30
JM		 9496 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, 0x1p-16384L, 0x1.c000000000000000000000000004p-16383L, UNDERFLOW_EXCEPTION),
9497 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, -0x1p-16384L, -0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
9498 TEST_fff_f (fma, 0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, 0x1p-16494L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9499 TEST_fff_f (fma, -0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9500 TEST_fff_f (fma, 0x1p-16494L, 0x1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
9501 TEST_fff_f (fma, -0x1p-16494L, 0x1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9502 TEST_fff_f (fma, 0x1p-16494L, 0x1.1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9503 TEST_fff_f (fma, -0x1p-16494L, 0x1.1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9504 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p16383L, 0x1.0000000000000000000000000001p16383L),
9505 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p16383L, 0x1p16383L),
9506 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p16383L, -0x0.ffffffffffffffffffffffffffff8p16383L),
9507 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p16383L, -0x1p16383L),
9508 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16382L, 0x1.0000000000000000000000000001p-16382L),
9509 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9510 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9511 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16382L, -0x1p-16382L),
9512 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
9513 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9514 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.fffffffffffffffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9515 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9516 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, 0x1p-16493L, UNDERFLOW_EXCEPTION),
9517 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
9518 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16494L, minus_zero, UNDERFLOW_EXCEPTION),
9519 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
9520 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9521 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9522 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9523 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9524 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1.0000000000000000000000000001p16383L),
9525 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
9526 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x0.ffffffffffffffffffffffffffff8p16383L),
9527 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
9528 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1.0000000000000000000000000001p16319L),
9529 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
9530 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x0.ffffffffffffffffffffffffffff8p16319L),
9531 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
9532#endif
9533 END_DATA (fma_upward)
9534 };
8ec5b013 9535
4f184d30
JM		 9536static void
9537fma_test_upward (void)
9538{
9539 START (fma_upward);
9540 RUN_TEST_LOOP_fff_f (fma, fma_upward_test_data, FE_UPWARD);
8ec5b013
JM		 9541 END (fma_upward);
9542}
9543
9544
601a3a5f
JM		 9545static const struct test_ff_f_data fmax_test_data[] =
9546 {
9547 START_DATA (fmax),
9548 TEST_ff_f (fmax, 0, 0, 0),
9549 TEST_ff_f (fmax, minus_zero, minus_zero, minus_zero),
9550 TEST_ff_f (fmax, 9, 0, 9),
9551 TEST_ff_f (fmax, 0, 9, 9),
9552 TEST_ff_f (fmax, -9, 0, 0),
9553 TEST_ff_f (fmax, 0, -9, 0),
9554
9555 TEST_ff_f (fmax, plus_infty, 9, plus_infty),
9556 TEST_ff_f (fmax, 0, plus_infty, plus_infty),
9557 TEST_ff_f (fmax, -9, plus_infty, plus_infty),
9558 TEST_ff_f (fmax, plus_infty, -9, plus_infty),
9559
9560 TEST_ff_f (fmax, minus_infty, 9, 9),
9561 TEST_ff_f (fmax, minus_infty, -9, -9),
9562 TEST_ff_f (fmax, 9, minus_infty, 9),
9563 TEST_ff_f (fmax, -9, minus_infty, -9),
9564
9565 TEST_ff_f (fmax, 0, qnan_value, 0),
9566 TEST_ff_f (fmax, 9, qnan_value, 9),
9567 TEST_ff_f (fmax, -9, qnan_value, -9),
9568 TEST_ff_f (fmax, qnan_value, 0, 0),
9569 TEST_ff_f (fmax, qnan_value, 9, 9),
9570 TEST_ff_f (fmax, qnan_value, -9, -9),
9571 TEST_ff_f (fmax, plus_infty, qnan_value, plus_infty),
9572 TEST_ff_f (fmax, minus_infty, qnan_value, minus_infty),
9573 TEST_ff_f (fmax, qnan_value, plus_infty, plus_infty),
9574 TEST_ff_f (fmax, qnan_value, minus_infty, minus_infty),
9575 TEST_ff_f (fmax, qnan_value, qnan_value, qnan_value),
9576 END_DATA (fmax)
9577 };
9578
8847214f
UD		 9579static void
9580fmax_test (void)
9581{
9582 START (fmax);
601a3a5f 9583 RUN_TEST_LOOP_ff_f (fmax, fmax_test_data, );
8847214f
UD		 9584 END (fmax);
9585}
9586
9587
601a3a5f
JM		 9588static const struct test_ff_f_data fmin_test_data[] =
9589 {
9590 START_DATA (fmin),
9591 TEST_ff_f (fmin, 0, 0, 0),
9592 TEST_ff_f (fmin, minus_zero, minus_zero, minus_zero),
9593 TEST_ff_f (fmin, 9, 0, 0),
9594 TEST_ff_f (fmin, 0, 9, 0),
9595 TEST_ff_f (fmin, -9, 0, -9),
9596 TEST_ff_f (fmin, 0, -9, -9),
9597
9598 TEST_ff_f (fmin, plus_infty, 9, 9),
9599 TEST_ff_f (fmin, 9, plus_infty, 9),
9600 TEST_ff_f (fmin, plus_infty, -9, -9),
9601 TEST_ff_f (fmin, -9, plus_infty, -9),
9602 TEST_ff_f (fmin, minus_infty, 9, minus_infty),
9603 TEST_ff_f (fmin, minus_infty, -9, minus_infty),
9604 TEST_ff_f (fmin, 9, minus_infty, minus_infty),
9605 TEST_ff_f (fmin, -9, minus_infty, minus_infty),
9606
9607 TEST_ff_f (fmin, 0, qnan_value, 0),
9608 TEST_ff_f (fmin, 9, qnan_value, 9),
9609 TEST_ff_f (fmin, -9, qnan_value, -9),
9610 TEST_ff_f (fmin, qnan_value, 0, 0),
9611 TEST_ff_f (fmin, qnan_value, 9, 9),
9612 TEST_ff_f (fmin, qnan_value, -9, -9),
9613 TEST_ff_f (fmin, plus_infty, qnan_value, plus_infty),
9614 TEST_ff_f (fmin, minus_infty, qnan_value, minus_infty),
9615 TEST_ff_f (fmin, qnan_value, plus_infty, plus_infty),
9616 TEST_ff_f (fmin, qnan_value, minus_infty, minus_infty),
9617 TEST_ff_f (fmin, qnan_value, qnan_value, qnan_value),
9618 END_DATA (fmin)
9619 };
9620
8847214f
UD		 9621static void
9622fmin_test (void)
9623{
9624 START (fmin);
601a3a5f 9625 RUN_TEST_LOOP_ff_f (fmin, fmin_test_data, );
8847214f
UD		 9626 END (fmin);
9627}
9628
9629
601a3a5f
JM		 9630static const struct test_ff_f_data fmod_test_data[] =
9631 {
9632 START_DATA (fmod),
9633 /* fmod (+0, y) == +0 for y != 0. */
9634 TEST_ff_f (fmod, 0, 3, 0),
9635
9636 /* fmod (-0, y) == -0 for y != 0. */
9637 TEST_ff_f (fmod, minus_zero, 3, minus_zero),
9638
9639 /* fmod (+inf, y) == qNaN plus invalid exception. */
9640 TEST_ff_f (fmod, plus_infty, 3, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
9641 /* fmod (-inf, y) == qNaN plus invalid exception. */
9642 TEST_ff_f (fmod, minus_infty, 3, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
9643 /* fmod (x, +0) == qNaN plus invalid exception. */
9644 TEST_ff_f (fmod, 3, 0, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
9645 /* fmod (x, -0) == qNaN plus invalid exception. */
cbe8c4d3 9646 TEST_ff_f (fmod, 3, minus_zero, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
601a3a5f
JM		 9647
9648 /* fmod (x, +inf) == x for x not infinite. */
9649 TEST_ff_f (fmod, 3.0, plus_infty, 3.0),
9650 /* fmod (x, -inf) == x for x not infinite. */
9651 TEST_ff_f (fmod, 3.0, minus_infty, 3.0),
9652
9653 TEST_ff_f (fmod, qnan_value, qnan_value, qnan_value),
9654
9655 TEST_ff_f (fmod, 6.5, 2.25L, 2.0L),
9656 TEST_ff_f (fmod, -6.5, 2.25L, -2.0L),
9657 TEST_ff_f (fmod, 6.5, -2.25L, 2.0L),
9658 TEST_ff_f (fmod, -6.5, -2.25L, -2.0L),
9659
9660 TEST_ff_f (fmod, 0x0.fffffep-126L, 0x1p-149L, plus_zero),
9661#ifndef TEST_FLOAT
9662 TEST_ff_f (fmod, 0x0.fffffffffffffp-1022L, 0x1p-1074L, plus_zero),
9663#endif
9664#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
9665 TEST_ff_f (fmod, 0x0.fffffffffffffffep-16382L, 0x1p-16445L, plus_zero),
9666#endif
9667 END_DATA (fmod)
9668 };
9669
8847214f
UD		 9670static void
9671fmod_test (void)
9672{
aaca11d8 9673 errno = 0;
3c6cad26 9674 FUNC(fmod) (6.5, 2.3L);
aaca11d8
UD		 9675 if (errno == ENOSYS)
9676 /* Function not implemented. */
9677 return;
9678
8847214f 9679 START (fmod);
601a3a5f 9680 RUN_TEST_LOOP_ff_f (fmod, fmod_test_data, );
8847214f
UD		 9681 END (fmod);
9682}
9683
2550dfe9 9684
acbd839a
JM		 9685static const struct test_f_i_data fpclassify_test_data[] =
9686 {
9687 START_DATA (fpclassify),
9688 TEST_f_i (fpclassify, qnan_value, FP_NAN),
9689 TEST_f_i (fpclassify, plus_infty, FP_INFINITE),
9690 TEST_f_i (fpclassify, minus_infty, FP_INFINITE),
9691 TEST_f_i (fpclassify, plus_zero, FP_ZERO),
9692 TEST_f_i (fpclassify, minus_zero, FP_ZERO),
9693 TEST_f_i (fpclassify, 1000, FP_NORMAL),
9694 TEST_f_i (fpclassify, min_subnorm_value, FP_SUBNORMAL),
9695 END_DATA (fpclassify)
9696 };
9697
8847214f
UD		 9698static void
9699fpclassify_test (void)
9700{
9701 START (fpclassify);
acbd839a 9702 RUN_TEST_LOOP_f_i_tg (fpclassify, fpclassify_test_data, );
8847214f
UD		 9703 END (fpclassify);
9704}
9705
9706
d9c2a0fd
JM		 9707static const struct test_f_f1_data frexp_test_data[] =
9708 {
9709 START_DATA (frexp),
9710 TEST_fI_f1 (frexp, plus_infty, plus_infty, IGNORE),
9711 TEST_fI_f1 (frexp, minus_infty, minus_infty, IGNORE),
9712 TEST_fI_f1 (frexp, qnan_value, qnan_value, IGNORE),
9713
9714 TEST_fI_f1 (frexp, 0.0, 0.0, 0.0),
9715 TEST_fI_f1 (frexp, minus_zero, minus_zero, 0.0),
9716
9717 TEST_fI_f1 (frexp, 12.8L, 0.8L, 4),
9718 TEST_fI_f1 (frexp, -27.34L, -0.854375L, 5),
9719 END_DATA (frexp)
9720 };
9721
8847214f
UD		 9722static void
9723frexp_test (void)
9724{
9725 int x;
9726
9727 START (frexp);
d9c2a0fd 9728 RUN_TEST_LOOP_fI_f1 (frexp, frexp_test_data, , x);
8847214f
UD		 9729 END (frexp);
9730}
9731
9732
87aa21df
JM		 9733static const struct test_f_f1_data gamma_test_data[] =
9734 {
9735 START_DATA (gamma),
9736 TEST_f_f1 (gamma, plus_infty, plus_infty, 1),
9737 TEST_f_f1 (gamma, 0, plus_infty, 1, DIVIDE_BY_ZERO_EXCEPTION),
9738 TEST_f_f1 (gamma, -3, plus_infty, IGNORE, DIVIDE_BY_ZERO_EXCEPTION),
9739 TEST_f_f1 (gamma, minus_infty, plus_infty, IGNORE),
9740 TEST_f_f1 (gamma, qnan_value, qnan_value, IGNORE),
9741
9742 TEST_f_f1 (gamma, 1, 0, 1),
9743 TEST_f_f1 (gamma, 3, M_LN2l, 1),
9744
9745 TEST_f_f1 (gamma, 0.5, M_LOG_SQRT_PIl, 1),
9746 TEST_f_f1 (gamma, -0.5, M_LOG_2_SQRT_PIl, -1),
9747 END_DATA (gamma)
9748 };
9749
8847214f
UD		 9750static void
9751gamma_test (void)
9752{
9753 errno = 0;
9754 FUNC(gamma) (1);
9755
9756 if (errno == ENOSYS)
9757 /* Function not implemented. */
9758 return;
8847214f
UD		 9759
9760 START (gamma);
87aa21df 9761 RUN_TEST_LOOP_f_f1 (gamma, gamma_test_data, , signgam);
8847214f
UD		 9762 END (gamma);
9763}
9764
601a3a5f
JM		 9765static const struct test_ff_f_data hypot_test_data[] =
9766 {
9767 START_DATA (hypot),
9768 TEST_ff_f (hypot, plus_infty, 1, plus_infty),
9769 TEST_ff_f (hypot, minus_infty, 1, plus_infty),
8847214f 9770
15daa639 9771#ifndef TEST_INLINE
601a3a5f
JM		 9772 TEST_ff_f (hypot, plus_infty, qnan_value, plus_infty),
9773 TEST_ff_f (hypot, minus_infty, qnan_value, plus_infty),
9774 TEST_ff_f (hypot, qnan_value, plus_infty, plus_infty),
9775 TEST_ff_f (hypot, qnan_value, minus_infty, plus_infty),
15daa639 9776#endif
8847214f 9777
601a3a5f 9778 TEST_ff_f (hypot, qnan_value, qnan_value, qnan_value),
8847214f 9779
601a3a5f
JM		 9780 /* hypot (x,y) == hypot (+-x, +-y) */
9781 TEST_ff_f (hypot, 0.7L, 12.4L, 12.419742348374220601176836866763271L),
9782 TEST_ff_f (hypot, -0.7L, 12.4L, 12.419742348374220601176836866763271L),
9783 TEST_ff_f (hypot, 0.7L, -12.4L, 12.419742348374220601176836866763271L),
9784 TEST_ff_f (hypot, -0.7L, -12.4L, 12.419742348374220601176836866763271L),
9785 TEST_ff_f (hypot, 12.4L, 0.7L, 12.419742348374220601176836866763271L),
9786 TEST_ff_f (hypot, -12.4L, 0.7L, 12.419742348374220601176836866763271L),
9787 TEST_ff_f (hypot, 12.4L, -0.7L, 12.419742348374220601176836866763271L),
9788 TEST_ff_f (hypot, -12.4L, -0.7L, 12.419742348374220601176836866763271L),
8847214f 9789
601a3a5f
JM		 9790 /* hypot (x,0) == fabs (x) */
9791 TEST_ff_f (hypot, 0.75L, 0, 0.75L),
9792 TEST_ff_f (hypot, -0.75L, 0, 0.75L),
9793 TEST_ff_f (hypot, -5.7e7, 0, 5.7e7L),
8847214f 9794
601a3a5f 9795 TEST_ff_f (hypot, 0.75L, 1.25L, 1.45773797371132511771853821938639577L),
8847214f 9796
601a3a5f
JM		 9797 TEST_ff_f (hypot, 1.0L, 0x1p-61L, 1.0L),
9798 TEST_ff_f (hypot, 0x1p+0L, 0x1.fp-129L, 0x1p+0L),
1468ded3 9799#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
601a3a5f 9800 TEST_ff_f (hypot, 0x1.23456789abcdef0123456789ab8p-500L, 0x1.23456789abcdef0123456789ab8p-500L, 4.9155782399407039128612180934736799735113e-151L),
1468ded3 9801#endif
8e27e3cc 9802
aa4a2ae1 9803#if !(defined TEST_FLOAT && defined TEST_INLINE)
601a3a5f
JM		 9804 TEST_ff_f (hypot, 0x3p125L, 0x4p125L, 0x5p125L),
9805 TEST_ff_f (hypot, 0x1.234566p-126L, 0x1.234566p-126L, 1.891441686191081936598531534017449451173e-38L),
aa4a2ae1
JM		 9806#endif
9807
5779f134 9808#if !defined TEST_FLOAT && !(defined TEST_DOUBLE && defined TEST_INLINE)
601a3a5f
JM		 9809 TEST_ff_f (hypot, 0x3p1021L, 0x4p1021L, 0x5p1021L),
9810 TEST_ff_f (hypot, 0x1p+0L, 0x0.3ep-1022L, 0x1p+0L),
aa4a2ae1
JM		 9811#endif
9812
9813#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384 && !defined TEST_INLINE
601a3a5f 9814 TEST_ff_f (hypot, 0x3p16381L, 0x4p16381L, 0x5p16381L),
aa4a2ae1 9815#endif
601a3a5f
JM		 9816 END_DATA (hypot)
9817 };
9818
9819static void
9820hypot_test (void)
9821{
9822 errno = 0;
9823 FUNC(hypot) (0.7L, 12.4L);
9824 if (errno == ENOSYS)
9825 /* Function not implemented. */
9826 return;
aa4a2ae1 9827
601a3a5f
JM		 9828 START (hypot);
9829 RUN_TEST_LOOP_ff_f (hypot, hypot_test_data, );
8847214f
UD		 9830 END (hypot);
9831}
9832
9833
acbd839a
JM		 9834static const struct test_f_i_data ilogb_test_data[] =
9835 {
9836 START_DATA (ilogb),
9837 TEST_f_i (ilogb, 1, 0),
9838 TEST_f_i (ilogb, M_El, 1),
9839 TEST_f_i (ilogb, 1024, 10),
9840 TEST_f_i (ilogb, -2000, 10),
9841
9842 /* ilogb (0.0) == FP_ILOGB0 plus invalid exception */
9843 TEST_f_i (ilogb, 0.0, FP_ILOGB0, INVALID_EXCEPTION|ERRNO_EDOM),
9844 /* ilogb (qNaN) == FP_ILOGBNAN plus invalid exception */
9845 TEST_f_i (ilogb, qnan_value, FP_ILOGBNAN, INVALID_EXCEPTION|ERRNO_EDOM),
9846 /* ilogb (inf) == INT_MAX plus invalid exception */
9847 TEST_f_i (ilogb, plus_infty, INT_MAX, INVALID_EXCEPTION|ERRNO_EDOM),
9848 /* ilogb (-inf) == INT_MAX plus invalid exception */
9849 TEST_f_i (ilogb, minus_infty, INT_MAX, INVALID_EXCEPTION|ERRNO_EDOM),
9850 END_DATA (ilogb)
9851 };
9852
8847214f
UD		 9853static void
9854ilogb_test (void)
9855{
9856 START (ilogb);
acbd839a 9857 RUN_TEST_LOOP_f_i (ilogb, ilogb_test_data, );
8847214f
UD		 9858 END (ilogb);
9859}
9860
7abeee12
JM		 9861static const struct test_f_i_data isfinite_test_data[] =
9862 {
9863 START_DATA (isfinite),
9864 TEST_f_b (isfinite, 0, 1),
9865 TEST_f_b (isfinite, minus_zero, 1),
9866 TEST_f_b (isfinite, 10, 1),
9867 TEST_f_b (isfinite, min_subnorm_value, 1),
9868 TEST_f_b (isfinite, plus_infty, 0),
9869 TEST_f_b (isfinite, minus_infty, 0),
9870 TEST_f_b (isfinite, qnan_value, 0),
9871 END_DATA (isfinite)
9872 };
9873
8847214f
UD		 9874static void
9875isfinite_test (void)
9876{
9877 START (isfinite);
7abeee12 9878 RUN_TEST_LOOP_f_b_tg (isfinite, isfinite_test_data, );
8847214f
UD		 9879 END (isfinite);
9880}
9881
d369f531
JM		 9882static const struct test_ff_i_data isgreater_test_data[] =
9883 {
9884 START_DATA (isgreater),
9885 TEST_ff_i (isgreater, minus_zero, minus_zero, 0),
9886 TEST_ff_i (isgreater, minus_zero, plus_zero, 0),
9887 TEST_ff_i (isgreater, minus_zero, (FLOAT) 1, 0),
9888 TEST_ff_i (isgreater, minus_zero, qnan_value, 0),
9889 TEST_ff_i (isgreater, plus_zero, minus_zero, 0),
9890 TEST_ff_i (isgreater, plus_zero, plus_zero, 0),
9891 TEST_ff_i (isgreater, plus_zero, (FLOAT) 1, 0),
9892 TEST_ff_i (isgreater, plus_zero, qnan_value, 0),
9893 TEST_ff_i (isgreater, (FLOAT) 1, minus_zero, 1),
9894 TEST_ff_i (isgreater, (FLOAT) 1, plus_zero, 1),
9895 TEST_ff_i (isgreater, (FLOAT) 1, (FLOAT) 1, 0),
9896 TEST_ff_i (isgreater, (FLOAT) 1, qnan_value, 0),
9897 TEST_ff_i (isgreater, qnan_value, minus_zero, 0),
9898 TEST_ff_i (isgreater, qnan_value, plus_zero, 0),
9899 TEST_ff_i (isgreater, qnan_value, (FLOAT) 1, 0),
9900 TEST_ff_i (isgreater, qnan_value, qnan_value, 0),
9901 END_DATA (isgreater)
9902 };
9903
0e8e0c1c
JM		 9904static void
9905isgreater_test (void)
9906{
9907 START (isgreater);
d369f531 9908 RUN_TEST_LOOP_ff_i_tg (isgreater, isgreater_test_data, );
0e8e0c1c
JM		 9909 END (isgreater);
9910}
9911
d369f531
JM		 9912static const struct test_ff_i_data isgreaterequal_test_data[] =
9913 {
9914 START_DATA (isgreaterequal),
9915 TEST_ff_i (isgreaterequal, minus_zero, minus_zero, 1),
9916 TEST_ff_i (isgreaterequal, minus_zero, plus_zero, 1),
9917 TEST_ff_i (isgreaterequal, minus_zero, (FLOAT) 1, 0),
9918 TEST_ff_i (isgreaterequal, minus_zero, qnan_value, 0),
9919 TEST_ff_i (isgreaterequal, plus_zero, minus_zero, 1),
9920 TEST_ff_i (isgreaterequal, plus_zero, plus_zero, 1),
9921 TEST_ff_i (isgreaterequal, plus_zero, (FLOAT) 1, 0),
9922 TEST_ff_i (isgreaterequal, plus_zero, qnan_value, 0),
9923 TEST_ff_i (isgreaterequal, (FLOAT) 1, minus_zero, 1),
9924 TEST_ff_i (isgreaterequal, (FLOAT) 1, plus_zero, 1),
9925 TEST_ff_i (isgreaterequal, (FLOAT) 1, (FLOAT) 1, 1),
9926 TEST_ff_i (isgreaterequal, (FLOAT) 1, qnan_value, 0),
9927 TEST_ff_i (isgreaterequal, qnan_value, minus_zero, 0),
9928 TEST_ff_i (isgreaterequal, qnan_value, plus_zero, 0),
9929 TEST_ff_i (isgreaterequal, qnan_value, (FLOAT) 1, 0),
9930 TEST_ff_i (isgreaterequal, qnan_value, qnan_value, 0),
9931 END_DATA (isgreaterequal)
9932 };
9933
0e8e0c1c
JM		 9934static void
9935isgreaterequal_test (void)
9936{
9937 START (isgreaterequal);
d369f531 9938 RUN_TEST_LOOP_ff_i_tg (isgreaterequal, isgreaterequal_test_data, );
0e8e0c1c
JM		 9939 END (isgreaterequal);
9940}
9941
7abeee12
JM		 9942static const struct test_f_i_data isinf_test_data[] =
9943 {
9944 START_DATA (isinf),
9945 TEST_f_b (isinf, 0, 0),
9946 TEST_f_b (isinf, minus_zero, 0),
9947 TEST_f_b (isinf, 10, 0),
9948 TEST_f_b (isinf, min_subnorm_value, 0),
9949 TEST_f_b (isinf, plus_infty, 1),
9950 TEST_f_b (isinf, minus_infty, 1),
9951 TEST_f_b (isinf, qnan_value, 0),
9952 END_DATA (isinf)
9953 };
9954
ef1bb361
JM		 9955static void
9956isinf_test (void)
9957{
9958 START (isinf);
7abeee12 9959 RUN_TEST_LOOP_f_b_tg (isinf, isinf_test_data, );
ef1bb361
JM		 9960 END (isinf);
9961}
9962
d369f531
JM		 9963static const struct test_ff_i_data isless_test_data[] =
9964 {
9965 START_DATA (isless),
9966 TEST_ff_i (isless, minus_zero, minus_zero, 0),
9967 TEST_ff_i (isless, minus_zero, plus_zero, 0),
9968 TEST_ff_i (isless, minus_zero, (FLOAT) 1, 1),
9969 TEST_ff_i (isless, minus_zero, qnan_value, 0),
9970 TEST_ff_i (isless, plus_zero, minus_zero, 0),
9971 TEST_ff_i (isless, plus_zero, plus_zero, 0),
9972 TEST_ff_i (isless, plus_zero, (FLOAT) 1, 1),
9973 TEST_ff_i (isless, plus_zero, qnan_value, 0),
9974 TEST_ff_i (isless, (FLOAT) 1, minus_zero, 0),
9975 TEST_ff_i (isless, (FLOAT) 1, plus_zero, 0),
9976 TEST_ff_i (isless, (FLOAT) 1, (FLOAT) 1, 0),
9977 TEST_ff_i (isless, (FLOAT) 1, qnan_value, 0),
9978 TEST_ff_i (isless, qnan_value, minus_zero, 0),
9979 TEST_ff_i (isless, qnan_value, plus_zero, 0),
9980 TEST_ff_i (isless, qnan_value, (FLOAT) 1, 0),
9981 TEST_ff_i (isless, qnan_value, qnan_value, 0),
9982 END_DATA (isless)
9983 };
9984
0e8e0c1c
JM		 9985static void
9986isless_test (void)
9987{
9988 START (isless);
d369f531 9989 RUN_TEST_LOOP_ff_i_tg (isless, isless_test_data, );
0e8e0c1c
JM		 9990 END (isless);
9991}
9992
d369f531
JM		 9993static const struct test_ff_i_data islessequal_test_data[] =
9994 {
9995 START_DATA (islessequal),
9996 TEST_ff_i (islessequal, minus_zero, minus_zero, 1),
9997 TEST_ff_i (islessequal, minus_zero, plus_zero, 1),
9998 TEST_ff_i (islessequal, minus_zero, (FLOAT) 1, 1),
9999 TEST_ff_i (islessequal, minus_zero, qnan_value, 0),
10000 TEST_ff_i (islessequal, plus_zero, minus_zero, 1),
10001 TEST_ff_i (islessequal, plus_zero, plus_zero, 1),
10002 TEST_ff_i (islessequal, plus_zero, (FLOAT) 1, 1),
10003 TEST_ff_i (islessequal, plus_zero, qnan_value, 0),
10004 TEST_ff_i (islessequal, (FLOAT) 1, minus_zero, 0),
10005 TEST_ff_i (islessequal, (FLOAT) 1, plus_zero, 0),
10006 TEST_ff_i (islessequal, (FLOAT) 1, (FLOAT) 1, 1),
10007 TEST_ff_i (islessequal, (FLOAT) 1, qnan_value, 0),
10008 TEST_ff_i (islessequal, qnan_value, minus_zero, 0),
10009 TEST_ff_i (islessequal, qnan_value, plus_zero, 0),
10010 TEST_ff_i (islessequal, qnan_value, (FLOAT) 1, 0),
10011 TEST_ff_i (islessequal, qnan_value, qnan_value, 0),
10012 END_DATA (islessequal)
10013 };
10014
0e8e0c1c
JM		 10015static void
10016islessequal_test (void)
10017{
10018 START (islessequal);
d369f531 10019 RUN_TEST_LOOP_ff_i_tg (islessequal, islessequal_test_data, );
0e8e0c1c
JM		 10020 END (islessequal);
10021}
10022
d369f531
JM		 10023static const struct test_ff_i_data islessgreater_test_data[] =
10024 {
10025 START_DATA (islessgreater),
10026 TEST_ff_i (islessgreater, minus_zero, minus_zero, 0),
10027 TEST_ff_i (islessgreater, minus_zero, plus_zero, 0),
10028 TEST_ff_i (islessgreater, minus_zero, (FLOAT) 1, 1),
10029 TEST_ff_i (islessgreater, minus_zero, qnan_value, 0),
10030 TEST_ff_i (islessgreater, plus_zero, minus_zero, 0),
10031 TEST_ff_i (islessgreater, plus_zero, plus_zero, 0),
10032 TEST_ff_i (islessgreater, plus_zero, (FLOAT) 1, 1),
10033 TEST_ff_i (islessgreater, plus_zero, qnan_value, 0),
10034 TEST_ff_i (islessgreater, (FLOAT) 1, minus_zero, 1),
10035 TEST_ff_i (islessgreater, (FLOAT) 1, plus_zero, 1),
10036 TEST_ff_i (islessgreater, (FLOAT) 1, (FLOAT) 1, 0),
10037 TEST_ff_i (islessgreater, (FLOAT) 1, qnan_value, 0),
10038 TEST_ff_i (islessgreater, qnan_value, minus_zero, 0),
10039 TEST_ff_i (islessgreater, qnan_value, plus_zero, 0),
10040 TEST_ff_i (islessgreater, qnan_value, (FLOAT) 1, 0),
10041 TEST_ff_i (islessgreater, qnan_value, qnan_value, 0),
10042 END_DATA (islessgreater)
10043 };
10044
0e8e0c1c
JM		 10045static void
10046islessgreater_test (void)
10047{
10048 START (islessgreater);
d369f531 10049 RUN_TEST_LOOP_ff_i_tg (islessgreater, islessgreater_test_data, );
0e8e0c1c
JM		 10050 END (islessgreater);
10051}
10052
7abeee12
JM		 10053static const struct test_f_i_data isnan_test_data[] =
10054 {
10055 START_DATA (isnan),
10056 TEST_f_b (isnan, 0, 0),
10057 TEST_f_b (isnan, minus_zero, 0),
10058 TEST_f_b (isnan, 10, 0),
10059 TEST_f_b (isnan, min_subnorm_value, 0),
10060 TEST_f_b (isnan, plus_infty, 0),
10061 TEST_f_b (isnan, minus_infty, 0),
10062 TEST_f_b (isnan, qnan_value, 1),
10063 END_DATA (isnan)
10064 };
10065
ef1bb361
JM		 10066static void
10067isnan_test (void)
10068{
10069 START (isnan);
7abeee12 10070 RUN_TEST_LOOP_f_b_tg (isnan, isnan_test_data, );
ef1bb361
JM		 10071 END (isnan);
10072}
10073
7abeee12
JM		 10074static const struct test_f_i_data isnormal_test_data[] =
10075 {
10076 START_DATA (isnormal),
10077 TEST_f_b (isnormal, 0, 0),
10078 TEST_f_b (isnormal, minus_zero, 0),
10079 TEST_f_b (isnormal, 10, 1),
10080 TEST_f_b (isnormal, min_subnorm_value, 0),
10081 TEST_f_b (isnormal, plus_infty, 0),
10082 TEST_f_b (isnormal, minus_infty, 0),
10083 TEST_f_b (isnormal, qnan_value, 0),
10084 END_DATA (isnormal)
10085 };
10086
8847214f
UD		 10087static void
10088isnormal_test (void)
10089{
10090 START (isnormal);
7abeee12 10091 RUN_TEST_LOOP_f_b_tg (isnormal, isnormal_test_data, );
8847214f
UD		 10092 END (isnormal);
10093}
10094
7abeee12
JM		 10095static const struct test_f_i_data issignaling_test_data[] =
10096 {
10097 START_DATA (issignaling),
10098 TEST_f_b (issignaling, 0, 0),
10099 TEST_f_b (issignaling, minus_zero, 0),
10100 TEST_f_b (issignaling, 10, 0),
10101 TEST_f_b (issignaling, min_subnorm_value, 0),
10102 TEST_f_b (issignaling, plus_infty, 0),
10103 TEST_f_b (issignaling, minus_infty, 0),
10104 TEST_f_b (issignaling, qnan_value, 0),
10105 END_DATA (issignaling)
10106 };
10107
57267616
TS		 10108static void
10109issignaling_test (void)
10110{
10111 START (issignaling);
7abeee12 10112 RUN_TEST_LOOP_f_b_tg (issignaling, issignaling_test_data, );
57267616
TS		 10113 END (issignaling);
10114}
10115
d369f531
JM		 10116static const struct test_ff_i_data isunordered_test_data[] =
10117 {
10118 START_DATA (isunordered),
10119 TEST_ff_i (isunordered, minus_zero, minus_zero, 0),
10120 TEST_ff_i (isunordered, minus_zero, plus_zero, 0),
10121 TEST_ff_i (isunordered, minus_zero, (FLOAT) 1, 0),
10122 TEST_ff_i (isunordered, minus_zero, qnan_value, 1),
10123 TEST_ff_i (isunordered, plus_zero, minus_zero, 0),
10124 TEST_ff_i (isunordered, plus_zero, plus_zero, 0),
10125 TEST_ff_i (isunordered, plus_zero, (FLOAT) 1, 0),
10126 TEST_ff_i (isunordered, plus_zero, qnan_value, 1),
10127 TEST_ff_i (isunordered, (FLOAT) 1, minus_zero, 0),
10128 TEST_ff_i (isunordered, (FLOAT) 1, plus_zero, 0),
10129 TEST_ff_i (isunordered, (FLOAT) 1, (FLOAT) 1, 0),
10130 TEST_ff_i (isunordered, (FLOAT) 1, qnan_value, 1),
10131 TEST_ff_i (isunordered, qnan_value, minus_zero, 1),
10132 TEST_ff_i (isunordered, qnan_value, plus_zero, 1),
10133 TEST_ff_i (isunordered, qnan_value, (FLOAT) 1, 1),
10134 TEST_ff_i (isunordered, qnan_value, qnan_value, 1),
10135 END_DATA (isunordered)
10136 };
10137
0e8e0c1c
JM		 10138static void
10139isunordered_test (void)
10140{
10141 START (isunordered);
d369f531 10142 RUN_TEST_LOOP_ff_i_tg (isunordered, isunordered_test_data, );
0e8e0c1c
JM		 10143 END (isunordered);
10144}
10145
74c57478
JM		 10146static const struct test_f_f_data j0_test_data[] =
10147 {
10148 START_DATA (j0),
10149 /* j0 is the Bessel function of the first kind of order 0 */
10150 TEST_f_f (j0, qnan_value, qnan_value),
10151 TEST_f_f (j0, plus_infty, 0),
10152 TEST_f_f (j0, -1.0, 0.765197686557966551449717526102663221L),
10153 TEST_f_f (j0, 0.0, 1.0),
10154 TEST_f_f (j0, 0.125L, 0.996097563041985204620768999453174712L),
10155 TEST_f_f (j0, 0.75L, 0.864242275166648623555731103820923211L),
10156 TEST_f_f (j0, 1.0, 0.765197686557966551449717526102663221L),
10157 TEST_f_f (j0, 1.5, 0.511827671735918128749051744283411720L),
10158 TEST_f_f (j0, 2.0, 0.223890779141235668051827454649948626L),
10159 TEST_f_f (j0, 8.0, 0.171650807137553906090869407851972001L),
10160 TEST_f_f (j0, 10.0, -0.245935764451348335197760862485328754L),
10161 TEST_f_f (j0, 4.0, -3.9714980986384737228659076845169804197562E-1L),
10162 TEST_f_f (j0, -4.0, -3.9714980986384737228659076845169804197562E-1L),
8847214f 10163
74c57478 10164 TEST_f_f (j0, 0x1.d7ce3ap+107L, 2.775523647291230802651040996274861694514e-17L),
c36e1d23
JM		 10165
10166#ifndef TEST_FLOAT
74c57478
JM		 10167 TEST_f_f (j0, -0x1.001000001p+593L, -3.927269966354206207832593635798954916263e-90L),
10168 TEST_f_f (j0, 0x1p1023L, -1.5665258060609012834424478437196679802783e-155L),
c36e1d23
JM		 10169#endif
10170
d2f9799e 10171#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM		 10172 TEST_f_f (j0, 0x1p16382L, -1.2193782500509000574176799046642541129387e-2466L),
10173 TEST_f_f (j0, 0x1p16383L, 9.5859502826270374691362975419147645151233e-2467L),
d2f9799e 10174#endif
74c57478
JM		 10175 END_DATA (j0)
10176 };
8847214f
UD		 10177
10178static void
74c57478 10179j0_test (void)
8847214f 10180{
8a216c1b 10181 FLOAT s, c;
8847214f 10182 errno = 0;
cd53c157
UD		 10183 FUNC (sincos) (0, &s, &c);
10184 if (errno == ENOSYS)
10185 /* Required function not implemented. */
10186 return;
74c57478 10187 FUNC(j0) (0);
8847214f
UD		 10188 if (errno == ENOSYS)
10189 /* Function not implemented. */
10190 return;
10191
74c57478
JM		 10192 START (j0);
10193 RUN_TEST_LOOP_f_f (j0, j0_test_data, );
10194 END (j0);
10195}
8847214f 10196
8847214f 10197
74c57478
JM		 10198static const struct test_f_f_data j1_test_data[] =
10199 {
10200 START_DATA (j1),
10201 /* j1 is the Bessel function of the first kind of order 1 */
10202 TEST_f_f (j1, qnan_value, qnan_value),
10203 TEST_f_f (j1, plus_infty, 0),
8847214f 10204
74c57478
JM		 10205 TEST_f_f (j1, -1.0, -0.440050585744933515959682203718914913L),
10206 TEST_f_f (j1, 0.0, 0.0),
10207 TEST_f_f (j1, 0.125L, 0.0623780091344946810942311355879361177L),
10208 TEST_f_f (j1, 0.75L, 0.349243602174862192523281016426251335L),
10209 TEST_f_f (j1, 1.0, 0.440050585744933515959682203718914913L),
10210 TEST_f_f (j1, 1.5, 0.557936507910099641990121213156089400L),
10211 TEST_f_f (j1, 2.0, 0.576724807756873387202448242269137087L),
10212 TEST_f_f (j1, 8.0, 0.234636346853914624381276651590454612L),
10213 TEST_f_f (j1, 10.0, 0.0434727461688614366697487680258592883L),
8847214f 10214
74c57478 10215 TEST_f_f (j1, 0x1.3ffp+74L, 1.818984347516051243459364437186082741567e-12L),
c36e1d23
JM		 10216
10217#ifndef TEST_FLOAT
74c57478
JM		 10218 TEST_f_f (j1, 0x1.ff00000000002p+840L, 1.846591691699331493194965158699937660696e-127L),
10219 TEST_f_f (j1, 0x1p1023L, 8.2687542933709649327986678723012001545638e-155L),
c36e1d23
JM		 10220#endif
10221
d2f9799e 10222#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM		 10223 TEST_f_f (j1, 0x1p16382L, 8.0839224448726336195866026476176740513439e-2467L),
10224 TEST_f_f (j1, 0x1p16383L, -3.8895531955766020648617743624167352352217e-2467L),
d2f9799e 10225#endif
74c57478
JM		 10226 END_DATA (j1)
10227 };
d2f9799e 10228
74c57478
JM		 10229static void
10230j1_test (void)
10231{
10232 FLOAT s, c;
10233 errno = 0;
10234 FUNC (sincos) (0, &s, &c);
10235 if (errno == ENOSYS)
10236 /* Required function not implemented. */
10237 return;
10238 FUNC(j1) (0);
10239 if (errno == ENOSYS)
10240 /* Function not implemented. */
10241 return;
10242
10243 START (j1);
10244 RUN_TEST_LOOP_f_f (j1, j1_test_data, );
8847214f
UD		 10245 END (j1);
10246}
10247
0e400df5
JM		 10248static const struct test_if_f_data jn_test_data[] =
10249 {
10250 START_DATA (jn),
10251 /* jn is the Bessel function of the first kind of order n. */
10252 /* jn (0, x) == j0 (x) */
10253 TEST_if_f (jn, 0, qnan_value, qnan_value),
10254 TEST_if_f (jn, 0, plus_infty, 0),
10255 TEST_if_f (jn, 0, -1.0, 0.765197686557966551449717526102663221L),
10256 TEST_if_f (jn, 0, 0.0, 1.0),
10257 TEST_if_f (jn, 0, 0.125L, 0.996097563041985204620768999453174712L),
10258 TEST_if_f (jn, 0, 0.75L, 0.864242275166648623555731103820923211L),
10259 TEST_if_f (jn, 0, 1.0, 0.765197686557966551449717526102663221L),
10260 TEST_if_f (jn, 0, 1.5, 0.511827671735918128749051744283411720L),
10261 TEST_if_f (jn, 0, 2.0, 0.223890779141235668051827454649948626L),
10262 TEST_if_f (jn, 0, 8.0, 0.171650807137553906090869407851972001L),
10263 TEST_if_f (jn, 0, 10.0, -0.245935764451348335197760862485328754L),
10264 TEST_if_f (jn, 0, 4.0, -3.9714980986384737228659076845169804197562E-1L),
10265 TEST_if_f (jn, 0, -4.0, -3.9714980986384737228659076845169804197562E-1L),
10266
10267 /* jn (1, x) == j1 (x) */
10268 TEST_if_f (jn, 1, qnan_value, qnan_value),
10269 TEST_if_f (jn, 1, plus_infty, 0),
10270 TEST_if_f (jn, 1, -1.0, -0.440050585744933515959682203718914913L),
10271 TEST_if_f (jn, 1, 0.0, 0.0),
10272 TEST_if_f (jn, 1, 0.125L, 0.0623780091344946810942311355879361177L),
10273 TEST_if_f (jn, 1, 0.75L, 0.349243602174862192523281016426251335L),
10274 TEST_if_f (jn, 1, 1.0, 0.440050585744933515959682203718914913L),
10275 TEST_if_f (jn, 1, 1.5, 0.557936507910099641990121213156089400L),
10276 TEST_if_f (jn, 1, 2.0, 0.576724807756873387202448242269137087L),
10277 TEST_if_f (jn, 1, 8.0, 0.234636346853914624381276651590454612L),
10278 TEST_if_f (jn, 1, 10.0, 0.0434727461688614366697487680258592883L),
10279
10280 /* jn (3, x) */
10281 TEST_if_f (jn, 3, qnan_value, qnan_value),
10282 TEST_if_f (jn, 3, plus_infty, 0),
10283
10284 TEST_if_f (jn, 3, -1.0, -0.0195633539826684059189053216217515083L),
10285 TEST_if_f (jn, 3, 0.0, 0.0),
10286 TEST_if_f (jn, 3, 0.125L, 0.406503832554912875023029337653442868e-4L),
10287 TEST_if_f (jn, 3, 0.75L, 0.848438342327410884392755236884386804e-2L),
10288 TEST_if_f (jn, 3, 1.0, 0.0195633539826684059189053216217515083L),
10289 TEST_if_f (jn, 3, 2.0, 0.128943249474402051098793332969239835L),
10290 TEST_if_f (jn, 3, 10.0, 0.0583793793051868123429354784103409563L),
10291
10292 /* jn (10, x) */
10293 TEST_if_f (jn, 10, qnan_value, qnan_value),
10294 TEST_if_f (jn, 10, plus_infty, 0),
10295
10296 TEST_if_f (jn, 10, -1.0, 0.263061512368745320699785368779050294e-9L),
10297 TEST_if_f (jn, 10, 0.0, 0.0),
10298 TEST_if_f (jn, 10, 0.125L, 0.250543369809369890173993791865771547e-18L),
10299 TEST_if_f (jn, 10, 0.75L, 0.149621713117596814698712483621682835e-10L),
10300 TEST_if_f (jn, 10, 1.0, 0.263061512368745320699785368779050294e-9L),
10301 TEST_if_f (jn, 10, 2.0, 0.251538628271673670963516093751820639e-6L),
10302 TEST_if_f (jn, 10, 10.0, 0.207486106633358857697278723518753428L),
10303
10304 /* BZ #11589 .*/
10305 TEST_if_f (jn, 2, 2.4048255576957729L, 0.43175480701968038399746111312430703L),
10306 TEST_if_f (jn, 3, 2.4048255576957729L, 0.19899990535769083404042146764530813L),
10307 TEST_if_f (jn, 4, 2.4048255576957729L, 0.647466661641779720084932282551219891E-1L),
10308 TEST_if_f (jn, 5, 2.4048255576957729L, 0.163892432048058525099230549946147698E-1L),
10309 TEST_if_f (jn, 6, 2.4048255576957729L, 0.34048184720278336646673682895929161E-2L),
10310 TEST_if_f (jn, 7, 2.4048255576957729L, 0.60068836573295394221291569249883076E-3L),
10311 TEST_if_f (jn, 8, 2.4048255576957729L, 0.92165786705344923232879022467054148E-4L),
10312 TEST_if_f (jn, 9, 2.4048255576957729L, 0.12517270977961513005428966643852564E-4L),
10313
10314 /* Bug 14155: spurious exception may occur. */
10315 TEST_if_f (jn, 2, 0x1.ffff62p+99L, -4.43860668048170034334926693188979974489e-16L, UNDERFLOW_EXCEPTION_OK),
10316 END_DATA (jn)
10317 };
10318
8847214f
UD		 10319static void
10320jn_test (void)
10321{
8a216c1b 10322 FLOAT s, c;
8847214f 10323 errno = 0;
cd53c157
UD		 10324 FUNC (sincos) (0, &s, &c);
10325 if (errno == ENOSYS)
10326 /* Required function not implemented. */
10327 return;
8847214f
UD		 10328 FUNC(jn) (1, 1);
10329 if (errno == ENOSYS)
10330 /* Function not implemented. */
10331 return;
10332
8847214f 10333 START (jn);
0e400df5 10334 RUN_TEST_LOOP_if_f (jn, jn_test_data, );
8847214f
UD		 10335 END (jn);
10336}
10337
10338
243216e1
JM		 10339static const struct test_fi_f_data ldexp_test_data[] =
10340 {
10341 START_DATA (ldexp),
10342 TEST_fi_f (ldexp, 0, 0, 0),
10343 TEST_fi_f (ldexp, minus_zero, 0, minus_zero),
8847214f 10344
243216e1
JM		 10345 TEST_fi_f (ldexp, plus_infty, 1, plus_infty),
10346 TEST_fi_f (ldexp, minus_infty, 1, minus_infty),
10347 TEST_fi_f (ldexp, qnan_value, 1, qnan_value),
8847214f 10348
243216e1
JM		 10349 TEST_fi_f (ldexp, 0.8L, 4, 12.8L),
10350 TEST_fi_f (ldexp, -0.854375L, 5, -27.34L),
8847214f 10351
243216e1
JM		 10352 /* ldexp (x, 0) == x. */
10353 TEST_fi_f (ldexp, 1.0L, 0L, 1.0L),
10354 END_DATA (ldexp)
10355 };
af00a34d 10356
243216e1
JM		 10357static void
10358ldexp_test (void)
10359{
10360 START (ldexp);
10361 RUN_TEST_LOOP_fi_f (ldexp, ldexp_test_data, );
af00a34d 10362 END (ldexp);
8847214f
UD		 10363}
10364
2550dfe9 10365
87aa21df
JM		 10366static const struct test_f_f1_data lgamma_test_data[] =
10367 {
10368 START_DATA (lgamma),
10369 TEST_f_f1 (lgamma, plus_infty, plus_infty, 1),
10370 TEST_f_f1 (lgamma, 0, plus_infty, 1, DIVIDE_BY_ZERO_EXCEPTION),
10371 TEST_f_f1 (lgamma, minus_zero, plus_infty, -1, DIVIDE_BY_ZERO_EXCEPTION),
10372 TEST_f_f1 (lgamma, qnan_value, qnan_value, IGNORE),
10373
10374 /* lgamma (x) == +inf plus divide by zero exception for integer x <= 0. */
10375 TEST_f_f1 (lgamma, -3, plus_infty, IGNORE, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
10376 TEST_f_f1 (lgamma, minus_infty, plus_infty, IGNORE),
10377 TEST_f_f1 (lgamma, -max_value, plus_infty, IGNORE, DIVIDE_BY_ZERO_EXCEPTION),
e9eee333 10378 TEST_f_f1 (lgamma, max_value, plus_infty, 1, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
87aa21df
JM		 10379
10380 TEST_f_f1 (lgamma, 1, 0, 1),
10381
10382 TEST_f_f1 (lgamma, 3, M_LN2l, 1),
10383
10384 TEST_f_f1 (lgamma, 0.5, M_LOG_SQRT_PIl, 1),
10385 TEST_f_f1 (lgamma, -0.5, M_LOG_2_SQRT_PIl, -1),
10386 TEST_f_f1 (lgamma, 0.7L, 0.260867246531666514385732417016759578L, 1),
10387 TEST_f_f1 (lgamma, 1.2L, -0.853740900033158497197028392998854470e-1L, 1),
10388 END_DATA (lgamma)
10389 };
10390
8847214f
UD		 10391static void
10392lgamma_test (void)
10393{
10394 errno = 0;
10395 FUNC(lgamma) (0);
10396 if (errno == ENOSYS)
10397 /* Function not implemented. */
10398 return;
8847214f
UD		 10399
10400 START (lgamma);
87aa21df 10401 RUN_TEST_LOOP_f_f1 (lgamma, lgamma_test_data, , signgam);
8847214f
UD		 10402 END (lgamma);
10403}
10404
2550dfe9 10405
3608cb24
JM		 10406static const struct test_f_l_data lrint_test_data[] =
10407 {
10408 START_DATA (lrint),
10409 /* XXX this test is incomplete. We need to have a way to specifiy
10410 the rounding method and test the critical cases. So far, only
10411 unproblematic numbers are tested. */
10412 /* TODO: missing +/-Inf as well as qNaN tests. */
10413 TEST_f_l (lrint, 0.0, 0),
10414 TEST_f_l (lrint, minus_zero, 0),
10415 TEST_f_l (lrint, 0.2L, 0),
10416 TEST_f_l (lrint, -0.2L, 0),
10417
10418 TEST_f_l (lrint, 1.4L, 1),
10419 TEST_f_l (lrint, -1.4L, -1),
10420
10421 TEST_f_l (lrint, 8388600.3L, 8388600),
10422 TEST_f_l (lrint, -8388600.3L, -8388600),
10423
10424 TEST_f_l (lrint, 1071930.0008, 1071930),
10425#ifndef TEST_FLOAT
10426 TEST_f_l (lrint, 1073741824.01, 1073741824),
10427# if LONG_MAX > 281474976710656
10428 TEST_f_l (lrint, 281474976710656.025, 281474976710656),
10429# endif
10430#endif
10431 END_DATA (lrint)
10432 };
10433
8847214f
UD		 10434static void
10435lrint_test (void)
10436{
8847214f 10437 START (lrint);
3608cb24
JM		 10438 RUN_TEST_LOOP_f_l (lrint, lrint_test_data, );
10439 END (lrint);
10440}
8847214f 10441
8847214f 10442
3608cb24
JM		 10443static const struct test_f_l_data lrint_tonearest_test_data[] =
10444 {
10445 START_DATA (lrint_tonearest),
10446 TEST_f_l (lrint, 0.0, 0),
10447 TEST_f_l (lrint, minus_zero, 0),
10448 TEST_f_l (lrint, 0.2L, 0),
10449 TEST_f_l (lrint, -0.2L, 0),
10450 TEST_f_l (lrint, 0.5L, 0),
10451 TEST_f_l (lrint, -0.5L, 0),
10452 TEST_f_l (lrint, 0.8L, 1),
10453 TEST_f_l (lrint, -0.8L, -1),
10454
10455 TEST_f_l (lrint, 1.4L, 1),
10456 TEST_f_l (lrint, -1.4L, -1),
10457
10458 TEST_f_l (lrint, 8388600.3L, 8388600),
10459 TEST_f_l (lrint, -8388600.3L, -8388600),
10460
10461 TEST_f_l (lrint, 1071930.0008, 1071930),
3eb61415 10462#ifndef TEST_FLOAT
3608cb24 10463 TEST_f_l (lrint, 1073741824.01, 1073741824),
39007ae3 10464# if LONG_MAX > 281474976710656
3608cb24 10465 TEST_f_l (lrint, 281474976710656.025, 281474976710656),
39007ae3 10466# endif
3eb61415 10467#endif
3608cb24
JM		 10468 END_DATA (lrint_tonearest)
10469 };
2550dfe9 10470
6624dbc0
UD		 10471static void
10472lrint_test_tonearest (void)
10473{
6624dbc0 10474 START (lrint_tonearest);
3608cb24
JM		 10475 RUN_TEST_LOOP_f_l (lrint, lrint_tonearest_test_data, FE_TONEAREST);
10476 END (lrint_tonearest);
10477}
6624dbc0 10478
6624dbc0 10479
3608cb24
JM		 10480static const struct test_f_l_data lrint_towardzero_test_data[] =
10481 {
10482 START_DATA (lrint_towardzero),
10483 TEST_f_l (lrint, 0.0, 0),
10484 TEST_f_l (lrint, minus_zero, 0),
10485 TEST_f_l (lrint, 0.2L, 0),
10486 TEST_f_l (lrint, -0.2L, 0),
10487 TEST_f_l (lrint, 0.5L, 0),
10488 TEST_f_l (lrint, -0.5L, 0),
10489 TEST_f_l (lrint, 0.8L, 0),
10490 TEST_f_l (lrint, -0.8L, 0),
10491
10492 TEST_f_l (lrint, 1.4L, 1),
10493 TEST_f_l (lrint, -1.4L, -1),
10494
10495 TEST_f_l (lrint, 8388600.3L, 8388600),
10496 TEST_f_l (lrint, -8388600.3L, -8388600),
10497
10498 TEST_f_l (lrint, 1071930.0008, 1071930),
6624dbc0 10499#ifndef TEST_FLOAT
3608cb24 10500 TEST_f_l (lrint, 1073741824.01, 1073741824),
6624dbc0 10501# if LONG_MAX > 281474976710656
3608cb24 10502 TEST_f_l (lrint, 281474976710656.025, 281474976710656),
6624dbc0
UD		 10503# endif
10504#endif
3608cb24
JM		 10505 END_DATA (lrint_towardzero)
10506 };
6624dbc0
UD		 10507
10508static void
10509lrint_test_towardzero (void)
10510{
6624dbc0 10511 START (lrint_towardzero);
3608cb24
JM		 10512 RUN_TEST_LOOP_f_l (lrint, lrint_towardzero_test_data, FE_TOWARDZERO);
10513 END (lrint_towardzero);
10514}
6624dbc0 10515
6624dbc0 10516
3608cb24
JM		 10517static const struct test_f_l_data lrint_downward_test_data[] =
10518 {
10519 START_DATA (lrint_downward),
10520 TEST_f_l (lrint, 0.0, 0),
10521 TEST_f_l (lrint, minus_zero, 0),
10522 TEST_f_l (lrint, 0.2L, 0),
10523 TEST_f_l (lrint, -0.2L, -1),
10524 TEST_f_l (lrint, 0.5L, 0),
10525 TEST_f_l (lrint, -0.5L, -1),
10526 TEST_f_l (lrint, 0.8L, 0),
10527 TEST_f_l (lrint, -0.8L, -1),
10528
10529 TEST_f_l (lrint, 1.4L, 1),
10530 TEST_f_l (lrint, -1.4L, -2),
10531
10532 TEST_f_l (lrint, 8388600.3L, 8388600),
10533 TEST_f_l (lrint, -8388600.3L, -8388601),
10534
10535 TEST_f_l (lrint, 1071930.0008, 1071930),
6624dbc0 10536#ifndef TEST_FLOAT
3608cb24 10537 TEST_f_l (lrint, 1073741824.01, 1073741824),
6624dbc0 10538# if LONG_MAX > 281474976710656
3608cb24 10539 TEST_f_l (lrint, 281474976710656.025, 281474976710656),
6624dbc0
UD		 10540# endif
10541#endif
3608cb24
JM		 10542 END_DATA (lrint_downward)
10543 };
6624dbc0
UD		 10544
10545static void
10546lrint_test_downward (void)
10547{
6624dbc0 10548 START (lrint_downward);
3608cb24 10549 RUN_TEST_LOOP_f_l (lrint, lrint_downward_test_data, FE_DOWNWARD);
6624dbc0
UD		 10550 END (lrint_downward);
10551}
10552
10553
3608cb24
JM		 10554static const struct test_f_l_data lrint_upward_test_data[] =
10555 {
10556 START_DATA (lrint_upward),
10557 TEST_f_l (lrint, 0.0, 0),
10558 TEST_f_l (lrint, minus_zero, 0),
10559 TEST_f_l (lrint, 0.2L, 1),
10560 TEST_f_l (lrint, -0.2L, 0),
10561 TEST_f_l (lrint, 0.5L, 1),
10562 TEST_f_l (lrint, -0.5L, 0),
10563 TEST_f_l (lrint, 0.8L, 1),
10564 TEST_f_l (lrint, -0.8L, 0),
10565
10566 TEST_f_l (lrint, 1.4L, 2),
10567 TEST_f_l (lrint, -1.4L, -1),
10568
10569 TEST_f_l (lrint, 8388600.3L, 8388601),
10570 TEST_f_l (lrint, -8388600.3L, -8388600),
6624dbc0
UD		 10571
10572#ifndef TEST_FLOAT
3608cb24
JM		 10573 TEST_f_l (lrint, 1071930.0008, 1071931),
10574 TEST_f_l (lrint, 1073741824.01, 1073741825),
6624dbc0 10575# if LONG_MAX > 281474976710656 && defined (TEST_LDOUBLE)
3608cb24 10576 TEST_f_l (lrint, 281474976710656.025, 281474976710656),
6624dbc0
UD		 10577# endif
10578#endif
3608cb24
JM		 10579 END_DATA (lrint_upward)
10580 };
6624dbc0 10581
3608cb24
JM		 10582static void
10583lrint_test_upward (void)
10584{
10585 START (lrint_upward);
10586 RUN_TEST_LOOP_f_l (lrint, lrint_upward_test_data, FE_UPWARD);
6624dbc0
UD		 10587 END (lrint_upward);
10588}
10589
10590
15c7c18d
JM		 10591static const struct test_f_L_data llrint_test_data[] =
10592 {
10593 START_DATA (llrint),
10594 /* XXX this test is incomplete. We need to have a way to specifiy
10595 the rounding method and test the critical cases. So far, only
10596 unproblematic numbers are tested. */
10597 /* TODO: missing +/-Inf as well as qNaN tests. */
10598 TEST_f_L (llrint, 0.0, 0),
10599 TEST_f_L (llrint, minus_zero, 0),
10600 TEST_f_L (llrint, 0.2L, 0),
10601 TEST_f_L (llrint, -0.2L, 0),
10602
10603 TEST_f_L (llrint, 1.4L, 1),
10604 TEST_f_L (llrint, -1.4L, -1),
10605
10606 TEST_f_L (llrint, 8388600.3L, 8388600),
10607 TEST_f_L (llrint, -8388600.3L, -8388600),
10608
10609 TEST_f_L (llrint, 1071930.0008, 1071930),
10610
10611 /* Test boundary conditions. */
10612 /* 0x1FFFFF */
10613 TEST_f_L (llrint, 2097151.0,2097151LL),
10614 /* 0x800000 */
10615 TEST_f_L (llrint, 8388608.0, 8388608LL),
10616 /* 0x1000000 */
10617 TEST_f_L (llrint, 16777216.0, 16777216LL),
10618 /* 0x20000000000 */
10619 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL),
10620 /* 0x40000000000 */
10621 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL),
10622 /* 0x1000000000000 */
10623 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL),
10624 /* 0x10000000000000 */
10625 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL),
10626 /* 0x10000080000000 */
10627 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL),
10628 /* 0x20000000000000 */
10629 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL),
10630 /* 0x80000000000000 */
10631 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL),
10632 /* 0x100000000000000 */
10633 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL),
f964490f 10634#ifdef TEST_LDOUBLE
15c7c18d
JM		 10635 /* The input can only be represented in long double. */
10636 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370496LL),
10637 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370496LL),
10638 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370496LL),
10639 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370497LL),
10640 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370498LL),
10641
10642 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370496LL),
10643 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370496LL),
10644 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370496LL),
10645 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370497LL),
10646 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370498LL),
f964490f 10647
830fce04 10648# if LDBL_MANT_DIG > 100
15c7c18d
JM		 10649 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370495LL),
10650 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370496LL),
10651 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370497LL),
10652 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370495LL),
10653 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370496LL),
10654 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370497LL),
10655
10656 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370495LL),
10657 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370496LL),
10658 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370497LL),
10659 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370495LL),
10660 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370496LL),
10661 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370497LL),
10662#endif
10663
10664 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740992LL),
10665 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740992LL),
10666 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740992LL),
10667 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740993LL),
10668 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740994LL),
10669
10670 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740992LL),
10671 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740992LL),
10672 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740992LL),
10673 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740993LL),
10674 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740994LL),
f964490f 10675
830fce04 10676# if LDBL_MANT_DIG > 100
15c7c18d
JM		 10677 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740991LL),
10678 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740992LL),
10679 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740993LL),
10680 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740992LL),
10681 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740993LL),
10682 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740994LL),
10683
10684 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740991LL),
10685 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740992LL),
10686 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740993LL),
10687 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740992LL),
10688 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740993LL),
10689 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740994LL),
10690#endif
10691
10692 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927936LL),
10693 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927936LL),
10694 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927936LL),
10695 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927937LL),
10696 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927938LL),
10697
10698 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927936LL),
10699 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927936LL),
10700 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927936LL),
10701 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927937LL),
10702 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927938LL),
830fce04
RM		 10703
10704# if LDBL_MANT_DIG > 100
15c7c18d
JM		 10705 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775806LL),
10706 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775806LL),
10707 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL),
10708 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL),
10709 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775806LL),
10710 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775806LL),
10711 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775806L),
10712 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775806LL),
10713 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775807LL),
10714 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775807LL),
10715 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL),
10716 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL),
830fce04 10717# endif
f964490f 10718#endif
15c7c18d
JM		 10719 END_DATA (llrint)
10720 };
8847214f 10721
830fce04 10722static void
15c7c18d 10723llrint_test (void)
830fce04 10724{
15c7c18d
JM		 10725 START (llrint);
10726 RUN_TEST_LOOP_f_L (llrint, llrint_test_data, );
10727 END (llrint);
10728}
830fce04 10729
15c7c18d
JM		 10730static const struct test_f_L_data llrint_tonearest_test_data[] =
10731 {
10732 START_DATA (llrint_tonearest),
10733 TEST_f_L (llrint, 0.0, 0),
10734 TEST_f_L (llrint, minus_zero, 0),
10735 TEST_f_L (llrint, 0.2L, 0),
10736 TEST_f_L (llrint, -0.2L, 0),
10737
10738 TEST_f_L (llrint, 1.4L, 1),
10739 TEST_f_L (llrint, -1.4L, -1),
10740
10741 TEST_f_L (llrint, 8388600.3L, 8388600),
10742 TEST_f_L (llrint, -8388600.3L, -8388600),
10743
10744 TEST_f_L (llrint, 1071930.0008, 1071930),
10745
10746 /* Test boundary conditions. */
10747 /* 0x1FFFFF */
10748 TEST_f_L (llrint, 2097151.0,2097151LL),
10749 /* 0x800000 */
10750 TEST_f_L (llrint, 8388608.0, 8388608LL),
10751 /* 0x1000000 */
10752 TEST_f_L (llrint, 16777216.0, 16777216LL),
10753 /* 0x20000000000 */
10754 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL),
10755 /* 0x40000000000 */
10756 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL),
10757 /* 0x1000000000000 */
10758 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL),
10759 /* 0x10000000000000 */
10760 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL),
10761 /* 0x10000080000000 */
10762 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL),
10763 /* 0x20000000000000 */
10764 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL),
10765 /* 0x80000000000000 */
10766 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL),
10767 /* 0x100000000000000 */
10768 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL),
830fce04 10769#ifdef TEST_LDOUBLE
15c7c18d
JM		 10770 /* The input can only be represented in long double. */
10771 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370496LL),
10772 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370496LL),
10773 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370496LL),
10774 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370497LL),
10775 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370498LL),
10776
10777 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370496LL),
10778 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370496LL),
10779 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370496LL),
10780 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370497LL),
10781 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370498LL),
830fce04
RM		 10782
10783# if LDBL_MANT_DIG > 100
15c7c18d
JM		 10784 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370495LL),
10785 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370496LL),
10786 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370497LL),
10787 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370495LL),
10788 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370496LL),
10789 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370497LL),
10790
10791 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370495LL),
10792 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370496LL),
10793 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370497LL),
10794 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370495LL),
10795 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370496LL),
10796 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370497LL),
10797#endif
10798
10799 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740992LL),
10800 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740992LL),
10801 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740992LL),
10802 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740993LL),
10803 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740994LL),
10804
10805 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740992LL),
10806 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740992LL),
10807 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740992LL),
10808 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740993LL),
10809 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740994LL),
830fce04
RM		 10810
10811# if LDBL_MANT_DIG > 100
15c7c18d
JM		 10812 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740991LL),
10813 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740992LL),
10814 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740993LL),
10815 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740992LL),
10816 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740993LL),
10817 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740994LL),
10818
10819 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740991LL),
10820 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740992LL),
10821 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740993LL),
10822 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740992LL),
10823 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740993LL),
10824 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740994LL),
10825#endif
10826
10827 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927936LL),
10828 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927936LL),
10829 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927936LL),
10830 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927937LL),
10831 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927938LL),
10832
10833 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927936LL),
10834 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927936LL),
10835 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927936LL),
10836 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927937LL),
10837 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927938LL),
830fce04
RM		 10838
10839# if LDBL_MANT_DIG > 100
15c7c18d
JM		 10840 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775806LL),
10841 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775806LL),
10842 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL),
10843 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL),
10844 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775806LL),
10845 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775806LL),
10846 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775806L),
10847 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775806LL),
10848 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775807LL),
10849 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775807LL),
10850 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL),
10851 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL),
830fce04
RM		 10852# endif
10853#endif
15c7c18d
JM		 10854 END_DATA (llrint_tonearest)
10855 };
830fce04
RM		 10856
10857static void
15c7c18d 10858llrint_test_tonearest (void)
830fce04 10859{
15c7c18d
JM		 10860 START (llrint_tonearest);
10861 RUN_TEST_LOOP_f_L (llrint, llrint_tonearest_test_data, FE_TONEAREST);
10862 END (llrint_tonearest);
10863}
830fce04 10864
15c7c18d
JM		 10865static const struct test_f_L_data llrint_towardzero_test_data[] =
10866 {
10867 START_DATA (llrint_towardzero),
10868 TEST_f_L (llrint, 0.0, 0),
10869 TEST_f_L (llrint, minus_zero, 0),
10870 TEST_f_L (llrint, 0.2L, 0),
10871 TEST_f_L (llrint, -0.2L, 0),
10872
10873 TEST_f_L (llrint, 1.4L, 1),
10874 TEST_f_L (llrint, -1.4L, -1),
10875
10876 TEST_f_L (llrint, 8388600.3L, 8388600),
10877 TEST_f_L (llrint, -8388600.3L, -8388600),
10878
10879 TEST_f_L (llrint, 1071930.0008, 1071930),
10880
10881 /* Test boundary conditions. */
10882 /* 0x1FFFFF */
10883 TEST_f_L (llrint, 2097151.0,2097151LL),
10884 /* 0x800000 */
10885 TEST_f_L (llrint, 8388608.0, 8388608LL),
10886 /* 0x1000000 */
10887 TEST_f_L (llrint, 16777216.0, 16777216LL),
10888 /* 0x20000000000 */
10889 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL),
10890 /* 0x40000000000 */
10891 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL),
10892 /* 0x1000000000000 */
10893 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL),
10894 /* 0x10000000000000 */
10895 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL),
10896 /* 0x10000080000000 */
10897 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL),
10898 /* 0x20000000000000 */
10899 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL),
10900 /* 0x80000000000000 */
10901 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL),
10902 /* 0x100000000000000 */
10903 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL),
830fce04 10904#ifdef TEST_LDOUBLE
15c7c18d
JM		 10905 /* The input can only be represented in long double. */
10906 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370495LL),
10907 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370496LL),
10908 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370496LL),
10909 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370496LL),
10910 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370497LL),
10911
10912 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370495LL),
10913 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370496LL),
10914 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370496LL),
10915 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370496LL),
10916 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370497LL),
830fce04
RM		 10917
10918# if LDBL_MANT_DIG > 100
15c7c18d
JM		 10919 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370495LL),
10920 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370496LL),
10921 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370497LL),
10922 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370494LL),
10923 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370495LL),
10924 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370496LL),
10925
10926 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370495LL),
10927 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370496LL),
10928 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370497LL),
10929 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370494LL),
10930 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370495LL),
10931 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370496LL),
10932#endif
10933
10934 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740991LL),
10935 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740992LL),
10936 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740992LL),
10937 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740992LL),
10938 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740993LL),
10939
10940 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740991LL),
10941 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740992LL),
10942 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740992LL),
10943 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740992LL),
10944 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740993LL),
830fce04
RM		 10945
10946# if LDBL_MANT_DIG > 100
15c7c18d
JM		 10947 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740991LL),
10948 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740992LL),
10949 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740993LL),
10950 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740991LL),
10951 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740992LL),
10952 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740993LL),
10953
10954 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740991LL),
10955 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740992LL),
10956 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740993LL),
10957 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740991LL),
10958 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740992LL),
10959 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740993LL),
10960#endif
10961
10962 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927935LL),
10963 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927936LL),
10964 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927936LL),
10965 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927936LL),
10966 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927937LL),
10967
10968 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927935LL),
10969 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927936LL),
10970 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927936LL),
10971 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927936LL),
10972 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927937LL),
830fce04
RM		 10973
10974# if LDBL_MANT_DIG > 100
15c7c18d
JM		 10975 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775805LL),
10976 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775805LL),
10977 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL),
10978 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL),
10979 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775806LL),
10980 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775806LL),
10981 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775806L),
10982 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775806LL),
10983 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775806LL),
10984 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775806LL),
10985 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL),
10986 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL),
830fce04
RM		 10987# endif
10988#endif
15c7c18d
JM		 10989 END_DATA (llrint_towardzero)
10990 };
830fce04
RM		 10991
10992static void
15c7c18d 10993llrint_test_towardzero (void)
830fce04 10994{
15c7c18d
JM		 10995 START (llrint_towardzero);
10996 RUN_TEST_LOOP_f_L (llrint, llrint_towardzero_test_data, FE_TOWARDZERO);
10997 END (llrint_towardzero);
10998}
830fce04 10999
15c7c18d
JM		 11000static const struct test_f_L_data llrint_downward_test_data[] =
11001 {
11002 START_DATA (llrint_downward),
11003 TEST_f_L (llrint, 0.0, 0),
11004 TEST_f_L (llrint, minus_zero, 0),
11005 TEST_f_L (llrint, 0.2L, 0),
11006 TEST_f_L (llrint, -0.2L, -1),
11007
11008 TEST_f_L (llrint, 1.4L, 1),
11009 TEST_f_L (llrint, -1.4L, -2),
11010
11011 TEST_f_L (llrint, 8388600.3L, 8388600),
11012 TEST_f_L (llrint, -8388600.3L, -8388601),
11013
11014 TEST_f_L (llrint, 1071930.0008, 1071930),
11015
11016 /* Test boundary conditions. */
11017 /* 0x1FFFFF */
11018 TEST_f_L (llrint, 2097151.0,2097151LL),
11019 /* 0x800000 */
11020 TEST_f_L (llrint, 8388608.0, 8388608LL),
11021 /* 0x1000000 */
11022 TEST_f_L (llrint, 16777216.0, 16777216LL),
11023 /* 0x20000000000 */
11024 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL),
11025 /* 0x40000000000 */
11026 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL),
11027 /* 0x1000000000000 */
11028 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL),
11029 /* 0x10000000000000 */
11030 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL),
11031 /* 0x10000080000000 */
11032 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL),
11033 /* 0x20000000000000 */
11034 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL),
11035 /* 0x80000000000000 */
11036 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL),
11037 /* 0x100000000000000 */
11038 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL),
830fce04 11039#ifdef TEST_LDOUBLE
15c7c18d
JM		 11040 /* The input can only be represented in long double. */
11041 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370495LL),
11042 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370496LL),
11043 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370496LL),
11044 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370496LL),
11045 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370497LL),
11046
11047 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370495LL),
11048 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370496LL),
11049 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370497LL),
11050 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370494LL),
11051 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370495LL),
11052 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370496LL),
11053
11054 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370496LL),
11055 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370497LL),
11056 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370497LL),
11057 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370497LL),
11058 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370498LL),
11059
11060 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370496LL),
11061 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370497LL),
11062 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370498LL),
11063 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370495LL),
11064 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370496LL),
11065 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370497LL),
11066
11067 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740991LL),
11068 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740992LL),
11069 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740992LL),
11070 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740992LL),
11071 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740993LL),
11072
11073 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740991LL),
11074 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740992LL),
11075 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740993LL),
11076 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740991LL),
11077 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740992LL),
11078 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740993LL),
11079
11080 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740992LL),
11081 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740993LL),
11082 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740993LL),
11083 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740993LL),
11084 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740994LL),
11085
11086 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740992LL),
11087 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740993LL),
11088 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740994LL),
11089 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740992LL),
11090 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740993LL),
11091 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740994LL),
11092
11093 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927935LL),
11094 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927936LL),
11095 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927936LL),
11096 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927936LL),
11097 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927937LL),
11098
11099 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927936LL),
11100 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927937LL),
11101 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927937LL),
11102 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927937LL),
11103 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927938LL),
830fce04
RM		 11104
11105# if LDBL_MANT_DIG > 100
15c7c18d
JM		 11106 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775805LL),
11107 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775806LL),
11108 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL),
11109 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL),
11110 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775806LL),
11111 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775807LL),
11112 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775806L),
11113 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775807LL),
11114 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775806LL),
11115 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775807LL),
11116 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL),
11117 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL),
830fce04
RM		 11118# endif
11119#endif
15c7c18d
JM		 11120 END_DATA (llrint_downward)
11121 };
830fce04
RM		 11122
11123static void
15c7c18d 11124llrint_test_downward (void)
830fce04 11125{
15c7c18d
JM		 11126 START (llrint_downward);
11127 RUN_TEST_LOOP_f_L (llrint, llrint_downward_test_data, FE_DOWNWARD);
11128 END (llrint_downward);
11129}
830fce04 11130
15c7c18d
JM		 11131static const struct test_f_L_data llrint_upward_test_data[] =
11132 {
11133 START_DATA (llrint_upward),
11134 TEST_f_L (llrint, 0.0, 0),
11135 TEST_f_L (llrint, minus_zero, 0),
11136 TEST_f_L (llrint, 0.2L, 1),
11137 TEST_f_L (llrint, -0.2L, 0),
830fce04 11138
15c7c18d
JM		 11139 TEST_f_L (llrint, 1.4L, 2),
11140 TEST_f_L (llrint, -1.4L, -1),
830fce04 11141
15c7c18d
JM		 11142 TEST_f_L (llrint, 8388600.3L, 8388601),
11143 TEST_f_L (llrint, -8388600.3L, -8388600),
830fce04 11144#ifndef TEST_FLOAT
15c7c18d
JM		 11145 TEST_f_L (llrint, 1071930.0008, 1071931),
11146#endif
11147 /* Test boundary conditions. */
11148 /* 0x1FFFFF */
11149 TEST_f_L (llrint, 2097151.0,2097151LL),
11150 /* 0x800000 */
11151 TEST_f_L (llrint, 8388608.0, 8388608LL),
11152 /* 0x1000000 */
11153 TEST_f_L (llrint, 16777216.0, 16777216LL),
11154 /* 0x20000000000 */
11155 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL),
11156 /* 0x40000000000 */
11157 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL),
11158 /* 0x1000000000000 */
11159 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL),
11160 /* 0x10000000000000 */
11161 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL),
11162 /* 0x10000080000000 */
11163 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL),
11164 /* 0x20000000000000 */
11165 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL),
11166 /* 0x80000000000000 */
11167 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL),
11168 /* 0x100000000000000 */
11169 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL),
830fce04 11170#ifdef TEST_LDOUBLE
15c7c18d
JM		 11171 /* The input can only be represented in long double. */
11172 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370496LL),
11173 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370497LL),
11174 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370497LL),
11175 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370497LL),
11176 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370498LL),
11177
11178 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370496LL),
11179 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370497LL),
11180 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370498LL),
11181 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370495LL),
11182 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370496LL),
11183 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370497LL),
11184
11185 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370495LL),
11186 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370496LL),
11187 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370496LL),
11188 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370496LL),
11189 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370497LL),
11190
11191 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370495LL),
11192 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370496LL),
11193 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370497LL),
11194 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370494LL),
11195 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370495LL),
11196 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370496LL),
11197
11198 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740992LL),
11199 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740993LL),
11200 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740993LL),
11201 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740993LL),
11202 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740994LL),
11203
11204 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740992LL),
11205 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740993LL),
11206 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740994LL),
11207 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740992LL),
11208 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740993LL),
11209 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740994LL),
11210
11211 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740991LL),
11212 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740992LL),
11213 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740992LL),
11214 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740992LL),
11215 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740993LL),
11216
11217 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740991LL),
11218 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740992LL),
11219 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740993LL),
11220 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740991LL),
11221 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740992LL),
11222 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740993LL),
11223
11224 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927936LL),
11225 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927937LL),
11226 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927937LL),
11227 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927937LL),
11228 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927938LL),
11229
11230 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927935LL),
11231 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927936LL),
11232 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927936LL),
11233 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927936LL),
11234 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927937LL),
830fce04
RM		 11235
11236# if LDBL_MANT_DIG > 100
15c7c18d
JM		 11237 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775806LL),
11238 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775805LL),
11239 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL),
11240 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL),
11241 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775807LL),
11242 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775806LL),
11243 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775807L),
11244 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775806LL),
11245 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775807LL),
11246 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775806LL),
11247 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL),
11248 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL),
830fce04
RM		 11249# endif
11250#endif
15c7c18d
JM		 11251 END_DATA (llrint_upward)
11252 };
830fce04 11253
15c7c18d
JM		 11254static void
11255llrint_test_upward (void)
11256{
11257 START (llrint_upward);
11258 RUN_TEST_LOOP_f_L (llrint, llrint_upward_test_data, FE_UPWARD);
830fce04
RM		 11259 END (llrint_upward);
11260}
11261
2550dfe9 11262
74c57478
JM		 11263static const struct test_f_f_data log_test_data[] =
11264 {
11265 START_DATA (log),
11266 TEST_f_f (log, 0, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11267 TEST_f_f (log, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11268
11269 TEST_f_f (log, 1, 0),
11270
cbe8c4d3
JM		 11271 TEST_f_f (log, -1, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
11272 TEST_f_f (log, -max_value, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
11273 TEST_f_f (log, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
74c57478
JM		 11274 TEST_f_f (log, plus_infty, plus_infty),
11275 TEST_f_f (log, qnan_value, qnan_value),
11276
11277 TEST_f_f (log, M_El, 1),
f98ece5f 11278 TEST_f_f (log, M_1_DIV_El, -1),
74c57478
JM		 11279 TEST_f_f (log, 2, M_LN2l),
11280 TEST_f_f (log, 10, M_LN10l),
11281 TEST_f_f (log, 0.75L, -0.287682072451780927439219005993827432L),
11282 END_DATA (log)
11283 };
11284
8847214f
UD		 11285static void
11286log_test (void)
11287{
e6d3c4a7
AJ		 11288 errno = 0;
11289 FUNC(log) (1);
11290 if (errno == ENOSYS)
11291 /* Function not implemented. */
11292 return;
8847214f 11293 START (log);
74c57478 11294 RUN_TEST_LOOP_f_f (log, log_test_data, );
8847214f
UD		 11295 END (log);
11296}
11297
11298
74c57478
JM		 11299static const struct test_f_f_data log10_test_data[] =
11300 {
11301 START_DATA (log10),
11302 TEST_f_f (log10, 0, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11303 TEST_f_f (log10, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11304
11305 TEST_f_f (log10, 1, 0),
11306
11307 /* log10 (x) == qNaN plus invalid exception if x < 0. */
cbe8c4d3
JM		 11308 TEST_f_f (log10, -1, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
11309 TEST_f_f (log10, -max_value, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
11310 TEST_f_f (log10, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
74c57478
JM		 11311
11312 TEST_f_f (log10, plus_infty, plus_infty),
11313 TEST_f_f (log10, qnan_value, qnan_value),
11314
11315 TEST_f_f (log10, 0.1L, -1),
11316 TEST_f_f (log10, 10.0, 1),
11317 TEST_f_f (log10, 100.0, 2),
11318 TEST_f_f (log10, 10000.0, 4),
11319 TEST_f_f (log10, M_El, M_LOG10El),
11320 TEST_f_f (log10, 0.75L, -0.124938736608299953132449886193870744L),
11321 END_DATA (log10)
11322 };
11323
8847214f
UD		 11324static void
11325log10_test (void)
11326{
e6d3c4a7
AJ		 11327 errno = 0;
11328 FUNC(log10) (1);
11329 if (errno == ENOSYS)
11330 /* Function not implemented. */
11331 return;
11332
8847214f 11333 START (log10);
74c57478
JM		 11334 RUN_TEST_LOOP_f_f (log10, log10_test_data, );
11335 END (log10);
11336}
8847214f 11337
8847214f 11338
74c57478
JM		 11339static const struct test_f_f_data log1p_test_data[] =
11340 {
11341 START_DATA (log1p),
11342 TEST_f_f (log1p, 0, 0),
11343 TEST_f_f (log1p, minus_zero, minus_zero),
8847214f 11344
74c57478
JM		 11345 TEST_f_f (log1p, -1, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11346 TEST_f_f (log1p, -2, qnan_value, INVALID_EXCEPTION),
11347 TEST_f_f (log1p, -max_value, qnan_value, INVALID_EXCEPTION),
11348 TEST_f_f (log1p, minus_infty, qnan_value, INVALID_EXCEPTION),
8847214f 11349
74c57478
JM		 11350 TEST_f_f (log1p, plus_infty, plus_infty),
11351 TEST_f_f (log1p, qnan_value, qnan_value),
8847214f 11352
74c57478 11353 TEST_f_f (log1p, M_El - 1.0, 1),
8847214f 11354
74c57478
JM		 11355 TEST_f_f (log1p, -0.25L, -0.287682072451780927439219005993827432L),
11356 TEST_f_f (log1p, -0.875, -2.07944154167983592825169636437452970L),
11357 END_DATA (log1p)
11358 };
8847214f
UD		 11359
11360static void
11361log1p_test (void)
11362{
e6d3c4a7
AJ		 11363 errno = 0;
11364 FUNC(log1p) (0);
11365 if (errno == ENOSYS)
11366 /* Function not implemented. */
11367 return;
11368
8847214f 11369 START (log1p);
74c57478
JM		 11370 RUN_TEST_LOOP_f_f (log1p, log1p_test_data, );
11371 END (log1p);
11372}
8847214f 11373
8847214f 11374
74c57478
JM		 11375static const struct test_f_f_data log2_test_data[] =
11376 {
11377 START_DATA (log2),
11378 TEST_f_f (log2, 0, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11379 TEST_f_f (log2, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 11380
74c57478 11381 TEST_f_f (log2, 1, 0),
8847214f 11382
cbe8c4d3
JM		 11383 TEST_f_f (log2, -1, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
11384 TEST_f_f (log2, -max_value, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
11385 TEST_f_f (log2, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
8847214f 11386
74c57478
JM		 11387 TEST_f_f (log2, plus_infty, plus_infty),
11388 TEST_f_f (log2, qnan_value, qnan_value),
8847214f 11389
74c57478
JM		 11390 TEST_f_f (log2, M_El, M_LOG2El),
11391 TEST_f_f (log2, 2.0, 1),
11392 TEST_f_f (log2, 16.0, 4),
11393 TEST_f_f (log2, 256.0, 8),
11394 TEST_f_f (log2, 0.75L, -.415037499278843818546261056052183492L),
11395 END_DATA (log2)
11396 };
8847214f
UD		 11397
11398static void
11399log2_test (void)
11400{
e6d3c4a7
AJ		 11401 errno = 0;
11402 FUNC(log2) (1);
11403 if (errno == ENOSYS)
11404 /* Function not implemented. */
11405 return;
11406
8847214f 11407 START (log2);
74c57478 11408 RUN_TEST_LOOP_f_f (log2, log2_test_data, );
8847214f
UD		 11409 END (log2);
11410}
11411
11412
74c57478
JM		 11413static const struct test_f_f_data logb_test_data[] =
11414 {
11415 START_DATA (logb),
11416 TEST_f_f (logb, plus_infty, plus_infty),
11417 TEST_f_f (logb, minus_infty, plus_infty),
8847214f 11418
74c57478 11419 TEST_f_f (logb, 0, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 11420
74c57478
JM		 11421 TEST_f_f (logb, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11422 TEST_f_f (logb, qnan_value, qnan_value),
8847214f 11423
74c57478
JM		 11424 TEST_f_f (logb, 1, 0),
11425 TEST_f_f (logb, M_El, 1),
11426 TEST_f_f (logb, 1024, 10),
11427 TEST_f_f (logb, -2000, 10),
8847214f 11428
74c57478
JM		 11429 TEST_f_f (logb, 0x0.1p-127, -131),
11430 TEST_f_f (logb, 0x0.01p-127, -135),
11431 TEST_f_f (logb, 0x0.011p-127, -135),
89c9aa49 11432#ifndef TEST_FLOAT
74c57478
JM		 11433 TEST_f_f (logb, 0x0.8p-1022, -1023),
11434 TEST_f_f (logb, 0x0.1p-1022, -1026),
11435 TEST_f_f (logb, 0x0.00111p-1022, -1034),
11436 TEST_f_f (logb, 0x0.00001p-1022, -1042),
11437 TEST_f_f (logb, 0x0.000011p-1022, -1042),
11438 TEST_f_f (logb, 0x0.0000000000001p-1022, -1074),
89c9aa49
AZ		 11439#endif
11440#if defined TEST_LDOUBLE && LDBL_MIN_EXP - LDBL_MANT_DIG <= -16400
74c57478
JM		 11441 TEST_f_f (logb, 0x1p-16400L, -16400),
11442 TEST_f_f (logb, 0x.00000000001p-16382L, -16426),
89c9aa49 11443#endif
74c57478
JM		 11444 END_DATA (logb)
11445 };
89c9aa49 11446
74c57478
JM		 11447static void
11448logb_test (void)
11449{
11450 START (logb);
11451 RUN_TEST_LOOP_f_f (logb, logb_test_data, );
8847214f
UD		 11452 END (logb);
11453}
11454
74c57478
JM		 11455static const struct test_f_f_data logb_downward_test_data[] =
11456 {
11457 START_DATA (logb_downward),
11458 /* IEEE 754-2008 says (section 5.3.3) that "logB(1) is +0.". Libm
11459 should not return -0 from logb in any rounding mode. PowerPC32 has
11460 failed with this test for power4 logb (and logbl on all PowerPC
11461 platforms) in the past due to instruction selection. GCC PR 52775
11462 provides the availability of the fcfid insn in 32-bit mode which
11463 eliminates the use of fsub in this instance and prevents the negative
11464 signed 0.0. */
11465
11466 /* BZ #887 */
11467 TEST_f_f (logb, 1.000e+0, plus_zero),
11468 END_DATA (logb_downward)
11469 };
11470
a462cb63
RA		 11471static void
11472logb_test_downward (void)
11473{
a462cb63
RA		 11474 errno = 0;
11475
11476 FUNC(logb) (0);
11477 if (errno == ENOSYS)
11478 /* Function not implemented. */
11479 return;
11480
11481 START (logb_downward);
74c57478 11482 RUN_TEST_LOOP_f_f (logb, logb_downward_test_data, FE_DOWNWARD);
a462cb63
RA		 11483 END (logb_downward);
11484}
2550dfe9 11485
3608cb24
JM		 11486static const struct test_f_l_data lround_test_data[] =
11487 {
11488 START_DATA (lround),
11489 /* TODO: missing +/-Inf as well as qNaN tests. */
11490 TEST_f_l (lround, 0, 0),
11491 TEST_f_l (lround, minus_zero, 0),
11492 TEST_f_l (lround, 0.2L, 0.0),
11493 TEST_f_l (lround, -0.2L, 0),
11494 TEST_f_l (lround, 0.5, 1),
11495 TEST_f_l (lround, -0.5, -1),
11496 TEST_f_l (lround, 0.8L, 1),
11497 TEST_f_l (lround, -0.8L, -1),
11498 TEST_f_l (lround, 1.5, 2),
11499 TEST_f_l (lround, -1.5, -2),
11500 TEST_f_l (lround, 22514.5, 22515),
11501 TEST_f_l (lround, -22514.5, -22515),
11502 TEST_f_l (lround, 1071930.0008, 1071930),
8847214f 11503#ifndef TEST_FLOAT
3608cb24 11504 TEST_f_l (lround, 1073741824.01, 1073741824),
39007ae3 11505# if LONG_MAX > 281474976710656
3608cb24
JM		 11506 TEST_f_l (lround, 281474976710656.025, 281474976710656),
11507 TEST_f_l (lround, 18014398509481974, 18014398509481974),
39007ae3 11508# endif
3608cb24
JM		 11509 TEST_f_l (lround, 2097152.5, 2097153),
11510 TEST_f_l (lround, -2097152.5, -2097153),
11511 /* nextafter(0.5,-1) */
11512 TEST_f_l (lround, 0x1.fffffffffffffp-2, 0),
11513 /* nextafter(-0.5,1) */
11514 TEST_f_l (lround, -0x1.fffffffffffffp-2, 0),
c1e6b459 11515#else
3608cb24
JM		 11516 /* nextafter(0.5,-1) */
11517 TEST_f_l (lround, 0x1.fffffp-2, 0),
11518 /* nextafter(-0.5,1) */
11519 TEST_f_l (lround, -0x1.fffffp-2, 0),
11520 TEST_f_l (lround, 0x1.fffffep+23, 16777215),
11521 TEST_f_l (lround, -0x1.fffffep+23, -16777215),
11522#endif
11523 END_DATA (lround)
11524 };
11525
11526static void
11527lround_test (void)
11528{
11529 START (lround);
11530 RUN_TEST_LOOP_f_l (lround, lround_test_data, );
8847214f
UD		 11531 END (lround);
11532}
11533
11534
15c7c18d
JM		 11535static const struct test_f_L_data llround_test_data[] =
11536 {
11537 START_DATA (llround),
11538 /* TODO: missing +/-Inf as well as qNaN tests. */
11539 TEST_f_L (llround, 0, 0),
11540 TEST_f_L (llround, minus_zero, 0),
11541 TEST_f_L (llround, 0.2L, 0.0),
11542 TEST_f_L (llround, -0.2L, 0),
11543 TEST_f_L (llround, 0.5, 1),
11544 TEST_f_L (llround, -0.5, -1),
11545 TEST_f_L (llround, 0.8L, 1),
11546 TEST_f_L (llround, -0.8L, -1),
11547 TEST_f_L (llround, 1.5, 2),
11548 TEST_f_L (llround, -1.5, -2),
11549 TEST_f_L (llround, 22514.5, 22515),
11550 TEST_f_L (llround, -22514.5, -22515),
11551 TEST_f_L (llround, 1071930.0008, 1071930),
8847214f 11552#ifndef TEST_FLOAT
15c7c18d
JM		 11553 TEST_f_L (llround, 2097152.5, 2097153),
11554 TEST_f_L (llround, -2097152.5, -2097153),
11555 TEST_f_L (llround, 34359738368.5, 34359738369ll),
11556 TEST_f_L (llround, -34359738368.5, -34359738369ll),
11557 TEST_f_L (llround, -3.65309740835E17, -365309740835000000LL),
11558#endif
11559
11560 /* Test boundary conditions. */
11561 /* 0x1FFFFF */
11562 TEST_f_L (llround, 2097151.0, 2097151LL),
11563 /* 0x800000 */
11564 TEST_f_L (llround, 8388608.0, 8388608LL),
11565 /* 0x1000000 */
11566 TEST_f_L (llround, 16777216.0, 16777216LL),
11567 /* 0x20000000000 */
11568 TEST_f_L (llround, 2199023255552.0, 2199023255552LL),
11569 /* 0x40000000000 */
11570 TEST_f_L (llround, 4398046511104.0, 4398046511104LL),
11571 /* 0x1000000000000 */
11572 TEST_f_L (llround, 281474976710656.0, 281474976710656LL),
11573 /* 0x10000000000000 */
11574 TEST_f_L (llround, 4503599627370496.0, 4503599627370496LL),
11575 /* 0x10000080000000 */
11576 TEST_f_L (llround, 4503601774854144.0, 4503601774854144LL),
11577 /* 0x20000000000000 */
11578 TEST_f_L (llround, 9007199254740992.0, 9007199254740992LL),
11579 /* 0x80000000000000 */
11580 TEST_f_L (llround, 36028797018963968.0, 36028797018963968LL),
11581 /* 0x100000000000000 */
11582 TEST_f_L (llround, 72057594037927936.0, 72057594037927936LL),
8847214f 11583
601d2942 11584#ifndef TEST_FLOAT
15c7c18d
JM		 11585 /* 0x100000000 */
11586 TEST_f_L (llround, 4294967295.5, 4294967296LL),
11587 /* 0x200000000 */
11588 TEST_f_L (llround, 8589934591.5, 8589934592LL),
11589
11590 /* nextafter(0.5,-1) */
11591 TEST_f_L (llround, 0x1.fffffffffffffp-2, 0),
11592 /* nextafter(-0.5,1) */
11593 TEST_f_L (llround, -0x1.fffffffffffffp-2, 0),
11594 /* On PowerPC an exponent of '52' is the largest incrementally
11595 * representable sequence of whole-numbers in the 'double' range. We test
11596 * lround to make sure that a guard bit set during the lround operation
11597 * hasn't forced an erroneous shift giving us an incorrect result. The odd
11598 * numbers between +-(2^52+1 and 2^53-1) are affected since they have the
11599 * rightmost bit set. */
11600 /* +-(2^52+1) */
11601 TEST_f_L (llround, 0x1.0000000000001p+52,4503599627370497LL),
11602 TEST_f_L (llround, -0x1.0000000000001p+52,-4503599627370497LL),
11603 /* +-(2^53-1): Input is the last (positive and negative) incrementally
11604 * representable whole-number in the 'double' range that might round
11605 * erroneously. */
11606 TEST_f_L (llround, 0x1.fffffffffffffp+52, 9007199254740991LL),
11607 TEST_f_L (llround, -0x1.fffffffffffffp+52, -9007199254740991LL),
c1e6b459 11608#else
15c7c18d
JM		 11609 /* nextafter(0.5,-1) */
11610 TEST_f_L (llround, 0x1.fffffep-2, 0),
11611 /* nextafter(-0.5,1) */
11612 TEST_f_L (llround, -0x1.fffffep-2, 0),
11613 /* As above, on PowerPC an exponent of '23' is the largest incrementally
11614 * representable sequence of whole-numbers in the 'float' range.
11615 * Likewise, numbers between +-(2^23+1 and 2^24-1) are affected. */
11616 TEST_f_L (llround, 0x1.000002p+23,8388609),
11617 TEST_f_L (llround, -0x1.000002p+23,-8388609),
11618 TEST_f_L (llround, 0x1.fffffep+23, 16777215),
11619 TEST_f_L (llround, -0x1.fffffep+23, -16777215),
601d2942
UD		 11620#endif
11621
c1e6b459 11622
f964490f 11623#ifdef TEST_LDOUBLE
15c7c18d
JM		 11624 /* The input can only be represented in long double. */
11625 TEST_f_L (llround, 4503599627370495.5L, 4503599627370496LL),
11626 TEST_f_L (llround, 4503599627370496.25L, 4503599627370496LL),
11627 TEST_f_L (llround, 4503599627370496.5L, 4503599627370497LL),
11628 TEST_f_L (llround, 4503599627370496.75L, 4503599627370497LL),
11629 TEST_f_L (llround, 4503599627370497.5L, 4503599627370498LL),
f964490f 11630
830fce04 11631# if LDBL_MANT_DIG > 100
15c7c18d
JM		 11632 TEST_f_L (llround, 4503599627370495.4999999999999L, 4503599627370495LL),
11633 TEST_f_L (llround, 4503599627370496.4999999999999L, 4503599627370496LL),
11634 TEST_f_L (llround, 4503599627370497.4999999999999L, 4503599627370497LL),
11635 TEST_f_L (llround, 4503599627370494.5000000000001L, 4503599627370495LL),
11636 TEST_f_L (llround, 4503599627370495.5000000000001L, 4503599627370496LL),
11637 TEST_f_L (llround, 4503599627370496.5000000000001L, 4503599627370497LL),
11638
11639 TEST_f_L (llround, -4503599627370495.4999999999999L, -4503599627370495LL),
11640 TEST_f_L (llround, -4503599627370496.4999999999999L, -4503599627370496LL),
11641 TEST_f_L (llround, -4503599627370497.4999999999999L, -4503599627370497LL),
11642 TEST_f_L (llround, -4503599627370494.5000000000001L, -4503599627370495LL),
11643 TEST_f_L (llround, -4503599627370495.5000000000001L, -4503599627370496LL),
11644 TEST_f_L (llround, -4503599627370496.5000000000001L, -4503599627370497LL),
830fce04
RM		 11645# endif
11646
15c7c18d
JM		 11647 TEST_f_L (llround, -4503599627370495.5L, -4503599627370496LL),
11648 TEST_f_L (llround, -4503599627370496.25L, -4503599627370496LL),
11649 TEST_f_L (llround, -4503599627370496.5L, -4503599627370497LL),
11650 TEST_f_L (llround, -4503599627370496.75L, -4503599627370497LL),
11651 TEST_f_L (llround, -4503599627370497.5L, -4503599627370498LL),
f964490f 11652
15c7c18d
JM		 11653 TEST_f_L (llround, 9007199254740991.5L, 9007199254740992LL),
11654 TEST_f_L (llround, 9007199254740992.25L, 9007199254740992LL),
11655 TEST_f_L (llround, 9007199254740992.5L, 9007199254740993LL),
11656 TEST_f_L (llround, 9007199254740992.75L, 9007199254740993LL),
11657 TEST_f_L (llround, 9007199254740993.5L, 9007199254740994LL),
f964490f 11658
830fce04 11659# if LDBL_MANT_DIG > 100
15c7c18d
JM		 11660 TEST_f_L (llround, 9007199254740991.4999999999999L, 9007199254740991LL),
11661 TEST_f_L (llround, 9007199254740992.4999999999999L, 9007199254740992LL),
11662 TEST_f_L (llround, 9007199254740993.4999999999999L, 9007199254740993LL),
11663 TEST_f_L (llround, 9007199254740991.5000000000001L, 9007199254740992LL),
11664 TEST_f_L (llround, 9007199254740992.5000000000001L, 9007199254740993LL),
11665 TEST_f_L (llround, 9007199254740993.5000000000001L, 9007199254740994LL),
11666
11667 TEST_f_L (llround, -9007199254740991.4999999999999L, -9007199254740991LL),
11668 TEST_f_L (llround, -9007199254740992.4999999999999L, -9007199254740992LL),
11669 TEST_f_L (llround, -9007199254740993.4999999999999L, -9007199254740993LL),
11670 TEST_f_L (llround, -9007199254740991.5000000000001L, -9007199254740992LL),
11671 TEST_f_L (llround, -9007199254740992.5000000000001L, -9007199254740993LL),
11672 TEST_f_L (llround, -9007199254740993.5000000000001L, -9007199254740994LL),
830fce04
RM		 11673# endif
11674
15c7c18d
JM		 11675 TEST_f_L (llround, -9007199254740991.5L, -9007199254740992LL),
11676 TEST_f_L (llround, -9007199254740992.25L, -9007199254740992LL),
11677 TEST_f_L (llround, -9007199254740992.5L, -9007199254740993LL),
11678 TEST_f_L (llround, -9007199254740992.75L, -9007199254740993LL),
11679 TEST_f_L (llround, -9007199254740993.5L, -9007199254740994LL),
11680
11681 TEST_f_L (llround, 72057594037927935.5L, 72057594037927936LL),
11682 TEST_f_L (llround, 72057594037927936.25L, 72057594037927936LL),
11683 TEST_f_L (llround, 72057594037927936.5L, 72057594037927937LL),
11684 TEST_f_L (llround, 72057594037927936.75L, 72057594037927937LL),
11685 TEST_f_L (llround, 72057594037927937.5L, 72057594037927938LL),
11686
11687 TEST_f_L (llround, -72057594037927935.5L, -72057594037927936LL),
11688 TEST_f_L (llround, -72057594037927936.25L, -72057594037927936LL),
11689 TEST_f_L (llround, -72057594037927936.5L, -72057594037927937LL),
11690 TEST_f_L (llround, -72057594037927936.75L, -72057594037927937LL),
11691 TEST_f_L (llround, -72057594037927937.5L, -72057594037927938LL),
11692
11693 TEST_f_L (llround, 9223372036854775806.25L, 9223372036854775806LL),
11694 TEST_f_L (llround, -9223372036854775806.25L, -9223372036854775806LL),
11695 TEST_f_L (llround, 9223372036854775806.5L, 9223372036854775807LL),
11696 TEST_f_L (llround, -9223372036854775806.5L, -9223372036854775807LL),
11697 TEST_f_L (llround, 9223372036854775807.0L, 9223372036854775807LL),
11698 TEST_f_L (llround, -9223372036854775807.0L, -9223372036854775807LL),
11699#endif
11700 END_DATA (llround)
11701 };
f964490f 11702
15c7c18d
JM		 11703static void
11704llround_test (void)
11705{
11706 START (llround);
11707 RUN_TEST_LOOP_f_L (llround, llround_test_data, );
8847214f
UD		 11708 END (llround);
11709}
11710
9dc9095d
JM		 11711static const struct test_fF_f1_data modf_test_data[] =
11712 {
11713 START_DATA (modf),
11714 TEST_fF_f1 (modf, plus_infty, 0, plus_infty),
11715 TEST_fF_f1 (modf, minus_infty, minus_zero, minus_infty),
11716 TEST_fF_f1 (modf, qnan_value, qnan_value, qnan_value),
11717 TEST_fF_f1 (modf, 0, 0, 0),
11718 TEST_fF_f1 (modf, 1.5, 0.5, 1),
11719 TEST_fF_f1 (modf, 2.5, 0.5, 2),
11720 TEST_fF_f1 (modf, -2.5, -0.5, -2),
11721 TEST_fF_f1 (modf, 20, 0, 20),
11722 TEST_fF_f1 (modf, 21, 0, 21),
11723 TEST_fF_f1 (modf, 89.5, 0.5, 89),
11724 END_DATA (modf)
11725 };
11726
8847214f
UD		 11727static void
11728modf_test (void)
11729{
11730 FLOAT x;
11731
11732 START (modf);
9dc9095d 11733 RUN_TEST_LOOP_fF_f1 (modf, modf_test_data, , x);
8847214f
UD		 11734 END (modf);
11735}
11736
11737
74c57478
JM		 11738static const struct test_f_f_data nearbyint_test_data[] =
11739 {
11740 START_DATA (nearbyint),
11741
105a07df
JM		 11742 TEST_f_f (nearbyint, 0.0, 0.0, NO_INEXACT_EXCEPTION),
11743 TEST_f_f (nearbyint, minus_zero, minus_zero, NO_INEXACT_EXCEPTION),
11744 TEST_f_f (nearbyint, plus_infty, plus_infty, NO_INEXACT_EXCEPTION),
11745 TEST_f_f (nearbyint, minus_infty, minus_infty, NO_INEXACT_EXCEPTION),
11746 TEST_f_f (nearbyint, qnan_value, qnan_value, NO_INEXACT_EXCEPTION),
74c57478
JM		 11747
11748 /* Subnormal values */
105a07df
JM		 11749 TEST_f_f (nearbyint, -8.98847e+307, -8.98847e+307, NO_INEXACT_EXCEPTION),
11750 TEST_f_f (nearbyint, -4.45015e-308, minus_zero, NO_INEXACT_EXCEPTION),
74c57478
JM		 11751
11752 /* Default rounding mode is round to nearest. */
105a07df
JM		 11753 TEST_f_f (nearbyint, 0.5, 0.0, NO_INEXACT_EXCEPTION),
11754 TEST_f_f (nearbyint, 1.5, 2.0, NO_INEXACT_EXCEPTION),
11755 TEST_f_f (nearbyint, -0.5, minus_zero, NO_INEXACT_EXCEPTION),
11756 TEST_f_f (nearbyint, -1.5, -2.0, NO_INEXACT_EXCEPTION),
11757
11758 TEST_f_f (nearbyint, 262144.75, 262145.0, NO_INEXACT_EXCEPTION),
11759 TEST_f_f (nearbyint, 262142.75, 262143.0, NO_INEXACT_EXCEPTION),
11760 TEST_f_f (nearbyint, 524286.75, 524287.0, NO_INEXACT_EXCEPTION),
11761 TEST_f_f (nearbyint, 524288.75, 524289.0, NO_INEXACT_EXCEPTION),
11762
11763 TEST_f_f (nearbyint, 1048576.75, 1048577.0, NO_INEXACT_EXCEPTION),
11764 TEST_f_f (nearbyint, 2097152.75, 2097153.0, NO_INEXACT_EXCEPTION),
11765 TEST_f_f (nearbyint, 2492472.75, 2492473.0, NO_INEXACT_EXCEPTION),
11766 TEST_f_f (nearbyint, 2886220.75, 2886221.0, NO_INEXACT_EXCEPTION),
11767 TEST_f_f (nearbyint, 3058792.75, 3058793.0, NO_INEXACT_EXCEPTION),
11768 TEST_f_f (nearbyint, -1048576.75, -1048577.0, NO_INEXACT_EXCEPTION),
11769 TEST_f_f (nearbyint, -2097152.75, -2097153.0, NO_INEXACT_EXCEPTION),
11770 TEST_f_f (nearbyint, -2492472.75, -2492473.0, NO_INEXACT_EXCEPTION),
11771 TEST_f_f (nearbyint, -2886220.75, -2886221.0, NO_INEXACT_EXCEPTION),
11772 TEST_f_f (nearbyint, -3058792.75, -3058793.0, NO_INEXACT_EXCEPTION),
74c57478 11773#ifndef TEST_FLOAT
105a07df
JM		 11774 TEST_f_f (nearbyint, 70368744177664.75, 70368744177665.0, NO_INEXACT_EXCEPTION),
11775 TEST_f_f (nearbyint, 140737488355328.75, 140737488355329.0, NO_INEXACT_EXCEPTION),
11776 TEST_f_f (nearbyint, 281474976710656.75, 281474976710657.0, NO_INEXACT_EXCEPTION),
11777 TEST_f_f (nearbyint, 562949953421312.75, 562949953421313.0, NO_INEXACT_EXCEPTION),
11778 TEST_f_f (nearbyint, 1125899906842624.75, 1125899906842625.0, NO_INEXACT_EXCEPTION),
11779 TEST_f_f (nearbyint, -70368744177664.75, -70368744177665.0, NO_INEXACT_EXCEPTION),
11780 TEST_f_f (nearbyint, -140737488355328.75, -140737488355329.0, NO_INEXACT_EXCEPTION),
11781 TEST_f_f (nearbyint, -281474976710656.75, -281474976710657.0, NO_INEXACT_EXCEPTION),
11782 TEST_f_f (nearbyint, -562949953421312.75, -562949953421313.0, NO_INEXACT_EXCEPTION),
11783 TEST_f_f (nearbyint, -1125899906842624.75, -1125899906842625.0, NO_INEXACT_EXCEPTION),
74c57478
JM		 11784#endif
11785
11786 END_DATA (nearbyint)
11787 };
11788
8847214f
UD		 11789static void
11790nearbyint_test (void)
11791{
11792 START (nearbyint);
74c57478 11793 RUN_TEST_LOOP_f_f (nearbyint, nearbyint_test_data, );
8847214f
UD		 11794 END (nearbyint);
11795}
11796
601a3a5f
JM		 11797static const struct test_ff_f_data nextafter_test_data[] =
11798 {
11799 START_DATA (nextafter),
8847214f 11800
601a3a5f
JM		 11801 TEST_ff_f (nextafter, 0, 0, 0),
11802 TEST_ff_f (nextafter, minus_zero, 0, 0),
11803 TEST_ff_f (nextafter, 0, minus_zero, minus_zero),
11804 TEST_ff_f (nextafter, minus_zero, minus_zero, minus_zero),
8847214f 11805
601a3a5f
JM		 11806 TEST_ff_f (nextafter, 9, 9, 9),
11807 TEST_ff_f (nextafter, -9, -9, -9),
11808 TEST_ff_f (nextafter, plus_infty, plus_infty, plus_infty),
11809 TEST_ff_f (nextafter, minus_infty, minus_infty, minus_infty),
8847214f 11810
601a3a5f
JM		 11811 TEST_ff_f (nextafter, qnan_value, 1.1L, qnan_value),
11812 TEST_ff_f (nextafter, 1.1L, qnan_value, qnan_value),
11813 TEST_ff_f (nextafter, qnan_value, qnan_value, qnan_value),
8847214f 11814
601a3a5f
JM		 11815 TEST_ff_f (nextafter, max_value, plus_infty, plus_infty, OVERFLOW_EXCEPTION),
11816 TEST_ff_f (nextafter, -max_value, minus_infty, minus_infty, OVERFLOW_EXCEPTION),
64b02fd2 11817
757de559 11818#ifdef TEST_LDOUBLE
601a3a5f
JM		 11819 // XXX Enable once gcc is fixed.
11820 //TEST_ff_f (nextafter, 0x0.00000040000000000000p-16385L, -0.1L, 0x0.0000003ffffffff00000p-16385L),
757de559
UD		 11821#endif
11822
601a3a5f
JM		 11823 /* XXX We need the hexadecimal FP number representation here for further
11824 tests. */
11825 END_DATA (nextafter)
11826 };
8847214f 11827
601a3a5f
JM		 11828static void
11829nextafter_test (void)
11830{
11831
11832 START (nextafter);
11833 RUN_TEST_LOOP_ff_f (nextafter, nextafter_test_data, );
8847214f
UD		 11834 END (nextafter);
11835}
11836
fe559c5e 11837
601a3a5f
JM		 11838static const struct test_ff_f_data_nexttoward nexttoward_test_data[] =
11839 {
11840 START_DATA (nexttoward),
11841 TEST_ff_f (nexttoward, 0, 0, 0),
11842 TEST_ff_f (nexttoward, minus_zero, 0, 0),
11843 TEST_ff_f (nexttoward, 0, minus_zero, minus_zero),
11844 TEST_ff_f (nexttoward, minus_zero, minus_zero, minus_zero),
8847214f 11845
601a3a5f
JM		 11846 TEST_ff_f (nexttoward, 9, 9, 9),
11847 TEST_ff_f (nexttoward, -9, -9, -9),
11848 TEST_ff_f (nexttoward, plus_infty, plus_infty, plus_infty),
11849 TEST_ff_f (nexttoward, minus_infty, minus_infty, minus_infty),
8847214f 11850
601a3a5f
JM		 11851 TEST_ff_f (nexttoward, qnan_value, 1.1L, qnan_value),
11852 TEST_ff_f (nexttoward, 1.1L, qnan_value, qnan_value),
11853 TEST_ff_f (nexttoward, qnan_value, qnan_value, qnan_value),
8847214f 11854
7cb029ee 11855#ifdef TEST_FLOAT
601a3a5f
JM		 11856 TEST_ff_f (nexttoward, 1.0, 1.1L, 0x1.000002p0),
11857 TEST_ff_f (nexttoward, 1.0, LDBL_MAX, 0x1.000002p0),
11858 TEST_ff_f (nexttoward, 1.0, 0x1.0000000000001p0, 0x1.000002p0),
11859 TEST_ff_f (nexttoward, 1.0, 0.9L, 0x0.ffffffp0),
11860 TEST_ff_f (nexttoward, 1.0, -LDBL_MAX, 0x0.ffffffp0),
11861 TEST_ff_f (nexttoward, 1.0, 0x0.fffffffffffff8p0, 0x0.ffffffp0),
11862 TEST_ff_f (nexttoward, -1.0, -1.1L, -0x1.000002p0),
11863 TEST_ff_f (nexttoward, -1.0, -LDBL_MAX, -0x1.000002p0),
11864 TEST_ff_f (nexttoward, -1.0, -0x1.0000000000001p0, -0x1.000002p0),
11865 TEST_ff_f (nexttoward, -1.0, -0.9L, -0x0.ffffffp0),
11866 TEST_ff_f (nexttoward, -1.0, LDBL_MAX, -0x0.ffffffp0),
11867 TEST_ff_f (nexttoward, -1.0, -0x0.fffffffffffff8p0, -0x0.ffffffp0),
11868 TEST_ff_f (nexttoward, -0x1.3p-145, -0xap-148L, -0x1.4p-145, UNDERFLOW_EXCEPTION),
7cb029ee 11869# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 11870 TEST_ff_f (nexttoward, 1.0, 0x1.000000000000002p0L, 0x1.000002p0),
11871 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffp0L, 0x0.ffffffp0),
11872 TEST_ff_f (nexttoward, -1.0, -0x1.000000000000002p0L, -0x1.000002p0),
11873 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffp0L, -0x0.ffffffp0),
7cb029ee
JM		 11874# endif
11875# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 11876 TEST_ff_f (nexttoward, 1.0, 0x1.000000000000000000000000008p0L, 0x1.000002p0),
11877 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffffffffffffcp0L, 0x0.ffffffp0),
11878 TEST_ff_f (nexttoward, -1.0, -0x1.000000000000000000000000008p0L, -0x1.000002p0),
11879 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffffffffffffcp0L, -0x0.ffffffp0),
7cb029ee
JM		 11880# endif
11881# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 11882 TEST_ff_f (nexttoward, 1.0, 0x1.0000000000000000000000000001p0L, 0x1.000002p0),
11883 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffp0),
11884 TEST_ff_f (nexttoward, -1.0, -0x1.0000000000000000000000000001p0L, -0x1.000002p0),
11885 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffp0),
7cb029ee
JM		 11886# endif
11887#endif
11888#ifdef TEST_DOUBLE
601a3a5f
JM		 11889 TEST_ff_f (nexttoward, 1.0, 1.1L, 0x1.0000000000001p0),
11890 TEST_ff_f (nexttoward, 1.0, LDBL_MAX, 0x1.0000000000001p0),
11891 TEST_ff_f (nexttoward, 1.0, 0x1.0000000000001p0, 0x1.0000000000001p0),
11892 TEST_ff_f (nexttoward, 1.0, 0.9L, 0x0.fffffffffffff8p0),
11893 TEST_ff_f (nexttoward, 1.0, -LDBL_MAX, 0x0.fffffffffffff8p0),
11894 TEST_ff_f (nexttoward, 1.0, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0),
11895 TEST_ff_f (nexttoward, -1.0, -1.1L, -0x1.0000000000001p0),
11896 TEST_ff_f (nexttoward, -1.0, -LDBL_MAX, -0x1.0000000000001p0),
11897 TEST_ff_f (nexttoward, -1.0, -0x1.0000000000001p0, -0x1.0000000000001p0),
11898 TEST_ff_f (nexttoward, -1.0, -0.9L, -0x0.fffffffffffff8p0),
11899 TEST_ff_f (nexttoward, -1.0, LDBL_MAX, -0x0.fffffffffffff8p0),
11900 TEST_ff_f (nexttoward, -1.0, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0),
11901 TEST_ff_f (nexttoward, -1.0, -0x8.00346dc5d6388p-3L, -0x1.0000000000001p0),
11902 TEST_ff_f (nexttoward, 0x1p-1074, 0x1p-1073L, 0x1p-1073, UNDERFLOW_EXCEPTION),
7cb029ee 11903# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 11904 TEST_ff_f (nexttoward, 1.0, 0x1.000000000000002p0L, 0x1.0000000000001p0),
11905 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffff8p0),
11906 TEST_ff_f (nexttoward, -1.0, -0x1.000000000000002p0L, -0x1.0000000000001p0),
11907 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffff8p0),
7cb029ee
JM		 11908# endif
11909# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 11910 TEST_ff_f (nexttoward, 1.0, 0x1.000000000000000000000000008p0L, 0x1.0000000000001p0),
11911 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffffffffffffcp0L, 0x0.fffffffffffff8p0),
11912 TEST_ff_f (nexttoward, -1.0, -0x1.000000000000000000000000008p0L, -0x1.0000000000001p0),
11913 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffffffffffffcp0L, -0x0.fffffffffffff8p0),
7cb029ee
JM		 11914# endif
11915# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 11916 TEST_ff_f (nexttoward, 1.0, 0x1.0000000000000000000000000001p0L, 0x1.0000000000001p0),
11917 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.fffffffffffff8p0),
11918 TEST_ff_f (nexttoward, -1.0, -0x1.0000000000000000000000000001p0L, -0x1.0000000000001p0),
11919 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.fffffffffffff8p0),
7cb029ee
JM		 11920# endif
11921#endif
601a3a5f
JM		 11922 END_DATA (nexttoward)
11923 };
8847214f
UD		 11924
11925static void
601a3a5f 11926nexttoward_test (void)
8847214f 11927{
601a3a5f
JM		 11928 START (nexttoward);
11929 RUN_TEST_LOOP_ff_f (nexttoward, nexttoward_test_data, );
11930 END (nexttoward);
11931}
8847214f 11932
8847214f 11933
601a3a5f
JM		 11934static const struct test_ff_f_data pow_test_data[] =
11935 {
11936 START_DATA (pow),
11937 TEST_ff_f (pow, 0, 0, 1),
11938 TEST_ff_f (pow, 0, minus_zero, 1),
11939 TEST_ff_f (pow, minus_zero, 0, 1),
11940 TEST_ff_f (pow, minus_zero, minus_zero, 1),
8847214f 11941
601a3a5f
JM		 11942 TEST_ff_f (pow, 10, 0, 1),
11943 TEST_ff_f (pow, 10, minus_zero, 1),
11944 TEST_ff_f (pow, -10, 0, 1),
11945 TEST_ff_f (pow, -10, minus_zero, 1),
8847214f 11946
601a3a5f
JM		 11947 TEST_ff_f (pow, qnan_value, 0, 1),
11948 TEST_ff_f (pow, qnan_value, minus_zero, 1),
8847214f 11949
15daa639 11950#ifndef TEST_INLINE
601a3a5f
JM		 11951 TEST_ff_f (pow, 1.1L, plus_infty, plus_infty),
11952 TEST_ff_f (pow, plus_infty, plus_infty, plus_infty),
11953 TEST_ff_f (pow, -1.1L, plus_infty, plus_infty),
11954 TEST_ff_f (pow, minus_infty, plus_infty, plus_infty),
11955
11956 TEST_ff_f (pow, 0.9L, plus_infty, 0),
11957 TEST_ff_f (pow, 1e-7L, plus_infty, 0),
11958 TEST_ff_f (pow, -0.9L, plus_infty, 0),
11959 TEST_ff_f (pow, -1e-7L, plus_infty, 0),
11960
11961 TEST_ff_f (pow, 1.1L, minus_infty, 0),
11962 TEST_ff_f (pow, plus_infty, minus_infty, 0),
11963 TEST_ff_f (pow, -1.1L, minus_infty, 0),
11964 TEST_ff_f (pow, minus_infty, minus_infty, 0),
11965
11966 TEST_ff_f (pow, 0.9L, minus_infty, plus_infty),
11967 TEST_ff_f (pow, 1e-7L, minus_infty, plus_infty),
11968 TEST_ff_f (pow, -0.9L, minus_infty, plus_infty),
11969 TEST_ff_f (pow, -1e-7L, minus_infty, plus_infty),
11970
11971 TEST_ff_f (pow, plus_infty, 1e-7L, plus_infty),
11972 TEST_ff_f (pow, plus_infty, 1, plus_infty),
11973 TEST_ff_f (pow, plus_infty, 1e7L, plus_infty),
11974 TEST_ff_f (pow, plus_infty, min_subnorm_value, plus_infty),
11975
11976 TEST_ff_f (pow, plus_infty, -1e-7L, 0),
11977 TEST_ff_f (pow, plus_infty, -1, 0),
11978 TEST_ff_f (pow, plus_infty, -1e7L, 0),
11979 TEST_ff_f (pow, plus_infty, -min_subnorm_value, 0),
11980
11981 TEST_ff_f (pow, minus_infty, 1, minus_infty),
11982 TEST_ff_f (pow, minus_infty, 11, minus_infty),
11983 TEST_ff_f (pow, minus_infty, 1001, minus_infty),
11984
11985 TEST_ff_f (pow, minus_infty, 2, plus_infty),
11986 TEST_ff_f (pow, minus_infty, 12, plus_infty),
11987 TEST_ff_f (pow, minus_infty, 1002, plus_infty),
11988 TEST_ff_f (pow, minus_infty, 0.1L, plus_infty),
11989 TEST_ff_f (pow, minus_infty, 1.1L, plus_infty),
11990 TEST_ff_f (pow, minus_infty, 11.1L, plus_infty),
11991 TEST_ff_f (pow, minus_infty, 1001.1L, plus_infty),
11992 TEST_ff_f (pow, minus_infty, min_subnorm_value, plus_infty),
11993
11994 TEST_ff_f (pow, minus_infty, -1, minus_zero),
11995 TEST_ff_f (pow, minus_infty, -11, minus_zero),
11996 TEST_ff_f (pow, minus_infty, -1001, minus_zero),
11997
11998 TEST_ff_f (pow, minus_infty, -2, 0),
11999 TEST_ff_f (pow, minus_infty, -12, 0),
12000 TEST_ff_f (pow, minus_infty, -1002, 0),
12001 TEST_ff_f (pow, minus_infty, -0.1L, 0),
12002 TEST_ff_f (pow, minus_infty, -1.1L, 0),
12003 TEST_ff_f (pow, minus_infty, -11.1L, 0),
12004 TEST_ff_f (pow, minus_infty, -1001.1L, 0),
12005 TEST_ff_f (pow, minus_infty, -min_subnorm_value, 0),
12006#endif
12007
12008 TEST_ff_f (pow, qnan_value, qnan_value, qnan_value),
12009 TEST_ff_f (pow, 0, qnan_value, qnan_value),
12010 TEST_ff_f (pow, 1, qnan_value, 1),
12011 TEST_ff_f (pow, -1, qnan_value, qnan_value),
12012 TEST_ff_f (pow, qnan_value, 1, qnan_value),
12013 TEST_ff_f (pow, qnan_value, -1, qnan_value),
12014
12015 /* pow (x, qNaN) == qNaN. */
12016 TEST_ff_f (pow, 3.0, qnan_value, qnan_value),
12017 TEST_ff_f (pow, minus_zero, qnan_value, qnan_value),
12018 TEST_ff_f (pow, plus_infty, qnan_value, qnan_value),
12019 TEST_ff_f (pow, -3.0, qnan_value, qnan_value),
12020 TEST_ff_f (pow, minus_infty, qnan_value, qnan_value),
12021
12022 TEST_ff_f (pow, qnan_value, 3.0, qnan_value),
12023 TEST_ff_f (pow, qnan_value, -3.0, qnan_value),
12024 TEST_ff_f (pow, qnan_value, plus_infty, qnan_value),
12025 TEST_ff_f (pow, qnan_value, minus_infty, qnan_value),
12026 TEST_ff_f (pow, qnan_value, 2.5, qnan_value),
12027 TEST_ff_f (pow, qnan_value, -2.5, qnan_value),
12028 TEST_ff_f (pow, qnan_value, min_subnorm_value, qnan_value),
12029 TEST_ff_f (pow, qnan_value, -min_subnorm_value, qnan_value),
12030
12031 TEST_ff_f (pow, 1, plus_infty, 1),
12032 TEST_ff_f (pow, -1, plus_infty, 1),
12033 TEST_ff_f (pow, 1, minus_infty, 1),
12034 TEST_ff_f (pow, -1, minus_infty, 1),
12035 TEST_ff_f (pow, 1, 1, 1),
12036 TEST_ff_f (pow, 1, -1, 1),
12037 TEST_ff_f (pow, 1, 1.25, 1),
12038 TEST_ff_f (pow, 1, -1.25, 1),
12039 TEST_ff_f (pow, 1, 0x1p62L, 1),
12040 TEST_ff_f (pow, 1, 0x1p63L, 1),
12041 TEST_ff_f (pow, 1, 0x1p64L, 1),
12042 TEST_ff_f (pow, 1, 0x1p72L, 1),
12043 TEST_ff_f (pow, 1, min_subnorm_value, 1),
12044 TEST_ff_f (pow, 1, -min_subnorm_value, 1),
12045
12046 /* pow (x, +-0) == 1. */
12047 TEST_ff_f (pow, plus_infty, 0, 1),
12048 TEST_ff_f (pow, plus_infty, minus_zero, 1),
12049 TEST_ff_f (pow, minus_infty, 0, 1),
12050 TEST_ff_f (pow, minus_infty, minus_zero, 1),
12051 TEST_ff_f (pow, 32.75L, 0, 1),
12052 TEST_ff_f (pow, 32.75L, minus_zero, 1),
12053 TEST_ff_f (pow, -32.75L, 0, 1),
12054 TEST_ff_f (pow, -32.75L, minus_zero, 1),
12055 TEST_ff_f (pow, 0x1p72L, 0, 1),
12056 TEST_ff_f (pow, 0x1p72L, minus_zero, 1),
12057 TEST_ff_f (pow, 0x1p-72L, 0, 1),
12058 TEST_ff_f (pow, 0x1p-72L, minus_zero, 1),
12059
cbe8c4d3
JM		 12060 TEST_ff_f (pow, -0.1L, 1.1L, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12061 TEST_ff_f (pow, -0.1L, -1.1L, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12062 TEST_ff_f (pow, -10.1L, 1.1L, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12063 TEST_ff_f (pow, -10.1L, -1.1L, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12064 TEST_ff_f (pow, -1.01L, min_subnorm_value, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12065 TEST_ff_f (pow, -1.01L, -min_subnorm_value, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12066 TEST_ff_f (pow, -1.0L, min_subnorm_value, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12067 TEST_ff_f (pow, -1.0L, -min_subnorm_value, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
601a3a5f
JM		 12068
12069 TEST_ff_f (pow, 0, -1, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
12070 TEST_ff_f (pow, 0, -11, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
12071 TEST_ff_f (pow, 0, -0xffffff, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa 12072#ifndef TEST_FLOAT
601a3a5f 12073 TEST_ff_f (pow, 0, -0x1.fffffffffffffp+52L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 12074#endif
12075#ifdef TEST_LDOUBLE
12076# if LDBL_MANT_DIG >= 64
601a3a5f 12077 TEST_ff_f (pow, 0, -0x1.fffffffffffffffep+63L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 12078# endif
12079# if LDBL_MANT_DIG >= 106
601a3a5f 12080 TEST_ff_f (pow, 0, -0x1.ffffffffffffffffffffffffff8p+105L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 12081# endif
12082# if LDBL_MANT_DIG >= 113
601a3a5f 12083 TEST_ff_f (pow, 0, -0x1.ffffffffffffffffffffffffffffp+112L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 12084# endif
12085#endif
601a3a5f
JM		 12086 TEST_ff_f (pow, minus_zero, -1, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
12087 TEST_ff_f (pow, minus_zero, -11L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
12088 TEST_ff_f (pow, minus_zero, -0xffffff, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
12089 TEST_ff_f (pow, minus_zero, -0x1fffffe, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa 12090#ifndef TEST_FLOAT
601a3a5f
JM		 12091 TEST_ff_f (pow, minus_zero, -0x1.fffffffffffffp+52L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
12092 TEST_ff_f (pow, minus_zero, -0x1.fffffffffffffp+53L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 12093#endif
12094#ifdef TEST_LDOUBLE
12095# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12096 TEST_ff_f (pow, minus_zero, -0x1.fffffffffffffffep+63L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
12097 TEST_ff_f (pow, minus_zero, -0x1.fffffffffffffffep+64L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 12098# endif
12099# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12100 TEST_ff_f (pow, minus_zero, -0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
12101 TEST_ff_f (pow, minus_zero, -0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 12102# endif
12103# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12104 TEST_ff_f (pow, minus_zero, -0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
12105 TEST_ff_f (pow, minus_zero, -0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 12106# endif
12107#endif
8847214f 12108
601a3a5f
JM		 12109 TEST_ff_f (pow, 0, -2, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
12110 TEST_ff_f (pow, 0, -11.1L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
12111 TEST_ff_f (pow, 0, -min_subnorm_value, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
12112 TEST_ff_f (pow, 0, -0x1p24, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
12113 TEST_ff_f (pow, 0, -0x1p127, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
12114 TEST_ff_f (pow, 0, -max_value, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
12115 TEST_ff_f (pow, minus_zero, -2, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
12116 TEST_ff_f (pow, minus_zero, -11.1L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
12117 TEST_ff_f (pow, minus_zero, -min_subnorm_value, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
12118 TEST_ff_f (pow, minus_zero, -0x1p24, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
12119 TEST_ff_f (pow, minus_zero, -0x1p127, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
12120 TEST_ff_f (pow, minus_zero, -max_value, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
12121
e9eee333 12122 TEST_ff_f (pow, 0x1p72L, 0x1p72L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
601a3a5f 12123 TEST_ff_f (pow, 10, -0x1p72L, 0, UNDERFLOW_EXCEPTION),
e9eee333 12124 TEST_ff_f (pow, max_value, max_value, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
601a3a5f
JM		 12125 TEST_ff_f (pow, 10, -max_value, 0, UNDERFLOW_EXCEPTION),
12126
12127 TEST_ff_f (pow, 0, 1, 0),
12128 TEST_ff_f (pow, 0, 11, 0),
12129
12130 TEST_ff_f (pow, minus_zero, 1, minus_zero),
12131 TEST_ff_f (pow, minus_zero, 11, minus_zero),
12132
12133 TEST_ff_f (pow, 0, 2, 0),
12134 TEST_ff_f (pow, 0, 11.1L, 0),
12135
12136 TEST_ff_f (pow, minus_zero, 2, 0),
12137 TEST_ff_f (pow, minus_zero, 11.1L, 0),
12138 TEST_ff_f (pow, 0, plus_infty, 0),
12139 TEST_ff_f (pow, minus_zero, plus_infty, 0),
12140 TEST_ff_f (pow, 0, minus_infty, plus_infty, DIVIDE_BY_ZERO_EXCEPTION_OK),
12141 TEST_ff_f (pow, minus_zero, minus_infty, plus_infty, DIVIDE_BY_ZERO_EXCEPTION_OK),
8847214f 12142
15daa639 12143#ifndef TEST_INLINE
601a3a5f
JM		 12144 /* pow (x, +inf) == +inf for |x| > 1. */
12145 TEST_ff_f (pow, 1.5, plus_infty, plus_infty),
8847214f 12146
601a3a5f
JM		 12147 /* pow (x, +inf) == +0 for |x| < 1. */
12148 TEST_ff_f (pow, 0.5, plus_infty, 0.0),
8847214f 12149
601a3a5f
JM		 12150 /* pow (x, -inf) == +0 for |x| > 1. */
12151 TEST_ff_f (pow, 1.5, minus_infty, 0.0),
8847214f 12152
601a3a5f
JM		 12153 /* pow (x, -inf) == +inf for |x| < 1. */
12154 TEST_ff_f (pow, 0.5, minus_infty, plus_infty),
15daa639 12155#endif
8847214f 12156
601a3a5f
JM		 12157 /* pow (+inf, y) == +inf for y > 0. */
12158 TEST_ff_f (pow, plus_infty, 2, plus_infty),
12159 TEST_ff_f (pow, plus_infty, 0xffffff, plus_infty),
2460d3aa 12160#ifndef TEST_FLOAT
601a3a5f 12161 TEST_ff_f (pow, plus_infty, 0x1.fffffffffffffp+52L, plus_infty),
2460d3aa
JM		 12162#endif
12163#ifdef TEST_LDOUBLE
12164# if LDBL_MANT_DIG >= 64
601a3a5f 12165 TEST_ff_f (pow, plus_infty, 0x1.fffffffffffffffep+63L, plus_infty),
2460d3aa
JM		 12166# endif
12167# if LDBL_MANT_DIG >= 106
601a3a5f 12168 TEST_ff_f (pow, plus_infty, 0x1.ffffffffffffffffffffffffff8p+105L, plus_infty),
2460d3aa
JM		 12169# endif
12170# if LDBL_MANT_DIG >= 113
601a3a5f 12171 TEST_ff_f (pow, plus_infty, 0x1.ffffffffffffffffffffffffffffp+112L, plus_infty),
2460d3aa
JM		 12172# endif
12173#endif
601a3a5f
JM		 12174 TEST_ff_f (pow, plus_infty, 0x1p24, plus_infty),
12175 TEST_ff_f (pow, plus_infty, 0x1p127, plus_infty),
12176 TEST_ff_f (pow, plus_infty, max_value, plus_infty),
8847214f 12177
601a3a5f
JM		 12178 /* pow (+inf, y) == +0 for y < 0. */
12179 TEST_ff_f (pow, plus_infty, -1, 0.0),
12180 TEST_ff_f (pow, plus_infty, -0xffffff, 0.0),
2460d3aa 12181#ifndef TEST_FLOAT
601a3a5f 12182 TEST_ff_f (pow, plus_infty, -0x1.fffffffffffffp+52L, 0.0),
2460d3aa
JM		 12183#endif
12184#ifdef TEST_LDOUBLE
12185# if LDBL_MANT_DIG >= 64
601a3a5f 12186 TEST_ff_f (pow, plus_infty, -0x1.fffffffffffffffep+63L, 0.0),
2460d3aa
JM		 12187# endif
12188# if LDBL_MANT_DIG >= 106
601a3a5f 12189 TEST_ff_f (pow, plus_infty, -0x1.ffffffffffffffffffffffffff8p+105L, 0.0),
2460d3aa
JM		 12190# endif
12191# if LDBL_MANT_DIG >= 113
601a3a5f 12192 TEST_ff_f (pow, plus_infty, -0x1.ffffffffffffffffffffffffffffp+112L, 0.0),
2460d3aa
JM		 12193# endif
12194#endif
601a3a5f
JM		 12195 TEST_ff_f (pow, plus_infty, -0x1p24, 0.0),
12196 TEST_ff_f (pow, plus_infty, -0x1p127, 0.0),
12197 TEST_ff_f (pow, plus_infty, -max_value, 0.0),
8847214f 12198
601a3a5f
JM		 12199 /* pow (-inf, y) == -inf for y an odd integer > 0. */
12200 TEST_ff_f (pow, minus_infty, 27, minus_infty),
12201 TEST_ff_f (pow, minus_infty, 0xffffff, minus_infty),
12202 TEST_ff_f (pow, minus_infty, 0x1fffffe, plus_infty),
2460d3aa 12203#ifndef TEST_FLOAT
601a3a5f
JM		 12204 TEST_ff_f (pow, minus_infty, 0x1.fffffffffffffp+52L, minus_infty),
12205 TEST_ff_f (pow, minus_infty, 0x1.fffffffffffffp+53L, plus_infty),
2460d3aa
JM		 12206#endif
12207#ifdef TEST_LDOUBLE
12208# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12209 TEST_ff_f (pow, minus_infty, 0x1.fffffffffffffffep+63L, minus_infty),
12210 TEST_ff_f (pow, minus_infty, 0x1.fffffffffffffffep+64L, plus_infty),
2460d3aa
JM		 12211# endif
12212# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12213 TEST_ff_f (pow, minus_infty, 0x1.ffffffffffffffffffffffffff8p+105L, minus_infty),
12214 TEST_ff_f (pow, minus_infty, 0x1.ffffffffffffffffffffffffff8p+106L, plus_infty),
2460d3aa
JM		 12215# endif
12216# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12217 TEST_ff_f (pow, minus_infty, 0x1.ffffffffffffffffffffffffffffp+112L, minus_infty),
12218 TEST_ff_f (pow, minus_infty, 0x1.ffffffffffffffffffffffffffffp+113L, plus_infty),
2460d3aa
JM		 12219# endif
12220#endif
8847214f 12221
601a3a5f
JM		 12222 /* pow (-inf, y) == +inf for y > 0 and not an odd integer. */
12223 TEST_ff_f (pow, minus_infty, 28, plus_infty),
12224 TEST_ff_f (pow, minus_infty, 0x1p24, plus_infty),
12225 TEST_ff_f (pow, minus_infty, 0x1p127, plus_infty),
12226 TEST_ff_f (pow, minus_infty, max_value, plus_infty),
8847214f 12227
601a3a5f
JM		 12228 /* pow (-inf, y) == -0 for y an odd integer < 0. */
12229 TEST_ff_f (pow, minus_infty, -3, minus_zero),
12230 TEST_ff_f (pow, minus_infty, -0xffffff, minus_zero),
12231 TEST_ff_f (pow, minus_infty, -0x1fffffe, plus_zero),
2460d3aa 12232#ifndef TEST_FLOAT
601a3a5f
JM		 12233 TEST_ff_f (pow, minus_infty, -0x1.fffffffffffffp+52L, minus_zero),
12234 TEST_ff_f (pow, minus_infty, -0x1.fffffffffffffp+53L, plus_zero),
2460d3aa
JM		 12235#endif
12236#ifdef TEST_LDOUBLE
12237# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12238 TEST_ff_f (pow, minus_infty, -0x1.fffffffffffffffep+63L, minus_zero),
12239 TEST_ff_f (pow, minus_infty, -0x1.fffffffffffffffep+64L, plus_zero),
2460d3aa
JM		 12240# endif
12241# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12242 TEST_ff_f (pow, minus_infty, -0x1.ffffffffffffffffffffffffff8p+105L, minus_zero),
12243 TEST_ff_f (pow, minus_infty, -0x1.ffffffffffffffffffffffffff8p+106L, plus_zero),
2460d3aa
JM		 12244# endif
12245# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12246 TEST_ff_f (pow, minus_infty, -0x1.ffffffffffffffffffffffffffffp+112L, minus_zero),
12247 TEST_ff_f (pow, minus_infty, -0x1.ffffffffffffffffffffffffffffp+113L, plus_zero),
2460d3aa
JM		 12248# endif
12249#endif
601a3a5f
JM		 12250 /* pow (-inf, y) == +0 for y < 0 and not an odd integer. */
12251 TEST_ff_f (pow, minus_infty, -2.0, 0.0),
12252 TEST_ff_f (pow, minus_infty, -0x1p24, 0.0),
12253 TEST_ff_f (pow, minus_infty, -0x1p127, 0.0),
12254 TEST_ff_f (pow, minus_infty, -max_value, 0.0),
8847214f 12255
601a3a5f
JM		 12256 /* pow (+0, y) == +0 for y an odd integer > 0. */
12257 TEST_ff_f (pow, 0.0, 27, 0.0),
12258 TEST_ff_f (pow, 0.0, 0xffffff, 0.0),
2460d3aa 12259#ifndef TEST_FLOAT
601a3a5f 12260 TEST_ff_f (pow, 0.0, 0x1.fffffffffffffp+52L, 0.0),
2460d3aa
JM		 12261#endif
12262#ifdef TEST_LDOUBLE
12263# if LDBL_MANT_DIG >= 64
601a3a5f 12264 TEST_ff_f (pow, 0.0, 0x1.fffffffffffffffep+63L, 0.0),
2460d3aa
JM		 12265# endif
12266# if LDBL_MANT_DIG >= 106
601a3a5f 12267 TEST_ff_f (pow, 0.0, 0x1.ffffffffffffffffffffffffff8p+105L, 0.0),
2460d3aa
JM		 12268# endif
12269# if LDBL_MANT_DIG >= 113
601a3a5f 12270 TEST_ff_f (pow, 0.0, 0x1.ffffffffffffffffffffffffffffp+112L, 0.0),
2460d3aa
JM		 12271# endif
12272#endif
8847214f 12273
601a3a5f
JM		 12274 /* pow (-0, y) == -0 for y an odd integer > 0. */
12275 TEST_ff_f (pow, minus_zero, 27, minus_zero),
12276 TEST_ff_f (pow, minus_zero, 0xffffff, minus_zero),
12277 TEST_ff_f (pow, minus_zero, 0x1fffffe, plus_zero),
2460d3aa 12278#ifndef TEST_FLOAT
601a3a5f
JM		 12279 TEST_ff_f (pow, minus_zero, 0x1.fffffffffffffp+52L, minus_zero),
12280 TEST_ff_f (pow, minus_zero, 0x1.fffffffffffffp+53L, plus_zero),
2460d3aa
JM		 12281#endif
12282#ifdef TEST_LDOUBLE
12283# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12284 TEST_ff_f (pow, minus_zero, 0x1.fffffffffffffffep+63L, minus_zero),
12285 TEST_ff_f (pow, minus_zero, 0x1.fffffffffffffffep+64L, plus_zero),
2460d3aa
JM		 12286# endif
12287# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12288 TEST_ff_f (pow, minus_zero, 0x1.ffffffffffffffffffffffffff8p+105L, minus_zero),
12289 TEST_ff_f (pow, minus_zero, 0x1.ffffffffffffffffffffffffff8p+106L, plus_zero),
2460d3aa
JM		 12290# endif
12291# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12292 TEST_ff_f (pow, minus_zero, 0x1.ffffffffffffffffffffffffffffp+112L, minus_zero),
12293 TEST_ff_f (pow, minus_zero, 0x1.ffffffffffffffffffffffffffffp+113L, plus_zero),
2460d3aa
JM		 12294# endif
12295#endif
8847214f 12296
601a3a5f
JM		 12297 /* pow (+0, y) == +0 for y > 0 and not an odd integer. */
12298 TEST_ff_f (pow, 0.0, 4, 0.0),
12299 TEST_ff_f (pow, 0.0, 0x1p24, 0.0),
12300 TEST_ff_f (pow, 0.0, 0x1p127, 0.0),
12301 TEST_ff_f (pow, 0.0, max_value, 0.0),
12302 TEST_ff_f (pow, 0.0, min_subnorm_value, 0.0),
8847214f 12303
601a3a5f
JM		 12304 /* pow (-0, y) == +0 for y > 0 and not an odd integer. */
12305 TEST_ff_f (pow, minus_zero, 4, 0.0),
12306 TEST_ff_f (pow, minus_zero, 0x1p24, 0.0),
12307 TEST_ff_f (pow, minus_zero, 0x1p127, 0.0),
12308 TEST_ff_f (pow, minus_zero, max_value, 0.0),
12309 TEST_ff_f (pow, minus_zero, min_subnorm_value, 0.0),
8847214f 12310
601a3a5f
JM		 12311 TEST_ff_f (pow, 16, 0.25L, 2),
12312 TEST_ff_f (pow, 0x1p64L, 0.125L, 256),
12313 TEST_ff_f (pow, 2, 4, 16),
12314 TEST_ff_f (pow, 256, 8, 0x1p64L),
164f863e 12315
601a3a5f 12316 TEST_ff_f (pow, 0.75L, 1.25L, 0.697953644326574699205914060237425566L),
8847214f 12317
4c95adde 12318#if defined TEST_DOUBLE || defined TEST_LDOUBLE
601a3a5f 12319 TEST_ff_f (pow, -7.49321e+133, -9.80818e+16, 0, UNDERFLOW_EXCEPTION),
8847214f
UD		 12320#endif
12321
601a3a5f
JM		 12322 TEST_ff_f (pow, -1.0, -0xffffff, -1.0),
12323 TEST_ff_f (pow, -1.0, -0x1fffffe, 1.0),
d6270972 12324#ifndef TEST_FLOAT
601a3a5f
JM		 12325 TEST_ff_f (pow, -1.0, -0x1.fffffffffffffp+52L, -1.0),
12326 TEST_ff_f (pow, -1.0, -0x1.fffffffffffffp+53L, 1.0),
d6270972
JM		 12327#endif
12328#ifdef TEST_LDOUBLE
12329# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12330 TEST_ff_f (pow, -1.0, -0x1.fffffffffffffffep+63L, -1.0),
12331 TEST_ff_f (pow, -1.0, -0x1.fffffffffffffffep+64L, 1.0),
d6270972
JM		 12332# endif
12333# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12334 TEST_ff_f (pow, -1.0, -0x1.ffffffffffffffffffffffffff8p+105L, -1.0),
12335 TEST_ff_f (pow, -1.0, -0x1.ffffffffffffffffffffffffff8p+106L, 1.0),
d6270972
JM		 12336# endif
12337# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12338 TEST_ff_f (pow, -1.0, -0x1.ffffffffffffffffffffffffffffp+112L, -1.0),
12339 TEST_ff_f (pow, -1.0, -0x1.ffffffffffffffffffffffffffffp+113L, 1.0),
d6270972
JM		 12340# endif
12341#endif
601a3a5f 12342 TEST_ff_f (pow, -1.0, -max_value, 1.0),
d6270972 12343
601a3a5f
JM		 12344 TEST_ff_f (pow, -1.0, 0xffffff, -1.0),
12345 TEST_ff_f (pow, -1.0, 0x1fffffe, 1.0),
d6270972 12346#ifndef TEST_FLOAT
601a3a5f
JM		 12347 TEST_ff_f (pow, -1.0, 0x1.fffffffffffffp+52L, -1.0),
12348 TEST_ff_f (pow, -1.0, 0x1.fffffffffffffp+53L, 1.0),
d6270972
JM		 12349#endif
12350#ifdef TEST_LDOUBLE
12351# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12352 TEST_ff_f (pow, -1.0, 0x1.fffffffffffffffep+63L, -1.0),
12353 TEST_ff_f (pow, -1.0, 0x1.fffffffffffffffep+64L, 1.0),
d6270972
JM		 12354# endif
12355# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12356 TEST_ff_f (pow, -1.0, 0x1.ffffffffffffffffffffffffff8p+105L, -1.0),
12357 TEST_ff_f (pow, -1.0, 0x1.ffffffffffffffffffffffffff8p+106L, 1.0),
d6270972
JM		 12358# endif
12359# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12360 TEST_ff_f (pow, -1.0, 0x1.ffffffffffffffffffffffffffffp+112L, -1.0),
12361 TEST_ff_f (pow, -1.0, 0x1.ffffffffffffffffffffffffffffp+113L, 1.0),
d6270972
JM		 12362# endif
12363#endif
601a3a5f 12364 TEST_ff_f (pow, -1.0, max_value, 1.0),
d6270972 12365
601a3a5f
JM		 12366 TEST_ff_f (pow, -2.0, 126, 0x1p126),
12367 TEST_ff_f (pow, -2.0, 127, -0x1p127),
12368 /* Allow inexact results for float to be considered to underflow. */
12369 TEST_ff_f (pow, -2.0, -126, 0x1p-126, UNDERFLOW_EXCEPTION_OK_FLOAT),
12370 TEST_ff_f (pow, -2.0, -127, -0x1p-127, UNDERFLOW_EXCEPTION_OK_FLOAT),
d6270972 12371
601a3a5f
JM		 12372 TEST_ff_f (pow, -2.0, -0xffffff, minus_zero, UNDERFLOW_EXCEPTION),
12373 TEST_ff_f (pow, -2.0, -0x1fffffe, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12374#ifndef TEST_FLOAT
601a3a5f
JM		 12375 TEST_ff_f (pow, -2.0, -0x1.fffffffffffffp+52L, minus_zero, UNDERFLOW_EXCEPTION),
12376 TEST_ff_f (pow, -2.0, -0x1.fffffffffffffp+53L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12377#endif
12378#ifdef TEST_LDOUBLE
12379# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12380 TEST_ff_f (pow, -2.0, -0x1.fffffffffffffffep+63L, minus_zero, UNDERFLOW_EXCEPTION),
12381 TEST_ff_f (pow, -2.0, -0x1.fffffffffffffffep+64L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12382# endif
12383# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12384 TEST_ff_f (pow, -2.0, -0x1.ffffffffffffffffffffffffff8p+105L, minus_zero, UNDERFLOW_EXCEPTION),
12385 TEST_ff_f (pow, -2.0, -0x1.ffffffffffffffffffffffffff8p+106L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12386# endif
12387# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12388 TEST_ff_f (pow, -2.0, -0x1.ffffffffffffffffffffffffffffp+112L, minus_zero, UNDERFLOW_EXCEPTION),
12389 TEST_ff_f (pow, -2.0, -0x1.ffffffffffffffffffffffffffffp+113L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12390# endif
12391#endif
601a3a5f 12392 TEST_ff_f (pow, -2.0, -max_value, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12393
e9eee333
JM		 12394 TEST_ff_f (pow, -2.0, 0xffffff, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
12395 TEST_ff_f (pow, -2.0, 0x1fffffe, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972 12396#ifndef TEST_FLOAT
e9eee333
JM		 12397 TEST_ff_f (pow, -2.0, 0x1.fffffffffffffp+52L, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
12398 TEST_ff_f (pow, -2.0, 0x1.fffffffffffffp+53L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972
JM		 12399#endif
12400#ifdef TEST_LDOUBLE
12401# if LDBL_MANT_DIG >= 64
e9eee333
JM		 12402 TEST_ff_f (pow, -2.0, 0x1.fffffffffffffffep+63L, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
12403 TEST_ff_f (pow, -2.0, 0x1.fffffffffffffffep+64L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972
JM		 12404# endif
12405# if LDBL_MANT_DIG >= 106
e9eee333
JM		 12406 TEST_ff_f (pow, -2.0, 0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
12407 TEST_ff_f (pow, -2.0, 0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972
JM		 12408# endif
12409# if LDBL_MANT_DIG >= 113
e9eee333
JM		 12410 TEST_ff_f (pow, -2.0, 0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
12411 TEST_ff_f (pow, -2.0, 0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972
JM		 12412# endif
12413#endif
e9eee333 12414 TEST_ff_f (pow, -2.0, max_value, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972 12415
cbe8c4d3
JM		 12416 TEST_ff_f (pow, -max_value, 0.5, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12417 TEST_ff_f (pow, -max_value, 1.5, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12418 TEST_ff_f (pow, -max_value, 1000.5, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
601a3a5f
JM		 12419 TEST_ff_f (pow, -max_value, -2, plus_zero, UNDERFLOW_EXCEPTION),
12420 TEST_ff_f (pow, -max_value, -3, minus_zero, UNDERFLOW_EXCEPTION),
e9eee333
JM		 12421 TEST_ff_f (pow, -max_value, 2, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
12422 TEST_ff_f (pow, -max_value, 3, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972 12423
601a3a5f
JM		 12424 TEST_ff_f (pow, -max_value, -0xffffff, minus_zero, UNDERFLOW_EXCEPTION),
12425 TEST_ff_f (pow, -max_value, -0x1fffffe, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12426#ifndef TEST_FLOAT
601a3a5f
JM		 12427 TEST_ff_f (pow, -max_value, -0x1.fffffffffffffp+52L, minus_zero, UNDERFLOW_EXCEPTION),
12428 TEST_ff_f (pow, -max_value, -0x1.fffffffffffffp+53L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12429#endif
12430#ifdef TEST_LDOUBLE
12431# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12432 TEST_ff_f (pow, -max_value, -0x1.fffffffffffffffep+63L, minus_zero, UNDERFLOW_EXCEPTION),
12433 TEST_ff_f (pow, -max_value, -0x1.fffffffffffffffep+64L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12434# endif
12435# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12436 TEST_ff_f (pow, -max_value, -0x1.ffffffffffffffffffffffffff8p+105L, minus_zero, UNDERFLOW_EXCEPTION),
12437 TEST_ff_f (pow, -max_value, -0x1.ffffffffffffffffffffffffff8p+106L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12438# endif
12439# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12440 TEST_ff_f (pow, -max_value, -0x1.ffffffffffffffffffffffffffffp+112L, minus_zero, UNDERFLOW_EXCEPTION),
12441 TEST_ff_f (pow, -max_value, -0x1.ffffffffffffffffffffffffffffp+113L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12442# endif
12443#endif
601a3a5f 12444 TEST_ff_f (pow, -max_value, -max_value, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12445
e9eee333
JM		 12446 TEST_ff_f (pow, -max_value, 0xffffff, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
12447 TEST_ff_f (pow, -max_value, 0x1fffffe, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972 12448#ifndef TEST_FLOAT
e9eee333
JM		 12449 TEST_ff_f (pow, -max_value, 0x1.fffffffffffffp+52L, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
12450 TEST_ff_f (pow, -max_value, 0x1.fffffffffffffp+53L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972
JM		 12451#endif
12452#ifdef TEST_LDOUBLE
12453# if LDBL_MANT_DIG >= 64
e9eee333
JM		 12454 TEST_ff_f (pow, -max_value, 0x1.fffffffffffffffep+63L, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
12455 TEST_ff_f (pow, -max_value, 0x1.fffffffffffffffep+64L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972
JM		 12456# endif
12457# if LDBL_MANT_DIG >= 106
e9eee333
JM		 12458 TEST_ff_f (pow, -max_value, 0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
12459 TEST_ff_f (pow, -max_value, 0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972
JM		 12460# endif
12461# if LDBL_MANT_DIG >= 113
e9eee333
JM		 12462 TEST_ff_f (pow, -max_value, 0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
12463 TEST_ff_f (pow, -max_value, 0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972
JM		 12464# endif
12465#endif
e9eee333 12466 TEST_ff_f (pow, -max_value, max_value, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972 12467
601a3a5f
JM		 12468 TEST_ff_f (pow, -0.5, 126, 0x1p-126),
12469 TEST_ff_f (pow, -0.5, 127, -0x1p-127),
12470 TEST_ff_f (pow, -0.5, -126, 0x1p126),
12471 TEST_ff_f (pow, -0.5, -127, -0x1p127),
d6270972 12472
e9eee333
JM		 12473 TEST_ff_f (pow, -0.5, -0xffffff, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
12474 TEST_ff_f (pow, -0.5, -0x1fffffe, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972 12475#ifndef TEST_FLOAT
e9eee333
JM		 12476 TEST_ff_f (pow, -0.5, -0x1.fffffffffffffp+52L, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
12477 TEST_ff_f (pow, -0.5, -0x1.fffffffffffffp+53L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972
JM		 12478#endif
12479#ifdef TEST_LDOUBLE
12480# if LDBL_MANT_DIG >= 64
e9eee333
JM		 12481 TEST_ff_f (pow, -0.5, -0x1.fffffffffffffffep+63L, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
12482 TEST_ff_f (pow, -0.5, -0x1.fffffffffffffffep+64L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972
JM		 12483# endif
12484# if LDBL_MANT_DIG >= 106
e9eee333
JM		 12485 TEST_ff_f (pow, -0.5, -0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
12486 TEST_ff_f (pow, -0.5, -0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972
JM		 12487# endif
12488# if LDBL_MANT_DIG >= 113
e9eee333
JM		 12489 TEST_ff_f (pow, -0.5, -0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
12490 TEST_ff_f (pow, -0.5, -0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972
JM		 12491# endif
12492#endif
e9eee333 12493 TEST_ff_f (pow, -0.5, -max_value, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972 12494
601a3a5f
JM		 12495 TEST_ff_f (pow, -0.5, 0xffffff, minus_zero, UNDERFLOW_EXCEPTION),
12496 TEST_ff_f (pow, -0.5, 0x1fffffe, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12497#ifndef TEST_FLOAT
601a3a5f
JM		 12498 TEST_ff_f (pow, -0.5, 0x1.fffffffffffffp+52L, minus_zero, UNDERFLOW_EXCEPTION),
12499 TEST_ff_f (pow, -0.5, 0x1.fffffffffffffp+53L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12500#endif
12501#ifdef TEST_LDOUBLE
12502# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12503 TEST_ff_f (pow, -0.5, 0x1.fffffffffffffffep+63L, minus_zero, UNDERFLOW_EXCEPTION),
12504 TEST_ff_f (pow, -0.5, 0x1.fffffffffffffffep+64L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12505# endif
12506# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12507 TEST_ff_f (pow, -0.5, 0x1.ffffffffffffffffffffffffff8p+105L, minus_zero, UNDERFLOW_EXCEPTION),
12508 TEST_ff_f (pow, -0.5, 0x1.ffffffffffffffffffffffffff8p+106L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12509# endif
12510# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12511 TEST_ff_f (pow, -0.5, 0x1.ffffffffffffffffffffffffffffp+112L, minus_zero, UNDERFLOW_EXCEPTION),
12512 TEST_ff_f (pow, -0.5, 0x1.ffffffffffffffffffffffffffffp+113L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12513# endif
12514#endif
601a3a5f 12515 TEST_ff_f (pow, -0.5, max_value, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12516
cbe8c4d3
JM		 12517 TEST_ff_f (pow, -min_value, 0.5, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12518 TEST_ff_f (pow, -min_value, 1.5, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12519 TEST_ff_f (pow, -min_value, 1000.5, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
e9eee333
JM		 12520 TEST_ff_f (pow, -min_value, -2, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
12521 TEST_ff_f (pow, -min_value, -3, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
601a3a5f
JM		 12522 /* Allow inexact results to be considered to underflow. */
12523 TEST_ff_f (pow, -min_value, 1, -min_value, UNDERFLOW_EXCEPTION_OK),
12524 TEST_ff_f (pow, -min_value, 2, plus_zero, UNDERFLOW_EXCEPTION),
12525 TEST_ff_f (pow, -min_value, 3, minus_zero, UNDERFLOW_EXCEPTION),
d6270972 12526
e9eee333
JM		 12527 TEST_ff_f (pow, -min_value, -0xffffff, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
12528 TEST_ff_f (pow, -min_value, -0x1fffffe, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972 12529#ifndef TEST_FLOAT
e9eee333
JM		 12530 TEST_ff_f (pow, -min_value, -0x1.fffffffffffffp+52L, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
12531 TEST_ff_f (pow, -min_value, -0x1.fffffffffffffp+53L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972
JM		 12532#endif
12533#ifdef TEST_LDOUBLE
12534# if LDBL_MANT_DIG >= 64
e9eee333
JM		 12535 TEST_ff_f (pow, -min_value, -0x1.fffffffffffffffep+63L, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
12536 TEST_ff_f (pow, -min_value, -0x1.fffffffffffffffep+64L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972
JM		 12537# endif
12538# if LDBL_MANT_DIG >= 106
e9eee333
JM		 12539 TEST_ff_f (pow, -min_value, -0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
12540 TEST_ff_f (pow, -min_value, -0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972
JM		 12541# endif
12542# if LDBL_MANT_DIG >= 113
e9eee333
JM		 12543 TEST_ff_f (pow, -min_value, -0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
12544 TEST_ff_f (pow, -min_value, -0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972
JM		 12545# endif
12546#endif
e9eee333 12547 TEST_ff_f (pow, -min_value, -max_value, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d6270972 12548
601a3a5f
JM		 12549 TEST_ff_f (pow, -min_value, 0xffffff, minus_zero, UNDERFLOW_EXCEPTION),
12550 TEST_ff_f (pow, -min_value, 0x1fffffe, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12551#ifndef TEST_FLOAT
601a3a5f
JM		 12552 TEST_ff_f (pow, -min_value, 0x1.fffffffffffffp+52L, minus_zero, UNDERFLOW_EXCEPTION),
12553 TEST_ff_f (pow, -min_value, 0x1.fffffffffffffp+53L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12554#endif
12555#ifdef TEST_LDOUBLE
12556# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12557 TEST_ff_f (pow, -min_value, 0x1.fffffffffffffffep+63L, minus_zero, UNDERFLOW_EXCEPTION),
12558 TEST_ff_f (pow, -min_value, 0x1.fffffffffffffffep+64L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12559# endif
12560# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12561 TEST_ff_f (pow, -min_value, 0x1.ffffffffffffffffffffffffff8p+105L, minus_zero, UNDERFLOW_EXCEPTION),
12562 TEST_ff_f (pow, -min_value, 0x1.ffffffffffffffffffffffffff8p+106L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12563# endif
12564# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12565 TEST_ff_f (pow, -min_value, 0x1.ffffffffffffffffffffffffffffp+112L, minus_zero, UNDERFLOW_EXCEPTION),
12566 TEST_ff_f (pow, -min_value, 0x1.ffffffffffffffffffffffffffffp+113L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12567# endif
12568#endif
601a3a5f
JM		 12569 TEST_ff_f (pow, -min_value, max_value, plus_zero, UNDERFLOW_EXCEPTION),
12570
12571 TEST_ff_f (pow, 0x0.ffffffp0, 10, 0.999999403953712118183885036774764444747L),
12572 TEST_ff_f (pow, 0x0.ffffffp0, 100, 0.999994039553108359406305079606228341585L),
12573 TEST_ff_f (pow, 0x0.ffffffp0, 1000, 0.9999403971297699052276650144650733772182L),
12574 TEST_ff_f (pow, 0x0.ffffffp0, 0x1p24, 0.3678794302077803437135155590023422899744L),
12575 TEST_ff_f (pow, 0x0.ffffffp0, 0x1p30, 1.603807831524924233828134753069728224044e-28L),
12576 TEST_ff_f (pow, 0x0.ffffffp0, 0x1.234566p30, 2.374884712135295099971443365381007297732e-32L),
12577 TEST_ff_f (pow, 0x0.ffffffp0, -10, 1.000000596046643153205170848674671339688L),
12578 TEST_ff_f (pow, 0x0.ffffffp0, -100, 1.000005960482418779499387594989252621451L),
12579 TEST_ff_f (pow, 0x0.ffffffp0, -1000, 1.000059606422943986382898964231519867906L),
12580 TEST_ff_f (pow, 0x0.ffffffp0, -0x1p24, 2.7182819094701610539628664526874952929416L),
12581 TEST_ff_f (pow, 0x0.ffffffp0, -0x1p30, 6.2351609734265057988914412331288163636075e+27L),
12582 TEST_ff_f (pow, 0x0.ffffffp0, -0x1.234566p30, 4.2107307141696353498921307077142537353515e+31L),
12583 TEST_ff_f (pow, 0x1.000002p0, 0x1p24, 7.3890552180866447284268641248075832310141L),
12584 TEST_ff_f (pow, 0x1.000002p0, 0x1.234566p29, 4.2107033006507495188536371520637025716256e+31L),
12585 TEST_ff_f (pow, 0x1.000002p0, -0x1.234566p29, 2.3749001736727769098946062325205705312166e-32L),
c483f6b4 12586
1bead169 12587#if !defined TEST_FLOAT
601a3a5f
JM		 12588 TEST_ff_f (pow, 0x0.fffffffffffff8p0L, 0x1.23456789abcdfp62L, 1.0118762747827252817436395051178295138220e-253L),
12589 TEST_ff_f (pow, 0x0.fffffffffffff8p0L, -0x1.23456789abcdfp62L, 9.8826311568054561811190162420900667121992e+252L),
12590 TEST_ff_f (pow, 0x1.0000000000001p0L, 0x1.23456789abcdfp61L, 9.8826311568044974397135026217687399395481e+252L),
12591 TEST_ff_f (pow, 0x1.0000000000001p0L, -0x1.23456789abcdfp61L, 1.0118762747828234466621210689458255908670e-253L),
c483f6b4
JM		 12592#endif
12593
1bead169 12594#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64 && LDBL_MAX_EXP >= 16384
601a3a5f
JM		 12595 TEST_ff_f (pow, 0x0.ffffffffffffffffp0L, 0x1.23456789abcdef0ep77L, 1.2079212226420368189981778807634890018840e-4048L),
12596 TEST_ff_f (pow, 0x0.ffffffffffffffffp0L, -0x1.23456789abcdef0ep77L, 8.2786855736563746280496724205839522148001e+4047L),
12597 TEST_ff_f (pow, 0x1.0000000000000002p0L, 0x1.23456789abcdef0ep76L, 8.2786855736563683535324500168799315131570e+4047L),
12598 TEST_ff_f (pow, 0x1.0000000000000002p0L, -0x1.23456789abcdef0ep76L, 1.2079212226420377344964713407722652880280e-4048L),
1bead169
JM		 12599#endif
12600
12601#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
601a3a5f
JM		 12602 TEST_ff_f (pow, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.23456789abcdef0123456789abcdp126L, 1.2079212226420440237790185999151440179953e-4048L),
12603 TEST_ff_f (pow, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.23456789abcdef0123456789abcdp126L, 8.2786855736563252489063231915535105363602e+4047L),
12604 TEST_ff_f (pow, 0x1.0000000000000000000000000001p0L, 0x1.23456789abcdef0123456789abcdp125L, 8.2786855736563252489063231915423647547782e+4047L),
12605 TEST_ff_f (pow, 0x1.0000000000000000000000000001p0L, -0x1.23456789abcdef0123456789abcdp125L, 1.2079212226420440237790185999167702696503e-4048L),
1bead169
JM		 12606#endif
12607
12608#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
601a3a5f
JM		 12609 TEST_ff_f (pow, 1e4932L, 0.75L, 1e3699L),
12610 TEST_ff_f (pow, 1e4928L, 0.75L, 1e3696L),
12611 TEST_ff_f (pow, 1e4924L, 0.75L, 1e3693L),
12612 TEST_ff_f (pow, 1e4920L, 0.75L, 1e3690L),
12613 TEST_ff_f (pow, 10.0L, 4932.0L, 1e4932L),
12614 TEST_ff_f (pow, 10.0L, 4931.0L, 1e4931L),
12615 TEST_ff_f (pow, 10.0L, 4930.0L, 1e4930L),
12616 TEST_ff_f (pow, 10.0L, 4929.0L, 1e4929L),
12617 TEST_ff_f (pow, 10.0L, -4931.0L, 1e-4931L),
12618 TEST_ff_f (pow, 10.0L, -4930.0L, 1e-4930L),
12619 TEST_ff_f (pow, 10.0L, -4929.0L, 1e-4929L),
12620 TEST_ff_f (pow, 1e27L, 182.0L, 1e4914L),
12621 TEST_ff_f (pow, 1e27L, -182.0L, 1e-4914L),
12622#endif
12623
12624 TEST_ff_f (pow, min_subnorm_value, min_subnorm_value, 1.0L),
12625 TEST_ff_f (pow, min_subnorm_value, -min_subnorm_value, 1.0L),
12626 TEST_ff_f (pow, max_value, min_subnorm_value, 1.0L),
12627 TEST_ff_f (pow, max_value, -min_subnorm_value, 1.0L),
12628 TEST_ff_f (pow, 0.99L, min_subnorm_value, 1.0L),
12629 TEST_ff_f (pow, 0.99L, -min_subnorm_value, 1.0L),
12630 TEST_ff_f (pow, 1.01L, min_subnorm_value, 1.0L),
12631 TEST_ff_f (pow, 1.01L, -min_subnorm_value, 1.0L),
12632
12633 TEST_ff_f (pow, 2.0L, -100000.0L, plus_zero, UNDERFLOW_EXCEPTION),
12634 END_DATA (pow)
12635 };
7a25eb06 12636
601a3a5f
JM		 12637static void
12638pow_test (void)
12639{
12640
12641 errno = 0;
12642 FUNC(pow) (0, 0);
12643 if (errno == ENOSYS)
12644 /* Function not implemented. */
12645 return;
12646
12647 START (pow);
12648 RUN_TEST_LOOP_ff_f (pow, pow_test_data, );
8847214f
UD		 12649 END (pow);
12650}
12651
b7cd39e8 12652
601a3a5f
JM		 12653static const struct test_ff_f_data pow_tonearest_test_data[] =
12654 {
12655 START_DATA (pow_tonearest),
12656 TEST_ff_f (pow, 1.0625L, 1.125L, 1.070582293028761362162622578677070098674L),
12657 TEST_ff_f (pow, 1.5L, 1.03125L, 1.519127098714743184071644334163037684948L),
12658 END_DATA (pow_tonearest)
12659 };
12660
b7cd39e8
JM		 12661static void
12662pow_test_tonearest (void)
12663{
b7cd39e8
JM		 12664 errno = 0;
12665 FUNC(pow) (0, 0);
12666 if (errno == ENOSYS)
12667 /* Function not implemented. */
12668 return;
12669
12670 START (pow_tonearest);
601a3a5f 12671 RUN_TEST_LOOP_ff_f (pow, pow_tonearest_test_data, FE_TONEAREST);
b7cd39e8
JM		 12672 END (pow_tonearest);
12673}
12674
12675
601a3a5f
JM		 12676static const struct test_ff_f_data pow_towardzero_test_data[] =
12677 {
12678 START_DATA (pow_towardzero),
12679 TEST_ff_f (pow, 1.0625L, 1.125L, 1.070582293028761362162622578677070098674L),
12680 TEST_ff_f (pow, 1.5L, 1.03125L, 1.519127098714743184071644334163037684948L),
12681 END_DATA (pow_towardzero)
12682 };
12683
b7cd39e8
JM		 12684static void
12685pow_test_towardzero (void)
12686{
b7cd39e8
JM		 12687 errno = 0;
12688 FUNC(pow) (0, 0);
12689 if (errno == ENOSYS)
12690 /* Function not implemented. */
12691 return;
12692
12693 START (pow_towardzero);
601a3a5f 12694 RUN_TEST_LOOP_ff_f (pow, pow_towardzero_test_data, FE_TOWARDZERO);
b7cd39e8
JM		 12695 END (pow_towardzero);
12696}
12697
12698
601a3a5f
JM		 12699static const struct test_ff_f_data pow_downward_test_data[] =
12700 {
12701 START_DATA (pow_downward),
12702 TEST_ff_f (pow, 1.0625L, 1.125L, 1.070582293028761362162622578677070098674L),
12703 TEST_ff_f (pow, 1.5L, 1.03125L, 1.519127098714743184071644334163037684948L),
12704 END_DATA (pow_downward)
12705 };
12706
b7cd39e8
JM		 12707static void
12708pow_test_downward (void)
12709{
b7cd39e8
JM		 12710 errno = 0;
12711 FUNC(pow) (0, 0);
12712 if (errno == ENOSYS)
12713 /* Function not implemented. */
12714 return;
12715
12716 START (pow_downward);
601a3a5f 12717 RUN_TEST_LOOP_ff_f (pow, pow_downward_test_data, FE_DOWNWARD);
b7cd39e8
JM		 12718 END (pow_downward);
12719}
12720
12721
601a3a5f
JM		 12722static const struct test_ff_f_data pow_upward_test_data[] =
12723 {
12724 START_DATA (pow_upward),
12725 TEST_ff_f (pow, 1.0625L, 1.125L, 1.070582293028761362162622578677070098674L),
12726 TEST_ff_f (pow, 1.5L, 1.03125L, 1.519127098714743184071644334163037684948L),
12727 END_DATA (pow_upward)
12728 };
12729
b7cd39e8
JM		 12730static void
12731pow_test_upward (void)
12732{
b7cd39e8
JM		 12733 errno = 0;
12734 FUNC(pow) (0, 0);
12735 if (errno == ENOSYS)
12736 /* Function not implemented. */
12737 return;
12738
12739 START (pow_upward);
601a3a5f 12740 RUN_TEST_LOOP_ff_f (pow, pow_upward_test_data, FE_UPWARD);
b7cd39e8
JM		 12741 END (pow_upward);
12742}
12743
12744
601a3a5f
JM		 12745static const struct test_ff_f_data remainder_test_data[] =
12746 {
12747 START_DATA (remainder),
12748 TEST_ff_f (remainder, 1, 0, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12749 TEST_ff_f (remainder, 1, minus_zero, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12750 TEST_ff_f (remainder, plus_infty, minus_zero, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12751 TEST_ff_f (remainder, plus_infty, 0, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12752 TEST_ff_f (remainder, plus_infty, 1, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12753 TEST_ff_f (remainder, plus_infty, 2, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12754 TEST_ff_f (remainder, minus_infty, minus_zero, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12755 TEST_ff_f (remainder, minus_infty, 0, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12756 TEST_ff_f (remainder, minus_infty, 1, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12757 TEST_ff_f (remainder, minus_infty, 2, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12758 TEST_ff_f (remainder, qnan_value, qnan_value, qnan_value, ERRNO_UNCHANGED),
12759 TEST_ff_f (remainder, 0, qnan_value, qnan_value, ERRNO_UNCHANGED),
12760 TEST_ff_f (remainder, qnan_value, 0, qnan_value, ERRNO_UNCHANGED),
12761
12762 TEST_ff_f (remainder, 7.0, plus_infty, 7.0, ERRNO_UNCHANGED),
12763 TEST_ff_f (remainder, 7.0, minus_infty, 7.0, ERRNO_UNCHANGED),
12764
12765 TEST_ff_f (remainder, 1.625, 1.0, -0.375),
12766 TEST_ff_f (remainder, -1.625, 1.0, 0.375),
12767 TEST_ff_f (remainder, 1.625, -1.0, -0.375),
12768 TEST_ff_f (remainder, -1.625, -1.0, 0.375),
12769 TEST_ff_f (remainder, 5.0, 2.0, 1.0),
12770 TEST_ff_f (remainder, 3.0, 2.0, -1.0),
12771 END_DATA (remainder)
12772 };
12773
8847214f
UD		 12774static void
12775remainder_test (void)
12776{
aaca11d8
UD		 12777 errno = 0;
12778 FUNC(remainder) (1.625, 1.0);
12779 if (errno == ENOSYS)
12780 /* Function not implemented. */
12781 return;
8847214f
UD		 12782
12783 START (remainder);
601a3a5f 12784 RUN_TEST_LOOP_ff_f (remainder, remainder_test_data, );
8847214f
UD		 12785 END (remainder);
12786}
12787
8cfa635a
JM		 12788static const struct test_ffI_f1_data remquo_test_data[] =
12789 {
12790 START_DATA (remquo),
12791 TEST_ffI_f1 (remquo, 1, 0, qnan_value, IGNORE, INVALID_EXCEPTION),
12792 TEST_ffI_f1 (remquo, 1, minus_zero, qnan_value, IGNORE, INVALID_EXCEPTION),
12793 TEST_ffI_f1 (remquo, plus_infty, 1, qnan_value, IGNORE, INVALID_EXCEPTION),
12794 TEST_ffI_f1 (remquo, minus_infty, 1, qnan_value, IGNORE, INVALID_EXCEPTION),
12795 TEST_ffI_f1 (remquo, qnan_value, qnan_value, qnan_value, IGNORE),
12796
12797 TEST_ffI_f1 (remquo, 1.625, 1.0, -0.375, 2),
12798 TEST_ffI_f1 (remquo, -1.625, 1.0, 0.375, -2),
12799 TEST_ffI_f1 (remquo, 1.625, -1.0, -0.375, -2),
12800 TEST_ffI_f1 (remquo, -1.625, -1.0, 0.375, 2),
12801
12802 TEST_ffI_f1 (remquo, 5, 2, 1, 2),
12803 TEST_ffI_f1 (remquo, 3, 2, -1, 2),
12804 END_DATA (remquo)
12805 };
12806
8847214f
UD		 12807static void
12808remquo_test (void)
12809{
12810 /* x is needed. */
12811 int x;
12812
aaca11d8
UD		 12813 errno = 0;
12814 FUNC(remquo) (1.625, 1.0, &x);
12815 if (errno == ENOSYS)
12816 /* Function not implemented. */
12817 return;
12818
8847214f 12819 START (remquo);
8cfa635a 12820 RUN_TEST_LOOP_ffI_f1 (remquo, remquo_test_data, , x);
8847214f
UD		 12821 END (remquo);
12822}
12823
74c57478
JM		 12824static const struct test_f_f_data rint_test_data[] =
12825 {
12826 START_DATA (rint),
12827 /* TODO: missing qNaN tests. */
12828
105a07df
JM		 12829 TEST_f_f (rint, 0.0, 0.0, NO_INEXACT_EXCEPTION),
12830 TEST_f_f (rint, minus_zero, minus_zero, NO_INEXACT_EXCEPTION),
12831 TEST_f_f (rint, plus_infty, plus_infty, NO_INEXACT_EXCEPTION),
12832 TEST_f_f (rint, minus_infty, minus_infty, NO_INEXACT_EXCEPTION),
74c57478
JM		 12833
12834 /* Default rounding mode is round to even. */
105a07df
JM		 12835 TEST_f_f (rint, 0.5, 0.0, INEXACT_EXCEPTION),
12836 TEST_f_f (rint, 1.5, 2.0, INEXACT_EXCEPTION),
12837 TEST_f_f (rint, 2.5, 2.0, INEXACT_EXCEPTION),
12838 TEST_f_f (rint, 3.5, 4.0, INEXACT_EXCEPTION),
12839 TEST_f_f (rint, 4.5, 4.0, INEXACT_EXCEPTION),
12840 TEST_f_f (rint, -0.5, -0.0, INEXACT_EXCEPTION),
12841 TEST_f_f (rint, -1.5, -2.0, INEXACT_EXCEPTION),
12842 TEST_f_f (rint, -2.5, -2.0, INEXACT_EXCEPTION),
12843 TEST_f_f (rint, -3.5, -4.0, INEXACT_EXCEPTION),
12844 TEST_f_f (rint, -4.5, -4.0, INEXACT_EXCEPTION),
12845 TEST_f_f (rint, 0.1, 0.0, INEXACT_EXCEPTION),
12846 TEST_f_f (rint, 0.25, 0.0, INEXACT_EXCEPTION),
12847 TEST_f_f (rint, 0.625, 1.0, INEXACT_EXCEPTION),
12848 TEST_f_f (rint, -0.1, -0.0, INEXACT_EXCEPTION),
12849 TEST_f_f (rint, -0.25, -0.0, INEXACT_EXCEPTION),
12850 TEST_f_f (rint, -0.625, -1.0, INEXACT_EXCEPTION),
12851 TEST_f_f (rint, 262144.75, 262145.0, INEXACT_EXCEPTION),
12852 TEST_f_f (rint, 262142.75, 262143.0, INEXACT_EXCEPTION),
12853 TEST_f_f (rint, 524286.75, 524287.0, INEXACT_EXCEPTION),
12854 TEST_f_f (rint, 524288.75, 524289.0, INEXACT_EXCEPTION),
12855 TEST_f_f (rint, 1048576.75, 1048577.0, INEXACT_EXCEPTION),
12856 TEST_f_f (rint, 2097152.75, 2097153.0, INEXACT_EXCEPTION),
12857 TEST_f_f (rint, -1048576.75, -1048577.0, INEXACT_EXCEPTION),
12858 TEST_f_f (rint, -2097152.75, -2097153.0, INEXACT_EXCEPTION),
74c57478 12859#ifndef TEST_FLOAT
105a07df
JM		 12860 TEST_f_f (rint, 70368744177664.75, 70368744177665.0, INEXACT_EXCEPTION),
12861 TEST_f_f (rint, 140737488355328.75, 140737488355329.0, INEXACT_EXCEPTION),
12862 TEST_f_f (rint, 281474976710656.75, 281474976710657.0, INEXACT_EXCEPTION),
12863 TEST_f_f (rint, 562949953421312.75, 562949953421313.0, INEXACT_EXCEPTION),
12864 TEST_f_f (rint, 1125899906842624.75, 1125899906842625.0, INEXACT_EXCEPTION),
12865 TEST_f_f (rint, -70368744177664.75, -70368744177665.0, INEXACT_EXCEPTION),
12866 TEST_f_f (rint, -140737488355328.75, -140737488355329.0, INEXACT_EXCEPTION),
12867 TEST_f_f (rint, -281474976710656.75, -281474976710657.0, INEXACT_EXCEPTION),
12868 TEST_f_f (rint, -562949953421312.75, -562949953421313.0, INEXACT_EXCEPTION),
12869 TEST_f_f (rint, -1125899906842624.75, -1125899906842625.0, INEXACT_EXCEPTION),
fe45ce09 12870#endif
f964490f 12871#ifdef TEST_LDOUBLE
74c57478 12872 /* The result can only be represented in long double. */
105a07df
JM		 12873 TEST_f_f (rint, 4503599627370495.5L, 4503599627370496.0L, INEXACT_EXCEPTION),
12874 TEST_f_f (rint, 4503599627370496.25L, 4503599627370496.0L, INEXACT_EXCEPTION),
12875 TEST_f_f (rint, 4503599627370496.5L, 4503599627370496.0L, INEXACT_EXCEPTION),
12876 TEST_f_f (rint, 4503599627370496.75L, 4503599627370497.0L, INEXACT_EXCEPTION),
12877 TEST_f_f (rint, 4503599627370497.5L, 4503599627370498.0L, INEXACT_EXCEPTION),
830fce04 12878
5c68d401 12879# if LDBL_MANT_DIG > 100
105a07df
JM		 12880 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370495.0L, INEXACT_EXCEPTION),
12881 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370496.0L, INEXACT_EXCEPTION),
12882 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370497.0L, INEXACT_EXCEPTION),
5c68d401 12883# endif
f964490f 12884
105a07df
JM		 12885 TEST_f_f (rint, -4503599627370495.5L, -4503599627370496.0L, INEXACT_EXCEPTION),
12886 TEST_f_f (rint, -4503599627370496.25L, -4503599627370496.0L, INEXACT_EXCEPTION),
12887 TEST_f_f (rint, -4503599627370496.5L, -4503599627370496.0L, INEXACT_EXCEPTION),
12888 TEST_f_f (rint, -4503599627370496.75L, -4503599627370497.0L, INEXACT_EXCEPTION),
12889 TEST_f_f (rint, -4503599627370497.5L, -4503599627370498.0L, INEXACT_EXCEPTION),
830fce04 12890
5c68d401 12891# if LDBL_MANT_DIG > 100
105a07df
JM		 12892 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370495.0L, INEXACT_EXCEPTION),
12893 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370496.0L, INEXACT_EXCEPTION),
12894 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370497.0L, INEXACT_EXCEPTION),
12895
12896 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740991.0L, INEXACT_EXCEPTION),
12897 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740992.0L, INEXACT_EXCEPTION),
12898 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740993.0L, INEXACT_EXCEPTION),
12899 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740992.0L, INEXACT_EXCEPTION),
12900 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740993.0L, INEXACT_EXCEPTION),
12901 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740994.0L, INEXACT_EXCEPTION),
12902
12903 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740991.0L, INEXACT_EXCEPTION),
12904 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740992.0L, INEXACT_EXCEPTION),
12905 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740993.0L, INEXACT_EXCEPTION),
12906 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740992.0L, INEXACT_EXCEPTION),
12907 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740993.0L, INEXACT_EXCEPTION),
12908 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740994.0L, INEXACT_EXCEPTION),
5c68d401 12909# endif
f964490f 12910
105a07df
JM		 12911 TEST_f_f (rint, 9007199254740991.5L, 9007199254740992.0L, INEXACT_EXCEPTION),
12912 TEST_f_f (rint, 9007199254740992.25L, 9007199254740992.0L, INEXACT_EXCEPTION),
12913 TEST_f_f (rint, 9007199254740992.5L, 9007199254740992.0L, INEXACT_EXCEPTION),
12914 TEST_f_f (rint, 9007199254740992.75L, 9007199254740993.0L, INEXACT_EXCEPTION),
12915 TEST_f_f (rint, 9007199254740993.5L, 9007199254740994.0L, INEXACT_EXCEPTION),
12916
12917 TEST_f_f (rint, -9007199254740991.5L, -9007199254740992.0L, INEXACT_EXCEPTION),
12918 TEST_f_f (rint, -9007199254740992.25L, -9007199254740992.0L, INEXACT_EXCEPTION),
12919 TEST_f_f (rint, -9007199254740992.5L, -9007199254740992.0L, INEXACT_EXCEPTION),
12920 TEST_f_f (rint, -9007199254740992.75L, -9007199254740993.0L, INEXACT_EXCEPTION),
12921 TEST_f_f (rint, -9007199254740993.5L, -9007199254740994.0L, INEXACT_EXCEPTION),
12922
12923 TEST_f_f (rint, 72057594037927935.5L, 72057594037927936.0L, INEXACT_EXCEPTION),
12924 TEST_f_f (rint, 72057594037927936.25L, 72057594037927936.0L, INEXACT_EXCEPTION),
12925 TEST_f_f (rint, 72057594037927936.5L, 72057594037927936.0L, INEXACT_EXCEPTION),
12926 TEST_f_f (rint, 72057594037927936.75L, 72057594037927937.0L, INEXACT_EXCEPTION),
12927 TEST_f_f (rint, 72057594037927937.5L, 72057594037927938.0L, INEXACT_EXCEPTION),
12928
12929 TEST_f_f (rint, -72057594037927935.5L, -72057594037927936.0L, INEXACT_EXCEPTION),
12930 TEST_f_f (rint, -72057594037927936.25L, -72057594037927936.0L, INEXACT_EXCEPTION),
12931 TEST_f_f (rint, -72057594037927936.5L, -72057594037927936.0L, INEXACT_EXCEPTION),
12932 TEST_f_f (rint, -72057594037927936.75L, -72057594037927937.0L, INEXACT_EXCEPTION),
12933 TEST_f_f (rint, -72057594037927937.5L, -72057594037927938.0L, INEXACT_EXCEPTION),
12934
12935# if LDBL_MANT_DIG > 100
12936 TEST_f_f (rint, 10141204801825835211973625643007.5L, 10141204801825835211973625643008.0L, INEXACT_EXCEPTION),
12937 TEST_f_f (rint, 10141204801825835211973625643008.25L, 10141204801825835211973625643008.0L, INEXACT_EXCEPTION),
12938 TEST_f_f (rint, 10141204801825835211973625643008.5L, 10141204801825835211973625643008.0L, INEXACT_EXCEPTION),
12939 TEST_f_f (rint, 10141204801825835211973625643008.75L, 10141204801825835211973625643009.0L, INEXACT_EXCEPTION),
12940 TEST_f_f (rint, 10141204801825835211973625643009.5L, 10141204801825835211973625643010.0L, INEXACT_EXCEPTION),
12941# endif
74c57478
JM		 12942#endif
12943 END_DATA (rint)
12944 };
1dc23588 12945
74c57478
JM		 12946static void
12947rint_test (void)
12948{
12949 START (rint);
12950 RUN_TEST_LOOP_f_f (rint, rint_test_data, );
8847214f
UD		 12951 END (rint);
12952}
12953
74c57478
JM		 12954static const struct test_f_f_data rint_tonearest_test_data[] =
12955 {
12956 START_DATA (rint_tonearest),
105a07df
JM		 12957 TEST_f_f (rint, 2.0, 2.0, NO_INEXACT_EXCEPTION),
12958 TEST_f_f (rint, 1.5, 2.0, INEXACT_EXCEPTION),
12959 TEST_f_f (rint, 1.0, 1.0, NO_INEXACT_EXCEPTION),
12960 TEST_f_f (rint, 0.5, 0.0, INEXACT_EXCEPTION),
12961 TEST_f_f (rint, 0.0, 0.0, NO_INEXACT_EXCEPTION),
12962 TEST_f_f (rint, minus_zero, minus_zero, NO_INEXACT_EXCEPTION),
12963 TEST_f_f (rint, -0.5, -0.0, INEXACT_EXCEPTION),
12964 TEST_f_f (rint, -1.0, -1.0, NO_INEXACT_EXCEPTION),
12965 TEST_f_f (rint, -1.5, -2.0, INEXACT_EXCEPTION),
12966 TEST_f_f (rint, -2.0, -2.0, NO_INEXACT_EXCEPTION),
12967 TEST_f_f (rint, 0.1, 0.0, INEXACT_EXCEPTION),
12968 TEST_f_f (rint, 0.25, 0.0, INEXACT_EXCEPTION),
12969 TEST_f_f (rint, 0.625, 1.0, INEXACT_EXCEPTION),
12970 TEST_f_f (rint, -0.1, -0.0, INEXACT_EXCEPTION),
12971 TEST_f_f (rint, -0.25, -0.0, INEXACT_EXCEPTION),
12972 TEST_f_f (rint, -0.625, -1.0, INEXACT_EXCEPTION),
12973 TEST_f_f (rint, 1048576.75, 1048577.0, INEXACT_EXCEPTION),
12974 TEST_f_f (rint, 2097152.75, 2097153.0, INEXACT_EXCEPTION),
12975 TEST_f_f (rint, -1048576.75, -1048577.0, INEXACT_EXCEPTION),
12976 TEST_f_f (rint, -2097152.75, -2097153.0, INEXACT_EXCEPTION),
74c57478 12977#ifndef TEST_FLOAT
105a07df
JM		 12978 TEST_f_f (rint, 70368744177664.75, 70368744177665.0, INEXACT_EXCEPTION),
12979 TEST_f_f (rint, 140737488355328.75, 140737488355329.0, INEXACT_EXCEPTION),
12980 TEST_f_f (rint, 281474976710656.75, 281474976710657.0, INEXACT_EXCEPTION),
12981 TEST_f_f (rint, 562949953421312.75, 562949953421313.0, INEXACT_EXCEPTION),
12982 TEST_f_f (rint, 1125899906842624.75, 1125899906842625.0, INEXACT_EXCEPTION),
12983 TEST_f_f (rint, -70368744177664.75, -70368744177665.0, INEXACT_EXCEPTION),
12984 TEST_f_f (rint, -140737488355328.75, -140737488355329.0, INEXACT_EXCEPTION),
12985 TEST_f_f (rint, -281474976710656.75, -281474976710657.0, INEXACT_EXCEPTION),
12986 TEST_f_f (rint, -562949953421312.75, -562949953421313.0, INEXACT_EXCEPTION),
12987 TEST_f_f (rint, -1125899906842624.75, -1125899906842625.0, INEXACT_EXCEPTION),
74c57478
JM		 12988#endif
12989#ifdef TEST_LDOUBLE
12990 /* The result can only be represented in long double. */
105a07df
JM		 12991 TEST_f_f (rint, 4503599627370495.5L, 4503599627370496.0L, INEXACT_EXCEPTION),
12992 TEST_f_f (rint, 4503599627370496.25L, 4503599627370496.0L, INEXACT_EXCEPTION),
12993 TEST_f_f (rint, 4503599627370496.5L, 4503599627370496.0L, INEXACT_EXCEPTION),
12994 TEST_f_f (rint, 4503599627370496.75L, 4503599627370497.0L, INEXACT_EXCEPTION),
12995 TEST_f_f (rint, 4503599627370497.5L, 4503599627370498.0L, INEXACT_EXCEPTION),
74c57478 12996# if LDBL_MANT_DIG > 100
105a07df
JM		 12997 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370495.0L, INEXACT_EXCEPTION),
12998 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370496.0L, INEXACT_EXCEPTION),
12999 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370497.0L, INEXACT_EXCEPTION),
74c57478 13000# endif
105a07df
JM		 13001 TEST_f_f (rint, -4503599627370495.5L, -4503599627370496.0L, INEXACT_EXCEPTION),
13002 TEST_f_f (rint, -4503599627370496.25L, -4503599627370496.0L, INEXACT_EXCEPTION),
13003 TEST_f_f (rint, -4503599627370496.5L, -4503599627370496.0L, INEXACT_EXCEPTION),
13004 TEST_f_f (rint, -4503599627370496.75L, -4503599627370497.0L, INEXACT_EXCEPTION),
13005 TEST_f_f (rint, -4503599627370497.5L, -4503599627370498.0L, INEXACT_EXCEPTION),
74c57478 13006# if LDBL_MANT_DIG > 100
105a07df
JM		 13007 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370495.0L, INEXACT_EXCEPTION),
13008 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370496.0L, INEXACT_EXCEPTION),
13009 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370497.0L, INEXACT_EXCEPTION),
13010
13011 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740991.0L, INEXACT_EXCEPTION),
13012 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740992.0L, INEXACT_EXCEPTION),
13013 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740993.0L, INEXACT_EXCEPTION),
13014 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740992.0L, INEXACT_EXCEPTION),
13015 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740993.0L, INEXACT_EXCEPTION),
13016 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740994.0L, INEXACT_EXCEPTION),
13017
13018 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740991.0L, INEXACT_EXCEPTION),
13019 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740992.0L, INEXACT_EXCEPTION),
13020 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740993.0L, INEXACT_EXCEPTION),
13021 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740992.0L, INEXACT_EXCEPTION),
13022 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740993.0L, INEXACT_EXCEPTION),
13023 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740994.0L, INEXACT_EXCEPTION),
74c57478
JM		 13024# endif
13025#endif
13026 END_DATA (rint_tonearest)
13027 };
13028
4d37c8aa
UD		 13029static void
13030rint_test_tonearest (void)
13031{
4d37c8aa 13032 START (rint_tonearest);
74c57478
JM		 13033 RUN_TEST_LOOP_f_f (rint, rint_tonearest_test_data, FE_TONEAREST);
13034 END (rint_tonearest);
13035}
4d37c8aa 13036
74c57478
JM		 13037static const struct test_f_f_data rint_towardzero_test_data[] =
13038 {
13039 START_DATA (rint_towardzero),
105a07df
JM		 13040 TEST_f_f (rint, 2.0, 2.0, NO_INEXACT_EXCEPTION),
13041 TEST_f_f (rint, 1.5, 1.0, INEXACT_EXCEPTION),
13042 TEST_f_f (rint, 1.0, 1.0, NO_INEXACT_EXCEPTION),
13043 TEST_f_f (rint, 0.5, 0.0, INEXACT_EXCEPTION),
13044 TEST_f_f (rint, 0.0, 0.0, NO_INEXACT_EXCEPTION),
13045 TEST_f_f (rint, minus_zero, minus_zero, NO_INEXACT_EXCEPTION),
13046 TEST_f_f (rint, -0.5, -0.0, INEXACT_EXCEPTION),
13047 TEST_f_f (rint, -1.0, -1.0, NO_INEXACT_EXCEPTION),
13048 TEST_f_f (rint, -1.5, -1.0, INEXACT_EXCEPTION),
13049 TEST_f_f (rint, -2.0, -2.0, NO_INEXACT_EXCEPTION),
13050 TEST_f_f (rint, 0.1, 0.0, INEXACT_EXCEPTION),
13051 TEST_f_f (rint, 0.25, 0.0, INEXACT_EXCEPTION),
13052 TEST_f_f (rint, 0.625, 0.0, INEXACT_EXCEPTION),
13053 TEST_f_f (rint, -0.1, -0.0, INEXACT_EXCEPTION),
13054 TEST_f_f (rint, -0.25, -0.0, INEXACT_EXCEPTION),
13055 TEST_f_f (rint, -0.625, -0.0, INEXACT_EXCEPTION),
13056 TEST_f_f (rint, 1048576.75, 1048576.0, INEXACT_EXCEPTION),
13057 TEST_f_f (rint, 2097152.75, 2097152.0, INEXACT_EXCEPTION),
13058 TEST_f_f (rint, -1048576.75, -1048576.0, INEXACT_EXCEPTION),
13059 TEST_f_f (rint, -2097152.75, -2097152.0, INEXACT_EXCEPTION),
74c57478 13060#ifndef TEST_FLOAT
105a07df
JM		 13061 TEST_f_f (rint, 70368744177664.75, 70368744177664.0, INEXACT_EXCEPTION),
13062 TEST_f_f (rint, 140737488355328.75, 140737488355328.0, INEXACT_EXCEPTION),
13063 TEST_f_f (rint, 281474976710656.75, 281474976710656.0, INEXACT_EXCEPTION),
13064 TEST_f_f (rint, 562949953421312.75, 562949953421312.0, INEXACT_EXCEPTION),
13065 TEST_f_f (rint, 1125899906842624.75, 1125899906842624.0, INEXACT_EXCEPTION),
13066 TEST_f_f (rint, -70368744177664.75, -70368744177664.0, INEXACT_EXCEPTION),
13067 TEST_f_f (rint, -140737488355328.75, -140737488355328.0, INEXACT_EXCEPTION),
13068 TEST_f_f (rint, -281474976710656.75, -281474976710656.0, INEXACT_EXCEPTION),
13069 TEST_f_f (rint, -562949953421312.75, -562949953421312.0, INEXACT_EXCEPTION),
13070 TEST_f_f (rint, -1125899906842624.75, -1125899906842624.0, INEXACT_EXCEPTION),
fe45ce09 13071#endif
5c68d401 13072#ifdef TEST_LDOUBLE
74c57478 13073 /* The result can only be represented in long double. */
105a07df
JM		 13074 TEST_f_f (rint, 4503599627370495.5L, 4503599627370495.0L, INEXACT_EXCEPTION),
13075 TEST_f_f (rint, 4503599627370496.25L, 4503599627370496.0L, INEXACT_EXCEPTION),
13076 TEST_f_f (rint, 4503599627370496.5L, 4503599627370496.0L, INEXACT_EXCEPTION),
13077 TEST_f_f (rint, 4503599627370496.75L, 4503599627370496.0L, INEXACT_EXCEPTION),
13078 TEST_f_f (rint, 4503599627370497.5L, 4503599627370497.0L, INEXACT_EXCEPTION),
5c68d401 13079# if LDBL_MANT_DIG > 100
105a07df
JM		 13080 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370494.0L, INEXACT_EXCEPTION),
13081 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370495.0L, INEXACT_EXCEPTION),
13082 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370496.0L, INEXACT_EXCEPTION),
5c68d401 13083# endif
105a07df
JM		 13084 TEST_f_f (rint, -4503599627370495.5L, -4503599627370495.0L, INEXACT_EXCEPTION),
13085 TEST_f_f (rint, -4503599627370496.25L, -4503599627370496.0L, INEXACT_EXCEPTION),
13086 TEST_f_f (rint, -4503599627370496.5L, -4503599627370496.0L, INEXACT_EXCEPTION),
13087 TEST_f_f (rint, -4503599627370496.75L, -4503599627370496.0L, INEXACT_EXCEPTION),
13088 TEST_f_f (rint, -4503599627370497.5L, -4503599627370497.0L, INEXACT_EXCEPTION),
5c68d401 13089# if LDBL_MANT_DIG > 100
105a07df
JM		 13090 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370494.0L, INEXACT_EXCEPTION),
13091 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370495.0L, INEXACT_EXCEPTION),
13092 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370496.0L, INEXACT_EXCEPTION),
13093
13094 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740991.0L, INEXACT_EXCEPTION),
13095 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740992.0L, INEXACT_EXCEPTION),
13096 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740993.0L, INEXACT_EXCEPTION),
13097 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740991.0L, INEXACT_EXCEPTION),
13098 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740992.0L, INEXACT_EXCEPTION),
13099 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740993.0L, INEXACT_EXCEPTION),
13100
13101 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740991.0L, INEXACT_EXCEPTION),
13102 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740992.0L, INEXACT_EXCEPTION),
13103 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740993.0L, INEXACT_EXCEPTION),
13104 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740991.0L, INEXACT_EXCEPTION),
13105 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740992.0L, INEXACT_EXCEPTION),
13106 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740993.0L, INEXACT_EXCEPTION),
5c68d401
RM		 13107# endif
13108#endif
74c57478
JM		 13109 END_DATA (rint_towardzero)
13110 };
4d37c8aa
UD		 13111
13112static void
13113rint_test_towardzero (void)
13114{
4d37c8aa 13115 START (rint_towardzero);
74c57478
JM		 13116 RUN_TEST_LOOP_f_f (rint, rint_towardzero_test_data, FE_TOWARDZERO);
13117 END (rint_towardzero);
13118}
4d37c8aa 13119
74c57478
JM		 13120static const struct test_f_f_data rint_downward_test_data[] =
13121 {
13122 START_DATA (rint_downward),
105a07df
JM		 13123 TEST_f_f (rint, 2.0, 2.0, NO_INEXACT_EXCEPTION),
13124 TEST_f_f (rint, 1.5, 1.0, INEXACT_EXCEPTION),
13125 TEST_f_f (rint, 1.0, 1.0, NO_INEXACT_EXCEPTION),
13126 TEST_f_f (rint, 0.5, 0.0, INEXACT_EXCEPTION),
13127 TEST_f_f (rint, 0.0, 0.0, NO_INEXACT_EXCEPTION),
13128 TEST_f_f (rint, minus_zero, minus_zero, NO_INEXACT_EXCEPTION),
13129 TEST_f_f (rint, -0.5, -1.0, INEXACT_EXCEPTION),
13130 TEST_f_f (rint, -1.0, -1.0, NO_INEXACT_EXCEPTION),
13131 TEST_f_f (rint, -1.5, -2.0, INEXACT_EXCEPTION),
13132 TEST_f_f (rint, -2.0, -2.0, NO_INEXACT_EXCEPTION),
13133 TEST_f_f (rint, 0.1, 0.0, INEXACT_EXCEPTION),
13134 TEST_f_f (rint, 0.25, 0.0, INEXACT_EXCEPTION),
13135 TEST_f_f (rint, 0.625, 0.0, INEXACT_EXCEPTION),
13136 TEST_f_f (rint, -0.1, -1.0, INEXACT_EXCEPTION),
13137 TEST_f_f (rint, -0.25, -1.0, INEXACT_EXCEPTION),
13138 TEST_f_f (rint, -0.625, -1.0, INEXACT_EXCEPTION),
13139 TEST_f_f (rint, 1048576.75, 1048576.0, INEXACT_EXCEPTION),
13140 TEST_f_f (rint, 2097152.75, 2097152.0, INEXACT_EXCEPTION),
13141 TEST_f_f (rint, -1048576.75, -1048577.0, INEXACT_EXCEPTION),
13142 TEST_f_f (rint, -2097152.75, -2097153.0, INEXACT_EXCEPTION),
74c57478 13143#ifndef TEST_FLOAT
105a07df
JM		 13144 TEST_f_f (rint, 70368744177664.75, 70368744177664.0, INEXACT_EXCEPTION),
13145 TEST_f_f (rint, 140737488355328.75, 140737488355328.0, INEXACT_EXCEPTION),
13146 TEST_f_f (rint, 281474976710656.75, 281474976710656.0, INEXACT_EXCEPTION),
13147 TEST_f_f (rint, 562949953421312.75, 562949953421312.0, INEXACT_EXCEPTION),
13148 TEST_f_f (rint, 1125899906842624.75, 1125899906842624.0, INEXACT_EXCEPTION),
13149 TEST_f_f (rint, -70368744177664.75, -70368744177665.0, INEXACT_EXCEPTION),
13150 TEST_f_f (rint, -140737488355328.75, -140737488355329.0, INEXACT_EXCEPTION),
13151 TEST_f_f (rint, -281474976710656.75, -281474976710657.0, INEXACT_EXCEPTION),
13152 TEST_f_f (rint, -562949953421312.75, -562949953421313.0, INEXACT_EXCEPTION),
13153 TEST_f_f (rint, -1125899906842624.75, -1125899906842625.0, INEXACT_EXCEPTION),
fe45ce09 13154#endif
5c68d401 13155#ifdef TEST_LDOUBLE
74c57478 13156 /* The result can only be represented in long double. */
105a07df
JM		 13157 TEST_f_f (rint, 4503599627370495.5L, 4503599627370495.0L, INEXACT_EXCEPTION),
13158 TEST_f_f (rint, 4503599627370496.25L, 4503599627370496.0L, INEXACT_EXCEPTION),
13159 TEST_f_f (rint, 4503599627370496.5L, 4503599627370496.0L, INEXACT_EXCEPTION),
13160 TEST_f_f (rint, 4503599627370496.75L, 4503599627370496.0L, INEXACT_EXCEPTION),
13161 TEST_f_f (rint, 4503599627370497.5L, 4503599627370497.0L, INEXACT_EXCEPTION),
5c68d401 13162# if LDBL_MANT_DIG > 100
105a07df
JM		 13163 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370494.0L, INEXACT_EXCEPTION),
13164 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370495.0L, INEXACT_EXCEPTION),
13165 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370496.0L, INEXACT_EXCEPTION),
5c68d401 13166# endif
105a07df
JM		 13167 TEST_f_f (rint, -4503599627370495.5L, -4503599627370496.0L, INEXACT_EXCEPTION),
13168 TEST_f_f (rint, -4503599627370496.25L, -4503599627370497.0L, INEXACT_EXCEPTION),
13169 TEST_f_f (rint, -4503599627370496.5L, -4503599627370497.0L, INEXACT_EXCEPTION),
13170 TEST_f_f (rint, -4503599627370496.75L, -4503599627370497.0L, INEXACT_EXCEPTION),
13171 TEST_f_f (rint, -4503599627370497.5L, -4503599627370498.0L, INEXACT_EXCEPTION),
5c68d401 13172# if LDBL_MANT_DIG > 100
105a07df
JM		 13173 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370495.0L, INEXACT_EXCEPTION),
13174 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370496.0L, INEXACT_EXCEPTION),
13175 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370497.0L, INEXACT_EXCEPTION),
13176
13177 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740991.0L, INEXACT_EXCEPTION),
13178 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740992.0L, INEXACT_EXCEPTION),
13179 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740993.0L, INEXACT_EXCEPTION),
13180 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740991.0L, INEXACT_EXCEPTION),
13181 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740992.0L, INEXACT_EXCEPTION),
13182 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740993.0L, INEXACT_EXCEPTION),
13183
13184 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740992.0L, INEXACT_EXCEPTION),
13185 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740993.0L, INEXACT_EXCEPTION),
13186 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740994.0L, INEXACT_EXCEPTION),
13187 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740992.0L, INEXACT_EXCEPTION),
13188 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740993.0L, INEXACT_EXCEPTION),
13189 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740994.0L, INEXACT_EXCEPTION),
5c68d401
RM		 13190# endif
13191#endif
74c57478
JM		 13192 END_DATA (rint_downward)
13193 };
4d37c8aa
UD		 13194
13195static void
13196rint_test_downward (void)
13197{
4d37c8aa 13198 START (rint_downward);
74c57478
JM		 13199 RUN_TEST_LOOP_f_f (rint, rint_downward_test_data, FE_DOWNWARD);
13200 END (rint_downward);
13201}
4d37c8aa 13202
74c57478
JM		 13203static const struct test_f_f_data rint_upward_test_data[] =
13204 {
13205 START_DATA (rint_upward),
105a07df
JM		 13206 TEST_f_f (rint, 2.0, 2.0, NO_INEXACT_EXCEPTION),
13207 TEST_f_f (rint, 1.5, 2.0, INEXACT_EXCEPTION),
13208 TEST_f_f (rint, 1.0, 1.0, NO_INEXACT_EXCEPTION),
13209 TEST_f_f (rint, 0.5, 1.0, INEXACT_EXCEPTION),
13210 TEST_f_f (rint, 0.0, 0.0, NO_INEXACT_EXCEPTION),
13211 TEST_f_f (rint, minus_zero, minus_zero, NO_INEXACT_EXCEPTION),
13212 TEST_f_f (rint, -0.5, -0.0, INEXACT_EXCEPTION),
13213 TEST_f_f (rint, -1.0, -1.0, NO_INEXACT_EXCEPTION),
13214 TEST_f_f (rint, -1.5, -1.0, INEXACT_EXCEPTION),
13215 TEST_f_f (rint, -2.0, -2.0, NO_INEXACT_EXCEPTION),
13216 TEST_f_f (rint, 0.1, 1.0, INEXACT_EXCEPTION),
13217 TEST_f_f (rint, 0.25, 1.0, INEXACT_EXCEPTION),
13218 TEST_f_f (rint, 0.625, 1.0, INEXACT_EXCEPTION),
13219 TEST_f_f (rint, -0.1, -0.0, INEXACT_EXCEPTION),
13220 TEST_f_f (rint, -0.25, -0.0, INEXACT_EXCEPTION),
13221 TEST_f_f (rint, -0.625, -0.0, INEXACT_EXCEPTION),
13222 TEST_f_f (rint, 1048576.75, 1048577.0, INEXACT_EXCEPTION),
13223 TEST_f_f (rint, 2097152.75, 2097153.0, INEXACT_EXCEPTION),
13224 TEST_f_f (rint, -1048576.75, -1048576.0, INEXACT_EXCEPTION),
13225 TEST_f_f (rint, -2097152.75, -2097152.0, INEXACT_EXCEPTION),
74c57478 13226#ifndef TEST_FLOAT
105a07df
JM		 13227 TEST_f_f (rint, 70368744177664.75, 70368744177665.0, INEXACT_EXCEPTION),
13228 TEST_f_f (rint, 140737488355328.75, 140737488355329.0, INEXACT_EXCEPTION),
13229 TEST_f_f (rint, 281474976710656.75, 281474976710657.0, INEXACT_EXCEPTION),
13230 TEST_f_f (rint, 562949953421312.75, 562949953421313.0, INEXACT_EXCEPTION),
13231 TEST_f_f (rint, 1125899906842624.75, 1125899906842625.0, INEXACT_EXCEPTION),
13232 TEST_f_f (rint, -70368744177664.75, -70368744177664.0, INEXACT_EXCEPTION),
13233 TEST_f_f (rint, -140737488355328.75, -140737488355328.0, INEXACT_EXCEPTION),
13234 TEST_f_f (rint, -281474976710656.75, -281474976710656.0, INEXACT_EXCEPTION),
13235 TEST_f_f (rint, -562949953421312.75, -562949953421312.0, INEXACT_EXCEPTION),
13236 TEST_f_f (rint, -1125899906842624.75, -1125899906842624.0, INEXACT_EXCEPTION),
fe45ce09 13237#endif
5c68d401 13238#ifdef TEST_LDOUBLE
74c57478 13239 /* The result can only be represented in long double. */
105a07df
JM		 13240 TEST_f_f (rint, 4503599627370495.5L, 4503599627370496.0L, INEXACT_EXCEPTION),
13241 TEST_f_f (rint, 4503599627370496.25L, 4503599627370497.0L, INEXACT_EXCEPTION),
13242 TEST_f_f (rint, 4503599627370496.5L, 4503599627370497.0L, INEXACT_EXCEPTION),
13243 TEST_f_f (rint, 4503599627370496.75L, 4503599627370497.0L, INEXACT_EXCEPTION),
13244 TEST_f_f (rint, 4503599627370497.5L, 4503599627370498.0L, INEXACT_EXCEPTION),
5c68d401 13245# if LDBL_MANT_DIG > 100
105a07df
JM		 13246 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370495.0L, INEXACT_EXCEPTION),
13247 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370496.0L, INEXACT_EXCEPTION),
13248 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370497.0L, INEXACT_EXCEPTION),
5c68d401 13249# endif
105a07df
JM		 13250 TEST_f_f (rint, -4503599627370495.5L, -4503599627370495.0L, INEXACT_EXCEPTION),
13251 TEST_f_f (rint, -4503599627370496.25L, -4503599627370496.0L, INEXACT_EXCEPTION),
13252 TEST_f_f (rint, -4503599627370496.5L, -4503599627370496.0L, INEXACT_EXCEPTION),
13253 TEST_f_f (rint, -4503599627370496.75L, -4503599627370496.0L, INEXACT_EXCEPTION),
13254 TEST_f_f (rint, -4503599627370497.5L, -4503599627370497.0L, INEXACT_EXCEPTION),
5c68d401 13255# if LDBL_MANT_DIG > 100
105a07df
JM		 13256 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370494.0L, INEXACT_EXCEPTION),
13257 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370495.0L, INEXACT_EXCEPTION),
13258 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370496.0L, INEXACT_EXCEPTION),
13259
13260 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740992.0L, INEXACT_EXCEPTION),
13261 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740993.0L, INEXACT_EXCEPTION),
13262 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740994.0L, INEXACT_EXCEPTION),
13263 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740992.0L, INEXACT_EXCEPTION),
13264 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740993.0L, INEXACT_EXCEPTION),
13265 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740994.0L, INEXACT_EXCEPTION),
13266
13267 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740991.0L, INEXACT_EXCEPTION),
13268 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740992.0L, INEXACT_EXCEPTION),
13269 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740993.0L, INEXACT_EXCEPTION),
13270 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740991.0L, INEXACT_EXCEPTION),
13271 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740992.0L, INEXACT_EXCEPTION),
13272 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740993.0L, INEXACT_EXCEPTION),
5c68d401
RM		 13273# endif
13274#endif
74c57478
JM		 13275 END_DATA (rint_upward)
13276 };
4d37c8aa
UD		 13277
13278static void
13279rint_test_upward (void)
13280{
4d37c8aa 13281 START (rint_upward);
74c57478 13282 RUN_TEST_LOOP_f_f (rint, rint_upward_test_data, FE_UPWARD);
4d37c8aa
UD		 13283 END (rint_upward);
13284}
13285
74c57478
JM		 13286static const struct test_f_f_data round_test_data[] =
13287 {
13288 START_DATA (round),
13289 /* TODO: missing +/-Inf as well as qNaN tests. */
13290
13291 TEST_f_f (round, 0, 0),
13292 TEST_f_f (round, minus_zero, minus_zero),
13293 TEST_f_f (round, 0.2L, 0.0),
13294 TEST_f_f (round, -0.2L, minus_zero),
13295 TEST_f_f (round, 0.5, 1.0),
13296 TEST_f_f (round, -0.5, -1.0),
13297 TEST_f_f (round, 0.8L, 1.0),
13298 TEST_f_f (round, -0.8L, -1.0),
13299 TEST_f_f (round, 1.5, 2.0),
13300 TEST_f_f (round, -1.5, -2.0),
13301 TEST_f_f (round, 0.1, 0.0),
13302 TEST_f_f (round, 0.25, 0.0),
13303 TEST_f_f (round, 0.625, 1.0),
13304 TEST_f_f (round, -0.1, -0.0),
13305 TEST_f_f (round, -0.25, -0.0),
13306 TEST_f_f (round, -0.625, -1.0),
13307 TEST_f_f (round, 2097152.5, 2097153),
13308 TEST_f_f (round, -2097152.5, -2097153),
8847214f 13309
f964490f 13310#ifdef TEST_LDOUBLE
74c57478
JM		 13311 /* The result can only be represented in long double. */
13312 TEST_f_f (round, 4503599627370495.5L, 4503599627370496.0L),
13313 TEST_f_f (round, 4503599627370496.25L, 4503599627370496.0L),
13314 TEST_f_f (round, 4503599627370496.5L, 4503599627370497.0L),
13315 TEST_f_f (round, 4503599627370496.75L, 4503599627370497.0L),
13316 TEST_f_f (round, 4503599627370497.5L, 4503599627370498.0L),
5c68d401 13317# if LDBL_MANT_DIG > 100
74c57478
JM		 13318 TEST_f_f (round, 4503599627370494.5000000000001L, 4503599627370495.0L),
13319 TEST_f_f (round, 4503599627370495.5000000000001L, 4503599627370496.0L),
13320 TEST_f_f (round, 4503599627370496.5000000000001L, 4503599627370497.0L),
5c68d401 13321# endif
f964490f 13322
74c57478
JM		 13323 TEST_f_f (round, -4503599627370495.5L, -4503599627370496.0L),
13324 TEST_f_f (round, -4503599627370496.25L, -4503599627370496.0L),
13325 TEST_f_f (round, -4503599627370496.5L, -4503599627370497.0L),
13326 TEST_f_f (round, -4503599627370496.75L, -4503599627370497.0L),
13327 TEST_f_f (round, -4503599627370497.5L, -4503599627370498.0L),
5c68d401 13328# if LDBL_MANT_DIG > 100
74c57478
JM		 13329 TEST_f_f (round, -4503599627370494.5000000000001L, -4503599627370495.0L),
13330 TEST_f_f (round, -4503599627370495.5000000000001L, -4503599627370496.0L),
13331 TEST_f_f (round, -4503599627370496.5000000000001L, -4503599627370497.0L),
5c68d401 13332# endif
f964490f 13333
74c57478
JM		 13334 TEST_f_f (round, 9007199254740991.5L, 9007199254740992.0L),
13335 TEST_f_f (round, 9007199254740992.25L, 9007199254740992.0L),
13336 TEST_f_f (round, 9007199254740992.5L, 9007199254740993.0L),
13337 TEST_f_f (round, 9007199254740992.75L, 9007199254740993.0L),
13338 TEST_f_f (round, 9007199254740993.5L, 9007199254740994.0L),
f964490f 13339
74c57478
JM		 13340 TEST_f_f (round, -9007199254740991.5L, -9007199254740992.0L),
13341 TEST_f_f (round, -9007199254740992.25L, -9007199254740992.0L),
13342 TEST_f_f (round, -9007199254740992.5L, -9007199254740993.0L),
13343 TEST_f_f (round, -9007199254740992.75L, -9007199254740993.0L),
13344 TEST_f_f (round, -9007199254740993.5L, -9007199254740994.0L),
f964490f 13345
5c68d401 13346# if LDBL_MANT_DIG > 100
74c57478
JM		 13347 TEST_f_f (round, 9007199254740991.0000000000001L, 9007199254740991.0L),
13348 TEST_f_f (round, 9007199254740992.0000000000001L, 9007199254740992.0L),
13349 TEST_f_f (round, 9007199254740993.0000000000001L, 9007199254740993.0L),
13350 TEST_f_f (round, 9007199254740991.5000000000001L, 9007199254740992.0L),
13351 TEST_f_f (round, 9007199254740992.5000000000001L, 9007199254740993.0L),
13352 TEST_f_f (round, 9007199254740993.5000000000001L, 9007199254740994.0L),
13353
13354 TEST_f_f (round, -9007199254740991.0000000000001L, -9007199254740991.0L),
13355 TEST_f_f (round, -9007199254740992.0000000000001L, -9007199254740992.0L),
13356 TEST_f_f (round, -9007199254740993.0000000000001L, -9007199254740993.0L),
13357 TEST_f_f (round, -9007199254740991.5000000000001L, -9007199254740992.0L),
13358 TEST_f_f (round, -9007199254740992.5000000000001L, -9007199254740993.0L),
13359 TEST_f_f (round, -9007199254740993.5000000000001L, -9007199254740994.0L),
5c68d401
RM		 13360# endif
13361
74c57478
JM		 13362 TEST_f_f (round, 72057594037927935.5L, 72057594037927936.0L),
13363 TEST_f_f (round, 72057594037927936.25L, 72057594037927936.0L),
13364 TEST_f_f (round, 72057594037927936.5L, 72057594037927937.0L),
13365 TEST_f_f (round, 72057594037927936.75L, 72057594037927937.0L),
13366 TEST_f_f (round, 72057594037927937.5L, 72057594037927938.0L),
13367
13368 TEST_f_f (round, -72057594037927935.5L, -72057594037927936.0L),
13369 TEST_f_f (round, -72057594037927936.25L, -72057594037927936.0L),
13370 TEST_f_f (round, -72057594037927936.5L, -72057594037927937.0L),
13371 TEST_f_f (round, -72057594037927936.75L, -72057594037927937.0L),
13372 TEST_f_f (round, -72057594037927937.5L, -72057594037927938.0L),
13373
13374 TEST_f_f (round, 10141204801825835211973625643007.5L, 10141204801825835211973625643008.0L),
13375 TEST_f_f (round, 10141204801825835211973625643008.25L, 10141204801825835211973625643008.0L),
13376 TEST_f_f (round, 10141204801825835211973625643008.5L, 10141204801825835211973625643009.0L),
13377 TEST_f_f (round, 10141204801825835211973625643008.75L, 10141204801825835211973625643009.0L),
13378 TEST_f_f (round, 10141204801825835211973625643009.5L, 10141204801825835211973625643010.0L),
13379#endif
13380 END_DATA (round)
13381 };
f964490f 13382
74c57478
JM		 13383static void
13384round_test (void)
13385{
13386 START (round);
13387 RUN_TEST_LOOP_f_f (round, round_test_data, );
8847214f
UD		 13388 END (round);
13389}
13390
13391
601a3a5f
JM		 13392static const struct test_ff_f_data scalb_test_data[] =
13393 {
13394 START_DATA (scalb),
13395 TEST_ff_f (scalb, 2.0, 0.5, qnan_value, INVALID_EXCEPTION),
13396 TEST_ff_f (scalb, 3.0, -2.5, qnan_value, INVALID_EXCEPTION),
13397
13398 TEST_ff_f (scalb, 0, qnan_value, qnan_value),
13399 TEST_ff_f (scalb, 1, qnan_value, qnan_value),
13400
13401 TEST_ff_f (scalb, 1, 0, 1),
13402 TEST_ff_f (scalb, -1, 0, -1),
13403
13404 TEST_ff_f (scalb, 0, plus_infty, qnan_value, INVALID_EXCEPTION),
13405 TEST_ff_f (scalb, minus_zero, plus_infty, qnan_value, INVALID_EXCEPTION),
13406
13407 TEST_ff_f (scalb, 0, 2, 0),
13408 TEST_ff_f (scalb, minus_zero, -4, minus_zero),
13409 TEST_ff_f (scalb, 0, 0, 0),
13410 TEST_ff_f (scalb, minus_zero, 0, minus_zero),
13411 TEST_ff_f (scalb, 0, -1, 0),
13412 TEST_ff_f (scalb, minus_zero, -10, minus_zero),
13413 TEST_ff_f (scalb, 0, minus_infty, 0),
13414 TEST_ff_f (scalb, minus_zero, minus_infty, minus_zero),
13415
13416 TEST_ff_f (scalb, plus_infty, -1, plus_infty),
13417 TEST_ff_f (scalb, minus_infty, -10, minus_infty),
13418 TEST_ff_f (scalb, plus_infty, 0, plus_infty),
13419 TEST_ff_f (scalb, minus_infty, 0, minus_infty),
13420 TEST_ff_f (scalb, plus_infty, 2, plus_infty),
13421 TEST_ff_f (scalb, minus_infty, 100, minus_infty),
13422
13423 TEST_ff_f (scalb, 0.1L, minus_infty, 0.0),
13424 TEST_ff_f (scalb, -0.1L, minus_infty, minus_zero),
13425
13426 TEST_ff_f (scalb, 1, plus_infty, plus_infty),
13427 TEST_ff_f (scalb, -1, plus_infty, minus_infty),
13428 TEST_ff_f (scalb, plus_infty, plus_infty, plus_infty),
13429 TEST_ff_f (scalb, minus_infty, plus_infty, minus_infty),
13430
13431 TEST_ff_f (scalb, plus_infty, minus_infty, qnan_value, INVALID_EXCEPTION),
13432 TEST_ff_f (scalb, minus_infty, minus_infty, qnan_value, INVALID_EXCEPTION),
13433
13434 TEST_ff_f (scalb, qnan_value, 1, qnan_value),
13435 TEST_ff_f (scalb, 1, qnan_value, qnan_value),
13436 TEST_ff_f (scalb, qnan_value, 0, qnan_value),
13437 TEST_ff_f (scalb, 0, qnan_value, qnan_value),
13438 TEST_ff_f (scalb, qnan_value, plus_infty, qnan_value),
13439 TEST_ff_f (scalb, plus_infty, qnan_value, qnan_value),
13440 TEST_ff_f (scalb, qnan_value, qnan_value, qnan_value),
13441
13442 TEST_ff_f (scalb, 0.8L, 4, 12.8L),
13443 TEST_ff_f (scalb, -0.854375L, 5, -27.34L),
13444 END_DATA (scalb)
13445 };
13446
8847214f
UD		 13447static void
13448scalb_test (void)
13449{
13450
13451 START (scalb);
601a3a5f 13452 RUN_TEST_LOOP_ff_f (scalb, scalb_test_data, );
8847214f
UD		 13453 END (scalb);
13454}
13455
13456
243216e1
JM		 13457static const struct test_fi_f_data scalbn_test_data[] =
13458 {
13459 START_DATA (scalbn),
13460 TEST_fi_f (scalbn, 0, 0, 0),
13461 TEST_fi_f (scalbn, minus_zero, 0, minus_zero),
13462
13463 TEST_fi_f (scalbn, plus_infty, 1, plus_infty),
13464 TEST_fi_f (scalbn, minus_infty, 1, minus_infty),
13465 TEST_fi_f (scalbn, qnan_value, 1, qnan_value),
13466
13467 TEST_fi_f (scalbn, 0.8L, 4, 12.8L),
13468 TEST_fi_f (scalbn, -0.854375L, 5, -27.34L),
13469
13470 TEST_fi_f (scalbn, 1, 0L, 1),
13471
13472 TEST_fi_f (scalbn, 1, INT_MAX, plus_infty, OVERFLOW_EXCEPTION),
13473 TEST_fi_f (scalbn, 1, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13474 TEST_fi_f (scalbn, max_value, INT_MAX, plus_infty, OVERFLOW_EXCEPTION),
13475 TEST_fi_f (scalbn, max_value, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13476 TEST_fi_f (scalbn, min_value, INT_MAX, plus_infty, OVERFLOW_EXCEPTION),
13477 TEST_fi_f (scalbn, min_value, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13478 TEST_fi_f (scalbn, min_value / 4, INT_MAX, plus_infty, OVERFLOW_EXCEPTION),
13479 TEST_fi_f (scalbn, min_value / 4, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13480 END_DATA (scalbn)
13481 };
13482
8847214f
UD		 13483static void
13484scalbn_test (void)
13485{
13486
13487 START (scalbn);
243216e1 13488 RUN_TEST_LOOP_fi_f (scalbn, scalbn_test_data, );
8847214f
UD		 13489 END (scalbn);
13490}
13491
2550dfe9 13492
68fc074c
JM		 13493static const struct test_fl_f_data scalbln_test_data[] =
13494 {
13495 START_DATA (scalbln),
13496 TEST_fl_f (scalbln, 0, 0, 0),
13497 TEST_fl_f (scalbln, minus_zero, 0, minus_zero),
13498
13499 TEST_fl_f (scalbln, plus_infty, 1, plus_infty),
13500 TEST_fl_f (scalbln, minus_infty, 1, minus_infty),
13501 TEST_fl_f (scalbln, qnan_value, 1, qnan_value),
13502
13503 TEST_fl_f (scalbln, 0.8L, 4, 12.8L),
13504 TEST_fl_f (scalbln, -0.854375L, 5, -27.34L),
13505
13506 TEST_fl_f (scalbln, 1, 0L, 1),
13507
13508 TEST_fl_f (scalbln, 1, INT_MAX, plus_infty, OVERFLOW_EXCEPTION),
13509 TEST_fl_f (scalbln, 1, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13510 TEST_fl_f (scalbln, max_value, INT_MAX, plus_infty, OVERFLOW_EXCEPTION),
13511 TEST_fl_f (scalbln, max_value, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13512 TEST_fl_f (scalbln, min_value, INT_MAX, plus_infty, OVERFLOW_EXCEPTION),
13513 TEST_fl_f (scalbln, min_value, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13514 TEST_fl_f (scalbln, min_value / 4, INT_MAX, plus_infty, OVERFLOW_EXCEPTION),
13515 TEST_fl_f (scalbln, min_value / 4, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13516
13517 TEST_fl_f (scalbln, 1, LONG_MAX, plus_infty, OVERFLOW_EXCEPTION),
13518 TEST_fl_f (scalbln, 1, LONG_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13519 TEST_fl_f (scalbln, max_value, LONG_MAX, plus_infty, OVERFLOW_EXCEPTION),
13520 TEST_fl_f (scalbln, max_value, LONG_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13521 TEST_fl_f (scalbln, min_value, LONG_MAX, plus_infty, OVERFLOW_EXCEPTION),
13522 TEST_fl_f (scalbln, min_value, LONG_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13523 TEST_fl_f (scalbln, min_value / 4, LONG_MAX, plus_infty, OVERFLOW_EXCEPTION),
13524 TEST_fl_f (scalbln, min_value / 4, LONG_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13525
13526#if LONG_MAX >= 0x100000000
13527 TEST_fl_f (scalbln, 1, 0x88000000L, plus_infty, OVERFLOW_EXCEPTION),
13528 TEST_fl_f (scalbln, 1, -0x88000000L, plus_zero, UNDERFLOW_EXCEPTION),
13529 TEST_fl_f (scalbln, max_value, 0x88000000L, plus_infty, OVERFLOW_EXCEPTION),
13530 TEST_fl_f (scalbln, max_value, -0x88000000L, plus_zero, UNDERFLOW_EXCEPTION),
13531 TEST_fl_f (scalbln, min_value, 0x88000000L, plus_infty, OVERFLOW_EXCEPTION),
13532 TEST_fl_f (scalbln, min_value, -0x88000000L, plus_zero, UNDERFLOW_EXCEPTION),
13533 TEST_fl_f (scalbln, min_value / 4, 0x88000000L, plus_infty, OVERFLOW_EXCEPTION),
13534 TEST_fl_f (scalbln, min_value / 4, -0x88000000L, plus_zero, UNDERFLOW_EXCEPTION),
13535#endif
13536 END_DATA (scalbln)
13537 };
13538
8847214f
UD		 13539static void
13540scalbln_test (void)
13541{
13542
13543 START (scalbln);
68fc074c 13544 RUN_TEST_LOOP_fl_f (scalbln, scalbln_test_data, );
e414d745 13545 END (scalbln);
8847214f
UD		 13546}
13547
2550dfe9 13548
7abeee12
JM		 13549static const struct test_f_i_data signbit_test_data[] =
13550 {
13551 START_DATA (signbit),
13552 /* TODO: missing qNaN tests. */
13553 TEST_f_b (signbit, 0, 0),
13554 TEST_f_b (signbit, minus_zero, 1),
13555 TEST_f_b (signbit, plus_infty, 0),
13556 TEST_f_b (signbit, minus_infty, 1),
13557
13558 /* signbit (x) != 0 for x < 0. */
13559 TEST_f_b (signbit, -1, 1),
13560 /* signbit (x) == 0 for x >= 0. */
13561 TEST_f_b (signbit, 1, 0),
13562 END_DATA (signbit)
13563 };
13564
8847214f
UD		 13565static void
13566signbit_test (void)
13567{
8847214f 13568 START (signbit);
7abeee12 13569 RUN_TEST_LOOP_f_b_tg (signbit, signbit_test_data, );
8847214f
UD		 13570 END (signbit);
13571}
13572
2550dfe9 13573
74c57478
JM		 13574static const struct test_f_f_data sin_test_data[] =
13575 {
13576 START_DATA (sin),
13577 TEST_f_f (sin, 0, 0),
13578 TEST_f_f (sin, minus_zero, minus_zero),
13579 TEST_f_f (sin, plus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13580 TEST_f_f (sin, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13581 TEST_f_f (sin, qnan_value, qnan_value, ERRNO_UNCHANGED),
8847214f 13582
74c57478
JM		 13583 TEST_f_f (sin, M_PI_6l, 0.5),
13584 TEST_f_f (sin, -M_PI_6l, -0.5),
13585 TEST_f_f (sin, M_PI_2l, 1),
13586 TEST_f_f (sin, -M_PI_2l, -1),
13587 TEST_f_f (sin, 0.75L, 0.681638760023334166733241952779893935L),
8847214f 13588
74c57478
JM		 13589 TEST_f_f (sin, 0x1p65, -0.047183876212354673805106149805700013943218L),
13590 TEST_f_f (sin, -0x1p65, 0.047183876212354673805106149805700013943218L),
8c0247db 13591
74c57478 13592 TEST_f_f (sin, 0x1.7f4134p+103, -6.6703229329788657073304190650534846045235e-08L),
7a845b2c 13593
d32e4346 13594#ifdef TEST_DOUBLE
74c57478
JM		 13595 TEST_f_f (sin, 0.80190127184058835, 0.71867942238767868),
13596 TEST_f_f (sin, 2.522464e-1, 2.4957989804940911e-1),
8848d99d
JM		 13597#endif
13598
13599#ifndef TEST_FLOAT
74c57478
JM		 13600 TEST_f_f (sin, 1e22, -0.8522008497671888017727058937530293682618L),
13601 TEST_f_f (sin, 0x1p1023, 0.5631277798508840134529434079444683477104L),
8848d99d
JM		 13602#endif
13603
13604#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478 13605 TEST_f_f (sin, 0x1p16383L, 0.3893629985894208126948115852610595405563L),
d32e4346
RM		 13606#endif
13607
74c57478
JM		 13608 TEST_f_f (sin, 0x1p+120, 3.77820109360752022655548470056922991960587e-01L),
13609 TEST_f_f (sin, 0x1p+127, 6.23385512955870240370428801097126489001833e-01L),
13610 TEST_f_f (sin, 0x1.fffff8p+127, 4.85786063130487339701113680434728152037092e-02L),
13611 TEST_f_f (sin, 0x1.fffffep+127, -5.21876523333658540551505357019806722935726e-01L),
13612 TEST_f_f (sin, 0x1p+50, 4.96396515208940840876821859865411368093356e-01L),
13613 TEST_f_f (sin, 0x1p+28, -9.86198211836975655703110310527108292055548e-01L),
13614 END_DATA (sin)
13615 };
4ffffbd2 13616
74c57478
JM		 13617static void
13618sin_test (void)
13619{
13620 errno = 0;
13621 FUNC(sin) (0);
13622 if (errno == ENOSYS)
13623 /* Function not implemented. */
13624 return;
8847214f 13625
74c57478
JM		 13626 START (sin);
13627 RUN_TEST_LOOP_f_f (sin, sin_test_data, );
13628 END (sin);
8847214f
UD		 13629}
13630
2550dfe9 13631
74c57478
JM		 13632static const struct test_f_f_data sin_tonearest_test_data[] =
13633 {
13634 START_DATA (sin_tonearest),
13635 TEST_f_f (sin, 1, 0.8414709848078965066525023216302989996226L),
13636 TEST_f_f (sin, 2, 0.9092974268256816953960198659117448427023L),
13637 TEST_f_f (sin, 3, 0.1411200080598672221007448028081102798469L),
13638 TEST_f_f (sin, 4, -0.7568024953079282513726390945118290941359L),
13639 TEST_f_f (sin, 5, -0.9589242746631384688931544061559939733525L),
13640 TEST_f_f (sin, 6, -0.2794154981989258728115554466118947596280L),
13641 TEST_f_f (sin, 7, 0.6569865987187890903969990915936351779369L),
13642 TEST_f_f (sin, 8, 0.9893582466233817778081235982452886721164L),
13643 TEST_f_f (sin, 9, 0.4121184852417565697562725663524351793439L),
13644 TEST_f_f (sin, 10, -0.5440211108893698134047476618513772816836L),
13645 END_DATA (sin_tonearest)
13646 };
13647
804360ed
JM		 13648static void
13649sin_test_tonearest (void)
13650{
804360ed
JM		 13651 errno = 0;
13652 FUNC(sin) (0);
13653 if (errno == ENOSYS)
13654 /* Function not implemented. */
13655 return;
13656
13657 START (sin_tonearest);
74c57478 13658 RUN_TEST_LOOP_f_f (sin, sin_tonearest_test_data, FE_TONEAREST);
804360ed
JM		 13659 END (sin_tonearest);
13660}
13661
13662
74c57478
JM		 13663static const struct test_f_f_data sin_towardzero_test_data[] =
13664 {
13665 START_DATA (sin_towardzero),
13666 TEST_f_f (sin, 1, 0.8414709848078965066525023216302989996226L),
13667 TEST_f_f (sin, 2, 0.9092974268256816953960198659117448427023L),
13668 TEST_f_f (sin, 3, 0.1411200080598672221007448028081102798469L),
13669 TEST_f_f (sin, 4, -0.7568024953079282513726390945118290941359L),
13670 TEST_f_f (sin, 5, -0.9589242746631384688931544061559939733525L),
13671 TEST_f_f (sin, 6, -0.2794154981989258728115554466118947596280L),
13672 TEST_f_f (sin, 7, 0.6569865987187890903969990915936351779369L),
13673 TEST_f_f (sin, 8, 0.9893582466233817778081235982452886721164L),
13674 TEST_f_f (sin, 9, 0.4121184852417565697562725663524351793439L),
13675 TEST_f_f (sin, 10, -0.5440211108893698134047476618513772816836L),
13676 END_DATA (sin_towardzero)
13677 };
13678
804360ed
JM		 13679static void
13680sin_test_towardzero (void)
13681{
804360ed
JM		 13682 errno = 0;
13683 FUNC(sin) (0);
13684 if (errno == ENOSYS)
13685 /* Function not implemented. */
13686 return;
13687
13688 START (sin_towardzero);
74c57478 13689 RUN_TEST_LOOP_f_f (sin, sin_towardzero_test_data, FE_TOWARDZERO);
804360ed
JM		 13690 END (sin_towardzero);
13691}
13692
13693
74c57478
JM		 13694static const struct test_f_f_data sin_downward_test_data[] =
13695 {
13696 START_DATA (sin_downward),
13697 TEST_f_f (sin, 1, 0.8414709848078965066525023216302989996226L),
13698 TEST_f_f (sin, 2, 0.9092974268256816953960198659117448427023L),
13699 TEST_f_f (sin, 3, 0.1411200080598672221007448028081102798469L),
13700 TEST_f_f (sin, 4, -0.7568024953079282513726390945118290941359L),
13701 TEST_f_f (sin, 5, -0.9589242746631384688931544061559939733525L),
13702 TEST_f_f (sin, 6, -0.2794154981989258728115554466118947596280L),
13703 TEST_f_f (sin, 7, 0.6569865987187890903969990915936351779369L),
13704 TEST_f_f (sin, 8, 0.9893582466233817778081235982452886721164L),
13705 TEST_f_f (sin, 9, 0.4121184852417565697562725663524351793439L),
13706 TEST_f_f (sin, 10, -0.5440211108893698134047476618513772816836L),
13707 END_DATA (sin_downward)
13708 };
13709
804360ed
JM		 13710static void
13711sin_test_downward (void)
13712{
804360ed
JM		 13713 errno = 0;
13714 FUNC(sin) (0);
13715 if (errno == ENOSYS)
13716 /* Function not implemented. */
13717 return;
13718
13719 START (sin_downward);
74c57478 13720 RUN_TEST_LOOP_f_f (sin, sin_downward_test_data, FE_DOWNWARD);
804360ed
JM		 13721 END (sin_downward);
13722}
13723
13724
74c57478
JM		 13725static const struct test_f_f_data sin_upward_test_data[] =
13726 {
13727 START_DATA (sin_upward),
13728 TEST_f_f (sin, 1, 0.8414709848078965066525023216302989996226L),
13729 TEST_f_f (sin, 2, 0.9092974268256816953960198659117448427023L),
13730 TEST_f_f (sin, 3, 0.1411200080598672221007448028081102798469L),
13731 TEST_f_f (sin, 4, -0.7568024953079282513726390945118290941359L),
13732 TEST_f_f (sin, 5, -0.9589242746631384688931544061559939733525L),
13733 TEST_f_f (sin, 6, -0.2794154981989258728115554466118947596280L),
13734 TEST_f_f (sin, 7, 0.6569865987187890903969990915936351779369L),
13735 TEST_f_f (sin, 8, 0.9893582466233817778081235982452886721164L),
13736 TEST_f_f (sin, 9, 0.4121184852417565697562725663524351793439L),
13737 TEST_f_f (sin, 10, -0.5440211108893698134047476618513772816836L),
13738 END_DATA (sin_upward)
13739 };
13740
804360ed
JM		 13741static void
13742sin_test_upward (void)
13743{
804360ed
JM		 13744 errno = 0;
13745 FUNC(sin) (0);
13746 if (errno == ENOSYS)
13747 /* Function not implemented. */
13748 return;
13749
13750 START (sin_upward);
74c57478 13751 RUN_TEST_LOOP_f_f (sin, sin_upward_test_data, FE_UPWARD);
804360ed
JM		 13752 END (sin_upward);
13753}
13754
13755
8847214f
UD		 13756static void
13757sincos_test (void)
13758{
13759 FLOAT sin_res, cos_res;
13760
aaca11d8
UD		 13761 errno = 0;
13762 FUNC(sincos) (0, &sin_res, &cos_res);
13763 if (errno == ENOSYS)
13764 /* Function not implemented. */
13765 return;
13766
8847214f
UD		 13767 START (sincos);
13768
13769 /* sincos is treated differently because it returns void. */
13770 TEST_extra (sincos, 0, 0, 1);
13771
13772 TEST_extra (sincos, minus_zero, minus_zero, 1);
67e971f1
TS		 13773 TEST_extra (sincos, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION);
13774 TEST_extra (sincos, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION);
13775 TEST_extra (sincos, qnan_value, qnan_value, qnan_value);
8847214f 13776
aba5e333
CD		 13777 /* The value of M_PI_2l is never exactly PI/2, and therefore the
13778 answer is never exactly zero. The answer is equal to the error
13779 in rounding PI/2 for the type used. Thus the answer is unique
13780 to each type. */
13781#ifdef TEST_FLOAT
13782 /* 32-bit float. */
418601aa 13783 TEST_extra (sincos, M_PI_2l, 1, -0x1.777a5cp-25L);
aba5e333
CD		 13784#endif
13785#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MANT_DIG == 53)
13786 /* 64-bit double or 64-bit long double. */
418601aa 13787 TEST_extra (sincos, M_PI_2l, 1, 0x1.1a62633145c07p-54L);
aba5e333
CD		 13788#endif
13789#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 64
13790 /* 96-bit long double. */
418601aa 13791 TEST_extra (sincos, M_PI_2l, 1, -0xe.ce675d1fc8f8cbbp-69L);
aba5e333
CD		 13792#endif
13793#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 106
13794 /* 128-bit IBM long double. */
418601aa 13795 TEST_extra (sincos, M_PI_2l, 1, 0x1.c1cd129024e088a67cc74020bcp-107L);
aba5e333
CD		 13796#endif
13797#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 113
13798 /* 128-bit long double. */
418601aa 13799 TEST_extra (sincos, M_PI_2l, 1, 0x1.cd129024e088a67cc74020bbea64p-115L);
aba5e333
CD		 13800#endif
13801
3c6cad26
UD		 13802 TEST_extra (sincos, M_PI_6l, 0.5, 0.86602540378443864676372317075293616L);
13803 TEST_extra (sincos, M_PI_6l*2.0, 0.86602540378443864676372317075293616L, 0.5);
2550dfe9 13804 TEST_extra (sincos, 0.75L, 0.681638760023334166733241952779893935L, 0.731688868873820886311838753000084544L);
8847214f 13805
ea40808a
AJ		 13806 TEST_extra (sincos, 0x1p65, -0.047183876212354673805106149805700013943218L, 0.99888622066058013610642172179340364209972L);
13807 TEST_extra (sincos, -0x1p65, 0.047183876212354673805106149805700013943218L, 0.99888622066058013610642172179340364209972L);
8c0247db 13808
d32e4346
RM		 13809#ifdef TEST_DOUBLE
13810 TEST_extra (sincos, 0.80190127184058835, 0.71867942238767868, 0.69534156199418473);
8848d99d
JM		 13811#endif
13812
13813#ifndef TEST_FLOAT
13814 TEST_extra (sincos, 1e22, -0.8522008497671888017727058937530293682618L, 0.5232147853951389454975944733847094921409L);
13815 TEST_extra (sincos, 0x1p1023, 0.5631277798508840134529434079444683477104L, -0.826369834614147994500785680811743734805L);
13816#endif
13817
13818#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
13819 TEST_extra (sincos, 0x1p16383L, 0.3893629985894208126948115852610595405563L, 0.9210843909921906206874509522505756251609L);
d32e4346
RM		 13820#endif
13821
4ffffbd2
LD		 13822 TEST_extra (sincos, 0x1p+120, 3.77820109360752022655548470056922991960587e-01L, -9.25879022854837867303861764107414946730833e-01L);
13823 TEST_extra (sincos, 0x1p+127, 6.23385512955870240370428801097126489001833e-01L, 7.81914638714960072263910298466369236613162e-01L);
13824 TEST_extra (sincos, 0x1.fffff8p+127, 4.85786063130487339701113680434728152037092e-02L, 9.98819362551949040703862043664101081064641e-01L);
13825 TEST_extra (sincos, 0x1.fffffep+127, -5.21876523333658540551505357019806722935726e-01L, 8.53021039830304158051791467692161107353094e-01L);
13826 TEST_extra (sincos, 0x1p+50, 4.96396515208940840876821859865411368093356e-01L, 8.68095904660550604334592502063501320395739e-01L);
13827 TEST_extra (sincos, 0x1p+28, -9.86198211836975655703110310527108292055548e-01L, -1.65568979490578758865468278195361551113358e-01L);
13828
8847214f
UD		 13829 END (sincos);
13830}
13831
74c57478
JM		 13832static const struct test_f_f_data sinh_test_data[] =
13833 {
13834 START_DATA (sinh),
13835 TEST_f_f (sinh, 0, 0),
13836 TEST_f_f (sinh, minus_zero, minus_zero),
13837
13838#ifndef TEST_INLINE
13839 TEST_f_f (sinh, plus_infty, plus_infty),
13840 TEST_f_f (sinh, minus_infty, minus_infty),
13841#endif
13842 TEST_f_f (sinh, qnan_value, qnan_value),
13843
13844 TEST_f_f (sinh, 0.75L, 0.822316731935829980703661634446913849L),
13845 TEST_f_f (sinh, 0x8p-32L, 1.86264514923095703232705808926175479e-9L),
13846 END_DATA (sinh)
13847 };
13848
8847214f
UD		 13849static void
13850sinh_test (void)
13851{
aaca11d8 13852 errno = 0;
3c6cad26 13853 FUNC(sinh) (0.7L);
aaca11d8
UD		 13854 if (errno == ENOSYS)
13855 /* Function not implemented. */
13856 return;
13857
8847214f 13858 START (sinh);
74c57478 13859 RUN_TEST_LOOP_f_f (sinh, sinh_test_data, );
8847214f
UD		 13860 END (sinh);
13861}
13862
ca811b22 13863
74c57478
JM		 13864static const struct test_f_f_data sinh_tonearest_test_data[] =
13865 {
13866 START_DATA (sinh_tonearest),
13867 TEST_f_f (sinh, 22, 1792456423.065795780701106568345764104225L),
13868 TEST_f_f (sinh, 23, 4872401723.124451299966006944252978187305L),
13869 TEST_f_f (sinh, 24, 13244561064.92173614705070540368454568168L),
13870 END_DATA (sinh_tonearest)
13871 };
13872
ca811b22
JM		 13873static void
13874sinh_test_tonearest (void)
13875{
ca811b22
JM		 13876 errno = 0;
13877 FUNC(sinh) (0);
13878 if (errno == ENOSYS)
13879 /* Function not implemented. */
13880 return;
13881
13882 START (sinh_tonearest);
74c57478 13883 RUN_TEST_LOOP_f_f (sinh, sinh_tonearest_test_data, FE_TONEAREST);
ca811b22
JM		 13884 END (sinh_tonearest);
13885}
13886
13887
74c57478
JM		 13888static const struct test_f_f_data sinh_towardzero_test_data[] =
13889 {
13890 START_DATA (sinh_towardzero),
13891 TEST_f_f (sinh, 22, 1792456423.065795780701106568345764104225L),
13892 TEST_f_f (sinh, 23, 4872401723.124451299966006944252978187305L),
13893 TEST_f_f (sinh, 24, 13244561064.92173614705070540368454568168L),
13894 END_DATA (sinh_towardzero)
13895 };
13896
ca811b22
JM		 13897static void
13898sinh_test_towardzero (void)
13899{
ca811b22
JM		 13900 errno = 0;
13901 FUNC(sinh) (0);
13902 if (errno == ENOSYS)
13903 /* Function not implemented. */
13904 return;
13905
13906 START (sinh_towardzero);
74c57478 13907 RUN_TEST_LOOP_f_f (sinh, sinh_towardzero_test_data, FE_TOWARDZERO);
ca811b22
JM		 13908 END (sinh_towardzero);
13909}
13910
13911
74c57478
JM		 13912static const struct test_f_f_data sinh_downward_test_data[] =
13913 {
13914 START_DATA (sinh_downward),
13915 TEST_f_f (sinh, 22, 1792456423.065795780701106568345764104225L),
13916 TEST_f_f (sinh, 23, 4872401723.124451299966006944252978187305L),
13917 TEST_f_f (sinh, 24, 13244561064.92173614705070540368454568168L),
13918 END_DATA (sinh_downward)
13919 };
13920
ca811b22
JM		 13921static void
13922sinh_test_downward (void)
13923{
ca811b22
JM		 13924 errno = 0;
13925 FUNC(sinh) (0);
13926 if (errno == ENOSYS)
13927 /* Function not implemented. */
13928 return;
13929
13930 START (sinh_downward);
74c57478 13931 RUN_TEST_LOOP_f_f (sinh, sinh_downward_test_data, FE_DOWNWARD);
ca811b22
JM		 13932 END (sinh_downward);
13933}
13934
13935
74c57478
JM		 13936static const struct test_f_f_data sinh_upward_test_data[] =
13937 {
13938 START_DATA (sinh_upward),
13939 TEST_f_f (sinh, 22, 1792456423.065795780701106568345764104225L),
13940 TEST_f_f (sinh, 23, 4872401723.124451299966006944252978187305L),
13941 TEST_f_f (sinh, 24, 13244561064.92173614705070540368454568168L),
13942 END_DATA (sinh_upward)
13943 };
13944
ca811b22
JM		 13945static void
13946sinh_test_upward (void)
13947{
ca811b22
JM		 13948 errno = 0;
13949 FUNC(sinh) (0);
13950 if (errno == ENOSYS)
13951 /* Function not implemented. */
13952 return;
13953
13954 START (sinh_upward);
74c57478 13955 RUN_TEST_LOOP_f_f (sinh, sinh_upward_test_data, FE_UPWARD);
ca811b22
JM		 13956 END (sinh_upward);
13957}
13958
13959
74c57478
JM		 13960static const struct test_f_f_data sqrt_test_data[] =
13961 {
13962 START_DATA (sqrt),
13963 TEST_f_f (sqrt, 0, 0),
13964 TEST_f_f (sqrt, qnan_value, qnan_value),
13965 TEST_f_f (sqrt, plus_infty, plus_infty),
13966
13967 TEST_f_f (sqrt, minus_zero, minus_zero),
13968
13969 /* sqrt (x) == qNaN plus invalid exception for x < 0. */
cbe8c4d3
JM		 13970 TEST_f_f (sqrt, -1, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13971 TEST_f_f (sqrt, -max_value, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13972 TEST_f_f (sqrt, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
74c57478
JM		 13973
13974 TEST_f_f (sqrt, 2209, 47),
13975 TEST_f_f (sqrt, 4, 2),
13976 TEST_f_f (sqrt, 2, M_SQRT2l),
13977 TEST_f_f (sqrt, 0.25, 0.5),
13978 TEST_f_f (sqrt, 6642.25, 81.5),
13979 TEST_f_f (sqrt, 15190.5625L, 123.25L),
13980 TEST_f_f (sqrt, 0.75L, 0.866025403784438646763723170752936183L),
13981 END_DATA (sqrt)
13982 };
13983
8847214f
UD		 13984static void
13985sqrt_test (void)
13986{
e6d3c4a7
AJ		 13987 errno = 0;
13988 FUNC(sqrt) (1);
13989 if (errno == ENOSYS)
13990 /* Function not implemented. */
13991 return;
13992
8847214f 13993 START (sqrt);
74c57478 13994 RUN_TEST_LOOP_f_f (sqrt, sqrt_test_data, );
8847214f
UD		 13995 END (sqrt);
13996}
13997
2550dfe9 13998
74c57478
JM		 13999static const struct test_f_f_data tan_test_data[] =
14000 {
14001 START_DATA (tan),
14002 TEST_f_f (tan, 0, 0),
14003 TEST_f_f (tan, minus_zero, minus_zero),
14004 TEST_f_f (tan, plus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
14005 TEST_f_f (tan, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
14006 TEST_f_f (tan, qnan_value, qnan_value, ERRNO_UNCHANGED),
14007
14008 TEST_f_f (tan, M_PI_4l, 1),
14009 TEST_f_f (tan, 0.75L, 0.931596459944072461165202756573936428L),
14010
14011 TEST_f_f (tan, 0x1p65, -0.0472364872359047946798414219288370688827L),
14012 TEST_f_f (tan, -0x1p65, 0.0472364872359047946798414219288370688827L),
14013
14014 TEST_f_f (tan, 0xc.9p-4, 0.9995162902115457818029468900654150261381L),
14015 TEST_f_f (tan, 0xc.908p-4, 0.9997603425502441410973077452249560802034L),
14016 TEST_f_f (tan, 0xc.90cp-4, 0.9998823910588060302788513970802357770031L),
14017 TEST_f_f (tan, 0xc.90ep-4, 0.9999434208994808753305784795924711152508L),
14018 TEST_f_f (tan, 0xc.90fp-4, 0.9999739372166156702433266059635165160515L),
14019 TEST_f_f (tan, 0xc.90f8p-4, 0.9999891957244072765118898375645469865764L),
14020 TEST_f_f (tan, 0xc.90fcp-4, 0.9999968250656122402859679132395522927393L),
14021 TEST_f_f (tan, 0xc.90fdp-4, 0.9999987324100083358016192309006353329444L),
14022 TEST_f_f (tan, 0xc.90fd8p-4, 0.9999996860835706212861509874451585282616L),
14023 TEST_f_f (tan, 0xc.90fdap-4, 0.9999999245021033010474530133665235922808L),
14024 TEST_f_f (tan, 0xc.ap-4, 1.0073556597407272165371804539701396631519L),
14025 TEST_f_f (tan, 0xc.98p-4, 1.0034282930863044654045449407466962736255L),
14026 TEST_f_f (tan, 0xc.94p-4, 1.0014703786820082237342656561856877993328L),
14027 TEST_f_f (tan, 0xc.92p-4, 1.0004928571392300571266638743539017593717L),
14028 TEST_f_f (tan, 0xc.91p-4, 1.0000044544650244953647966900221905361131L),
14029 TEST_f_f (tan, 0xc.90fep-4, 1.0000006397580424009014454926842136804016L),
14030 TEST_f_f (tan, 0xc.90fdcp-4, 1.0000001629206928242190327320047489394217L),
14031 TEST_f_f (tan, 0xc.90fdbp-4, 1.0000000437113909572052640953950483705005L),
14032
14033 TEST_f_f (tan, -0xc.9p-4, -0.9995162902115457818029468900654150261381L),
14034 TEST_f_f (tan, -0xc.908p-4, -0.9997603425502441410973077452249560802034L),
14035 TEST_f_f (tan, -0xc.90cp-4, -0.9998823910588060302788513970802357770031L),
14036 TEST_f_f (tan, -0xc.90ep-4, -0.9999434208994808753305784795924711152508L),
14037 TEST_f_f (tan, -0xc.90fp-4, -0.9999739372166156702433266059635165160515L),
14038 TEST_f_f (tan, -0xc.90f8p-4, -0.9999891957244072765118898375645469865764L),
14039 TEST_f_f (tan, -0xc.90fcp-4, -0.9999968250656122402859679132395522927393L),
14040 TEST_f_f (tan, -0xc.90fdp-4, -0.9999987324100083358016192309006353329444L),
14041 TEST_f_f (tan, -0xc.90fd8p-4, -0.9999996860835706212861509874451585282616L),
14042 TEST_f_f (tan, -0xc.90fdap-4, -0.9999999245021033010474530133665235922808L),
14043 TEST_f_f (tan, -0xc.ap-4, -1.0073556597407272165371804539701396631519L),
14044 TEST_f_f (tan, -0xc.98p-4, -1.0034282930863044654045449407466962736255L),
14045 TEST_f_f (tan, -0xc.94p-4, -1.0014703786820082237342656561856877993328L),
14046 TEST_f_f (tan, -0xc.92p-4, -1.0004928571392300571266638743539017593717L),
14047 TEST_f_f (tan, -0xc.91p-4, -1.0000044544650244953647966900221905361131L),
14048 TEST_f_f (tan, -0xc.90fep-4, -1.0000006397580424009014454926842136804016L),
14049 TEST_f_f (tan, -0xc.90fdcp-4, -1.0000001629206928242190327320047489394217L),
14050 TEST_f_f (tan, -0xc.90fdbp-4, -1.0000000437113909572052640953950483705005L),
14051
14052#ifndef TEST_FLOAT
14053 TEST_f_f (tan, 1e22, -1.628778225606898878549375936939548513545L),
14054 TEST_f_f (tan, 0x1p1023, -0.6814476476066215012854144040167365190368L),
14055#endif
14056
14057#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
14058 TEST_f_f (tan, 0x1p16383L, 0.422722393732022337800504160054440141575L),
14059#endif
14060 END_DATA (tan)
14061 };
14062
8847214f
UD		 14063static void
14064tan_test (void)
14065{
e6d3c4a7
AJ		 14066 errno = 0;
14067 FUNC(tan) (0);
14068 if (errno == ENOSYS)
14069 /* Function not implemented. */
14070 return;
14071
8847214f 14072 START (tan);
74c57478 14073 RUN_TEST_LOOP_f_f (tan, tan_test_data, );
8847214f
UD		 14074 END (tan);
14075}
14076
804360ed 14077
74c57478
JM		 14078static const struct test_f_f_data tan_tonearest_test_data[] =
14079 {
14080 START_DATA (tan_tonearest),
14081 TEST_f_f (tan, 1, 1.5574077246549022305069748074583601730873L),
14082 TEST_f_f (tan, 2, -2.1850398632615189916433061023136825434320L),
14083 TEST_f_f (tan, 3, -0.1425465430742778052956354105339134932261L),
14084 TEST_f_f (tan, 4, 1.1578212823495775831373424182673239231198L),
14085 TEST_f_f (tan, 5, -3.3805150062465856369827058794473439087096L),
14086 TEST_f_f (tan, 6, -0.2910061913847491570536995888681755428312L),
14087 TEST_f_f (tan, 7, 0.8714479827243187364564508896003135663222L),
14088 TEST_f_f (tan, 8, -6.7997114552203786999252627596086333648814L),
14089 TEST_f_f (tan, 9, -0.4523156594418098405903708757987855343087L),
14090 TEST_f_f (tan, 10, 0.6483608274590866712591249330098086768169L),
14091 END_DATA (tan_tonearest)
14092 };
14093
804360ed
JM		 14094static void
14095tan_test_tonearest (void)
14096{
804360ed
JM		 14097 errno = 0;
14098 FUNC(tan) (0);
14099 if (errno == ENOSYS)
14100 /* Function not implemented. */
14101 return;
14102
14103 START (tan_tonearest);
74c57478 14104 RUN_TEST_LOOP_f_f (tan, tan_tonearest_test_data, FE_TONEAREST);
804360ed
JM		 14105 END (tan_tonearest);
14106}
14107
14108
74c57478
JM		 14109static const struct test_f_f_data tan_towardzero_test_data[] =
14110 {
14111 START_DATA (tan_towardzero),
14112 TEST_f_f (tan, 1, 1.5574077246549022305069748074583601730873L),
14113 TEST_f_f (tan, 2, -2.1850398632615189916433061023136825434320L),
14114 TEST_f_f (tan, 3, -0.1425465430742778052956354105339134932261L),
14115 TEST_f_f (tan, 4, 1.1578212823495775831373424182673239231198L),
14116 TEST_f_f (tan, 5, -3.3805150062465856369827058794473439087096L),
14117 TEST_f_f (tan, 6, -0.2910061913847491570536995888681755428312L),
14118 TEST_f_f (tan, 7, 0.8714479827243187364564508896003135663222L),
14119 TEST_f_f (tan, 8, -6.7997114552203786999252627596086333648814L),
14120 TEST_f_f (tan, 9, -0.4523156594418098405903708757987855343087L),
14121 TEST_f_f (tan, 10, 0.6483608274590866712591249330098086768169L),
14122 END_DATA (tan_towardzero)
14123 };
14124
804360ed
JM		 14125static void
14126tan_test_towardzero (void)
14127{
804360ed
JM		 14128 errno = 0;
14129 FUNC(tan) (0);
14130 if (errno == ENOSYS)
14131 /* Function not implemented. */
14132 return;
14133
14134 START (tan_towardzero);
74c57478 14135 RUN_TEST_LOOP_f_f (tan, tan_towardzero_test_data, FE_TOWARDZERO);
804360ed
JM		 14136 END (tan_towardzero);
14137}
14138
14139
74c57478
JM		 14140static const struct test_f_f_data tan_downward_test_data[] =
14141 {
14142 START_DATA (tan_downward),
14143 TEST_f_f (tan, 1, 1.5574077246549022305069748074583601730873L),
14144 TEST_f_f (tan, 2, -2.1850398632615189916433061023136825434320L),
14145 TEST_f_f (tan, 3, -0.1425465430742778052956354105339134932261L),
14146 TEST_f_f (tan, 4, 1.1578212823495775831373424182673239231198L),
14147 TEST_f_f (tan, 5, -3.3805150062465856369827058794473439087096L),
14148 TEST_f_f (tan, 6, -0.2910061913847491570536995888681755428312L),
14149 TEST_f_f (tan, 7, 0.8714479827243187364564508896003135663222L),
14150 TEST_f_f (tan, 8, -6.7997114552203786999252627596086333648814L),
14151 TEST_f_f (tan, 9, -0.4523156594418098405903708757987855343087L),
14152 TEST_f_f (tan, 10, 0.6483608274590866712591249330098086768169L),
14153 END_DATA (tan_downward)
14154 };
14155
804360ed
JM		 14156static void
14157tan_test_downward (void)
14158{
804360ed
JM		 14159 errno = 0;
14160 FUNC(tan) (0);
14161 if (errno == ENOSYS)
14162 /* Function not implemented. */
14163 return;
14164
14165 START (tan_downward);
74c57478 14166 RUN_TEST_LOOP_f_f (tan, tan_downward_test_data, FE_DOWNWARD);
804360ed
JM		 14167 END (tan_downward);
14168}
14169
14170
74c57478
JM		 14171static const struct test_f_f_data tan_upward_test_data[] =
14172 {
14173 START_DATA (tan_upward),
14174 TEST_f_f (tan, 1, 1.5574077246549022305069748074583601730873L),
14175 TEST_f_f (tan, 2, -2.1850398632615189916433061023136825434320L),
14176 TEST_f_f (tan, 3, -0.1425465430742778052956354105339134932261L),
14177 TEST_f_f (tan, 4, 1.1578212823495775831373424182673239231198L),
14178 TEST_f_f (tan, 5, -3.3805150062465856369827058794473439087096L),
14179 TEST_f_f (tan, 6, -0.2910061913847491570536995888681755428312L),
14180 TEST_f_f (tan, 7, 0.8714479827243187364564508896003135663222L),
14181 TEST_f_f (tan, 8, -6.7997114552203786999252627596086333648814L),
14182 TEST_f_f (tan, 9, -0.4523156594418098405903708757987855343087L),
14183 TEST_f_f (tan, 10, 0.6483608274590866712591249330098086768169L),
14184 END_DATA (tan_upward)
14185 };
14186
804360ed
JM		 14187static void
14188tan_test_upward (void)
14189{
804360ed
JM		 14190 errno = 0;
14191 FUNC(tan) (0);
14192 if (errno == ENOSYS)
14193 /* Function not implemented. */
14194 return;
14195
14196 START (tan_upward);
74c57478 14197 RUN_TEST_LOOP_f_f (tan, tan_upward_test_data, FE_UPWARD);
804360ed
JM		 14198 END (tan_upward);
14199}
14200
14201
74c57478
JM		 14202static const struct test_f_f_data tanh_test_data[] =
14203 {
14204 START_DATA (tanh),
14205 TEST_f_f (tanh, 0, 0),
14206 TEST_f_f (tanh, minus_zero, minus_zero),
8847214f 14207
15daa639 14208#ifndef TEST_INLINE
74c57478
JM		 14209 TEST_f_f (tanh, plus_infty, 1),
14210 TEST_f_f (tanh, minus_infty, -1),
15daa639 14211#endif
74c57478 14212 TEST_f_f (tanh, qnan_value, qnan_value),
3eab00bd 14213
74c57478
JM		 14214 TEST_f_f (tanh, 0.75L, 0.635148952387287319214434357312496495L),
14215 TEST_f_f (tanh, -0.75L, -0.635148952387287319214434357312496495L),
8847214f 14216
74c57478
JM		 14217 TEST_f_f (tanh, 1.0L, 0.7615941559557648881194582826047935904L),
14218 TEST_f_f (tanh, -1.0L, -0.7615941559557648881194582826047935904L),
30e5dcb7 14219
74c57478
JM		 14220 /* 2^-57 */
14221 TEST_f_f (tanh, 0x1p-57L, 6.938893903907228377647697925567626953125e-18L),
14222 END_DATA (tanh)
14223 };
8847214f
UD		 14224
14225static void
74c57478 14226tanh_test (void)
8847214f
UD		 14227{
14228 errno = 0;
74c57478 14229 FUNC(tanh) (0.7L);
8847214f
UD		 14230 if (errno == ENOSYS)
14231 /* Function not implemented. */
14232 return;
8847214f 14233
74c57478
JM		 14234 START (tanh);
14235 RUN_TEST_LOOP_f_f (tanh, tanh_test_data, );
14236 END (tanh);
14237}
8847214f 14238
74c57478
JM		 14239static const struct test_f_f_data tgamma_test_data[] =
14240 {
14241 START_DATA (tgamma),
14242 TEST_f_f (tgamma, plus_infty, plus_infty),
e9eee333 14243 TEST_f_f (tgamma, max_value, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
74c57478
JM		 14244 TEST_f_f (tgamma, 0, plus_infty, DIVIDE_BY_ZERO_EXCEPTION),
14245 TEST_f_f (tgamma, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
14246 /* tgamma (x) == qNaN plus invalid exception for integer x <= 0. */
14247 TEST_f_f (tgamma, -2, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
14248 TEST_f_f (tgamma, -max_value, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
14249 TEST_f_f (tgamma, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
14250 TEST_f_f (tgamma, qnan_value, qnan_value),
14251
14252 TEST_f_f (tgamma, 0.5, M_SQRT_PIl),
14253 TEST_f_f (tgamma, -0.5, -M_2_SQRT_PIl),
14254
14255 TEST_f_f (tgamma, 1, 1),
14256 TEST_f_f (tgamma, 2, 1),
14257 TEST_f_f (tgamma, 3, 2),
14258 TEST_f_f (tgamma, 4, 6),
14259 TEST_f_f (tgamma, 5, 24),
14260 TEST_f_f (tgamma, 6, 120),
14261 TEST_f_f (tgamma, 7, 720),
14262 TEST_f_f (tgamma, 8, 5040),
14263 TEST_f_f (tgamma, 9, 40320),
14264 TEST_f_f (tgamma, 10, 362880),
14265
14266 TEST_f_f (tgamma, 0.7L, 1.29805533264755778568117117915281162L),
14267 TEST_f_f (tgamma, 1.2L, 0.918168742399760610640951655185830401L),
14268
14269 TEST_f_f (tgamma, 1.5L, 8.8622692545275801364908374167057259139877e-01L),
14270 TEST_f_f (tgamma, 2.5L, 1.3293403881791370204736256125058588870982e+00L),
14271 TEST_f_f (tgamma, 3.5L, 3.3233509704478425511840640312646472177454e+00L),
14272 TEST_f_f (tgamma, 4.5L, 1.1631728396567448929144224109426265262109e+01L),
14273 TEST_f_f (tgamma, 5.5L, 5.2342777784553520181149008492418193679490e+01L),
14274 TEST_f_f (tgamma, 6.5L, 2.8788527781504436099631954670830006523720e+02L),
14275 TEST_f_f (tgamma, 7.5L, 1.8712543057977883464760770536039504240418e+03L),
14276 TEST_f_f (tgamma, 8.5L, 1.4034407293483412598570577902029628180313e+04L),
14277 TEST_f_f (tgamma, 9.5L, 1.1929246199460900708784991216725183953266e+05L),
14278 TEST_f_f (tgamma, -1.5L, 2.3632718012073547030642233111215269103967e+00L),
14279 TEST_f_f (tgamma, -2.5L, -9.4530872048294188122568932444861076415869e-01L),
14280 TEST_f_f (tgamma, -3.5L, 2.7008820585226910892162552127103164690248e-01L),
14281 TEST_f_f (tgamma, -4.5L, -6.0019601300504246427027893615784810422774e-02L),
14282 TEST_f_f (tgamma, -5.5L, 1.0912654781909862986732344293779056440504e-02L),
14283 TEST_f_f (tgamma, -6.5L, -1.6788699664476712287280529682737009908468e-03L),
14284 TEST_f_f (tgamma, -7.5L, 2.2384932885968949716374039576982679877958e-04L),
14285 TEST_f_f (tgamma, -8.5L, -2.6335215159963470254557693619979623385833e-05L),
14286 TEST_f_f (tgamma, -9.5L, 2.7721279115751021320587045915768024616666e-06L),
14287 TEST_f_f (tgamma, 0x1p-24L, 1.6777215422784394050795179874582764575261e+07L),
14288 TEST_f_f (tgamma, -0x1p-24L, -1.6777216577215723853867349114260580375249e+07L),
14289 TEST_f_f (tgamma, 0x1p-53L, 9.0071992547409914227843350984672492007618e+15L),
14290 TEST_f_f (tgamma, -0x1p-53L, -9.0071992547409925772156649015329704137860e+15L),
14291 TEST_f_f (tgamma, 0x1p-64L, 1.8446744073709551615422784335098467139447e+19L),
14292 TEST_f_f (tgamma, -0x1p-64L, -1.8446744073709551616577215664901532860660e+19L),
14293 TEST_f_f (tgamma, 0x1p-106L, 8.1129638414606681695789005144063422784335e+31L),
14294 TEST_f_f (tgamma, -0x1p-106L, -8.1129638414606681695789005144064577215665e+31L),
14295 TEST_f_f (tgamma, 0x1p-113L, 1.0384593717069655257060992658440191422784e+34L),
14296 TEST_f_f (tgamma, -0x1p-113L, -1.0384593717069655257060992658440192577216e+34L),
14297 TEST_f_f (tgamma, 0x1p-127L, 1.7014118346046923173168730371588410572742e+38L),
14298 TEST_f_f (tgamma, -0x1p-127L, -1.7014118346046923173168730371588410572858e+38L),
d8cd06db 14299#ifdef TEST_FLOAT
e9eee333
JM		 14300 TEST_f_f (tgamma, 0x1p-128L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
14301 TEST_f_f (tgamma, -0x1p-128L, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
14302 TEST_f_f (tgamma, 0x1p-149L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
14303 TEST_f_f (tgamma, -0x1p-149L, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d8cd06db 14304#else
74c57478
JM		 14305 TEST_f_f (tgamma, 0x1p-128L, 3.4028236692093846346337460743176821145542e+38L),
14306 TEST_f_f (tgamma, -0x1p-128L, -3.4028236692093846346337460743176821145658e+38L),
14307 TEST_f_f (tgamma, 0x1p-149L, 7.1362384635297994052914298472474756819137e+44L),
14308 TEST_f_f (tgamma, -0x1p-149L, -7.1362384635297994052914298472474756819137e+44L),
d8cd06db
JM		 14309#endif
14310#ifndef TEST_FLOAT
74c57478
JM		 14311 TEST_f_f (tgamma, 0x1p-1023L, 8.9884656743115795386465259539451236680899e+307L),
14312 TEST_f_f (tgamma, -0x1p-1023L, -8.9884656743115795386465259539451236680899e+307L),
d8cd06db 14313# if !defined TEST_LDOUBLE || LDBL_MAX_EXP <= 1024
e9eee333
JM		 14314 TEST_f_f (tgamma, 0x1p-1024L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
14315 TEST_f_f (tgamma, -0x1p-1024L, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
14316 TEST_f_f (tgamma, 0x1p-1074L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
14317 TEST_f_f (tgamma, -0x1p-1074L, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d8cd06db 14318# else
74c57478
JM		 14319 TEST_f_f (tgamma, 0x1p-1024L, 1.7976931348623159077293051907890247336180e+308L),
14320 TEST_f_f (tgamma, -0x1p-1024L, -1.7976931348623159077293051907890247336180e+308L),
14321 TEST_f_f (tgamma, 0x1p-1074L, 2.0240225330731061835249534671891730704956e+323L),
14322 TEST_f_f (tgamma, -0x1p-1074L, -2.0240225330731061835249534671891730704956e+323L),
d8cd06db
JM		 14323# endif
14324#endif
14325#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
74c57478
JM		 14326 TEST_f_f (tgamma, 0x1p-16383L, 5.9486574767861588254287966331400356538172e+4931L),
14327 TEST_f_f (tgamma, -0x1p-16383L, -5.9486574767861588254287966331400356538172e+4931L),
e9eee333
JM		 14328 TEST_f_f (tgamma, 0x1p-16384L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
14329 TEST_f_f (tgamma, -0x1p-16384L, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
14330 TEST_f_f (tgamma, 0x1p-16445L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
14331 TEST_f_f (tgamma, -0x1p-16445L, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d8cd06db 14332# if LDBL_MANT_DIG >= 113
e9eee333
JM		 14333 TEST_f_f (tgamma, 0x1p-16494L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
14334 TEST_f_f (tgamma, -0x1p-16494L, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d8cd06db
JM		 14335# endif
14336#endif
74c57478
JM		 14337 TEST_f_f (tgamma, 0x8.00001p0L, 5.0400096882277802019946778420223050233915e+03L),
14338 TEST_f_f (tgamma, 0x7.fffff8p0L, 5.0399951558933225045148935487583089307135e+03L),
14339 TEST_f_f (tgamma, 0x7.000008p0L, 7.2000064296977505705636258629805621178587e+02L),
14340 TEST_f_f (tgamma, 0x6.fffff8p0L, 7.1999935703082425988147448928288557689866e+02L),
14341 TEST_f_f (tgamma, 0x6.000008p0L, 1.2000009762487825358530770343720418162783e+02L),
14342 TEST_f_f (tgamma, 0x5.fffff8p0L, 1.1999990237520611552119807476573441975106e+02L),
14343 TEST_f_f (tgamma, 0x5.000008p0L, 2.4000017236155647574166073485628713443799e+01L),
14344 TEST_f_f (tgamma, 0x4.fffff8p0L, 2.3999982763857938712639837029547357501709e+01L),
14345 TEST_f_f (tgamma, 0x4.000008p0L, 6.0000035937827461765660468073471093546129e+00L),
14346 TEST_f_f (tgamma, 0x3.fffffcp0L, 5.9999982031095793171233994481968816873643e+00L),
14347 TEST_f_f (tgamma, 0x3.000004p0L, 2.0000004400179308360529417942462250547999e+00L),
14348 TEST_f_f (tgamma, 0x2.fffffcp0L, 1.9999995599822108706107786027549565954046e+00L),
14349 TEST_f_f (tgamma, 0x2.000004p0L, 1.0000001007996638509889062631687945799175e+00L),
14350 TEST_f_f (tgamma, 0x1.fffffep0L, 9.9999994960018563231526611134590489120697e-01L),
14351 TEST_f_f (tgamma, 0x1.000002p0L, 9.9999993119054472483596471908942669644327e-01L),
14352 TEST_f_f (tgamma, 0x0.ffffffp0L, 1.0000000344047381790797322460568297132998e+00L),
14353 TEST_f_f (tgamma, -0x0.ffffffp0L, -1.6777216422784419250710305882992376932423e+07L),
14354 TEST_f_f (tgamma, -0x1.000002p0L, 8.3886075772158332060084424806449513922858e+06L),
14355 TEST_f_f (tgamma, -0x1.fffffep0L, 4.1943044613922792026014320172298377770578e+06L),
14356 TEST_f_f (tgamma, -0x2.000004p0L, -2.0971515386080557574407223895988378776747e+06L),
14357 TEST_f_f (tgamma, -0x2.fffffcp0L, -6.9905087601970247876992248591045142913324e+05L),
14358 TEST_f_f (tgamma, -0x3.000004p0L, 6.9905045731381300146131914617735687322025e+05L),
14359 TEST_f_f (tgamma, -0x3.fffffcp0L, 1.7476272942159602684441970627092458855771e+05L),
14360 TEST_f_f (tgamma, -0x4.000008p0L, -8.7381270578483499672965708923121931082305e+04L),
14361 TEST_f_f (tgamma, -0x4.fffff8p0L, -1.7476280884325863043793087474680780379554e+04L),
14362 TEST_f_f (tgamma, -0x5.000008p0L, 1.7476252449031389167286893378510439443844e+04L),
14363 TEST_f_f (tgamma, -0x5.fffff8p0L, 2.9127137122026653716311560165769071985443e+03L),
14364 TEST_f_f (tgamma, -0x6.000008p0L, -2.9127085100239567622341538102130981196910e+03L),
14365 TEST_f_f (tgamma, -0x6.fffff8p0L, -4.1610198723079349791939054365613377035519e+02L),
14366 TEST_f_f (tgamma, -0x7.000008p0L, 4.1610118737306415004517215226199741948733e+02L),
14367 TEST_f_f (tgamma, -0x7.fffff8p0L, 5.2012751504050764429534086402871289946986e+01L),
14368 TEST_f_f (tgamma, -0x8.00001p0L, -2.6006296115134418896533598545925084576702e+01L),
14369 TEST_f_f (tgamma, -0x9.fffffp0L, 2.8896008370721717567612135720915723136310e-01L),
14370 TEST_f_f (tgamma, -0xa.00001p0L, -2.8895878754728051776830454190076999107021e-01L),
14371 TEST_f_f (tgamma, -0x13.ffffep0L, 2.1550026214525536756224040483579183652119e-13L),
14372 TEST_f_f (tgamma, -0x14.00002p0L, -2.1549777908265594916405421768142757507179e-13L),
14373 TEST_f_f (tgamma, -0x1d.ffffep0L, 1.9765721589464867957912772592816027583176e-27L),
14374 TEST_f_f (tgamma, -0x1e.00002p0L, -1.9765463890341964384070157599286498212650e-27L),
14375 TEST_f_f (tgamma, -0x27.ffffcp0L, 3.2129279441390812141195076945616975790225e-43L, UNDERFLOW_EXCEPTION_FLOAT),
14376 TEST_f_f (tgamma, -0x28.00004p0L, -3.2128372159115252365699015758097981155793e-43L, UNDERFLOW_EXCEPTION_FLOAT),
14377 TEST_f_f (tgamma, -0x28.ffffcp0L, -7.8364103489619817539676737414096652170685e-45L, UNDERFLOW_EXCEPTION_FLOAT),
14378 TEST_f_f (tgamma, -0x29.00004p0L, 7.8361876024016854597745353972619195760515e-45L, UNDERFLOW_EXCEPTION_FLOAT),
d8cd06db 14379#ifdef TEST_FLOAT
74c57478
JM		 14380 TEST_f_f (tgamma, -0x29.ffffcp0L, plus_zero, UNDERFLOW_EXCEPTION_FLOAT),
14381 TEST_f_f (tgamma, -0x2a.00004p0L, minus_zero, UNDERFLOW_EXCEPTION_FLOAT),
d8cd06db 14382#else
74c57478
JM		 14383 TEST_f_f (tgamma, -0x29.ffffcp0L, 1.8658121573125798145204120066590953505132e-46L),
14384 TEST_f_f (tgamma, -0x2a.00004p0L, -1.8657587834931410688246126853566488626385e-46L),
14385#endif
14386#ifndef TEST_FLOAT
14387 TEST_f_f (tgamma, 0x8.0000000000008p0L, 5.0400000000000180457125667322294144477136e+03L),
14388 TEST_f_f (tgamma, 0x7.ffffffffffffcp0L, 5.0399999999999909771437166339103165198442e+03L),
14389 TEST_f_f (tgamma, 0x7.0000000000004p0L, 7.2000000000000119762397445457359071259652e+02L),
14390 TEST_f_f (tgamma, 0x6.ffffffffffffcp0L, 7.1999999999999880237602554542848858572672e+02L),
14391 TEST_f_f (tgamma, 0x6.0000000000004p0L, 1.2000000000000018184042734842640022086408e+02L),
14392 TEST_f_f (tgamma, 0x5.ffffffffffffcp0L, 1.1999999999999981815957265157389249327533e+02L),
14393 TEST_f_f (tgamma, 0x5.0000000000004p0L, 2.4000000000000032104829055124673225982803e+01L),
14394 TEST_f_f (tgamma, 0x4.ffffffffffffcp0L, 2.3999999999999967895170944875373910918544e+01L),
14395 TEST_f_f (tgamma, 0x4.0000000000004p0L, 6.0000000000000066939396342309789716341613e+00L),
14396 TEST_f_f (tgamma, 0x3.ffffffffffffep0L, 5.9999999999999966530301828845138185025345e+00L),
14397 TEST_f_f (tgamma, 0x3.0000000000002p0L, 2.0000000000000008195971324717875960213536e+00L),
14398 TEST_f_f (tgamma, 0x2.ffffffffffffep0L, 1.9999999999999991804028675282128956223990e+00L),
14399 TEST_f_f (tgamma, 0x2.0000000000002p0L, 1.0000000000000001877539613108624482361963e+00L),
14400 TEST_f_f (tgamma, 0x1.fffffffffffffp0L, 9.9999999999999990612301934456883679778984e-01L),
14401 TEST_f_f (tgamma, 0x1.0000000000001p0L, 9.9999999999999987183237573039992418700531e-01L),
14402 TEST_f_f (tgamma, 0x0.fffffffffffff8p0L, 1.0000000000000000640838121348000744796665e+00L),
14403 TEST_f_f (tgamma, -0x0.fffffffffffff8p0L, -9.0071992547409924227843350984672961392521e+15L),
14404 TEST_f_f (tgamma, -0x1.0000000000001p0L, 4.5035996273704955772156649015331740980405e+15L),
14405 TEST_f_f (tgamma, -0x1.fffffffffffffp0L, 2.2517998136852484613921675492337776673289e+15L),
14406 TEST_f_f (tgamma, -0x2.0000000000002p0L, -1.1258999068426235386078324507668462444260e+15L),
14407 TEST_f_f (tgamma, -0x2.ffffffffffffep0L, -3.7529996894754154268627807196691509198813e+14L),
14408 TEST_f_f (tgamma, -0x3.0000000000002p0L, 3.7529996894754112398038859470009084971438e+14L),
14409 TEST_f_f (tgamma, -0x3.ffffffffffffep0L, 9.3824992236885396088236184658402406857503e+13L),
14410 TEST_f_f (tgamma, -0x4.0000000000004p0L, -4.6912496118442603911763815341745722862351e+13L),
14411 TEST_f_f (tgamma, -0x4.ffffffffffffcp0L, -9.3824992236885475509805702650262155809819e+12L),
14412 TEST_f_f (tgamma, -0x5.0000000000004p0L, 9.3824992236885191156860964016850034672946e+12L),
14413 TEST_f_f (tgamma, -0x5.ffffffffffffcp0L, 1.5637498706147581566449098589862357835505e+12L),
14414 TEST_f_f (tgamma, -0x6.0000000000004p0L, -1.5637498706147529544662012521330708016396e+12L),
14415 TEST_f_f (tgamma, -0x6.ffffffffffffcp0L, -2.2339283865925119357965832452642909859289e+11L),
14416 TEST_f_f (tgamma, -0x7.0000000000004p0L, 2.2339283865925039372192897706214475877342e+11L),
14417 TEST_f_f (tgamma, -0x7.ffffffffffffcp0L, 2.7924104832406402297655703264222230055898e+10L),
14418 TEST_f_f (tgamma, -0x8.0000000000008p0L, -1.3962052416203121511868106259843527348026e+10L),
14419 TEST_f_f (tgamma, -0x9.ffffffffffff8p0L, 1.5513391573559147700413058496716749249803e+08L),
14420 TEST_f_f (tgamma, -0xa.0000000000008p0L, -1.5513391573559018084419393002828541166901e+08L),
14421 TEST_f_f (tgamma, -0x13.ffffffffffffp0L, 1.1569515572952029402736625857313236848570e-04L),
14422 TEST_f_f (tgamma, -0x14.000000000001p0L, -1.1569515572951781096476686854873801225397e-04L),
14423 TEST_f_f (tgamma, -0x1d.ffffffffffffp0L, 1.0611571800204311628217068863959963842891e-18L),
14424 TEST_f_f (tgamma, -0x1e.000000000001p0L, -1.0611571800204053929094168642022073530425e-18L),
14425 TEST_f_f (tgamma, -0x27.fffffffffffep0L, 1.7249032006742266376460389310340465554361e-34L),
14426 TEST_f_f (tgamma, -0x28.000000000002p0L, -1.7249032006741359094184881234822934593822e-34L),
14427 TEST_f_f (tgamma, -0x28.fffffffffffep0L, -4.2070809772542120404320040128839297118648e-36L),
14428 TEST_f_f (tgamma, -0x29.000000000002p0L, 4.2070809772539892938717205103652583609422e-36L),
14429 TEST_f_f (tgamma, -0x29.fffffffffffep0L, 1.0016859469652887505173040814397197718981e-37L),
14430 TEST_f_f (tgamma, -0x2a.000000000002p0L, -1.0016859469652353766978684241048308120274e-37L),
14431 TEST_f_f (tgamma, -0x31.fffffffffffep0L, 4.6273774273632946947805289899230181990085e-51L),
14432 TEST_f_f (tgamma, -0x32.000000000002p0L, -4.6273774273630367887073532197576655720178e-51L),
14433 TEST_f_f (tgamma, -0x63.fffffffffffcp0L, 7.5400833348840965463348754984345825364294e-145L),
14434 TEST_f_f (tgamma, -0x64.000000000004p0L, -7.5400833348831085791638490135462230991587e-145L),
14435 TEST_f_f (tgamma, -0x95.fffffffffff8p0L, 6.1582369322723207086020016423767264008839e-250L),
14436 TEST_f_f (tgamma, -0x96.000000000008p0L, -6.1582369322705655439003240743176243138734e-250L),
14437 TEST_f_f (tgamma, -0xb4.fffffffffff8p0L, -9.6760879059917574597728750098636253931457e-319L, UNDERFLOW_EXCEPTION_DOUBLE),
14438 TEST_f_f (tgamma, -0xb5.000000000008p0L, 9.6760879059888966544677044221698800670218e-319L, UNDERFLOW_EXCEPTION_DOUBLE),
14439 TEST_f_f (tgamma, -0xb5.fffffffffff8p0L, 5.3165318164789884455066481673086605454904e-321L, UNDERFLOW_EXCEPTION_DOUBLE),
14440 TEST_f_f (tgamma, -0xb6.000000000008p0L, -5.3165318164774149139661976747137185876909e-321L, UNDERFLOW_EXCEPTION_DOUBLE),
14441 TEST_f_f (tgamma, -0xb6.fffffffffff8p0L, -2.9052086428846935908287469917922960610289e-323L, UNDERFLOW_EXCEPTION_DOUBLE),
14442 TEST_f_f (tgamma, -0xb7.000000000008p0L, 2.9052086428838328351126988236541632950925e-323L, UNDERFLOW_EXCEPTION_DOUBLE),
d8cd06db 14443# if !defined TEST_LDOUBLE || LDBL_MAX_EXP <= 1024
74c57478
JM		 14444 TEST_f_f (tgamma, -0xb7.fffffffffff8p0L, plus_zero, UNDERFLOW_EXCEPTION_DOUBLE),
14445 TEST_f_f (tgamma, -0xb8.000000000008p0L, minus_zero, UNDERFLOW_EXCEPTION_DOUBLE),
d8cd06db 14446# else
74c57478
JM		 14447 TEST_f_f (tgamma, -0xb7.fffffffffff8p0L, 1.5789177406982032823826953250736039527543e-325L),
14448 TEST_f_f (tgamma, -0xb8.000000000008p0L, -1.5789177406977349925854817486109369828857e-325L),
d8cd06db
JM		 14449# endif
14450#endif
14451#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
74c57478
JM		 14452 TEST_f_f (tgamma, 0x8.00000000000000000000000004p0L, 5.0400000000000000000000000000020034765587e+03L),
14453 TEST_f_f (tgamma, 0x7.fffffffffffffffffffffffffep0L, 5.0399999999999999999999999999989982617206e+03L),
14454 TEST_f_f (tgamma, 0x7.00000000000000000000000002p0L, 7.2000000000000000000000000000013296297113e+02L),
14455 TEST_f_f (tgamma, 0x6.fffffffffffffffffffffffffep0L, 7.1999999999999999999999999999986703702887e+02L),
14456 TEST_f_f (tgamma, 0x6.00000000000000000000000002p0L, 1.2000000000000000000000000000002018834292e+02L),
14457 TEST_f_f (tgamma, 0x5.fffffffffffffffffffffffffep0L, 1.1999999999999999999999999999997981165708e+02L),
14458 TEST_f_f (tgamma, 0x5.00000000000000000000000002p0L, 2.4000000000000000000000000000003564352042e+01L),
14459 TEST_f_f (tgamma, 0x4.fffffffffffffffffffffffffep0L, 2.3999999999999999999999999999996435647958e+01L),
14460 TEST_f_f (tgamma, 0x4.00000000000000000000000002p0L, 6.0000000000000000000000000000007431765907e+00L),
14461 TEST_f_f (tgamma, 0x3.ffffffffffffffffffffffffffp0L, 5.9999999999999999999999999999996284117046e+00L),
14462 TEST_f_f (tgamma, 0x3.00000000000000000000000001p0L, 2.0000000000000000000000000000000909935607e+00L),
14463 TEST_f_f (tgamma, 0x2.ffffffffffffffffffffffffffp0L, 1.9999999999999999999999999999999090064393e+00L),
14464 TEST_f_f (tgamma, 0x2.00000000000000000000000001p0L, 1.0000000000000000000000000000000208448771e+00L),
14465 TEST_f_f (tgamma, 0x1.ffffffffffffffffffffffffff8p0L, 9.9999999999999999999999999999998957756146e-01L),
14466 TEST_f_f (tgamma, 0x1.000000000000000000000000008p0L, 9.9999999999999999999999999999998577053525e-01L),
14467 TEST_f_f (tgamma, 0x0.ffffffffffffffffffffffffffcp0L, 1.0000000000000000000000000000000071147324e+00L),
14468 TEST_f_f (tgamma, -0x0.ffffffffffffffffffffffffffcp0L, -8.1129638414606681695789005144064422784335e+31L),
14469 TEST_f_f (tgamma, -0x1.000000000000000000000000008p0L, 4.0564819207303340847894502572031577215665e+31L),
14470 TEST_f_f (tgamma, -0x1.ffffffffffffffffffffffffff8p0L, 2.0282409603651670423947251286016461392168e+31L),
14471 TEST_f_f (tgamma, -0x2.00000000000000000000000001p0L, -1.0141204801825835211973625643007538607832e+31L),
14472 TEST_f_f (tgamma, -0x2.ffffffffffffffffffffffffffp0L, -3.3804016006086117373245418810028760196114e+30L),
14473 TEST_f_f (tgamma, -0x3.00000000000000000000000001p0L, 3.3804016006086117373245418810024573137219e+30L),
14474 TEST_f_f (tgamma, -0x3.ffffffffffffffffffffffffffp0L, 8.4510040015215293433113547025072942156952e+29L),
14475 TEST_f_f (tgamma, -0x4.00000000000000000000000002p0L, -4.2255020007607646716556773512527057843048e+29L),
14476 TEST_f_f (tgamma, -0x4.fffffffffffffffffffffffffep0L, -8.4510040015215293433113547025080884313904e+28L),
14477 TEST_f_f (tgamma, -0x5.00000000000000000000000002p0L, 8.4510040015215293433113547025052449019430e+28L),
14478 TEST_f_f (tgamma, -0x5.fffffffffffffffffffffffffep0L, 1.4085006669202548905518924504180378867132e+28L),
14479 TEST_f_f (tgamma, -0x6.00000000000000000000000002p0L, -1.4085006669202548905518924504175176688423e+28L),
14480 TEST_f_f (tgamma, -0x6.fffffffffffffffffffffffffep0L, -2.0121438098860784150741320720257967542615e+27L),
14481 TEST_f_f (tgamma, -0x7.00000000000000000000000002p0L, 2.0121438098860784150741320720249968965322e+27L),
14482 TEST_f_f (tgamma, -0x7.fffffffffffffffffffffffffep0L, 2.5151797623575980188426650900322769448110e+26L),
14483 TEST_f_f (tgamma, -0x8.00000000000000000000000004p0L, -1.2575898811787990094213325450153421028080e+26L),
14484 TEST_f_f (tgamma, -0x9.fffffffffffffffffffffffffcp0L, 1.3973220901986655660237028277960625420495e+24L),
14485 TEST_f_f (tgamma, -0xa.00000000000000000000000004p0L, -1.3973220901986655660237028277947663821128e+24L),
14486 TEST_f_f (tgamma, -0x13.fffffffffffffffffffffffff8p0L, 1.0420893204640670202556853709074896123293e+12L),
14487 TEST_f_f (tgamma, -0x14.00000000000000000000000008p0L, -1.0420893204640670202556853709050065497299e+12L),
14488 TEST_f_f (tgamma, -0x1d.fffffffffffffffffffffffff8p0L, 9.5580541610429641982963434151488827190079e-03L),
14489 TEST_f_f (tgamma, -0x1e.00000000000000000000000008p0L, -9.5580541610429641982963434151231128067179e-03L),
14490 TEST_f_f (tgamma, -0x27.fffffffffffffffffffffffffp0L, 1.5536546823612837336494536911280147806523e-18L),
14491 TEST_f_f (tgamma, -0x28.0000000000000000000000001p0L, -1.5536546823612837336494536911189419578973e-18L),
14492 TEST_f_f (tgamma, -0x28.fffffffffffffffffffffffffp0L, -3.7894016642958139845108626612879138384405e-20L),
14493 TEST_f_f (tgamma, -0x29.0000000000000000000000001p0L, 3.7894016642958139845108626612656391824122e-20L),
14494 TEST_f_f (tgamma, -0x29.fffffffffffffffffffffffffp0L, 9.0223849149900332964544349078285357440663e-22L),
14495 TEST_f_f (tgamma, -0x2a.0000000000000000000000001p0L, -9.0223849149900332964544349077751619246306e-22L),
14496 TEST_f_f (tgamma, -0x31.fffffffffffffffffffffffffp0L, 4.1679710515150795310771069868348482819424e-35L),
14497 TEST_f_f (tgamma, -0x32.0000000000000000000000001p0L, -4.1679710515150795310771069868090576746248e-35L),
14498 TEST_f_f (tgamma, -0x63.ffffffffffffffffffffffffep0L, 6.7915032994648558610510614163560656864280e-129L),
14499 TEST_f_f (tgamma, -0x64.0000000000000000000000002p0L, -6.7915032994648558610510614162572689693253e-129L),
14500 TEST_f_f (tgamma, -0x95.ffffffffffffffffffffffffcp0L, 5.5468467106873795353190582463444660395353e-234L),
14501 TEST_f_f (tgamma, -0x96.0000000000000000000000004p0L, -5.5468467106873795353190582461689495693675e-234L),
14502 TEST_f_f (tgamma, -0xb4.ffffffffffffffffffffffffcp0L, -8.7154451775644399729745472278589884205029e-303L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14503 TEST_f_f (tgamma, -0xb5.0000000000000000000000004p0L, 8.7154451775644399729745472275729078899858e-303L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14504 TEST_f_f (tgamma, -0xb5.ffffffffffffffffffffffffcp0L, 4.7887061415189230620739270482742524864974e-305L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14505 TEST_f_f (tgamma, -0xb6.0000000000000000000000004p0L, -4.7887061415189230620739270481168993324524e-305L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14506 TEST_f_f (tgamma, -0xb6.ffffffffffffffffffffffffcp0L, -2.6167793123054224382917634143575601407067e-307L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14507 TEST_f_f (tgamma, -0xb7.0000000000000000000000004p0L, 2.6167793123054224382917634142714845691019e-307L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14508 TEST_f_f (tgamma, -0xb7.ffffffffffffffffffffffffcp0L, 1.4221626697312078468976975078030462044826e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
14509 TEST_f_f (tgamma, -0xb8.0000000000000000000000004p0L, -1.4221626697312078468976975077562172247612e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
14510 TEST_f_f (tgamma, -0xbb.ffffffffffffffffffffffffcp0L, 1.1756150745511026776007338998283058108448e-318L, UNDERFLOW_EXCEPTION_DOUBLE),
14511 TEST_f_f (tgamma, -0xbc.0000000000000000000000004p0L, -1.1756150745511026776007338997894360215107e-318L, UNDERFLOW_EXCEPTION_DOUBLE),
14512 TEST_f_f (tgamma, -0xbc.ffffffffffffffffffffffffcp0L, -6.2201855796354639026493857133773832713743e-321L, UNDERFLOW_EXCEPTION_DOUBLE),
14513 TEST_f_f (tgamma, -0xbd.0000000000000000000000004p0L, 6.2201855796354639026493857131715153125175e-321L, UNDERFLOW_EXCEPTION_DOUBLE),
14514 TEST_f_f (tgamma, -0xbd.ffffffffffffffffffffffffcp0L, 3.2737818840186652119207293228302560914295e-323L, UNDERFLOW_EXCEPTION_DOUBLE),
14515 TEST_f_f (tgamma, -0xbe.0000000000000000000000004p0L, -3.2737818840186652119207293227217957948294e-323L, UNDERFLOW_EXCEPTION_DOUBLE),
d8cd06db 14516# if LDBL_MAX_EXP <= 1024
74c57478
JM		 14517 TEST_f_f (tgamma, -0xbe.ffffffffffffffffffffffffcp0L, minus_zero, UNDERFLOW_EXCEPTION_DOUBLE),
14518 TEST_f_f (tgamma, -0xbf.0000000000000000000000004p0L, plus_zero, UNDERFLOW_EXCEPTION_DOUBLE),
d8cd06db 14519# else
74c57478
JM		 14520 TEST_f_f (tgamma, -0xbe.ffffffffffffffffffffffffcp0L, -1.7140219288055838805867692789687487834686e-325L),
14521 TEST_f_f (tgamma, -0xbf.0000000000000000000000004p0L, 1.7140219288055838805867692789119066543632e-325L),
d8cd06db
JM		 14522# endif
14523#endif
14524#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM		 14525 TEST_f_f (tgamma, 0x8.000000000000001p0L, 5.0400000000000000088113830892247051102283e+03L),
14526 TEST_f_f (tgamma, 0x7.fffffffffffffff8p0L, 5.0399999999999999955943084553876474508520e+03L),
14527 TEST_f_f (tgamma, 0x7.0000000000000008p0L, 7.2000000000000000058477733127664675369681e+02L),
14528 TEST_f_f (tgamma, 0x6.fffffffffffffff8p0L, 7.1999999999999999941522266872335324679893e+02L),
14529 TEST_f_f (tgamma, 0x6.0000000000000008p0L, 1.2000000000000000008878927116622375680433e+02L),
14530 TEST_f_f (tgamma, 0x5.fffffffffffffff8p0L, 1.1999999999999999991121072883377624326546e+02L),
14531 TEST_f_f (tgamma, 0x5.0000000000000008p0L, 2.4000000000000000015676186062072582846211e+01L),
14532 TEST_f_f (tgamma, 0x4.fffffffffffffff8p0L, 2.3999999999999999984323813937927417165027e+01L),
14533 TEST_f_f (tgamma, 0x4.0000000000000008p0L, 6.0000000000000000032685252120268430507939e+00L),
14534 TEST_f_f (tgamma, 0x3.fffffffffffffffcp0L, 5.9999999999999999983657373939865784753909e+00L),
14535 TEST_f_f (tgamma, 0x3.0000000000000004p0L, 2.0000000000000000004001939123397399171482e+00L),
14536 TEST_f_f (tgamma, 0x2.fffffffffffffffcp0L, 1.9999999999999999995998060876602600829690e+00L),
14537 TEST_f_f (tgamma, 0x2.0000000000000004p0L, 1.0000000000000000000916767389213195151634e+00L),
14538 TEST_f_f (tgamma, 0x1.fffffffffffffffep0L, 9.9999999999999999995416163053934024243282e-01L),
14539 TEST_f_f (tgamma, 0x1.0000000000000002p0L, 9.9999999999999999993741815221210931418291e-01L),
14540 TEST_f_f (tgamma, 0x0.ffffffffffffffffp0L, 1.0000000000000000000312909238939453429173e+00L),
14541 TEST_f_f (tgamma, -0x0.ffffffffffffffffp0L, -1.8446744073709551616422784335098467139470e+19L),
14542 TEST_f_f (tgamma, -0x1.0000000000000002p0L, 9.2233720368547758075772156649015328607596e+18L),
14543 TEST_f_f (tgamma, -0x1.fffffffffffffffep0L, 4.6116860184273879044613921675492335697983e+18L),
14544 TEST_f_f (tgamma, -0x2.0000000000000004p0L, -2.3058430092136939515386078324507664305064e+18L),
14545 TEST_f_f (tgamma, -0x2.fffffffffffffffcp0L, -7.6861433640456465087601961140530007887063e+17L),
14546 TEST_f_f (tgamma, -0x3.0000000000000004p0L, 7.6861433640456465045731372192803325462836e+17L),
14547 TEST_f_f (tgamma, -0x3.fffffffffffffffcp0L, 1.9215358410114116272942156951799168638773e+17L),
14548 TEST_f_f (tgamma, -0x4.0000000000000008p0L, -9.6076792050570581270578430482008313684602e+16L),
14549 TEST_f_f (tgamma, -0x4.fffffffffffffff8p0L, -1.9215358410114116280884313903598337283601e+16L),
14550 TEST_f_f (tgamma, -0x5.0000000000000008p0L, 1.9215358410114116252449019429734996071487e+16L),
14551 TEST_f_f (tgamma, -0x5.fffffffffffffff8p0L, 3.2025597350190193803788671320812043622696e+15L),
14552 TEST_f_f (tgamma, -0x6.0000000000000008p0L, -3.2025597350190193751766884234743511972877e+15L),
14553 TEST_f_f (tgamma, -0x6.fffffffffffffff8p0L, -4.5750853357414562579675426149912896787735e+14L),
14554 TEST_f_f (tgamma, -0x7.0000000000000008p0L, 4.5750853357414562499689653215166468353753e+14L),
14555 TEST_f_f (tgamma, -0x7.fffffffffffffff8p0L, 5.7188566696768203227694481100089533685959e+13L),
14556 TEST_f_f (tgamma, -0x8.000000000000001p0L, -2.8594283348384101534210280804672371201060e+13L),
14557 TEST_f_f (tgamma, -0x9.fffffffffffffffp0L, 3.1771425942649001828476427167843945971988e+11L),
14558 TEST_f_f (tgamma, -0xa.000000000000001p0L, -3.1771425942649001698860433502350057763905e+11L),
14559 TEST_f_f (tgamma, -0x13.ffffffffffffffep0L, 2.3694367893405502075347562184931828448654e-01L),
14560 TEST_f_f (tgamma, -0x14.000000000000002p0L, -2.3694367893405501827041302245929389013031e-01L),
14561 TEST_f_f (tgamma, -0x1d.ffffffffffffffep0L, 2.1732499046818166459536268654187775086902e-15L),
14562 TEST_f_f (tgamma, -0x1e.000000000000002p0L, -2.1732499046818166201837145753965837196590e-15L),
14563 TEST_f_f (tgamma, -0x27.ffffffffffffffcp0L, 3.5326017549807232935581894777156474496719e-31L),
14564 TEST_f_f (tgamma, -0x28.000000000000004p0L, -3.5326017549807232028299619269080956965758e-31L),
14565 TEST_f_f (tgamma, -0x28.ffffffffffffffcp0L, -8.6161018414163982777002940498289948893044e-33L),
14566 TEST_f_f (tgamma, -0x29.000000000000004p0L, 8.6161018414163980549537337663264762179535e-33L),
14567 TEST_f_f (tgamma, -0x29.ffffffffffffffcp0L, 2.0514528193848567329552463626090806737389e-34L),
14568 TEST_f_f (tgamma, -0x2a.000000000000004p0L, -2.0514528193848566795814269269517457847791e-34L),
14569 TEST_f_f (tgamma, -0x31.ffffffffffffffcp0L, 9.4768689712397635680446279661359728835046e-48L),
14570 TEST_f_f (tgamma, -0x32.000000000000004p0L, -9.4768689712397633101385547903658075308777e-48L),
14571 TEST_f_f (tgamma, -0x63.ffffffffffffff8p0L, 1.5442090669841618542494279375256856430049e-141L),
14572 TEST_f_f (tgamma, -0x64.000000000000008p0L, -1.5442090669841617554527108348771968070612e-141L),
14573 TEST_f_f (tgamma, -0x95.ffffffffffffffp0L, 1.2612069237291916400144732227892704713839e-246L),
14574 TEST_f_f (tgamma, -0x96.00000000000001p0L, -1.2612069237291914644980030550324645611752e-246L),
14575 TEST_f_f (tgamma, -0xb4.ffffffffffffffp0L, -1.9816628031468191243385005680879281767694e-315L),
14576 TEST_f_f (tgamma, -0xb5.00000000000001p0L, 1.9816628031468188382579700510291588022368e-315L),
14577 TEST_f_f (tgamma, -0xb5.ffffffffffffffp0L, 1.0888257160147357826865964233809723297472e-317L),
14578 TEST_f_f (tgamma, -0xb6.00000000000001p0L, -1.0888257160147356253334423783317128355514e-317L),
14579 TEST_f_f (tgamma, -0xb6.ffffffffffffffp0L, -5.9498673006269714905418984659220067091260e-320L),
14580 TEST_f_f (tgamma, -0xb7.00000000000001p0L, 5.9498673006269706297861824177538685763601e-320L),
14581 TEST_f_f (tgamma, -0xb7.ffffffffffffffp0L, 3.2336235329494410277123118903958061569834e-322L),
14582 TEST_f_f (tgamma, -0xb8.00000000000001p0L, -3.2336235329494405594225146768193434900135e-322L),
14583 TEST_f_f (tgamma, -0xbb.ffffffffffffffp0L, 2.6730392040715350119087465463119939092815e-331L),
14584 TEST_f_f (tgamma, -0xbc.00000000000001p0L, -2.6730392040715346232108532050343031951651e-331L),
14585 TEST_f_f (tgamma, -0xbc.ffffffffffffffp0L, -1.4143064571807063556111222197839950086445e-333L),
14586 TEST_f_f (tgamma, -0xbd.00000000000001p0L, 1.4143064571807061497431633629389135273431e-333L),
14587 TEST_f_f (tgamma, -0xbd.ffffffffffffffp0L, 7.4437181956879281879706555863416819210399e-336L),
14588 TEST_f_f (tgamma, -0xbe.00000000000001p0L, -7.4437181956879271033676895858841525581153e-336L),
14589 TEST_f_f (tgamma, -0xbe.ffffffffffffffp0L, -3.8972346574282346536709453101948570578636e-338L),
14590 TEST_f_f (tgamma, -0xbf.00000000000001p0L, 3.8972346574282340852496542564155275274974e-338L),
14591 TEST_f_f (tgamma, -0xf9.ffffffffffffffp0L, 2.2289142548411573883553287678043297937797e-476L),
14592 TEST_f_f (tgamma, -0xfa.00000000000001p0L, -2.2289142548411570466476165308364665814265e-476L),
14593 TEST_f_f (tgamma, -0x1f3.fffffffffffffep0L, 2.9528489142763141594943668922610562530068e-1118L),
14594 TEST_f_f (tgamma, -0x1f4.00000000000002p0L, -2.9528489142763131406565394149878256133744e-1118L),
14595 TEST_f_f (tgamma, -0x2ed.fffffffffffffcp0L, 6.9801511765871818502006905472380418430269e-1817L),
14596 TEST_f_f (tgamma, -0x2ee.00000000000004p0L, -6.9801511765871767194421856376592926002995e-1817L),
14597 TEST_f_f (tgamma, -0x3e7.fffffffffffffcp0L, 4.4768809295877296071892611539415773519036e-2552L),
14598 TEST_f_f (tgamma, -0x3e8.00000000000004p0L, -4.4768809295877261735541135972060089530309e-2552L),
14599 TEST_f_f (tgamma, -0x4e1.fffffffffffff8p0L, 5.4651488569236507565341414077911790252381e-3315L),
14600 TEST_f_f (tgamma, -0x4e2.00000000000008p0L, -5.4651488569236421026544487194247355967789e-3315L),
14601 TEST_f_f (tgamma, -0x5db.fffffffffffff8p0L, 1.8718211510339187689122114747834510481993e-4099L),
14602 TEST_f_f (tgamma, -0x5dc.00000000000008p0L, -1.8718211510339157291960718369454861898499e-4099L),
14603 TEST_f_f (tgamma, -0x6d5.fffffffffffff8p0L, 4.2925786447266492555651378780094011518063e-4902L),
14604 TEST_f_f (tgamma, -0x6d6.00000000000008p0L, -4.2925786447266421378134368786479937285900e-4902L),
14605 TEST_f_f (tgamma, -0x6e2.fffffffffffff8p0L, -2.8229173528168668283609231628661510187536e-4944L, UNDERFLOW_EXCEPTION),
14606 TEST_f_f (tgamma, -0x6e3.00000000000008p0L, 2.8229173528168621428945467532322397890424e-4944L, UNDERFLOW_EXCEPTION),
14607 TEST_f_f (tgamma, -0x6e3.fffffffffffff8p0L, 1.6002932839097884515524894602387278842659e-4947L, UNDERFLOW_EXCEPTION),
14608 TEST_f_f (tgamma, -0x6e4.00000000000008p0L, -1.6002932839097857951909742110188634438017e-4947L, UNDERFLOW_EXCEPTION),
14609 TEST_f_f (tgamma, -0x6e4.fffffffffffff8p0L, -9.0668174725767051085164382743343408095146e-4951L, UNDERFLOW_EXCEPTION),
14610 TEST_f_f (tgamma, -0x6e5.00000000000008p0L, 9.0668174725766900571689083050287838090189e-4951L, UNDERFLOW_EXCEPTION),
d8cd06db 14611# if LDBL_MANT_DIG <= 64
74c57478
JM		 14612 TEST_f_f (tgamma, -0x6e5.fffffffffffff8p0L, plus_zero, UNDERFLOW_EXCEPTION),
14613 TEST_f_f (tgamma, -0x6e6.00000000000008p0L, minus_zero, UNDERFLOW_EXCEPTION),
d8cd06db 14614# else
74c57478
JM		 14615 TEST_f_f (tgamma, -0x6e5.fffffffffffff8p0L, 5.1340982290921319983501912122292601780326e-4954L, UNDERFLOW_EXCEPTION),
14616 TEST_f_f (tgamma, -0x6e6.00000000000008p0L, -5.1340982290921234748578193083614111497314e-4954L, UNDERFLOW_EXCEPTION),
d8cd06db
JM		 14617# endif
14618# if LDBL_MANT_DIG >= 113
74c57478
JM		 14619 TEST_f_f (tgamma, 0x8.0000000000000000000000000008p0L, 5.0400000000000000000000000000000156521606e+03L),
14620 TEST_f_f (tgamma, 0x7.fffffffffffffffffffffffffffcp0L, 5.0399999999999999999999999999999921739197e+03L),
14621 TEST_f_f (tgamma, 0x7.0000000000000000000000000004p0L, 7.2000000000000000000000000000000103877321e+02L),
14622 TEST_f_f (tgamma, 0x6.fffffffffffffffffffffffffffcp0L, 7.1999999999999999999999999999999896122679e+02L),
14623 TEST_f_f (tgamma, 0x6.0000000000000000000000000004p0L, 1.2000000000000000000000000000000015772143e+02L),
14624 TEST_f_f (tgamma, 0x5.fffffffffffffffffffffffffffcp0L, 1.1999999999999999999999999999999984227857e+02L),
14625 TEST_f_f (tgamma, 0x5.0000000000000000000000000004p0L, 2.4000000000000000000000000000000027846500e+01L),
14626 TEST_f_f (tgamma, 0x4.fffffffffffffffffffffffffffcp0L, 2.3999999999999999999999999999999972153500e+01L),
14627 TEST_f_f (tgamma, 0x4.0000000000000000000000000004p0L, 6.0000000000000000000000000000000058060671e+00L),
14628 TEST_f_f (tgamma, 0x3.fffffffffffffffffffffffffffep0L, 5.9999999999999999999999999999999970969664e+00L),
14629 TEST_f_f (tgamma, 0x3.0000000000000000000000000002p0L, 2.0000000000000000000000000000000007108872e+00L),
14630 TEST_f_f (tgamma, 0x2.fffffffffffffffffffffffffffep0L, 1.9999999999999999999999999999999992891128e+00L),
14631 TEST_f_f (tgamma, 0x2.0000000000000000000000000002p0L, 1.0000000000000000000000000000000001628506e+00L),
14632 TEST_f_f (tgamma, 0x1.ffffffffffffffffffffffffffffp0L, 9.9999999999999999999999999999999991857470e-01L),
14633 TEST_f_f (tgamma, 0x1.0000000000000000000000000001p0L, 9.9999999999999999999999999999999988883231e-01L),
14634 TEST_f_f (tgamma, 0x0.ffffffffffffffffffffffffffff8p0L, 1.0000000000000000000000000000000000555838e+00L),
14635 TEST_f_f (tgamma, -0x0.ffffffffffffffffffffffffffff8p0L, -1.0384593717069655257060992658440192422784e+34L),
14636 TEST_f_f (tgamma, -0x1.0000000000000000000000000001p0L, 5.1922968585348276285304963292200955772157e+33L),
14637 TEST_f_f (tgamma, -0x1.ffffffffffffffffffffffffffffp0L, 2.5961484292674138142652481646100484613922e+33L),
14638 TEST_f_f (tgamma, -0x2.0000000000000000000000000002p0L, -1.2980742146337069071326240823050235386078e+33L),
14639 TEST_f_f (tgamma, -0x2.fffffffffffffffffffffffffffep0L, -4.3269140487790230237754136076834154268628e+32L),
14640 TEST_f_f (tgamma, -0x3.0000000000000000000000000002p0L, 4.3269140487790230237754136076834112398039e+32L),
14641 TEST_f_f (tgamma, -0x3.fffffffffffffffffffffffffffep0L, 1.0817285121947557559438534019208539608824e+32L),
14642 TEST_f_f (tgamma, -0x4.0000000000000000000000000004p0L, -5.4086425609737787797192670096042603911764e+31L),
14643 TEST_f_f (tgamma, -0x4.fffffffffffffffffffffffffffcp0L, -1.0817285121947557559438534019208547550981e+31L),
14644 TEST_f_f (tgamma, -0x5.0000000000000000000000000004p0L, 1.0817285121947557559438534019208519115686e+31L),
14645 TEST_f_f (tgamma, -0x5.fffffffffffffffffffffffffffcp0L, 1.8028808536579262599064223365347581566449e+30L),
14646 TEST_f_f (tgamma, -0x6.0000000000000000000000000004p0L, -1.8028808536579262599064223365347529544662e+30L),
14647 TEST_f_f (tgamma, -0x6.fffffffffffffffffffffffffffcp0L, -2.5755440766541803712948890521925119357966e+29L),
14648 TEST_f_f (tgamma, -0x7.0000000000000000000000000004p0L, 2.5755440766541803712948890521925039372193e+29L),
14649 TEST_f_f (tgamma, -0x7.fffffffffffffffffffffffffffcp0L, 3.2194300958177254641186113152406402297656e+28L),
14650 TEST_f_f (tgamma, -0x8.0000000000000000000000000008p0L, -1.6097150479088627320593056576203121511868e+28L),
14651 TEST_f_f (tgamma, -0x9.fffffffffffffffffffffffffff8p0L, 1.7885722754542919245103396195781369922635e+26L),
14652 TEST_f_f (tgamma, -0xa.0000000000000000000000000008p0L, -1.7885722754542919245103396195781240306642e+26L),
14653 TEST_f_f (tgamma, -0x13.fffffffffffffffffffffffffffp0L, 1.3338743301940057859272772747600099590309e+14L),
14654 TEST_f_f (tgamma, -0x14.000000000000000000000000001p0L, -1.3338743301940057859272772747599851284049e+14L),
14655 TEST_f_f (tgamma, -0x1d.fffffffffffffffffffffffffffp0L, 1.2234309326134994173819319571374205986026e+00L),
14656 TEST_f_f (tgamma, -0x1e.000000000000000000000000001p0L, -1.2234309326134994173819319571373948286903e+00L),
14657 TEST_f_f (tgamma, -0x27.ffffffffffffffffffffffffffep0L, 1.9886779934224431790713007246380976767855e-16L),
14658 TEST_f_f (tgamma, -0x28.000000000000000000000000002p0L, -1.9886779934224431790713007246380069485580e-16L),
14659 TEST_f_f (tgamma, -0x28.ffffffffffffffffffffffffffep0L, -4.8504341302986419001739042064343853066259e-18L),
14660 TEST_f_f (tgamma, -0x29.000000000000000000000000002p0L, 4.8504341302986419001739042064341625600656e-18L),
14661 TEST_f_f (tgamma, -0x29.ffffffffffffffffffffffffffep0L, 1.1548652691187242619461676681986633377063e-19L),
14662 TEST_f_f (tgamma, -0x2a.000000000000000000000000002p0L, -1.1548652691187242619461676681986099638869e-19L),
14663 TEST_f_f (tgamma, -0x31.ffffffffffffffffffffffffffep0L, 5.3350029459393017997786969431322287652396e-33L),
14664 TEST_f_f (tgamma, -0x32.000000000000000000000000002p0L, -5.3350029459393017997786969431319708591664e-33L),
14665 TEST_f_f (tgamma, -0x63.ffffffffffffffffffffffffffcp0L, 8.6931242233150155021453586128730281632676e-127L),
14666 TEST_f_f (tgamma, -0x64.000000000000000000000000004p0L, -8.6931242233150155021453586128720401960966e-127L),
14667 TEST_f_f (tgamma, -0x95.ffffffffffffffffffffffffff8p0L, 7.0999637896798458052083945552094635720486e-232L),
14668 TEST_f_f (tgamma, -0x96.000000000000000000000000008p0L, -7.0999637896798458052083945552077084073470e-232L),
14669 TEST_f_f (tgamma, -0xb4.ffffffffffffffffffffffffff8p0L, -1.1155769827282483165407420451477844041365e-300L),
14670 TEST_f_f (tgamma, -0xb5.000000000000000000000000008p0L, 1.1155769827282483165407420451474983236060e-300L),
14671 TEST_f_f (tgamma, -0xb5.ffffffffffffffffffffffffff8p0L, 6.1295438611442215194546266216911239298981e-303L),
14672 TEST_f_f (tgamma, -0xb6.000000000000000000000000008p0L, -6.1295438611442215194546266216895503983577e-303L),
14673 TEST_f_f (tgamma, -0xb6.ffffffffffffffffffffffffff8p0L, -3.3494775197509407210134571703230189921356e-305L),
14674 TEST_f_f (tgamma, -0xb7.000000000000000000000000008p0L, 3.3494775197509407210134571703221582364195e-305L),
14675 TEST_f_f (tgamma, -0xb7.ffffffffffffffffffffffffff8p0L, 1.8203682172559460440290528099581627396147e-307L),
14676 TEST_f_f (tgamma, -0xb8.000000000000000000000000008p0L, -1.8203682172559460440290528099576944498174e-307L),
14677 TEST_f_f (tgamma, -0xbb.ffffffffffffffffffffffffff8p0L, 1.5047872954254114273289393917555491216542e-316L),
14678 TEST_f_f (tgamma, -0xbc.000000000000000000000000008p0L, -1.5047872954254114273289393917551604237609e-316L),
14679 TEST_f_f (tgamma, -0xbc.ffffffffffffffffffffffffff8p0L, -7.9618375419333937953912137129923244334851e-319L),
14680 TEST_f_f (tgamma, -0xbd.000000000000000000000000008p0L, 7.9618375419333937953912137129902657538965e-319L),
14681 TEST_f_f (tgamma, -0xbd.ffffffffffffffffffffffffff8p0L, 4.1904408115438914712585335331538555086887e-321L),
14682 TEST_f_f (tgamma, -0xbe.000000000000000000000000008p0L, -4.1904408115438914712585335331527709057227e-321L),
14683 TEST_f_f (tgamma, -0xbe.ffffffffffffffffffffffffff8p0L, -2.1939480688711473671510646770439036908579e-323L),
14684 TEST_f_f (tgamma, -0xbf.000000000000000000000000008p0L, 2.1939480688711473671510646770433352695669e-323L),
14685 TEST_f_f (tgamma, -0xf9.ffffffffffffffffffffffffff8p0L, 1.2547671759429278005937024349858508569625e-461L),
14686 TEST_f_f (tgamma, -0xfa.000000000000000000000000008p0L, -1.2547671759429278005937024349855091492502e-461L),
14687 TEST_f_f (tgamma, -0x1f3.ffffffffffffffffffffffffffp0L, 1.6623061587520224800948170558276526986560e-1103L),
14688 TEST_f_f (tgamma, -0x1f4.00000000000000000000000001p0L, -1.6623061587520224800948170558266338608285e-1103L),
14689 TEST_f_f (tgamma, -0x2ed.fffffffffffffffffffffffffep0L, 3.9294757797334687313030998663853566763041e-1802L),
14690 TEST_f_f (tgamma, -0x2ee.00000000000000000000000002p0L, -3.9294757797334687313030998663802259177992e-1802L),
14691 TEST_f_f (tgamma, -0x3e7.fffffffffffffffffffffffffep0L, 2.5202599107841713834679953735597552855978e-2537L),
14692 TEST_f_f (tgamma, -0x3e8.00000000000000000000000002p0L, -2.5202599107841713834679953735563216504503e-2537L),
14693 TEST_f_f (tgamma, -0x4e1.fffffffffffffffffffffffffcp0L, 3.0766052944457032773369415396747635242705e-3300L),
14694 TEST_f_f (tgamma, -0x4e2.00000000000000000000000004p0L, -3.0766052944457032773369415396661096445778e-3300L),
14695 TEST_f_f (tgamma, -0x5db.fffffffffffffffffffffffffcp0L, 1.0537416297875703295453200836588944487917e-4084L),
14696 TEST_f_f (tgamma, -0x5dc.00000000000000000000000004p0L, -1.0537416297875703295453200836558547326520e-4084L),
14697 TEST_f_f (tgamma, -0x6d5.fffffffffffffffffffffffffcp0L, 2.4165069481061837867659591369998698607387e-4887L),
14698 TEST_f_f (tgamma, -0x6d6.00000000000000000000000004p0L, -2.4165069481061837867659591369927521090377e-4887L),
14699 TEST_f_f (tgamma, -0x6e2.fffffffffffffffffffffffffcp0L, -1.5891611922804672355414813803008070609431e-4929L),
14700 TEST_f_f (tgamma, -0x6e3.00000000000000000000000004p0L, 1.5891611922804672355414813802961215945667e-4929L),
14701 TEST_f_f (tgamma, -0x6e3.fffffffffffffffffffffffffcp0L, 9.0088502963745308137272187091882496519917e-4933L, UNDERFLOW_EXCEPTION),
14702 TEST_f_f (tgamma, -0x6e4.00000000000000000000000004p0L, -9.0088502963745308137272187091616860368392e-4933L, UNDERFLOW_EXCEPTION),
14703 TEST_f_f (tgamma, -0x6e4.fffffffffffffffffffffffffcp0L, -5.1041644738665896961627301468488672286746e-4936L, UNDERFLOW_EXCEPTION),
14704 TEST_f_f (tgamma, -0x6e5.00000000000000000000000004p0L, 5.1041644738665896961627301468338158811446e-4936L, UNDERFLOW_EXCEPTION),
14705 TEST_f_f (tgamma, -0x6e5.fffffffffffffffffffffffffcp0L, 2.8902403589278537350864836618623260468143e-4939L, UNDERFLOW_EXCEPTION),
14706 TEST_f_f (tgamma, -0x6e6.00000000000000000000000004p0L, -2.8902403589278537350864836618538025544424e-4939L, UNDERFLOW_EXCEPTION),
14707 TEST_f_f (tgamma, -0x6eb.fffffffffffffffffffffffffcp0L, 9.4152481960798287090819640211017219042636e-4959L, UNDERFLOW_EXCEPTION),
14708 TEST_f_f (tgamma, -0x6ec.00000000000000000000000004p0L, -9.4152481960798287090819640210739431797168e-4959L, UNDERFLOW_EXCEPTION),
14709 TEST_f_f (tgamma, -0x6ec.fffffffffffffffffffffffffcp0L, -5.3103486723518492437010513373388172315540e-4962L, UNDERFLOW_EXCEPTION),
14710 TEST_f_f (tgamma, -0x6ed.00000000000000000000000004p0L, 5.3103486723518492437010513373231484108489e-4962L, UNDERFLOW_EXCEPTION),
14711 TEST_f_f (tgamma, -0x6ed.fffffffffffffffffffffffffcp0L, 2.9934321715624854812294539669328172615019e-4965L, UNDERFLOW_EXCEPTION),
14712 TEST_f_f (tgamma, -0x6ee.00000000000000000000000004p0L, -2.9934321715624854812294539669239841152754e-4965L, UNDERFLOW_EXCEPTION),
14713 TEST_f_f (tgamma, -0x6ee.fffffffffffffffffffffffffcp0L, minus_zero, UNDERFLOW_EXCEPTION),
14714 TEST_f_f (tgamma, -0x6ef.00000000000000000000000004p0L, plus_zero, UNDERFLOW_EXCEPTION),
d8cd06db
JM		 14715# endif
14716#endif
74c57478 14717 TEST_f_f (tgamma, -0x1.0a32a2p+5L, 1.8125267978155035272941154746083439329912e-37L),
d8cd06db 14718#ifndef TEST_FLOAT
74c57478 14719 TEST_f_f (tgamma, -0x1.5800000080001p+7L, -3.1439271448823567326093363350637118195240e-304L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d8cd06db 14720#endif
74c57478
JM		 14721 TEST_f_f (tgamma, 18.5L, 1.4986120533153361177371791123515513270334e+15L),
14722 TEST_f_f (tgamma, 19.5L, 2.7724322986333718178137813578503699550119e+16L),
14723 TEST_f_f (tgamma, 23.5L, 5.3613035875444147334274983856108155717836e+21L),
14724 TEST_f_f (tgamma, 29.5L, 1.6348125198274266444378807806868221866931e+30L),
14725 TEST_f_f (tgamma, 30.5L, 4.8226969334909086010917483030261254507447e+31L),
14726 TEST_f_f (tgamma, 31.5L, 1.4709225647147271233329832324229682624771e+33L),
14727 TEST_f_f (tgamma, 32.5L, 4.6334060788513904384988971821323500268029e+34L),
14728 TEST_f_f (tgamma, 33.5L, 1.5058569756267018925121415841930137587110e+36L),
14729 TEST_f_f (tgamma, 34.5L, 5.0446208683494513399156743070465960916817e+37L),
14730 TEST_f_f (tgamma, 0x2.30a43cp+4L, 3.4027979115654976101247558405326779640190e+38L),
d8cd06db 14731#ifdef TEST_FLOAT
e9eee333 14732 TEST_f_f (tgamma, 0x2.30a44p+4L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d8cd06db 14733#else
74c57478 14734 TEST_f_f (tgamma, 0x2.30a44p+4L, 3.4028438913396451054667218138127983367181e+38L),
d8cd06db
JM		 14735#endif
14736#ifndef TEST_FLOAT
74c57478 14737 TEST_f_f (tgamma, 0xa.b9fd72b0fb238p+4L, 1.7976931348622298700886249281842651388250e+308L),
d8cd06db 14738# if !defined TEST_LDOUBLE || LDBL_MAX_EXP <= 1024
e9eee333 14739 TEST_f_f (tgamma, 0xa.b9fd72b0fb24p+4L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d8cd06db 14740# else
74c57478 14741 TEST_f_f (tgamma, 0xa.b9fd72b0fb24p+4L, 1.7976931348624926129589466917917870782484e+308L),
d8cd06db
JM		 14742# endif
14743#endif
14744#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
74c57478 14745 TEST_f_f (tgamma, 0xa.b9fd72b0fb23a9ddbf0d3804f4p+4L, 1.7976931348623158079372897140307719334857e+308L),
d8cd06db 14746# if LDBL_MAX_EXP <= 1024
e9eee333 14747 TEST_f_f (tgamma, 0xa.b9fd72b0fb23a9ddbf0d3804f8p+4L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d8cd06db 14748# else
74c57478 14749 TEST_f_f (tgamma, 0xa.b9fd72b0fb23a9ddbf0d3804f8p+4L, 1.7976931348623158079372897140599422519044e+308L),
d8cd06db
JM		 14750# endif
14751#endif
14752#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478 14753 TEST_f_f (tgamma, 0x6.db8c603359a97108p+8L, 1.1897314953572317517071551278058233700012e+4932L),
e9eee333 14754 TEST_f_f (tgamma, 0x6.db8c603359a9711p+8L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d8cd06db 14755# if LDBL_MANT_DIG >= 113
74c57478 14756 TEST_f_f (tgamma, 0x6.db8c603359a971081bc4a2e9dfdp+8L, 1.1897314953572317650857593266265995494998e+4932L),
e9eee333 14757 TEST_f_f (tgamma, 0x6.db8c603359a971081bc4a2e9dfd4p+8L, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
d8cd06db
JM		 14758# endif
14759#endif
74c57478
JM		 14760 END_DATA (tgamma)
14761 };
2550dfe9 14762
8847214f 14763static void
74c57478 14764tgamma_test (void)
8847214f 14765{
74c57478
JM		 14766 errno = 0;
14767 FUNC(tgamma) (1);
14768 if (errno == ENOSYS)
14769 /* Function not implemented. */
14770 return;
8847214f 14771
74c57478
JM		 14772 START (tgamma);
14773 RUN_TEST_LOOP_f_f (tgamma, tgamma_test_data, );
14774 END (tgamma);
14775}
8847214f 14776
8847214f 14777
74c57478
JM		 14778static const struct test_f_f_data trunc_test_data[] =
14779 {
14780 START_DATA (trunc),
14781 TEST_f_f (trunc, plus_infty, plus_infty),
14782 TEST_f_f (trunc, minus_infty, minus_infty),
14783 TEST_f_f (trunc, qnan_value, qnan_value),
14784
14785 TEST_f_f (trunc, 0, 0),
14786 TEST_f_f (trunc, minus_zero, minus_zero),
14787 TEST_f_f (trunc, 0.1, 0),
14788 TEST_f_f (trunc, 0.25, 0),
14789 TEST_f_f (trunc, 0.625, 0),
14790 TEST_f_f (trunc, -0.1, minus_zero),
14791 TEST_f_f (trunc, -0.25, minus_zero),
14792 TEST_f_f (trunc, -0.625, minus_zero),
14793 TEST_f_f (trunc, 1, 1),
14794 TEST_f_f (trunc, -1, -1),
14795 TEST_f_f (trunc, 1.625, 1),
14796 TEST_f_f (trunc, -1.625, -1),
14797
14798 TEST_f_f (trunc, 1048580.625L, 1048580L),
14799 TEST_f_f (trunc, -1048580.625L, -1048580L),
14800
14801 TEST_f_f (trunc, 8388610.125L, 8388610.0L),
14802 TEST_f_f (trunc, -8388610.125L, -8388610.0L),
14803
14804 TEST_f_f (trunc, 4294967296.625L, 4294967296.0L),
14805 TEST_f_f (trunc, -4294967296.625L, -4294967296.0L),
8847214f 14806
f964490f 14807#ifdef TEST_LDOUBLE
74c57478
JM		 14808 /* The result can only be represented in long double. */
14809 TEST_f_f (trunc, 4503599627370495.5L, 4503599627370495.0L),
14810 TEST_f_f (trunc, 4503599627370496.25L, 4503599627370496.0L),
14811 TEST_f_f (trunc, 4503599627370496.5L, 4503599627370496.0L),
14812 TEST_f_f (trunc, 4503599627370496.75L, 4503599627370496.0L),
14813 TEST_f_f (trunc, 4503599627370497.5L, 4503599627370497.0L),
f964490f 14814
5c68d401 14815# if LDBL_MANT_DIG > 100
74c57478
JM		 14816 TEST_f_f (trunc, 4503599627370494.5000000000001L, 4503599627370494.0L),
14817 TEST_f_f (trunc, 4503599627370495.5000000000001L, 4503599627370495.0L),
14818 TEST_f_f (trunc, 4503599627370496.5000000000001L, 4503599627370496.0L),
5c68d401 14819# endif
830fce04 14820
74c57478
JM		 14821 TEST_f_f (trunc, -4503599627370495.5L, -4503599627370495.0L),
14822 TEST_f_f (trunc, -4503599627370496.25L, -4503599627370496.0L),
14823 TEST_f_f (trunc, -4503599627370496.5L, -4503599627370496.0L),
14824 TEST_f_f (trunc, -4503599627370496.75L, -4503599627370496.0L),
14825 TEST_f_f (trunc, -4503599627370497.5L, -4503599627370497.0L),
830fce04 14826
5c68d401 14827# if LDBL_MANT_DIG > 100
74c57478
JM		 14828 TEST_f_f (trunc, -4503599627370494.5000000000001L, -4503599627370494.0L),
14829 TEST_f_f (trunc, -4503599627370495.5000000000001L, -4503599627370495.0L),
14830 TEST_f_f (trunc, -4503599627370496.5000000000001L, -4503599627370496.0L),
5c68d401 14831# endif
f964490f 14832
74c57478
JM		 14833 TEST_f_f (trunc, 9007199254740991.5L, 9007199254740991.0L),
14834 TEST_f_f (trunc, 9007199254740992.25L, 9007199254740992.0L),
14835 TEST_f_f (trunc, 9007199254740992.5L, 9007199254740992.0L),
14836 TEST_f_f (trunc, 9007199254740992.75L, 9007199254740992.0L),
14837 TEST_f_f (trunc, 9007199254740993.5L, 9007199254740993.0L),
f964490f 14838
5c68d401 14839# if LDBL_MANT_DIG > 100
74c57478
JM		 14840 TEST_f_f (trunc, 9007199254740991.0000000000001L, 9007199254740991.0L),
14841 TEST_f_f (trunc, 9007199254740992.0000000000001L, 9007199254740992.0L),
14842 TEST_f_f (trunc, 9007199254740993.0000000000001L, 9007199254740993.0L),
14843 TEST_f_f (trunc, 9007199254740991.5000000000001L, 9007199254740991.0L),
14844 TEST_f_f (trunc, 9007199254740992.5000000000001L, 9007199254740992.0L),
14845 TEST_f_f (trunc, 9007199254740993.5000000000001L, 9007199254740993.0L),
5c68d401
RM		 14846# endif
14847
74c57478
JM		 14848 TEST_f_f (trunc, -9007199254740991.5L, -9007199254740991.0L),
14849 TEST_f_f (trunc, -9007199254740992.25L, -9007199254740992.0L),
14850 TEST_f_f (trunc, -9007199254740992.5L, -9007199254740992.0L),
14851 TEST_f_f (trunc, -9007199254740992.75L, -9007199254740992.0L),
14852 TEST_f_f (trunc, -9007199254740993.5L, -9007199254740993.0L),
f964490f 14853
5c68d401 14854# if LDBL_MANT_DIG > 100
74c57478
JM		 14855 TEST_f_f (trunc, -9007199254740991.0000000000001L, -9007199254740991.0L),
14856 TEST_f_f (trunc, -9007199254740992.0000000000001L, -9007199254740992.0L),
14857 TEST_f_f (trunc, -9007199254740993.0000000000001L, -9007199254740993.0L),
14858 TEST_f_f (trunc, -9007199254740991.5000000000001L, -9007199254740991.0L),
14859 TEST_f_f (trunc, -9007199254740992.5000000000001L, -9007199254740992.0L),
14860 TEST_f_f (trunc, -9007199254740993.5000000000001L, -9007199254740993.0L),
5c68d401
RM		 14861# endif
14862
74c57478
JM		 14863 TEST_f_f (trunc, 72057594037927935.5L, 72057594037927935.0L),
14864 TEST_f_f (trunc, 72057594037927936.25L, 72057594037927936.0L),
14865 TEST_f_f (trunc, 72057594037927936.5L, 72057594037927936.0L),
14866 TEST_f_f (trunc, 72057594037927936.75L, 72057594037927936.0L),
14867 TEST_f_f (trunc, 72057594037927937.5L, 72057594037927937.0L),
14868
14869 TEST_f_f (trunc, -72057594037927935.5L, -72057594037927935.0L),
14870 TEST_f_f (trunc, -72057594037927936.25L, -72057594037927936.0L),
14871 TEST_f_f (trunc, -72057594037927936.5L, -72057594037927936.0L),
14872 TEST_f_f (trunc, -72057594037927936.75L, -72057594037927936.0L),
14873 TEST_f_f (trunc, -72057594037927937.5L, -72057594037927937.0L),
14874
14875 TEST_f_f (trunc, 10141204801825835211973625643007.5L, 10141204801825835211973625643007.0L),
14876 TEST_f_f (trunc, 10141204801825835211973625643008.25L, 10141204801825835211973625643008.0L),
14877 TEST_f_f (trunc, 10141204801825835211973625643008.5L, 10141204801825835211973625643008.0L),
14878 TEST_f_f (trunc, 10141204801825835211973625643008.75L, 10141204801825835211973625643008.0L),
14879 TEST_f_f (trunc, 10141204801825835211973625643009.5L, 10141204801825835211973625643009.0L),
14880#endif
14881 END_DATA (trunc)
14882 };
14883
14884static void
14885trunc_test (void)
14886{
14887 START (trunc);
14888 RUN_TEST_LOOP_f_f (trunc, trunc_test_data, );
14889 END (trunc);
14890}
14891
14892static const struct test_f_f_data y0_test_data[] =
14893 {
14894 START_DATA (y0),
14895 /* y0 is the Bessel function of the second kind of order 0 */
cbe8c4d3
JM		 14896 TEST_f_f (y0, -1.0, minus_infty, INVALID_EXCEPTION|ERRNO_EDOM),
14897 TEST_f_f (y0, -max_value, minus_infty, INVALID_EXCEPTION|ERRNO_EDOM),
74c57478
JM		 14898 TEST_f_f (y0, 0.0, minus_infty),
14899 TEST_f_f (y0, qnan_value, qnan_value),
14900 TEST_f_f (y0, plus_infty, 0),
14901
14902 TEST_f_f (y0, 0.125L, -1.38968062514384052915582277745018693L),
14903 TEST_f_f (y0, 0.75L, -0.137172769385772397522814379396581855L),
14904 TEST_f_f (y0, 1.0, 0.0882569642156769579829267660235151628L),
14905 TEST_f_f (y0, 1.5, 0.382448923797758843955068554978089862L),
14906 TEST_f_f (y0, 2.0, 0.510375672649745119596606592727157873L),
14907 TEST_f_f (y0, 8.0, 0.223521489387566220527323400498620359L),
14908 TEST_f_f (y0, 10.0, 0.0556711672835993914244598774101900481L),
f964490f 14909
74c57478 14910 TEST_f_f (y0, 0x1.3ffp+74L, 1.818984347516051243459467456433028748678e-12L),
f964490f 14911
74c57478
JM		 14912#ifndef TEST_FLOAT
14913 TEST_f_f (y0, 0x1.ff00000000002p+840L, 1.846591691699331493194965158699937660696e-127L),
14914 TEST_f_f (y0, 0x1p1023L, 8.2687542933709649327986678723012001545638e-155L),
f964490f 14915#endif
8847214f 14916
74c57478
JM		 14917#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
14918 TEST_f_f (y0, 0x1p16382L, 8.0839224448726336195866026476176740513439e-2467L),
14919 TEST_f_f (y0, 0x1p16383L, -3.8895531955766020648617743624167352352217e-2467L),
14920#endif
14921
14922 TEST_f_f (y0, 0x1p-10L, -4.4865150767109739412411806297168793661098L),
14923 TEST_f_f (y0, 0x1p-20L, -8.8992283012125827603076426611387876938160L),
14924 TEST_f_f (y0, 0x1p-30L, -1.3311940304267782826037118027401817264906e+1L),
14925 TEST_f_f (y0, 0x1p-40L, -1.7724652307320814696990854700366226762563e+1L),
14926 TEST_f_f (y0, 0x1p-50L, -2.2137364310373846564919987139743760738155e+1L),
14927 TEST_f_f (y0, 0x1p-60L, -2.6550076313426878432849115782108205929120e+1L),
14928 TEST_f_f (y0, 0x1p-70L, -3.0962788316479910300778244424468159753887e+1L),
14929 TEST_f_f (y0, 0x1p-80L, -3.5375500319532942168707373066828113573541e+1L),
14930 TEST_f_f (y0, 0x1p-90L, -3.9788212322585974036636501709188067393195e+1L),
14931 TEST_f_f (y0, 0x1p-100L, -4.420092432563900590456563035154802121284e+1L),
14932 TEST_f_f (y0, 0x1p-110L, -4.861363632869203777249475899390797503250e+1L),
14933 END_DATA (y0)
14934 };
8847214f
UD		 14935
14936static void
14937y0_test (void)
14938{
8a216c1b 14939 FLOAT s, c;
8847214f 14940 errno = 0;
cd53c157
UD		 14941 FUNC (sincos) (0, &s, &c);
14942 if (errno == ENOSYS)
14943 /* Required function not implemented. */
14944 return;
8847214f
UD		 14945 FUNC(y0) (1);
14946 if (errno == ENOSYS)
14947 /* Function not implemented. */
14948 return;
14949
8847214f 14950 START (y0);
74c57478
JM		 14951 RUN_TEST_LOOP_f_f (y0, y0_test_data, );
14952 END (y0);
14953}
14954
8847214f 14955
74c57478
JM		 14956static const struct test_f_f_data y1_test_data[] =
14957 {
14958 START_DATA (y1),
14959 /* y1 is the Bessel function of the second kind of order 1 */
cbe8c4d3
JM		 14960 TEST_f_f (y1, -1.0, minus_infty, INVALID_EXCEPTION|ERRNO_EDOM),
14961 TEST_f_f (y1, -max_value, minus_infty, INVALID_EXCEPTION|ERRNO_EDOM),
74c57478
JM		 14962 TEST_f_f (y1, 0.0, minus_infty),
14963 TEST_f_f (y1, plus_infty, 0),
14964 TEST_f_f (y1, qnan_value, qnan_value),
8847214f 14965
74c57478
JM		 14966 TEST_f_f (y1, 0.125L, -5.19993611253477499595928744876579921L),
14967 TEST_f_f (y1, 0.75L, -1.03759455076928541973767132140642198L),
14968 TEST_f_f (y1, 1.0, -0.781212821300288716547150000047964821L),
14969 TEST_f_f (y1, 1.5, -0.412308626973911295952829820633445323L),
14970 TEST_f_f (y1, 2.0, -0.107032431540937546888370772277476637L),
14971 TEST_f_f (y1, 8.0, -0.158060461731247494255555266187483550L),
14972 TEST_f_f (y1, 10.0, 0.249015424206953883923283474663222803L),
8847214f 14973
74c57478 14974 TEST_f_f (y1, 0x1.27e204p+99L, -8.881610148467797208469612080785210013461e-16L),
c36e1d23
JM		 14975
14976#ifndef TEST_FLOAT
74c57478
JM		 14977 TEST_f_f (y1, 0x1.001000001p+593L, 3.927269966354206207832593635798954916263e-90L),
14978 TEST_f_f (y1, 0x1p1023L, 1.5665258060609012834424478437196679802783e-155L),
c36e1d23
JM		 14979#endif
14980
d2f9799e 14981#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM		 14982 TEST_f_f (y1, 0x1p16382L, 1.2193782500509000574176799046642541129387e-2466L),
14983 TEST_f_f (y1, 0x1p16383L, -9.5859502826270374691362975419147645151233e-2467L),
14984#endif
14985
14986 TEST_f_f (y1, 0x1p-10L, -6.5190099301063115047395187618929589514382e+02L),
14987 TEST_f_f (y1, 0x1p-20L, -6.6754421443450423911167962313100637952285e+05L),
14988 TEST_f_f (y1, 0x1p-30L, -6.8356527557643159612937462812258975438856e+08L),
14989 TEST_f_f (y1, 0x1p-40L, -6.9997084219026594793707805777425993547887e+11L),
14990 TEST_f_f (y1, 0x1p-50L, -7.1677014240283233068755952926181262431559e+14L),
14991 TEST_f_f (y1, 0x1p-60L, -7.3397262582050030662406095795388448059822e+17L),
14992 TEST_f_f (y1, 0x1p-70L, -7.5158796884019231398303842094477769620063e+20L),
14993 TEST_f_f (y1, 0x1p-80L, -7.6962608009235692951863134304745236090943e+23L),
14994 TEST_f_f (y1, 0x1p-90L, -7.8809710601457349582707849528059121757126e+26L),
14995 TEST_f_f (y1, 0x1p-100L, -8.0701143655892325972692837916732540679297e+29L),
14996 TEST_f_f (y1, 0x1p-110L, -8.2637971103633741796037466026734121655600e+32L),
14997 END_DATA (y1)
14998 };
8847214f
UD		 14999
15000static void
15001y1_test (void)
15002{
8a216c1b 15003 FLOAT s, c;
8847214f 15004 errno = 0;
cd53c157
UD		 15005 FUNC (sincos) (0, &s, &c);
15006 if (errno == ENOSYS)
15007 /* Required function not implemented. */
15008 return;
8847214f
UD		 15009 FUNC(y1) (1);
15010 if (errno == ENOSYS)
15011 /* Function not implemented. */
15012 return;
15013
8847214f 15014 START (y1);
74c57478 15015 RUN_TEST_LOOP_f_f (y1, y1_test_data, );
8847214f
UD		 15016 END (y1);
15017}
15018
2550dfe9 15019
0e400df5
JM		 15020static const struct test_if_f_data yn_test_data[] =
15021 {
15022 START_DATA (yn),
15023 /* yn is the Bessel function of the second kind of order n */
15024 /* yn (0, x) == y0 (x) */
cbe8c4d3
JM		 15025 TEST_if_f (yn, 0, -1.0, minus_infty, INVALID_EXCEPTION|ERRNO_EDOM),
15026 TEST_if_f (yn, 0, -max_value, minus_infty, INVALID_EXCEPTION|ERRNO_EDOM),
0e400df5
JM		 15027 TEST_if_f (yn, 0, 0.0, minus_infty),
15028 TEST_if_f (yn, 0, qnan_value, qnan_value),
15029 TEST_if_f (yn, 0, plus_infty, 0),
15030
15031 TEST_if_f (yn, 0, 0.125L, -1.38968062514384052915582277745018693L),
15032 TEST_if_f (yn, 0, 0.75L, -0.137172769385772397522814379396581855L),
15033 TEST_if_f (yn, 0, 1.0, 0.0882569642156769579829267660235151628L),
15034 TEST_if_f (yn, 0, 1.5, 0.382448923797758843955068554978089862L),
15035 TEST_if_f (yn, 0, 2.0, 0.510375672649745119596606592727157873L),
15036 TEST_if_f (yn, 0, 8.0, 0.223521489387566220527323400498620359L),
15037 TEST_if_f (yn, 0, 10.0, 0.0556711672835993914244598774101900481L),
15038
15039 /* yn (1, x) == y1 (x) */
cbe8c4d3 15040 TEST_if_f (yn, 1, -1.0, minus_infty, INVALID_EXCEPTION|ERRNO_EDOM),
0e400df5
JM		 15041 TEST_if_f (yn, 1, 0.0, minus_infty),
15042 TEST_if_f (yn, 1, plus_infty, 0),
15043 TEST_if_f (yn, 1, qnan_value, qnan_value),
15044
15045 TEST_if_f (yn, 1, 0.125L, -5.19993611253477499595928744876579921L),
15046 TEST_if_f (yn, 1, 0.75L, -1.03759455076928541973767132140642198L),
15047 TEST_if_f (yn, 1, 1.0, -0.781212821300288716547150000047964821L),
15048 TEST_if_f (yn, 1, 1.5, -0.412308626973911295952829820633445323L),
15049 TEST_if_f (yn, 1, 2.0, -0.107032431540937546888370772277476637L),
15050 TEST_if_f (yn, 1, 8.0, -0.158060461731247494255555266187483550L),
15051 TEST_if_f (yn, 1, 10.0, 0.249015424206953883923283474663222803L),
15052
15053 /* yn (3, x) */
15054 TEST_if_f (yn, 3, plus_infty, 0),
15055 TEST_if_f (yn, 3, qnan_value, qnan_value),
15056
15057 TEST_if_f (yn, 3, 0.125L, -2612.69757350066712600220955744091741L),
15058 TEST_if_f (yn, 3, 0.75L, -12.9877176234475433186319774484809207L),
15059 TEST_if_f (yn, 3, 1.0, -5.82151760596472884776175706442981440L),
15060 TEST_if_f (yn, 3, 2.0, -1.12778377684042778608158395773179238L),
15061 TEST_if_f (yn, 3, 10.0, -0.251362657183837329779204747654240998L),
15062
15063 /* yn (10, x) */
15064 TEST_if_f (yn, 10, plus_infty, 0),
15065 TEST_if_f (yn, 10, qnan_value, qnan_value),
15066
15067 TEST_if_f (yn, 10, 0.125L, -127057845771019398.252538486899753195L),
15068 TEST_if_f (yn, 10, 0.75L, -2133501638.90573424452445412893839236L),
15069 TEST_if_f (yn, 10, 1.0, -121618014.278689189288130426667971145L),
15070 TEST_if_f (yn, 10, 2.0, -129184.542208039282635913145923304214L),
15071 TEST_if_f (yn, 10, 10.0, -0.359814152183402722051986577343560609L),
15072
15073 /* Check whether yn returns correct value for LDBL_MIN, DBL_MIN,
15074 and FLT_MIN. See Bug 14173. */
0e400df5
JM		 15075 TEST_if_f (yn, 10, min_value, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
15076 END_DATA (yn)
15077 };
15078
8847214f
UD		 15079static void
15080yn_test (void)
15081{
8a216c1b 15082 FLOAT s, c;
8847214f 15083 errno = 0;
cd53c157
UD		 15084 FUNC (sincos) (0, &s, &c);
15085 if (errno == ENOSYS)
15086 /* Required function not implemented. */
15087 return;
8847214f
UD		 15088 FUNC(yn) (1, 1);
15089 if (errno == ENOSYS)
15090 /* Function not implemented. */
15091 return;
15092
8847214f 15093 START (yn);
0e400df5 15094 RUN_TEST_LOOP_if_f (yn, yn_test_data, );
541428fe 15095 END (yn);
8847214f
UD		 15096}
15097
15098
74c57478
JM		 15099static const struct test_f_f_data significand_test_data[] =
15100 {
15101 START_DATA (significand),
15102 /* significand returns the mantissa of the exponential representation. */
15103 /* TODO: missing +/-Inf as well as qNaN tests. */
15104 TEST_f_f (significand, 4.0, 1.0),
15105 TEST_f_f (significand, 6.0, 1.5),
15106 TEST_f_f (significand, 8.0, 1.0),
15107 END_DATA (significand)
15108 };
15109
f5c8f285
UD		 15110static void
15111significand_test (void)
15112{
f5c8f285 15113 START (significand);
74c57478 15114 RUN_TEST_LOOP_f_f (significand, significand_test_data, );
f5c8f285
UD		 15115 END (significand);
15116}
15117
15118
8847214f
UD		 15119static void
15120initialize (void)
15121{
15122 fpstack_test ("start *init*");
8847214f 15123
8847214f
UD		 15124 /* Clear all exceptions. From now on we must not get random exceptions. */
15125 feclearexcept (FE_ALL_EXCEPT);
f2da7793 15126 errno = 0;
8847214f
UD		 15127
15128 /* Test to make sure we start correctly. */
15129 fpstack_test ("end *init*");
15130}
15131
15132/* Definitions of arguments for argp functions. */
15133static const struct argp_option options[] =
15134{
15135 { "verbose", 'v', "NUMBER", 0, "Level of verbosity (0..3)"},
15136 { "ulps-file", 'u', NULL, 0, "Output ulps to file ULPs"},
15137 { "no-max-error", 'f', NULL, 0,
15138 "Don't output maximal errors of functions"},
15139 { "no-points", 'p', NULL, 0,
15140 "Don't output results of functions invocations"},
cd33623e
UD		 15141 { "ignore-max-ulp", 'i', "yes/no", 0,
15142 "Ignore given maximal errors"},
26510bdd
CD		 15143 { "output-dir", 'o', "DIR", 0,
15144 "Directory where generated files will be placed"},
8847214f
UD		 15145 { NULL, 0, NULL, 0, NULL }
15146};
15147
15148/* Short description of program. */
15149static const char doc[] = "Math test suite: " TEST_MSG ;
15150
15151/* Prototype for option handler. */
fe559c5e 15152static error_t parse_opt (int key, char *arg, struct argp_state *state);
8847214f
UD		 15153
15154/* Data structure to communicate with argp functions. */
15155static struct argp argp =
15156{
15157 options, parse_opt, NULL, doc,
15158};
15159
15160
15161/* Handle program arguments. */
15162static error_t
15163parse_opt (int key, char *arg, struct argp_state *state)
15164{
15165 switch (key)
15166 {
15167 case 'f':
6815fabc 15168 output_max_error = 0;
8847214f 15169 break;
cd33623e
UD		 15170 case 'i':
15171 if (strcmp (arg, "yes") == 0)
15172 ignore_max_ulp = 1;
15173 else if (strcmp (arg, "no") == 0)
15174 ignore_max_ulp = 0;
15175 break;
26510bdd
CD		 15176 case 'o':
15177 output_dir = (char *) malloc (strlen (arg) + 1);
15178 if (output_dir != NULL)
15179 strcpy (output_dir, arg);
15180 else
15181 return errno;
15182 break;
8847214f 15183 case 'p':
6815fabc 15184 output_points = 0;
8847214f
UD		 15185 break;
15186 case 'u':
15187 output_ulps = 1;
15188 break;
15189 case 'v':
15190 if (optarg)
15191 verbose = (unsigned int) strtoul (optarg, NULL, 0);
15192 else
15193 verbose = 3;
15194 break;
15195 default:
15196 return ARGP_ERR_UNKNOWN;
15197 }
15198 return 0;
15199}
15200
15201#if 0
15202/* function to check our ulp calculation. */
15203void
15204check_ulp (void)
15205{
15206 int i;
15207
15208 FLOAT u, diff, ulp;
15209 /* This gives one ulp. */
15210 u = FUNC(nextafter) (10, 20);
15211 check_equal (10.0, u, 1, &diff, &ulp);
15212 printf ("One ulp: % .4" PRINTF_NEXPR "\n", ulp);
15213
15214 /* This gives one more ulp. */
15215 u = FUNC(nextafter) (u, 20);
15216 check_equal (10.0, u, 2, &diff, &ulp);
15217 printf ("two ulp: % .4" PRINTF_NEXPR "\n", ulp);
15218
15219 /* And now calculate 100 ulp. */
15220 for (i = 2; i < 100; i++)
15221 u = FUNC(nextafter) (u, 20);
15222 check_equal (10.0, u, 100, &diff, &ulp);
15223 printf ("100 ulp: % .4" PRINTF_NEXPR "\n", ulp);
15224}
15225#endif
15226
15227int
15228main (int argc, char **argv)
15229{
15230
15231 int remaining;
26510bdd
CD		 15232 char *ulps_file_path;
15233 size_t dir_len = 0;
8847214f
UD		 15234
15235 verbose = 1;
15236 output_ulps = 0;
15237 output_max_error = 1;
15238 output_points = 1;
26510bdd 15239 output_dir = NULL;
cd33623e
UD		 15240 /* XXX set to 0 for releases. */
15241 ignore_max_ulp = 0;
bdf09fab 15242
8847214f
UD		 15243 /* Parse and process arguments. */
15244 argp_parse (&argp, argc, argv, 0, &remaining, NULL);
15245
15246 if (remaining != argc)
15247 {
15248 fprintf (stderr, "wrong number of arguments");
15249 argp_help (&argp, stdout, ARGP_HELP_SEE, program_invocation_short_name);
15250 exit (EXIT_FAILURE);
15251 }
15252
15253 if (output_ulps)
15254 {
26510bdd
CD		 15255 if (output_dir != NULL)
15256 dir_len = strlen (output_dir);
15257 ulps_file_path = (char *) malloc (dir_len + strlen (ulps_file_name) + 1);
15258 if (ulps_file_path == NULL)
15259 {
15260 perror ("can't allocate path for `ULPs' file: ");
15261 exit (1);
15262 }
15263 sprintf (ulps_file_path, "%s%s", output_dir == NULL ? "" : output_dir, ulps_file_name);
15264 ulps_file = fopen (ulps_file_path, "a");
8847214f
UD		 15265 if (ulps_file == NULL)
15266 {
15267 perror ("can't open file `ULPs' for writing: ");
15268 exit (1);
15269 }
15270 }
15271
15272
15273 initialize ();
15274 printf (TEST_MSG);
15275
15276#if 0
15277 check_ulp ();
15278#endif
15279
ec751a23 15280 /* Keep the tests a wee bit ordered (according to ISO C99). */
8847214f 15281 /* Classification macros: */
ef1bb361 15282 finite_test ();
8847214f
UD		 15283 fpclassify_test ();
15284 isfinite_test ();
ef1bb361
JM		 15285 isinf_test ();
15286 isnan_test ();
8847214f 15287 isnormal_test ();
57267616 15288 issignaling_test ();
8847214f
UD		 15289 signbit_test ();
15290
15291 /* Trigonometric functions: */
15292 acos_test ();
5ba3cc69
JM		 15293 acos_test_tonearest ();
15294 acos_test_towardzero ();
15295 acos_test_downward ();
15296 acos_test_upward ();
8847214f 15297 asin_test ();
5ba3cc69
JM		 15298 asin_test_tonearest ();
15299 asin_test_towardzero ();
15300 asin_test_downward ();
15301 asin_test_upward ();
8847214f
UD		 15302 atan_test ();
15303 atan2_test ();
15304 cos_test ();
804360ed
JM		 15305 cos_test_tonearest ();
15306 cos_test_towardzero ();
15307 cos_test_downward ();
15308 cos_test_upward ();
8847214f 15309 sin_test ();
804360ed
JM		 15310 sin_test_tonearest ();
15311 sin_test_towardzero ();
15312 sin_test_downward ();
15313 sin_test_upward ();
8847214f
UD		 15314 sincos_test ();
15315 tan_test ();
804360ed
JM		 15316 tan_test_tonearest ();
15317 tan_test_towardzero ();
15318 tan_test_downward ();
15319 tan_test_upward ();
8847214f
UD		 15320
15321 /* Hyperbolic functions: */
15322 acosh_test ();
15323 asinh_test ();
15324 atanh_test ();
15325 cosh_test ();
ca811b22
JM		 15326 cosh_test_tonearest ();
15327 cosh_test_towardzero ();
15328 cosh_test_downward ();
15329 cosh_test_upward ();
8847214f 15330 sinh_test ();
ca811b22
JM		 15331 sinh_test_tonearest ();
15332 sinh_test_towardzero ();
15333 sinh_test_downward ();
15334 sinh_test_upward ();
8847214f
UD		 15335 tanh_test ();
15336
15337 /* Exponential and logarithmic functions: */
15338 exp_test ();
28afd92d
JM		 15339 exp_test_tonearest ();
15340 exp_test_towardzero ();
15341 exp_test_downward ();
15342 exp_test_upward ();
8847214f
UD		 15343 exp10_test ();
15344 exp2_test ();
15345 expm1_test ();
15346 frexp_test ();
15347 ldexp_test ();
15348 log_test ();
15349 log10_test ();
15350 log1p_test ();
15351 log2_test ();
15352 logb_test ();
a462cb63 15353 logb_test_downward ();
8847214f
UD		 15354 modf_test ();
15355 ilogb_test ();
15356 scalb_test ();
15357 scalbn_test ();
15358 scalbln_test ();
f5c8f285 15359 significand_test ();
8847214f
UD		 15360
15361 /* Power and absolute value functions: */
15362 cbrt_test ();
15363 fabs_test ();
15364 hypot_test ();
15365 pow_test ();
b7cd39e8
JM		 15366 pow_test_tonearest ();
15367 pow_test_towardzero ();
15368 pow_test_downward ();
15369 pow_test_upward ();
8847214f
UD		 15370 sqrt_test ();
15371
15372 /* Error and gamma functions: */
15373 erf_test ();
15374 erfc_test ();
15375 gamma_test ();
15376 lgamma_test ();
15377 tgamma_test ();
15378
15379 /* Nearest integer functions: */
15380 ceil_test ();
15381 floor_test ();
15382 nearbyint_test ();
15383 rint_test ();
4d37c8aa
UD		 15384 rint_test_tonearest ();
15385 rint_test_towardzero ();
15386 rint_test_downward ();
15387 rint_test_upward ();
8847214f 15388 lrint_test ();
6624dbc0
UD		 15389 lrint_test_tonearest ();
15390 lrint_test_towardzero ();
15391 lrint_test_downward ();
15392 lrint_test_upward ();
8847214f 15393 llrint_test ();
830fce04
RM		 15394 llrint_test_tonearest ();
15395 llrint_test_towardzero ();
15396 llrint_test_downward ();
15397 llrint_test_upward ();
8847214f
UD		 15398 round_test ();
15399 lround_test ();
15400 llround_test ();
15401 trunc_test ();
15402
15403 /* Remainder functions: */
15404 fmod_test ();
15405 remainder_test ();
15406 remquo_test ();
15407
15408 /* Manipulation functions: */
15409 copysign_test ();
15410 nextafter_test ();
fe559c5e 15411 nexttoward_test ();
8847214f
UD		 15412
15413 /* maximum, minimum and positive difference functions */
15414 fdim_test ();
15415 fmax_test ();
15416 fmin_test ();
15417
15418 /* Multiply and add: */
15419 fma_test ();
8ec5b013
JM		 15420 fma_test_towardzero ();
15421 fma_test_downward ();
15422 fma_test_upward ();
8847214f 15423
0e8e0c1c
JM		 15424 /* Comparison macros: */
15425 isgreater_test ();
15426 isgreaterequal_test ();
15427 isless_test ();
15428 islessequal_test ();
15429 islessgreater_test ();
15430 isunordered_test ();
15431
8847214f
UD		 15432 /* Complex functions: */
15433 cabs_test ();
15434 cacos_test ();
15435 cacosh_test ();
15436 carg_test ();
15437 casin_test ();
15438 casinh_test ();
15439 catan_test ();
15440 catanh_test ();
15441 ccos_test ();
15442 ccosh_test ();
15443 cexp_test ();
0cdc8e6f 15444 cimag_test ();
8847214f
UD		 15445 clog10_test ();
15446 clog_test ();
0cdc8e6f 15447 conj_test ();
8847214f
UD		 15448 cpow_test ();
15449 cproj_test ();
0cdc8e6f 15450 creal_test ();
8847214f
UD		 15451 csin_test ();
15452 csinh_test ();
15453 csqrt_test ();
15454 ctan_test ();
ca61cf32
JM		 15455 ctan_test_tonearest ();
15456 ctan_test_towardzero ();
15457 ctan_test_downward ();
15458 ctan_test_upward ();
8847214f 15459 ctanh_test ();
ca61cf32
JM		 15460 ctanh_test_tonearest ();
15461 ctanh_test_towardzero ();
15462 ctanh_test_downward ();
15463 ctanh_test_upward ();
8847214f
UD		 15464
15465 /* Bessel functions: */
15466 j0_test ();
15467 j1_test ();
15468 jn_test ();
15469 y0_test ();
15470 y1_test ();
15471 yn_test ();
15472
15473 if (output_ulps)
15474 fclose (ulps_file);
15475
15476 printf ("\nTest suite completed:\n");
f2da7793
JM		 15477 printf (" %d test cases plus %d tests for exception flags and\n"
15478 " %d tests for errno executed.\n",
15479 noTests, noExcTests, noErrnoTests);
8847214f
UD		 15480 if (noErrors)
15481 {
a9a56960 15482 printf (" %d errors occurred.\n", noErrors);
cf3141a5 15483 return 1;
8847214f
UD		 15484 }
15485 printf (" All tests passed successfully.\n");
cf3141a5
AJ		 15486
15487 return 0;
8847214f
UD		 15488}
15489
15490/*
15491 * Local Variables:
15492 * mode:c
15493 * End:
15494 */
A mirror of the official glibc repository